From 0c4708ad28543949aaa48862aaa60a1202bf9848 Mon Sep 17 00:00:00 2001 From: Leonardo de Moura Date: Tue, 16 Jul 2019 09:07:39 -0700 Subject: [PATCH] chore(stage0): update --- src/stage0/init/data/option/basic.cpp | 59 + src/stage0/init/lean/parser/command.cpp | 11581 +++++++++++++++------ src/stage0/init/lean/parser/level.cpp | 474 +- src/stage0/init/lean/parser/module.cpp | 478 +- src/stage0/init/lean/parser/parser.cpp | 2598 +++-- src/stage0/init/lean/parser/term.cpp | 12148 ++++++++++++++++------ src/stage0/init/lean/syntax.cpp | 36 + 7 files changed, 19960 insertions(+), 7414 deletions(-) diff --git a/src/stage0/init/data/option/basic.cpp b/src/stage0/init/data/option/basic.cpp index 6780a8ba5b..6fc1bb37a5 100644 --- a/src/stage0/init/data/option/basic.cpp +++ b/src/stage0/init/data/option/basic.cpp @@ -34,6 +34,7 @@ obj* l_Option_bind___main(obj*, obj*); obj* l_Option_Monad___closed__4; obj* l_Option_Monad; obj* l_Option_get___rarg___boxed(obj*, obj*); +obj* l_Option_HasBeq(obj*); obj* l_Option_HasLess___boxed(obj*, obj*); obj* l_Option_Monad___lambda__5(obj*, obj*, obj*, obj*); obj* l_Option_decidableRelLt___boxed(obj*, obj*); @@ -52,6 +53,7 @@ obj* l_Option_orelse___rarg___boxed(obj*, obj*); obj* l_Option_map(obj*, obj*); obj* l_Option_Monad___lambda__1(obj*, obj*, obj*, obj*); uint8 l_Option_toBool___rarg(obj*); +obj* l_Option_HasBeq___rarg(obj*, obj*, obj*); obj* l_Option_getOrElse___main___rarg(obj*, obj*); obj* l_Option_toMonad___rarg(obj*, obj*, obj*); uint8 l_Option_toBool___main___rarg(obj*); @@ -1213,6 +1215,62 @@ x_5 = lean::box(x_4); return x_5; } } +obj* l_Option_HasBeq___rarg(obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +if (lean::obj_tag(x_2) == 0) +{ +lean::dec(x_1); +if (lean::obj_tag(x_3) == 0) +{ +uint8 x_4; obj* x_5; +x_4 = 1; +x_5 = lean::box(x_4); +return x_5; +} +else +{ +uint8 x_6; obj* x_7; +lean::dec(x_3); +x_6 = 0; +x_7 = lean::box(x_6); +return x_7; +} +} +else +{ +if (lean::obj_tag(x_3) == 0) +{ +uint8 x_8; obj* x_9; +lean::dec(x_2); +lean::dec(x_1); +x_8 = 0; +x_9 = lean::box(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); +lean::dec(x_2); +x_11 = lean::cnstr_get(x_3, 0); +lean::inc(x_11); +lean::dec(x_3); +x_12 = lean::apply_2(x_1, x_10, x_11); +return x_12; +} +} +} +} +obj* l_Option_HasBeq(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = lean::alloc_closure(reinterpret_cast(l_Option_HasBeq___rarg), 3, 0); +return x_2; +} +} obj* l_Option_HasLess(obj* x_1, obj* x_2) { _start: { @@ -1291,6 +1349,7 @@ lean::register_constant(lean::mk_const_name(lean::mk_const_name("Option"), "Alte REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name("Option"), "decidableRelLt"), 2, l_Option_decidableRelLt___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name("Option"), "Inhabited"), 1, l_Option_Inhabited); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name("Option"), "DecidableEq"), 1, l_Option_DecidableEq); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name("Option"), "HasBeq"), 1, l_Option_HasBeq); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name("Option"), "HasLess"), 2, l_Option_HasLess___boxed); return w; } diff --git a/src/stage0/init/lean/parser/command.cpp b/src/stage0/init/lean/parser/command.cpp index 7a092b74b5..64d123d19c 100644 --- a/src/stage0/init/lean/parser/command.cpp +++ b/src/stage0/init/lean/parser/command.cpp @@ -18,11 +18,13 @@ obj* l_Lean_Parser_Command_precedenceLit___closed__3; obj* l_Lean_Parser_Command_visibility___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__8; obj* l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__5; -extern obj* l_Lean_Parser_chFn___rarg___closed__1; obj* l_Lean_Parser_Command_declModifiers___closed__3; obj* l_Lean_Parser_Command_docComment___elambda__1___closed__4; +obj* l_Lean_Parser_Command_infix___elambda__1___rarg___closed__6; extern obj* l_Lean_Parser_Term_id___closed__2; obj* l_Lean_Parser_Command_attrInstance___elambda__1___closed__2; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Command_constant___elambda__1___closed__7; obj* l_Lean_Parser_Command_axiom___closed__1; obj* l_Lean_Parser_Command_constant___closed__1; extern obj* l_Lean_Parser_Term_haveAssign___closed__1; @@ -35,6 +37,7 @@ obj* l_Lean_Parser_Command_protected___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Command_reserve___elambda__1___closed__5; obj* l_Lean_Parser_Command_declId___closed__7; obj* l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__2; +obj* l_Lean_Parser_Command_private___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_export; obj* l_Lean_Parser_Command_docComment___closed__2; obj* l_Lean_Parser_Command_openRenaming___closed__2; @@ -48,6 +51,7 @@ obj* l_Lean_Parser_Command_def___closed__5; obj* l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_declId___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_instance___elambda__1___closed__4; obj* l_Lean_Parser_Command_infix___elambda__1___rarg(obj*, obj*); +obj* l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_infix; obj* l_Lean_Parser_Command_protected___elambda__1(obj*); obj* l_Lean_Parser_Command_noncomputable___elambda__1___rarg(obj*, obj*); @@ -60,18 +64,20 @@ obj* l_Lean_Parser_Command_declaration___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_notation___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_section___closed__4; obj* l_Lean_Parser_Command_structExplicitBinder; +obj* l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_openRenaming___closed__3; -extern obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__8; obj* l_Lean_Parser_addBuiltinLeadingParser(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_variables___elambda__1___closed__6; obj* l_Lean_Parser_Command_export___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_relaxedInferMod___elambda__1(obj*); +obj* l_Lean_Parser_Command_instance___elambda__1___closed__7; obj* l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_infixr___closed__1; extern obj* l_Lean_Parser_Term_optType; obj* l_Lean_Parser_Command_constant___closed__3; obj* l_Lean_Parser_Command_universes___elambda__1___closed__5; extern obj* l_Lean_Parser_Term_id___elambda__1___closed__6; +obj* l_Lean_Parser_Command_example___elambda__1___closed__7; obj* l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__1; obj* l_Lean_Parser_rawIdentFn(obj*, obj*); obj* l_Lean_Parser_Command_structure___closed__10; @@ -82,11 +88,13 @@ obj* l_Lean_Parser_Command_infixl___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_mixfixSymbol___closed__2; obj* l_Lean_Parser_Command_declaration___elambda__1___closed__2; obj* l_Lean_Parser_Command_visibility___closed__2; +obj* l_Lean_Parser_Command_partial___elambda__1___rarg___closed__5; obj* l___regBuiltinParser_Lean_Parser_Command_reserve(obj*); extern obj* l_Lean_Parser_Term_list___elambda__1___closed__3; obj* l_Lean_Parser_Command_axiom___closed__3; extern obj* l_Lean_Parser_Term_cons___elambda__1___closed__3; obj* l___regBuiltinParser_Lean_Parser_Command_section(obj*); +obj* l_Lean_Parser_Command_partial___elambda__1___rarg___closed__4; obj* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___spec__1(uint8, uint8, obj*, obj*, obj*); extern obj* l_Lean_Parser_Term_id___closed__3; obj* l_Lean_Parser_Command_attributes___elambda__1___closed__6; @@ -94,15 +102,19 @@ obj* l_Lean_FileMap_toPosition___main(obj*, obj*); obj* l_Lean_Parser_Command_commentBody___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_notation___closed__4; obj* l_Lean_Parser_Command_reserve___closed__6; +obj* l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Command_relaxedInferMod___closed__2; obj* l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Command_universe___elambda__1(obj*); obj* l_Lean_Parser_Command_def___elambda__1___closed__2; obj* l_Lean_Parser_Command_openOnly___closed__2; +obj* l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__6; +extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; obj* l_Lean_Parser_Command_reserve___elambda__1___boxed(obj*, obj*, obj*); extern obj* l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; obj* l_Lean_Parser_Command_extends___closed__1; +obj* l_Lean_Parser_Command_docComment___elambda__1___closed__9; obj* l_Lean_Parser_builtinCommandParsingTable; obj* l_Lean_Parser_Command_example; obj* l_Lean_Parser_Command_openHiding; @@ -114,12 +126,14 @@ obj* l_Lean_Parser_Command_openHiding___elambda__1___closed__1; obj* l___regBuiltinParser_Lean_Parser_Command_notation(obj*); obj* l_Lean_Parser_ParserState_restore(obj*, obj*, obj*); obj* l_Lean_Parser_Command_precedence___elambda__1(obj*); +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Command_attributes___elambda__1___closed__1; obj* l_Lean_Parser_Command_set__option___closed__6; obj* l_Lean_Parser_Command_open___elambda__1___closed__3; obj* l_Lean_Parser_Command_commentBody___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_regBuiltinCommandParserAttr___closed__1; obj* l_Lean_Parser_Command_universe___elambda__1___rarg___closed__5; +obj* l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_precedence___closed__2; obj* l_Lean_Parser_Command_attrArg___closed__4; @@ -129,6 +143,7 @@ obj* l_Lean_Parser_Command_inferMod___closed__2; obj* l_Lean_Parser_Command_precedence; obj* l_Lean_Parser_Command_openRenaming; extern obj* l_Lean_Parser_Term_list___closed__4; +extern obj* l_Lean_Parser_Term_list___elambda__1___closed__10; obj* l_Lean_Parser_Command_mixfix___closed__1; obj* l_Lean_Parser_mergeOrElseErrors(obj*, obj*, obj*); obj* l_Lean_Parser_Command_variable___elambda__1___closed__2; @@ -141,6 +156,7 @@ extern obj* l_Lean_Parser_Level_max___elambda__1___closed__2; obj* l_Lean_Parser_Command_attribute___elambda__1___closed__4; obj* l_Lean_Parser_Command_declValEqns___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_check___elambda__1___rarg___closed__2; +obj* l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(obj*); obj* l_Lean_Parser_Command_relaxedInferMod___closed__1; obj* l_Lean_Parser_Command_declModifiers___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_attrArg___elambda__1___boxed(obj*); @@ -152,6 +168,7 @@ obj* l_Lean_Parser_Command_structure; obj* l_Lean_Parser_Command_openRenaming___closed__5; obj* l_Lean_Parser_Command_attribute___elambda__1___closed__10; obj* l_Lean_Parser_orelseInfo(obj*, obj*); +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_structure___elambda__1___closed__1; obj* l_Lean_Parser_Command_example___elambda__1___closed__5; obj* l_Lean_Parser_Command_def___elambda__1(obj*, obj*, obj*); @@ -169,10 +186,12 @@ obj* l_Lean_Parser_Command_namespace___closed__1; obj* l_Lean_Parser_Command_classTk___elambda__1(obj*); obj* l_Lean_Parser_Command_structImplicitBinder___closed__7; obj* l_Lean_Parser_Command_openRenaming___closed__4; +obj* l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_declSig; +extern obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; obj* l_Lean_Parser_Command_protected___elambda__1___boxed(obj*); +obj* l_Lean_Parser_Command_classInductive___closed__3; obj* l_Lean_Parser_Command_example___elambda__1___closed__2; -obj* l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Command_declaration___closed__1; obj* l_Lean_Parser_Command_noncomputable___closed__2; obj* l_Lean_Parser_Command_openOnly___elambda__1___boxed(obj*, obj*, obj*); @@ -209,7 +228,8 @@ obj* l_Lean_Parser_Command_visibility; obj* l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(uint8, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Command_structInstBinder; obj* l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__4; -obj* l_Lean_Parser_Command_classTk___closed__4; +obj* l_Lean_Parser_Command_partial___elambda__1___rarg___closed__6; +extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; obj* l_Lean_Parser_Command_private___elambda__1___rarg___closed__6; extern obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; obj* l_Lean_Parser_Command_quotedSymbolPrec___closed__1; @@ -228,6 +248,7 @@ obj* l_Lean_Parser_Command_theorem___closed__7; obj* l_Lean_Parser_Command_infix___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_section___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__5; +obj* l_Lean_Parser_ParserState_mkUnexpectedError(obj*, obj*); obj* l_Lean_Parser_Command_declId___closed__1; obj* l_Lean_Parser_Command_openRenamingItem___closed__3; obj* l_Lean_Parser_Command_mixfixSymbol; @@ -251,10 +272,10 @@ obj* l_Lean_Parser_Command_attrArg___closed__3; obj* l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; obj* l_Lean_Parser_Command_example___elambda__1___closed__6; obj* l_Lean_Parser_Command_structure___closed__9; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_private___closed__4; +obj* l_Lean_Parser_Command_section___elambda__1___rarg___closed__7; +extern obj* l_Lean_Parser_Term_id___elambda__1___closed__11; obj* l_Lean_Parser_Command_declId___closed__2; -obj* l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Command_universe; obj* l_Lean_Parser_Command_universes___closed__1; obj* l_Lean_Parser_Command_docComment___closed__4; @@ -276,19 +297,20 @@ obj* l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_notation___closed__3; obj* l_Lean_Parser_Command_commentBody___closed__2; obj* l_Lean_Parser_Command_universes___closed__4; +obj* l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_structureTk___closed__3; obj* l_Lean_Parser_Command_optDeclSig; obj* l_Lean_Parser_Command_universes___elambda__1___closed__1; obj* l_Lean_Parser_Command_export___closed__4; obj* l_Lean_Parser_Command_declaration___closed__3; obj* l_Lean_Parser_Command_declVal___closed__3; -obj* l_Lean_Parser_symbolFnAux(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_declId___closed__6; obj* l_Lean_Parser_Command_variable___elambda__1___closed__5; obj* l_Lean_Parser_Command_set__option___closed__8; obj* l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_introRule___closed__5; obj* l_Lean_Parser_Command_end___closed__2; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_declModifiers___closed__7; obj* l_Lean_Parser_Command_mixfixKind___closed__5; obj* l_Lean_Parser_Command_export___elambda__1___boxed(obj*, obj*, obj*); @@ -306,6 +328,7 @@ obj* l_Lean_Parser_Command_structImplicitBinder___closed__6; obj* l_Lean_Parser_Command_axiom___elambda__1___closed__2; obj* l_Lean_Parser_Command_structure___elambda__1___closed__2; obj* l_Lean_Parser_Command_abbrev___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_Command_partial___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_attributes___elambda__1___closed__5; obj* l_Lean_Parser_Command_mixfixKind___closed__1; obj* l_Lean_Parser_Command_theorem___elambda__1___closed__1; @@ -313,11 +336,13 @@ obj* l_Lean_Parser_Command_openRenaming___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_init__quot___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_mixfixSymbol___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_prefix___elambda__1___boxed(obj*); +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structFields___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_structInstBinder___closed__3; obj* l_Lean_Parser_Command_universe___closed__2; obj* l_Lean_Parser_Command_open___closed__5; obj* l_Lean_Parser_Command_openRenamingItem___closed__1; +obj* l_Lean_Parser_Command_partial___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_postfix___elambda__1(obj*); obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_openRenamingItem___closed__5; @@ -332,6 +357,7 @@ obj* l_Lean_Parser_Command_declSig___closed__1; obj* l_Lean_Parser_Command_introRule___closed__2; obj* l_Lean_Parser_Command_constant___elambda__1___closed__2; obj* l_Lean_Parser_Command_open___closed__7; +obj* l_Lean_Parser_Command_classInductive___elambda__1___closed__3; obj* l_Lean_Parser_Command_postfix; obj* l_Lean_Parser_registerParserAttribute(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__6; @@ -361,13 +387,16 @@ extern obj* l_Bool_HasRepr___closed__2; obj* l_Lean_Parser_Command_structureTk___closed__1; obj* l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Command_inferMod___elambda__1(obj*); +obj* l_Lean_Parser_Command_extends___elambda__1___closed__7; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_declValEqns___elambda__1___spec__2(obj*, uint8, obj*, obj*, obj*); +obj* l_Lean_Parser_Command_classInductive___closed__2; obj* l_Lean_Parser_Command_variables___closed__2; obj* l_Lean_Parser_Command_identPrec___closed__1; extern obj* l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_export___closed__6; obj* l_Lean_Parser_Command_reserve___closed__4; obj* l_Lean_Parser_Command_axiom; +obj* l_Lean_Parser_Command_inductive___elambda__1___closed__7; obj* l_Lean_Parser_Command_openOnly___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_attrInstance___closed__4; obj* l_Lean_Parser_Command_declModifiers___elambda__1___closed__2; @@ -376,16 +405,19 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_declValEqns___spec__2 obj* l_Lean_Parser_Command_theorem___closed__4; obj* l_Lean_Parser_Command_open___closed__11; obj* l_Lean_Parser_Command_attrArg___elambda__1(obj*); +obj* l_Lean_Parser_Command_classInductive___elambda__1___closed__7; obj* l_Lean_Parser_Command_section___closed__1; obj* l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_reserve___closed__1; obj* l_Lean_Parser_Command_attributes___closed__6; +obj* l_Lean_Parser_Command_notation___elambda__1___closed__6; obj* l_Lean_Parser_commandParser___boxed(obj*, obj*); obj* l_Lean_Parser_Command_structureTk___closed__2; obj* l_Lean_Parser_Command_mixfixSymbol___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_introRule___closed__3; obj* l_Lean_Parser_Command_classTk___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_maxPrec___closed__3; +obj* l_Lean_Parser_Command_check___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_reserve___closed__5; obj* l_Lean_Parser_Command_axiom___elambda__1___closed__5; obj* l_Lean_Parser_Command_noncomputable___closed__1; @@ -394,9 +426,8 @@ obj* l_Lean_Parser_Command_theorem___closed__2; obj* l_Lean_Parser_Command_declId___closed__8; obj* l_Lean_Parser_Command_strictInferMod___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_reserve; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Command_abbrev___closed__7; -extern obj* l_Lean_Parser_Term_id___elambda__1___closed__12; +obj* l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_openOnly___closed__6; extern obj* l_Lean_Parser_Term_list___elambda__1___closed__4; obj* l_Lean_Parser_Command_example___closed__2; @@ -407,15 +438,14 @@ obj* l_Lean_Parser_Command_docComment___elambda__1___closed__8; obj* l_Lean_Parser_Command_inferMod___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_inductive___elambda__1___closed__1; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_declValEqns___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Command_partial___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_theorem___elambda__1___closed__3; obj* l_Lean_Parser_Command_mixfix___elambda__1___closed__2; obj* l_Lean_Parser_Command_classTk___closed__2; -extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; obj* l___regBuiltinParser_Lean_Parser_Command_export(obj*); obj* l_Lean_Parser_Command_theorem___closed__6; obj* l_Lean_Parser_Command_infix___closed__3; obj* l_Lean_Parser_Command_attribute___elambda__1___closed__1; -obj* l___private_init_lean_parser_parser_2__rawAux___main___rarg(obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_binderDefault___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_visibility___elambda__1(obj*); obj* l_Lean_Parser_Command_openHiding___closed__6; @@ -423,9 +453,11 @@ obj* l_Lean_Parser_Command_docComment; obj* l_Lean_Parser_Command_openHiding___elambda__1___closed__2; obj* l_Lean_Parser_Command_example___elambda__1___closed__4; obj* l_Lean_Parser_Command_protected___closed__3; +obj* l_Lean_Parser_Command_partial___closed__4; obj* l_Lean_Parser_ParserState_mkNode(obj*, obj*, obj*); obj* l_Lean_Parser_Command_mixfixKind___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_attribute___closed__3; +obj* l_Lean_Parser_Command_partial___closed__1; obj* l_Lean_Parser_Command_universes___elambda__1___closed__2; obj* l_Lean_Parser_Command_abbrev___elambda__1___closed__2; obj* l_Lean_Parser_Command_abbrev___elambda__1___closed__5; @@ -447,6 +479,7 @@ obj* l_Lean_Parser_Command_openHiding___closed__4; obj* l_Lean_Parser_Command_unsafe___closed__1; obj* l_Lean_Parser_Command_identPrec___closed__4; obj* l_Lean_Parser_Command_inductive___closed__3; +obj* l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__13; obj* l_Lean_Parser_Command_declaration___closed__12; obj* l_Lean_Parser_Command_strictInferMod___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_variable___closed__2; @@ -456,6 +489,7 @@ obj* l_Lean_Parser_Command_structInstBinder___closed__1; obj* l_Lean_Parser_Command_extends___elambda__1___closed__6; obj* l_Lean_Parser_Command_set__option___closed__9; obj* l_Lean_Parser_Command_check___closed__3; +obj* l_Lean_Parser_Command_partial; obj* l_Lean_Parser_Command_def___elambda__1___closed__1; obj* l_Lean_Parser_Command_universe___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__1; @@ -485,6 +519,7 @@ obj* l___regBuiltinParser_Lean_Parser_Command_declaration(obj*); obj* l_Lean_Parser_Command_mixfix___closed__2; obj* l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Command_declaration___elambda__1___closed__1; +obj* l_Lean_Parser_Command_classInductive___closed__6; obj* l_Lean_Parser_Command_extends; obj* l_Lean_Parser_manyAux___main(uint8, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg(obj*, obj*); @@ -494,19 +529,21 @@ obj* l_Lean_Parser_Command_inductive___closed__4; obj* l_Lean_Parser_Command_docComment___closed__3; obj* l_Lean_Parser_commandParser___lambda__1(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_symbolOrIdentFnAux(obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Command_export___elambda__1___closed__7; obj* l_Lean_Parser_Command_openHiding___closed__5; obj* l_Lean_Parser_Command_universes___elambda__1___closed__4; obj* l_Lean_Parser_Command_extends___elambda__1___closed__4; +extern obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; obj* l_Lean_Parser_Term_typeSpec___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_instance___closed__3; extern obj* l_Lean_Parser_Term_typeAscription___closed__1; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_inductive___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Command_relaxedInferMod___closed__3; obj* l_Lean_Parser_Command_universe___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_export___closed__2; obj* l_Lean_Parser_Command_structImplicitBinder___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_section___elambda__1___boxed(obj*); +obj* l_Lean_Parser_Command_classInductive___elambda__1___closed__2; obj* l_Lean_Parser_unquotedSymbol(uint8); obj* l_Lean_Parser_Command_declValEqns___closed__3; obj* l_Lean_Parser_Command_infix___elambda__1___rarg___closed__5; @@ -536,20 +573,18 @@ obj* l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_end___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Command_structInstBinder___closed__5; -extern obj* l_Lean_Parser_Term_list___elambda__1___closed__6; obj* l_Lean_Parser_Command_declModifiers___closed__5; obj* l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_attrInstance___elambda__1___closed__1; +obj* l_Lean_Parser_tokenFn(obj*, obj*); obj* l_Lean_Parser_Command_section___closed__6; obj* l_Lean_Parser_Command_precedenceLit___closed__2; extern obj* l_Lean_Parser_Term_id___closed__4; extern obj* l_Char_HasRepr___closed__1; obj* l_Lean_Parser_Command_attribute___closed__8; -extern obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; obj* l_Lean_Parser_mkCommandParserAttribute(obj*); obj* l_Lean_Parser_Command_private___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_structCtor___elambda__1___boxed(obj*); -extern obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; obj* l_Lean_Parser_regBuiltinCommandParserAttr(obj*); obj* l_Lean_Parser_Command_relaxedInferMod___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_private___elambda__1___rarg___closed__4; @@ -558,12 +593,15 @@ obj* l_Lean_Parser_Command_docComment___elambda__1___closed__5; obj* l_Lean_Parser_Command_end; obj* l_Lean_Parser_Command_identPrec___closed__2; obj* l_Lean_Parser_Command_theorem___elambda__1___closed__5; +obj* l_Lean_Parser_Command_variable___elambda__1___closed__7; obj* l_Lean_Parser_Command_structFields___elambda__1___closed__2; +obj* l_Lean_Parser_Command_theorem___elambda__1___closed__7; obj* l_Lean_Parser_Command_mixfixKind___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_declModifiers___closed__12; obj* l_Lean_Parser_Command_notation___elambda__1___closed__2; obj* l_Lean_Parser_Command_structFields___closed__5; obj* l_Lean_Parser_Command_declId___closed__4; +obj* l_Lean_Parser_Command_partial___elambda__1(obj*); obj* l_Lean_Parser_Command_notation; obj* l_Lean_Parser_Command_quotedSymbolPrec___closed__6; obj* l_Lean_Parser_Command_symbol___closed__4; @@ -576,11 +614,14 @@ obj* l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed__2; obj* l_Lean_Parser_Command_inferMod___closed__1; obj* l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_declModifiers___closed__11; +obj* l_Lean_Parser_Command_partial___closed__2; obj* l_Lean_Parser_Command_commentBody___closed__1; obj* l_Lean_Parser_Command_structExplicitBinder___closed__1; obj* l_Lean_Parser_Command_extends___elambda__1___boxed(obj*, obj*, obj*); +obj* l_Lean_Parser_Command_declModifiers___closed__13; obj* l_Lean_Parser_Command_structInstBinder___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_structInstBinder___elambda__1___closed__1; +obj* l_Lean_Parser_Command_reserve___elambda__1___closed__7; obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Command_instance___elambda__1___closed__1; obj* l_Lean_Parser_Command_notation___closed__1; @@ -600,6 +641,7 @@ obj* l_Lean_Parser_Command_variables___elambda__1___closed__5; obj* l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_precedenceLit___elambda__1(obj*); obj* l_Lean_Parser_Command_abbrev___closed__2; +extern obj* l_Lean_Parser_Term_structInst___elambda__1___closed__12; obj* l_Lean_Parser_Command_attrArg___closed__2; obj* l_Lean_Parser_Command_symbol___closed__1; obj* l_Lean_Parser_Command_openHiding___closed__3; @@ -625,6 +667,7 @@ obj* l_Lean_Parser_Command_visibility___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_precedenceLit___closed__1; obj* l_Lean_Parser_Command_reserve___elambda__1___closed__3; +obj* l_Lean_Parser_Command_variables___elambda__1___closed__7; obj* l_Lean_Parser_Command_section; obj* l_Lean_Parser_Command_prefix___closed__2; obj* l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__3; @@ -642,6 +685,7 @@ obj* l_Lean_Parser_Command_structFields___elambda__1___closed__1; obj* l_Lean_Parser_quotedSymbol(uint8); obj* l_Lean_Parser_Command_namespace___elambda__1(obj*); obj* l_Lean_Parser_Command_structExplicitBinder___closed__4; +obj* l_Lean_Parser_Command_classInductive___elambda__1___closed__5; obj* l___regBuiltinParser_Lean_Parser_Command_universe(obj*); obj* l_Lean_Parser_Command_extends___closed__5; obj* l_Lean_Parser_Command_quotedSymbolPrec___closed__2; @@ -650,18 +694,22 @@ obj* l_Lean_Parser_Command_reserve___closed__2; obj* l_Lean_Parser_Command_check___closed__2; obj* l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_attributes___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_infixr___closed__4; +obj* l_Lean_Parser_Command_declaration___closed__13; obj* l_Lean_Parser_Command_variable___closed__5; obj* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_attribute___elambda__1___closed__9; obj* l_Lean_Parser_Command_declValEqns___closed__1; obj* l_Lean_Parser_Command_section___elambda__1___rarg___closed__3; +obj* l_Lean_Parser_Command_partial___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_openRenaming___elambda__1___closed__3; obj* l_Lean_Parser_Command_export___elambda__1___closed__3; obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__9; +obj* l_Lean_Parser_Command_classInductive___closed__5; obj* l_Lean_Parser_Command_extends___closed__2; obj* l_Lean_Parser_Command_structureTk; obj* l_Lean_Parser_Command_end___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Command_abbrev___closed__3; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Command_declModifiers___closed__2; obj* l_Lean_Parser_Command_check___closed__5; obj* l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__1; @@ -670,6 +718,9 @@ obj* l_Lean_Parser_mkCommandParserAttribute___closed__4; obj* l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Command_def___elambda__1___closed__6; extern obj* l_Lean_Parser_Term_haveAssign___closed__3; +namespace lean { +uint8 string_dec_eq(obj*, obj*); +} obj* l_Lean_Parser_Command_infixl___elambda__1(obj*); obj* l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__4; @@ -681,6 +732,7 @@ obj* l_Lean_Parser_Command_noncomputable___elambda__1(obj*); obj* l_Lean_Parser_Command_openRenamingItem; obj* l_Lean_Parser_Command_mixfix___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_unsafe___closed__2; +extern obj* l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_abbrev___elambda__1___closed__1; obj* l_Lean_Parser_Command_variables___elambda__1___closed__3; extern obj* l_Lean_Parser_Term_letIdLhs___closed__1; @@ -694,7 +746,6 @@ obj* l_Lean_Parser_Command_open___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Command_attribute___closed__11; obj* l_Lean_Parser_Command_docComment___elambda__1___closed__6; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__5; obj* l_Lean_Parser_numLitFn___rarg(obj*, obj*); obj* l_Lean_Parser_Command_docComment___elambda__1___boxed(obj*, obj*, obj*); @@ -708,6 +759,7 @@ obj* l_Lean_Parser_Command_attrInstance___closed__1; obj* l_Lean_Parser_noFirstTokenInfo(obj*); obj* l_Lean_Parser_ParserState_pushSyntax(obj*, obj*); obj* l___regBuiltinParser_Lean_Parser_Command_open(obj*); +obj* l_Lean_Parser_Command_declModifiers___closed__14; obj* l_Lean_Parser_commandParser(uint8, obj*); obj* l_Lean_Parser_Command_declSig___elambda__1___closed__2; obj* l_Lean_Parser_Command_openRenaming___closed__1; @@ -727,6 +779,7 @@ obj* l_Lean_Parser_Command_set__option___closed__2; obj* l_Lean_Parser_Command_instance___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_strictInferMod___closed__2; +obj* l_Lean_Parser_Command_classInductive; obj* l_Lean_Parser_optionaInfo(obj*); obj* l_Lean_Parser_Command_attribute___closed__1; obj* l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__2; @@ -739,7 +792,6 @@ obj* l_Lean_Parser_Command_variables___elambda__1___closed__1; obj* l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_inferMod___closed__3; obj* l_Lean_Parser_Command_declaration___closed__8; -extern obj* l_Lean_Parser_Term_id___elambda__1___closed__10; extern obj* l_Lean_Parser_numLit___closed__1; obj* l_Lean_Parser_Command_precedence___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__4; @@ -751,9 +803,11 @@ obj* l_Lean_Parser_Command_check___elambda__1(obj*); obj* l_Lean_Parser_Command_section___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_namespace___closed__3; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_notation___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Command_partial___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_example___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_universe___closed__5; obj* l_Lean_Parser_Command_structureTk___closed__4; +obj* l_Lean_Parser_Command_classInductive___elambda__1___closed__4; obj* l_Lean_Parser_Command_declaration___closed__11; obj* l_Lean_Parser_Command_universes___elambda__1___closed__6; extern obj* l_Lean_Parser_Term_haveAssign___closed__2; @@ -763,21 +817,18 @@ obj* l_Lean_Parser_Command_constant___closed__6; obj* l_Lean_Parser_identFn___rarg(obj*, obj*); obj* l_Lean_Parser_Command_maxPrec___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_infixr___elambda__1___boxed(obj*); -extern obj* l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_structExplicitBinder___closed__8; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_declValEqns___spec__2(obj*, uint8, obj*, obj*, obj*); obj* l_String_trim(obj*); obj* l_Lean_Parser_Command_universes___closed__3; obj* l_Lean_Parser_Command_attribute___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_structure___elambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_openRenaming___elambda__1___closed__5; obj* l_Lean_Parser_Command_inductive; obj* l_Lean_Parser_Command_constant___closed__2; obj* l_Lean_Parser_Command_notation___elambda__1___closed__4; obj* l_Lean_Parser_Command_declVal___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_structInstBinder___closed__2; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Command_infix___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Command_structFields___closed__4; obj* l_Lean_Parser_Command_symbol___elambda__1___boxed(obj*, obj*, obj*); @@ -806,6 +857,7 @@ obj* l_Lean_Parser_Command_extends___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_attrArg___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_notation___elambda__1___closed__3; obj* l_Lean_Parser_Command_variable___elambda__1___closed__4; +obj* l_Lean_Parser_Command_partial___closed__3; obj* l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__8; obj* l_Lean_Parser_Command_infixl; obj* l_Lean_Parser_Command_axiom___elambda__1___closed__6; @@ -815,6 +867,7 @@ obj* l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed__1; obj* l_Lean_Parser_Command_variables___elambda__1___closed__2; obj* l_Lean_Parser_Command_private___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__2; +obj* l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_attributes___closed__1; obj* l_Lean_Parser_Command_declModifiers___closed__4; obj* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___spec__1(uint8, uint8, obj*, obj*, obj*); @@ -826,10 +879,11 @@ obj* l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Command_identPrec___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_structureTk___elambda__1___boxed(obj*); +obj* l_Lean_Parser_Command_protected___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_universes; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_declModifiers___closed__6; obj* l_Lean_Parser_Command_set__option___elambda__1___rarg(obj*, obj*); +obj* l_Lean_Parser_Command_classInductive___elambda__1___closed__6; obj* l_Lean_Parser_Command_abbrev___closed__4; obj* l_Lean_Parser_Command_docComment___elambda__1___closed__7; obj* l_Lean_Parser_Command_instance___closed__2; @@ -842,10 +896,12 @@ obj* l_Lean_Parser_Command_attribute___closed__7; obj* l_Lean_Parser_Command_infixr___closed__3; obj* l_Lean_Parser_Command_infixr___elambda__1(obj*); obj* l_Lean_Parser_Command_attribute___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_Command_attributes___elambda__1___closed__7; obj* l_Lean_Parser_Command_structure___closed__11; obj* l_Lean_Parser_Command_check___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_def; obj* l_Lean_Parser_Command_structCtor___closed__6; +obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__11; obj* l_Lean_Parser_Command_declId; obj* l_Lean_Parser_Command_inductive___closed__2; obj* l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__6; @@ -854,10 +910,10 @@ obj* l_Lean_Parser_Command_end___closed__3; obj* l_Lean_Parser_Command_inductive___elambda__1___closed__5; obj* l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__1; obj* l_Lean_Parser_Command_structFields___closed__1; +obj* l_Lean_Parser_Command_universe___elambda__1___rarg___closed__7; obj* l_Lean_Parser_symbolOrIdentInfo(obj*); obj* l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_attributes___closed__7; -extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; obj* l_Lean_Parser_ParserState_mkError(obj*, obj*); obj* l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__5; obj* l___regBuiltinParser_Lean_Parser_Command_init__quot(obj*); @@ -867,6 +923,7 @@ obj* l_Lean_Parser_Command_variables___closed__4; obj* l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__3; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_notation___elambda__1___spec__1(uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Command_strictInferMod___closed__4; +extern obj* l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_prefix___elambda__1(obj*); obj* l_Lean_Parser_Command_notation___elambda__1___closed__1; obj* l_Lean_Parser_nodeInfo(obj*); @@ -909,6 +966,7 @@ obj* l_Lean_Parser_Command_def___closed__1; extern obj* l_Lean_Parser_strLit___closed__1; obj* l_Lean_Parser_Command_infixl___closed__4; obj* l_Lean_Parser_Command_variables___closed__1; +obj* l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_check___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_structCtor___closed__3; obj* l_Lean_Parser_Command_optDeclSig___elambda__1___closed__2; @@ -921,6 +979,7 @@ obj* l_Lean_Parser_Command_postfix___closed__1; obj* l_Lean_Parser_Command_attributes___elambda__1___closed__4; extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Command_noncomputable; +obj* l_Lean_Parser_Command_classInductive___closed__1; obj* l_Lean_Parser_Command_openHiding___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_reserve___elambda__1___closed__6; obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__6; @@ -929,6 +988,7 @@ obj* l_Lean_Parser_Command_init__quot___closed__3; obj* l_Lean_Parser_Command_openHiding___closed__2; obj* l_Lean_Parser_Command_structExplicitBinder___closed__2; extern obj* l_Lean_Parser_Term_subtype___closed__1; +obj* l_Lean_Parser_Command_attribute___elambda__1___closed__12; obj* l_Lean_Parser_Command_structExplicitBinder___closed__3; obj* l_Lean_Parser_Command_open___elambda__1___closed__4; obj* l_Lean_Parser_Term_optType___elambda__1___rarg(obj*, obj*); @@ -948,12 +1008,15 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_attrInstance___elambd obj* l_Lean_Parser_Command_precedence___closed__1; obj* l_Lean_Parser_Command_extends___elambda__1___closed__3; obj* l_Lean_Parser_mkCommandParserAttribute___closed__5; +obj* l_Lean_Parser_Command_universes___elambda__1___closed__7; obj* l_Lean_Parser_Command_classTk___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_instance___elambda__1___closed__6; obj* l_Lean_Parser_Command_constant___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_Command_abbrev___elambda__1___closed__7; obj* l_Lean_Parser_Command_variable___elambda__1___closed__3; obj* l___regBuiltinParser_Lean_Parser_Command_end(obj*); obj* l_Lean_Parser_Command_declId___closed__3; +obj* l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_structInstBinder___closed__4; obj* l_Lean_Parser_Command_attribute___closed__5; obj* l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); @@ -985,8 +1048,8 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_attrInstance___elambd obj* l_Lean_Parser_Command_protected___elambda__1___rarg___closed__4; obj* l___regBuiltinParser_Lean_Parser_Command_mixfix(obj*); obj* l_Lean_Parser_Command_attributes; -extern obj* l_Lean_Parser_Term_structInst___elambda__1___closed__8; obj* l_Lean_Parser_Command_theorem___elambda__1___closed__4; +obj* l_Lean_Parser_Command_def___elambda__1___closed__7; obj* l_Lean_Parser_Command_noncomputable___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_precedence___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Command_structFields___closed__2; @@ -998,6 +1061,7 @@ obj* l_Lean_Parser_Command_example___closed__1; obj* l_Lean_Parser_Command_structImplicitBinder___closed__3; obj* l_Lean_Parser_Command_attribute___closed__2; obj* l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__2; +obj* l_Lean_Parser_Command_classInductive___elambda__1___closed__1; obj* l_Lean_Parser_Command_attributes___closed__4; obj* l_Lean_Parser_Command_example___elambda__1___closed__3; obj* l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__5; @@ -1008,15 +1072,17 @@ obj* l_Lean_Parser_Command_reserve___elambda__1___closed__2; obj* l_Lean_Parser_Command_structCtor___elambda__1(obj*); obj* l_Lean_Parser_Command_protected___closed__4; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_list___elambda__1___closed__8; obj* l_Lean_Parser_Command_check___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_def___closed__4; +obj* l_Lean_Parser_Command_end___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Command_protected___elambda__1___rarg___closed__1; +extern obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; obj* l_Lean_Parser_Command_instance___closed__4; obj* l_Lean_Parser_unicodeSymbolInfo(obj*, obj*, obj*); obj* l_Lean_Parser_Command_universes___closed__2; obj* l_Lean_Parser_Command_identPrec___elambda__1(obj*); obj* l_Lean_Parser_Command_check___elambda__1___boxed(obj*); +obj* l_Lean_Parser_Command_classInductive___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_infix___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_precedence___closed__3; obj* l___regBuiltinParser_Lean_Parser_Command_attribute(obj*); @@ -1040,6 +1106,7 @@ obj* l_Lean_Parser_Command_precedence___closed__4; obj* l_Lean_Parser_Command_structImplicitBinder; obj* l_Lean_Parser_Command_extends___elambda__1___closed__2; obj* l_Lean_Parser_Command_mixfix___closed__5; +obj* l_Lean_Parser_Command_openHiding___elambda__1___closed__7; obj* l_Lean_Parser_Command_open___elambda__1___closed__6; obj* l_Lean_Parser_Command_attributes___closed__3; obj* l_Lean_Parser_Command_variable___closed__4; @@ -1049,6 +1116,7 @@ obj* l_Lean_Parser_Command_introRule___closed__7; obj* l_Lean_Parser_Command_inductive___closed__7; obj* l_Lean_Parser_Command_instance___closed__7; obj* l_Lean_Parser_Command_openOnly___closed__5; +extern obj* l_Lean_Parser_Term_id___elambda__1___closed__14; obj* l_Lean_Parser_Command_mixfix___closed__3; obj* l_Lean_Parser_Command_relaxedInferMod___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_check___closed__1; @@ -1064,6 +1132,7 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder_ obj* l_Lean_Parser_Command_private; obj* l_Lean_Parser_Command_variables___closed__3; obj* l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +obj* l_Lean_Parser_Command_openRenaming___elambda__1___closed__7; obj* l_Lean_Parser_Command_prefix___closed__1; obj* l_Lean_Parser_Command_structCtor___closed__2; obj* l_Lean_Parser_commandParserAttribute; @@ -1072,6 +1141,7 @@ obj* l_Lean_Parser_Command_end___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Command_notation___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_regBuiltinCommandParserAttr___closed__4; +obj* l_Lean_Parser_Command_classInductive___closed__4; obj* l_Lean_Parser_Command_infixl___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_set__option___closed__5; obj* l_Lean_Parser_Command_attributes___closed__2; @@ -1082,7 +1152,6 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_declValEqns___elambda obj* l_Lean_Parser_Command_check___closed__4; obj* l_Lean_Parser_Command_axiom___elambda__1___closed__1; obj* l_Lean_Parser_Command_protected___elambda__1___rarg___closed__3; -obj* l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Command_mixfixKind___closed__3; obj* l_Lean_Parser_Command_universe___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__5; @@ -1091,11 +1160,13 @@ extern obj* l_Lean_Parser_Term_typeSpec; obj* l_Lean_Parser_Command_example___elambda__1___closed__1; obj* l_Lean_Parser_Command_end___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Command_infixl___closed__1; +obj* l_Lean_Parser_ParserState_mkErrorsAt(obj*, obj*, obj*); obj* l_Lean_Parser_Command_mixfix; obj* l_Lean_Parser_Command_structCtor; obj* l_Lean_Parser_Command_maxPrec___elambda__1___rarg___closed__1; obj* l_Lean_Parser_quotedSymbolFn___rarg(obj*, obj*, obj*); obj* l_Lean_Parser_Command_universe___elambda__1___boxed(obj*); +obj* l_Lean_Parser_Command_open___elambda__1___closed__7; extern obj* l_Lean_Parser_Term_id___closed__1; obj* l_Lean_Parser_Command_structInstBinder___closed__6; obj* l_Lean_Parser_Command_declSig___closed__2; @@ -1103,17 +1174,19 @@ obj* l_Lean_Parser_mkCommandParserAttribute___closed__2; obj* l_Lean_Parser_Command_constant___elambda__1___closed__1; obj* l_Lean_Parser_Command_symbol___closed__2; obj* l_Lean_Parser_Command_postfix___elambda__1___boxed(obj*); -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Command_declId___elambda__1___closed__1; obj* l_Lean_Parser_Command_openHiding___elambda__1___closed__5; +obj* l___private_init_lean_parser_parser_3__rawAux___main___rarg(obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Command_infixl___closed__2; obj* l_Lean_Parser_Command_attrInstance___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Command_open___elambda__1___closed__5; +obj* l_Lean_Parser_Command_axiom___elambda__1___closed__7; obj* l_Lean_Parser_Command_structCtor___closed__4; obj* l_Lean_Parser_Command_end___elambda__1___boxed(obj*); obj* l_Lean_Parser_Command_openHiding___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_unquotedSymbolFn___rarg(obj*, obj*); obj* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__10; +obj* l_Lean_Parser_Command_attribute___elambda__1___closed__11; obj* l_Lean_Parser_Command_introRule___closed__4; obj* l_Lean_Parser_Command_declId___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Command_universes___closed__5; @@ -1127,6 +1200,7 @@ obj* l_Lean_Parser_Command_end___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_open___closed__6; obj* l_Lean_Parser_Command_private___elambda__1___rarg___closed__2; obj* l_Lean_Parser_mkBuiltinParsingTablesRef(obj*); +extern obj* l_Lean_Parser_Term_list___elambda__1___closed__7; obj* l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Command_prefix___closed__3; obj* _init_l_Lean_Parser_regBuiltinCommandParserAttr___closed__1() { @@ -1286,7 +1360,7 @@ if (lean::obj_tag(x_7) == 0) { uint8 x_8; obj* x_9; x_8 = 1; -x_9 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_4, x_8, x_1, x_2, x_6); +x_9 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_4, x_8, x_1, x_2, x_6); return x_9; } else @@ -1392,7 +1466,7 @@ obj* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -1408,37 +1482,105 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__9() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__8; +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* l_Lean_Parser_Command_docComment___elambda__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_4; obj* x_5; obj* x_6; obj* x_14; obj* x_15; obj* x_16; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_docComment___elambda__1___closed__6; -x_7 = l_Lean_Parser_Command_docComment___elambda__1___closed__8; +x_14 = lean::cnstr_get(x_3, 1); +lean::inc(x_14); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_15 = l_Lean_Parser_tokenFn(x_2, x_3); +x_16 = lean::cnstr_get(x_15, 3); +lean::inc(x_16); +if (lean::obj_tag(x_16) == 0) { -obj* x_10; obj* x_11; obj* x_12; -x_10 = l_Lean_Parser_Command_commentBody___elambda__1(x_1, x_2, x_8); -lean::dec(x_2); -x_11 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; -x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_5); -return x_12; +obj* x_17; obj* x_18; +x_17 = lean::cnstr_get(x_15, 0); +lean::inc(x_17); +x_18 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_17); +lean::dec(x_17); +if (lean::obj_tag(x_18) == 2) +{ +obj* x_19; obj* x_20; uint8 x_21; +x_19 = lean::cnstr_get(x_18, 1); +lean::inc(x_19); +lean::dec(x_18); +x_20 = l_Lean_Parser_Command_docComment___elambda__1___closed__6; +x_21 = lean::string_dec_eq(x_19, x_20); +lean::dec(x_19); +if (x_21 == 0) +{ +obj* x_22; obj* x_23; +x_22 = l_Lean_Parser_Command_docComment___elambda__1___closed__9; +x_23 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_22, x_14); +x_6 = x_23; +goto block_13; } else { -obj* x_13; obj* x_14; -lean::dec(x_9); +lean::dec(x_14); +x_6 = x_15; +goto block_13; +} +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_18); +x_24 = l_Lean_Parser_Command_docComment___elambda__1___closed__9; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_24, x_14); +x_6 = x_25; +goto block_13; +} +} +else +{ +obj* x_26; obj* x_27; +lean::dec(x_16); +x_26 = l_Lean_Parser_Command_docComment___elambda__1___closed__9; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_26, x_14); +x_6 = x_27; +goto block_13; +} +block_13: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; obj* x_10; +x_8 = l_Lean_Parser_Command_commentBody___elambda__1(x_1, x_2, x_6); lean::dec(x_2); -x_13 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; -x_14 = l_Lean_Parser_ParserState_mkNode(x_8, x_13, x_5); -return x_14; +x_9 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; +x_10 = l_Lean_Parser_ParserState_mkNode(x_8, x_9, x_5); +return x_10; +} +else +{ +obj* x_11; obj* x_12; +lean::dec(x_7); +lean::dec(x_2); +x_11 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; +x_12 = l_Lean_Parser_ParserState_mkNode(x_6, x_11, x_5); +return x_12; +} } } } @@ -1707,7 +1849,7 @@ else obj* x_13; obj* x_14; lean::dec(x_3); x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_8, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); return x_14; } } @@ -1855,7 +1997,7 @@ lean::dec(x_1); return x_4; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 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; @@ -1871,7 +2013,7 @@ x_12 = lean::cnstr_get(x_11, 3); 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; +obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_23; obj* x_24; lean::dec(x_10); lean::dec(x_9); x_13 = lean::cnstr_get(x_11, 0); @@ -1880,19 +2022,74 @@ x_14 = lean::array_get_size(x_13); lean::dec(x_13); x_15 = lean::cnstr_get(x_11, 1); lean::inc(x_15); -x_16 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_17 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; lean::inc(x_6); -x_18 = l_Lean_Parser_symbolFnAux(x_16, x_17, x_6, x_11); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) +x_23 = l_Lean_Parser_tokenFn(x_6, x_11); +x_24 = lean::cnstr_get(x_23, 3); +lean::inc(x_24); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_25; obj* x_26; +x_25 = lean::cnstr_get(x_23, 0); +lean::inc(x_25); +x_26 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_25); +lean::dec(x_25); +if (lean::obj_tag(x_26) == 2) +{ +obj* x_27; obj* x_28; uint8 x_29; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +lean::dec(x_26); +x_28 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_29 = lean::string_dec_eq(x_27, x_28); +lean::dec(x_27); +if (x_29 == 0) +{ +obj* x_30; obj* x_31; +x_30 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); +x_16 = x_31; +goto block_22; +} +else +{ +x_16 = x_23; +goto block_22; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_26); +x_32 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); +x_16 = x_33; +goto block_22; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_24); +x_34 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); +x_16 = x_35; +goto block_22; +} +block_22: +{ +obj* x_17; +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { lean::dec(x_15); lean::dec(x_14); { uint8 _tmp_3 = x_2; -obj* _tmp_6 = x_18; +obj* _tmp_6 = x_16; x_4 = _tmp_3; x_7 = _tmp_6; } @@ -1900,14 +2097,15 @@ goto _start; } else { -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_19); +obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_17); lean::dec(x_6); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_14, x_15); +x_19 = l_Lean_Parser_ParserState_restore(x_16, x_14, x_15); lean::dec(x_14); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; +x_20 = l_Lean_nullKind; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_3); +return x_21; +} } } else @@ -1916,23 +2114,23 @@ lean::dec(x_12); lean::dec(x_6); if (x_4 == 0) { -obj* x_24; obj* x_25; obj* x_26; obj* x_27; +obj* x_36; obj* x_37; obj* x_38; obj* x_39; lean::dec(x_10); lean::dec(x_9); -x_24 = lean::box(0); -x_25 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_24); -x_26 = l_Lean_nullKind; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_3); -return x_27; +x_36 = lean::box(0); +x_37 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_36); +x_38 = l_Lean_nullKind; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_3); +return x_39; } else { -obj* x_28; obj* x_29; obj* x_30; -x_28 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +obj* x_40; obj* x_41; obj* x_42; +x_40 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); lean::dec(x_9); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_3); -return x_30; +x_41 = l_Lean_nullKind; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_3); +return x_42; } } } @@ -1946,7 +2144,7 @@ lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); x_8 = 0; -x_9 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +x_9 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); return x_9; } } @@ -1989,7 +2187,7 @@ obj* _init_l_Lean_Parser_Command_attributes___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_attributes___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -2005,57 +2203,179 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_attributes___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_attributes___elambda__1___closed__6; +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* l_Lean_Parser_Command_attributes___elambda__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_4; obj* x_5; obj* x_6; obj* x_39; obj* x_40; obj* x_41; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_attributes___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_attributes___elambda__1___closed__6; +x_39 = lean::cnstr_get(x_3, 1); +lean::inc(x_39); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_40 = l_Lean_Parser_tokenFn(x_2, x_3); +x_41 = lean::cnstr_get(x_40, 3); +lean::inc(x_41); +if (lean::obj_tag(x_41) == 0) { -uint8 x_10; uint8 x_11; obj* x_12; obj* x_13; -x_10 = 0; -x_11 = 0; -lean::inc(x_2); -x_12 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_10, x_11, x_1, x_2, x_8); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_42; obj* x_43; +x_42 = lean::cnstr_get(x_40, 0); +lean::inc(x_42); +x_43 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_42); +lean::dec(x_42); +if (lean::obj_tag(x_43) == 2) { -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_15 = l_Lean_Parser_Term_list___elambda__1___closed__8; -x_16 = l_Lean_Parser_symbolFnAux(x_14, x_15, x_2, x_12); -x_17 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_16, x_17, x_5); -return x_18; +obj* x_44; obj* x_45; uint8 x_46; +x_44 = lean::cnstr_get(x_43, 1); +lean::inc(x_44); +lean::dec(x_43); +x_45 = l_Lean_Parser_Command_attributes___elambda__1___closed__4; +x_46 = lean::string_dec_eq(x_44, x_45); +lean::dec(x_44); +if (x_46 == 0) +{ +obj* x_47; obj* x_48; +x_47 = l_Lean_Parser_Command_attributes___elambda__1___closed__7; +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_47, x_39); +x_6 = x_48; +goto block_38; } else { -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_2); -x_19 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_12, x_19, x_5); -return x_20; +lean::dec(x_39); +x_6 = x_40; +goto block_38; } } else { -obj* x_21; obj* x_22; -lean::dec(x_9); +obj* x_49; obj* x_50; +lean::dec(x_43); +x_49 = l_Lean_Parser_Command_attributes___elambda__1___closed__7; +x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_49, x_39); +x_6 = x_50; +goto block_38; +} +} +else +{ +obj* x_51; obj* x_52; +lean::dec(x_41); +x_51 = l_Lean_Parser_Command_attributes___elambda__1___closed__7; +x_52 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_51, x_39); +x_6 = x_52; +goto block_38; +} +block_38: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +uint8 x_8; uint8 x_9; obj* x_10; obj* x_11; +x_8 = 0; +x_9 = 0; +lean::inc(x_2); +x_10 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_8, x_9, x_1, x_2, x_6); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +obj* x_12; obj* x_13; obj* x_14; +x_12 = lean::cnstr_get(x_10, 1); +lean::inc(x_12); +x_13 = l_Lean_Parser_tokenFn(x_2, x_10); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +if (lean::obj_tag(x_14) == 0) +{ +obj* x_15; obj* x_16; +x_15 = lean::cnstr_get(x_13, 0); +lean::inc(x_15); +x_16 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_15); +lean::dec(x_15); +if (lean::obj_tag(x_16) == 2) +{ +obj* x_17; obj* x_18; uint8 x_19; +x_17 = lean::cnstr_get(x_16, 1); +lean::inc(x_17); +lean::dec(x_16); +x_18 = l_Lean_Parser_Term_list___elambda__1___closed__4; +x_19 = lean::string_dec_eq(x_17, x_18); +lean::dec(x_17); +if (x_19 == 0) +{ +obj* x_20; obj* x_21; obj* x_22; obj* x_23; +x_20 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12); +x_22 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +return x_23; +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_12); +x_24 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_13, x_24, x_5); +return x_25; +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_16); +x_26 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_26, x_12); +x_28 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; obj* x_32; obj* x_33; +lean::dec(x_14); +x_30 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_30, x_12); +x_32 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +return x_33; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_11); lean::dec(x_2); -x_21 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_8, x_21, x_5); -return x_22; +x_34 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_10, x_34, x_5); +return x_35; +} +} +else +{ +obj* x_36; obj* x_37; +lean::dec(x_7); +lean::dec(x_2); +x_36 = l_Lean_Parser_Command_attributes___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); +return x_37; +} } } } @@ -2146,7 +2466,7 @@ x_1 = l_Lean_Parser_Command_attributes___closed__7; return x_1; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2___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; uint8 x_9; uint8 x_10; obj* x_11; @@ -2156,7 +2476,7 @@ x_9 = lean::unbox(x_2); lean::dec(x_2); x_10 = lean::unbox(x_4); lean::dec(x_4); -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); lean::dec(x_5); return x_11; } @@ -2235,7 +2555,7 @@ obj* _init_l_Lean_Parser_Command_private___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -2251,20 +2571,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_private___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_private___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_private___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_private___elambda__1(obj* x_1) { @@ -2370,7 +2756,7 @@ obj* _init_l_Lean_Parser_Command_protected___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -2386,20 +2772,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_protected___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_protected___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_protected___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_protected___elambda__1(obj* x_1) { @@ -2617,7 +3069,7 @@ obj* _init_l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__5() _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -2633,20 +3085,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_noncomputable___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_noncomputable___elambda__1(obj* x_1) { @@ -2752,7 +3270,7 @@ obj* _init_l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -2768,20 +3286,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_unsafe___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_unsafe___elambda__1(obj* x_1) { @@ -2848,6 +3432,207 @@ lean::dec(x_1); return x_2; } } +obj* _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("partial"); +return x_1; +} +} +obj* _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_2 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__3() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("partial "); +return x_1; +} +} +obj* _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__4() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__3; +x_2 = l_String_trim(x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__5() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__5; +x_2 = l_Char_HasRepr___closed__1; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_partial___elambda__1___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::cnstr_get(x_2, 0); +lean::inc(x_3); +x_4 = lean::array_get_size(x_3); +lean::dec(x_3); +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} +} +} +obj* l_Lean_Parser_Command_partial___elambda__1(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Command_partial___elambda__1___rarg), 2, 0); +return x_2; +} +} +obj* _init_l_Lean_Parser_Command_partial___closed__1() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_partial___elambda__1___rarg___closed__4; +x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_partial___closed__2() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_Parser_Command_partial___closed__1; +x_2 = l_Lean_Parser_nodeInfo(x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Command_partial___closed__3() { +_start: +{ +obj* x_1; +x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Command_partial___elambda__1___boxed), 1, 0); +return x_1; +} +} +obj* _init_l_Lean_Parser_Command_partial___closed__4() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_partial___closed__2; +x_2 = l_Lean_Parser_Command_partial___closed__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* _init_l_Lean_Parser_Command_partial() { +_start: +{ +obj* x_1; +x_1 = l_Lean_Parser_Command_partial___closed__4; +return x_1; +} +} +obj* l_Lean_Parser_Command_partial___elambda__1___boxed(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = l_Lean_Parser_Command_partial___elambda__1(x_1); +lean::dec(x_1); +return x_2; +} +} obj* _init_l_Lean_Parser_Command_declModifiers___elambda__1___closed__1() { _start: { @@ -2869,54 +3654,54 @@ return x_3; obj* l_Lean_Parser_Command_declModifiers___elambda__1(obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_4; obj* x_5; obj* x_6; obj* x_31; obj* x_50; obj* x_69; obj* x_88; obj* x_89; obj* x_90; +obj* x_4; obj* x_5; obj* x_6; obj* x_31; obj* x_50; obj* x_69; obj* x_88; obj* x_107; obj* x_108; obj* x_109; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_88 = lean::cnstr_get(x_3, 1); -lean::inc(x_88); +x_107 = lean::cnstr_get(x_3, 1); +lean::inc(x_107); lean::inc(x_2); -x_89 = l_Lean_Parser_Command_docComment___elambda__1(x_1, x_2, x_3); -x_90 = lean::cnstr_get(x_89, 3); -lean::inc(x_90); -if (lean::obj_tag(x_90) == 0) +x_108 = l_Lean_Parser_Command_docComment___elambda__1(x_1, x_2, x_3); +x_109 = lean::cnstr_get(x_108, 3); +lean::inc(x_109); +if (lean::obj_tag(x_109) == 0) { -obj* x_91; obj* x_92; -lean::dec(x_88); -x_91 = l_Lean_nullKind; +obj* x_110; obj* x_111; +lean::dec(x_107); +x_110 = l_Lean_nullKind; lean::inc(x_5); -x_92 = l_Lean_Parser_ParserState_mkNode(x_89, x_91, x_5); -x_69 = x_92; -goto block_87; +x_111 = l_Lean_Parser_ParserState_mkNode(x_108, x_110, x_5); +x_88 = x_111; +goto block_106; } else { -obj* x_93; uint8 x_94; -lean::dec(x_90); -x_93 = lean::cnstr_get(x_89, 1); -lean::inc(x_93); -x_94 = lean::nat_dec_eq(x_93, x_88); -lean::dec(x_93); -if (x_94 == 0) +obj* x_112; uint8 x_113; +lean::dec(x_109); +x_112 = lean::cnstr_get(x_108, 1); +lean::inc(x_112); +x_113 = lean::nat_dec_eq(x_112, x_107); +lean::dec(x_112); +if (x_113 == 0) { -obj* x_95; obj* x_96; -lean::dec(x_88); -x_95 = l_Lean_nullKind; +obj* x_114; obj* x_115; +lean::dec(x_107); +x_114 = l_Lean_nullKind; lean::inc(x_5); -x_96 = l_Lean_Parser_ParserState_mkNode(x_89, x_95, x_5); -x_69 = x_96; -goto block_87; +x_115 = l_Lean_Parser_ParserState_mkNode(x_108, x_114, x_5); +x_88 = x_115; +goto block_106; } else { -obj* x_97; obj* x_98; obj* x_99; -x_97 = l_Lean_Parser_ParserState_restore(x_89, x_5, x_88); -x_98 = l_Lean_nullKind; +obj* x_116; obj* x_117; obj* x_118; +x_116 = l_Lean_Parser_ParserState_restore(x_108, x_5, x_107); +x_117 = l_Lean_nullKind; lean::inc(x_5); -x_99 = l_Lean_Parser_ParserState_mkNode(x_97, x_98, x_5); -x_69 = x_99; -goto block_87; +x_118 = l_Lean_Parser_ParserState_mkNode(x_116, x_117, x_5); +x_88 = x_118; +goto block_106; } } block_30: @@ -2933,7 +3718,7 @@ x_9 = lean::array_get_size(x_8); lean::dec(x_8); x_10 = lean::cnstr_get(x_6, 1); lean::inc(x_10); -x_11 = l_Lean_Parser_Command_unsafe___elambda__1___rarg(x_2, x_6); +x_11 = l_Lean_Parser_Command_partial___elambda__1___rarg(x_2, x_6); x_12 = lean::cnstr_get(x_11, 3); lean::inc(x_12); if (lean::obj_tag(x_12) == 0) @@ -3001,7 +3786,7 @@ lean::dec(x_33); x_35 = lean::cnstr_get(x_31, 1); lean::inc(x_35); lean::inc(x_2); -x_36 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg(x_2, x_31); +x_36 = l_Lean_Parser_Command_unsafe___elambda__1___rarg(x_2, x_31); x_37 = lean::cnstr_get(x_36, 3); lean::inc(x_37); if (lean::obj_tag(x_37) == 0) @@ -3066,7 +3851,7 @@ lean::dec(x_52); x_54 = lean::cnstr_get(x_50, 1); lean::inc(x_54); lean::inc(x_2); -x_55 = l_Lean_Parser_Command_visibility___elambda__1___rarg(x_2, x_50); +x_55 = l_Lean_Parser_Command_noncomputable___elambda__1___rarg(x_2, x_50); x_56 = lean::cnstr_get(x_55, 3); lean::inc(x_56); if (lean::obj_tag(x_56) == 0) @@ -3131,7 +3916,7 @@ lean::dec(x_71); x_73 = lean::cnstr_get(x_69, 1); lean::inc(x_73); lean::inc(x_2); -x_74 = l_Lean_Parser_Command_attributes___elambda__1(x_1, x_2, x_69); +x_74 = l_Lean_Parser_Command_visibility___elambda__1___rarg(x_2, x_69); x_75 = lean::cnstr_get(x_74, 3); lean::inc(x_75); if (lean::obj_tag(x_75) == 0) @@ -3181,6 +3966,71 @@ x_86 = l_Lean_Parser_ParserState_mkNode(x_69, x_85, x_5); return x_86; } } +block_106: +{ +obj* x_89; +x_89 = lean::cnstr_get(x_88, 3); +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; +x_90 = lean::cnstr_get(x_88, 0); +lean::inc(x_90); +x_91 = lean::array_get_size(x_90); +lean::dec(x_90); +x_92 = lean::cnstr_get(x_88, 1); +lean::inc(x_92); +lean::inc(x_2); +x_93 = l_Lean_Parser_Command_attributes___elambda__1(x_1, x_2, x_88); +x_94 = lean::cnstr_get(x_93, 3); +lean::inc(x_94); +if (lean::obj_tag(x_94) == 0) +{ +obj* x_95; obj* x_96; +lean::dec(x_92); +x_95 = l_Lean_nullKind; +x_96 = l_Lean_Parser_ParserState_mkNode(x_93, x_95, x_91); +x_69 = x_96; +goto block_87; +} +else +{ +obj* x_97; uint8 x_98; +lean::dec(x_94); +x_97 = lean::cnstr_get(x_93, 1); +lean::inc(x_97); +x_98 = lean::nat_dec_eq(x_97, x_92); +lean::dec(x_97); +if (x_98 == 0) +{ +obj* x_99; obj* x_100; +lean::dec(x_92); +x_99 = l_Lean_nullKind; +x_100 = l_Lean_Parser_ParserState_mkNode(x_93, x_99, x_91); +x_69 = x_100; +goto block_87; +} +else +{ +obj* x_101; obj* x_102; obj* x_103; +x_101 = l_Lean_Parser_ParserState_restore(x_93, x_91, x_92); +x_102 = l_Lean_nullKind; +x_103 = l_Lean_Parser_ParserState_mkNode(x_101, x_102, x_91); +x_69 = x_103; +goto block_87; +} +} +} +else +{ +obj* x_104; obj* x_105; +lean::dec(x_89); +lean::dec(x_2); +x_104 = l_Lean_Parser_Command_declModifiers___elambda__1___closed__2; +x_105 = l_Lean_Parser_ParserState_mkNode(x_88, x_104, x_5); +return x_105; +} +} } } obj* _init_l_Lean_Parser_Command_declModifiers___closed__1() { @@ -3242,9 +4092,10 @@ obj* _init_l_Lean_Parser_Command_declModifiers___closed__6() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_declModifiers___closed__4; -x_2 = l_Lean_Parser_Command_declModifiers___closed__5; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +x_1 = l_Lean_Parser_Command_partial; +x_2 = lean::cnstr_get(x_1, 0); +lean::inc(x_2); +x_3 = l_Lean_Parser_optionaInfo(x_2); return x_3; } } @@ -3252,7 +4103,7 @@ obj* _init_l_Lean_Parser_Command_declModifiers___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_declModifiers___closed__3; +x_1 = l_Lean_Parser_Command_declModifiers___closed__5; x_2 = l_Lean_Parser_Command_declModifiers___closed__6; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -3262,7 +4113,7 @@ obj* _init_l_Lean_Parser_Command_declModifiers___closed__8() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_declModifiers___closed__2; +x_1 = l_Lean_Parser_Command_declModifiers___closed__4; x_2 = l_Lean_Parser_Command_declModifiers___closed__7; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -3272,7 +4123,7 @@ obj* _init_l_Lean_Parser_Command_declModifiers___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_declModifiers___closed__1; +x_1 = l_Lean_Parser_Command_declModifiers___closed__3; x_2 = l_Lean_Parser_Command_declModifiers___closed__8; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -3281,13 +4132,33 @@ return x_3; obj* _init_l_Lean_Parser_Command_declModifiers___closed__10() { _start: { +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_declModifiers___closed__2; +x_2 = l_Lean_Parser_Command_declModifiers___closed__9; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_declModifiers___closed__11() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_declModifiers___closed__1; +x_2 = l_Lean_Parser_Command_declModifiers___closed__10; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_declModifiers___closed__12() { +_start: +{ obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Command_declModifiers___closed__9; +x_1 = l_Lean_Parser_Command_declModifiers___closed__11; x_2 = l_Lean_Parser_nodeInfo(x_1); return x_2; } } -obj* _init_l_Lean_Parser_Command_declModifiers___closed__11() { +obj* _init_l_Lean_Parser_Command_declModifiers___closed__13() { _start: { obj* x_1; @@ -3295,12 +4166,12 @@ x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Command_declModi return x_1; } } -obj* _init_l_Lean_Parser_Command_declModifiers___closed__12() { +obj* _init_l_Lean_Parser_Command_declModifiers___closed__14() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_declModifiers___closed__10; -x_2 = l_Lean_Parser_Command_declModifiers___closed__11; +x_1 = l_Lean_Parser_Command_declModifiers___closed__12; +x_2 = l_Lean_Parser_Command_declModifiers___closed__13; x_3 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_3, 0, x_1); lean::cnstr_set(x_3, 1, x_2); @@ -3311,7 +4182,7 @@ obj* _init_l_Lean_Parser_Command_declModifiers() { _start: { obj* x_1; -x_1 = l_Lean_Parser_Command_declModifiers___closed__12; +x_1 = l_Lean_Parser_Command_declModifiers___closed__14; return x_1; } } @@ -3324,7 +4195,7 @@ lean::dec(x_1); return x_4; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 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; @@ -3340,7 +4211,7 @@ x_12 = lean::cnstr_get(x_11, 3); 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; +obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_23; obj* x_24; lean::dec(x_10); lean::dec(x_9); x_13 = lean::cnstr_get(x_11, 0); @@ -3349,19 +4220,74 @@ x_14 = lean::array_get_size(x_13); lean::dec(x_13); x_15 = lean::cnstr_get(x_11, 1); lean::inc(x_15); -x_16 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_17 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; lean::inc(x_6); -x_18 = l_Lean_Parser_symbolFnAux(x_16, x_17, x_6, x_11); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) +x_23 = l_Lean_Parser_tokenFn(x_6, x_11); +x_24 = lean::cnstr_get(x_23, 3); +lean::inc(x_24); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_25; obj* x_26; +x_25 = lean::cnstr_get(x_23, 0); +lean::inc(x_25); +x_26 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_25); +lean::dec(x_25); +if (lean::obj_tag(x_26) == 2) +{ +obj* x_27; obj* x_28; uint8 x_29; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +lean::dec(x_26); +x_28 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_29 = lean::string_dec_eq(x_27, x_28); +lean::dec(x_27); +if (x_29 == 0) +{ +obj* x_30; obj* x_31; +x_30 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); +x_16 = x_31; +goto block_22; +} +else +{ +x_16 = x_23; +goto block_22; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_26); +x_32 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); +x_16 = x_33; +goto block_22; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_24); +x_34 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); +x_16 = x_35; +goto block_22; +} +block_22: +{ +obj* x_17; +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { lean::dec(x_15); lean::dec(x_14); { uint8 _tmp_3 = x_2; -obj* _tmp_6 = x_18; +obj* _tmp_6 = x_16; x_4 = _tmp_3; x_7 = _tmp_6; } @@ -3369,14 +4295,15 @@ goto _start; } else { -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_19); +obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_17); lean::dec(x_6); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_14, x_15); +x_19 = l_Lean_Parser_ParserState_restore(x_16, x_14, x_15); lean::dec(x_14); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; +x_20 = l_Lean_nullKind; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_3); +return x_21; +} } } else @@ -3385,23 +4312,23 @@ lean::dec(x_12); lean::dec(x_6); if (x_4 == 0) { -obj* x_24; obj* x_25; obj* x_26; obj* x_27; +obj* x_36; obj* x_37; obj* x_38; obj* x_39; lean::dec(x_10); lean::dec(x_9); -x_24 = lean::box(0); -x_25 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_24); -x_26 = l_Lean_nullKind; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_3); -return x_27; +x_36 = lean::box(0); +x_37 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_36); +x_38 = l_Lean_nullKind; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_3); +return x_39; } else { -obj* x_28; obj* x_29; obj* x_30; -x_28 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +obj* x_40; obj* x_41; obj* x_42; +x_40 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); lean::dec(x_9); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_3); -return x_30; +x_41 = l_Lean_nullKind; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_3); +return x_42; } } } @@ -3415,7 +4342,7 @@ lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); x_8 = 0; -x_9 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +x_9 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); return x_9; } } @@ -3451,146 +4378,212 @@ x_7 = lean::cnstr_get(x_6, 3); 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; +obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_29; obj* x_50; obj* x_51; x_8 = lean::cnstr_get(x_6, 0); lean::inc(x_8); x_9 = lean::array_get_size(x_8); lean::dec(x_8); x_10 = lean::cnstr_get(x_6, 1); lean::inc(x_10); -x_11 = l_Lean_Parser_Term_id___elambda__1___closed__6; -x_12 = l_Lean_Parser_Term_id___elambda__1___closed__10; lean::inc(x_2); -x_13 = l_Lean_Parser_symbolFnAux(x_11, x_12, x_2, x_6); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +x_50 = l_Lean_Parser_tokenFn(x_2, x_6); +x_51 = lean::cnstr_get(x_50, 3); +lean::inc(x_51); +if (lean::obj_tag(x_51) == 0) { -uint8 x_15; uint8 x_16; obj* x_17; obj* x_18; -x_15 = 0; -x_16 = 0; -lean::inc(x_2); -x_17 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_declId___elambda__1___spec__1(x_15, x_16, x_1, x_2, x_13); -x_18 = lean::cnstr_get(x_17, 3); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) +obj* x_52; obj* x_53; +x_52 = lean::cnstr_get(x_50, 0); +lean::inc(x_52); +x_53 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_52); +lean::dec(x_52); +if (lean::obj_tag(x_53) == 2) +{ +obj* x_54; obj* x_55; uint8 x_56; +x_54 = lean::cnstr_get(x_53, 1); +lean::inc(x_54); +lean::dec(x_53); +x_55 = l_Lean_Parser_Term_id___elambda__1___closed__6; +x_56 = lean::string_dec_eq(x_54, x_55); +lean::dec(x_54); +if (x_56 == 0) +{ +obj* x_57; obj* x_58; +x_57 = l_Lean_Parser_Term_id___elambda__1___closed__14; +lean::inc(x_10); +x_58 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_57, x_10); +x_29 = x_58; +goto block_49; +} +else +{ +x_29 = x_50; +goto block_49; +} +} +else +{ +obj* x_59; obj* x_60; +lean::dec(x_53); +x_59 = l_Lean_Parser_Term_id___elambda__1___closed__14; +lean::inc(x_10); +x_60 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_59, x_10); +x_29 = x_60; +goto block_49; +} +} +else +{ +obj* x_61; obj* x_62; +lean::dec(x_51); +x_61 = l_Lean_Parser_Term_id___elambda__1___closed__14; +lean::inc(x_10); +x_62 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_61, x_10); +x_29 = x_62; +goto block_49; +} +block_28: +{ +obj* x_12; +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +lean::dec(x_10); +x_13 = l_Lean_nullKind; +x_14 = l_Lean_Parser_ParserState_mkNode(x_11, x_13, x_9); +x_15 = l_Lean_Parser_Command_declId___elambda__1___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_5); +return x_16; +} +else +{ +obj* x_17; uint8 x_18; +lean::dec(x_12); +x_17 = lean::cnstr_get(x_11, 1); +lean::inc(x_17); +x_18 = lean::nat_dec_eq(x_17, x_10); +lean::dec(x_17); +if (x_18 == 0) { obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_20 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_21 = l_Lean_Parser_symbolFnAux(x_19, x_20, x_2, x_17); -x_22 = lean::cnstr_get(x_21, 3); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; lean::dec(x_10); -x_23 = l_Lean_nullKind; -x_24 = l_Lean_Parser_ParserState_mkNode(x_21, x_23, x_9); -x_25 = l_Lean_Parser_Command_declId___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_5); -return x_26; +x_19 = l_Lean_nullKind; +x_20 = l_Lean_Parser_ParserState_mkNode(x_11, x_19, x_9); +x_21 = l_Lean_Parser_Command_declId___elambda__1___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); +return x_22; } else { -obj* x_27; uint8 x_28; -lean::dec(x_22); -x_27 = lean::cnstr_get(x_21, 1); -lean::inc(x_27); -x_28 = lean::nat_dec_eq(x_27, x_10); -lean::dec(x_27); -if (x_28 == 0) +obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; +x_23 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +x_24 = l_Lean_nullKind; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_9); +x_26 = l_Lean_Parser_Command_declId___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_5); +return x_27; +} +} +} +block_49: { -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -lean::dec(x_10); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_21, x_29, x_9); -x_31 = l_Lean_Parser_Command_declId___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_5); -return x_32; -} -else +obj* x_30; +x_30 = lean::cnstr_get(x_29, 3); +lean::inc(x_30); +if (lean::obj_tag(x_30) == 0) { -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_33 = l_Lean_Parser_ParserState_restore(x_21, x_9, x_10); -x_34 = l_Lean_nullKind; -x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_9); -x_36 = l_Lean_Parser_Command_declId___elambda__1___closed__2; -x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_5); -return x_37; -} -} -} -else +uint8 x_31; uint8 x_32; obj* x_33; obj* x_34; +x_31 = 0; +x_32 = 0; +lean::inc(x_2); +x_33 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_declId___elambda__1___spec__1(x_31, x_32, x_1, x_2, x_29); +x_34 = lean::cnstr_get(x_33, 3); +lean::inc(x_34); +if (lean::obj_tag(x_34) == 0) { -obj* x_38; uint8 x_39; -lean::dec(x_18); -lean::dec(x_2); -x_38 = lean::cnstr_get(x_17, 1); +obj* x_35; obj* x_36; obj* x_37; +x_35 = lean::cnstr_get(x_33, 1); +lean::inc(x_35); +x_36 = l_Lean_Parser_tokenFn(x_2, x_33); +x_37 = lean::cnstr_get(x_36, 3); +lean::inc(x_37); +if (lean::obj_tag(x_37) == 0) +{ +obj* x_38; obj* x_39; +x_38 = lean::cnstr_get(x_36, 0); lean::inc(x_38); -x_39 = lean::nat_dec_eq(x_38, x_10); +x_39 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_38); lean::dec(x_38); -if (x_39 == 0) +if (lean::obj_tag(x_39) == 2) { -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -lean::dec(x_10); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_17, x_40, x_9); -x_42 = l_Lean_Parser_Command_declId___elambda__1___closed__2; -x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_5); -return x_43; +obj* x_40; obj* x_41; uint8 x_42; +x_40 = lean::cnstr_get(x_39, 1); +lean::inc(x_40); +lean::dec(x_39); +x_41 = l_Lean_Parser_Term_id___elambda__1___closed__8; +x_42 = lean::string_dec_eq(x_40, x_41); +lean::dec(x_40); +if (x_42 == 0) +{ +obj* x_43; obj* x_44; +x_43 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_44 = l_Lean_Parser_ParserState_mkErrorsAt(x_36, x_43, x_35); +x_11 = x_44; +goto block_28; } else { -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_44 = l_Lean_Parser_ParserState_restore(x_17, x_9, x_10); -x_45 = l_Lean_nullKind; -x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_9); -x_47 = l_Lean_Parser_Command_declId___elambda__1___closed__2; -x_48 = l_Lean_Parser_ParserState_mkNode(x_46, x_47, x_5); -return x_48; -} +lean::dec(x_35); +x_11 = x_36; +goto block_28; } } else { -obj* x_49; uint8 x_50; -lean::dec(x_14); +obj* x_45; obj* x_46; +lean::dec(x_39); +x_45 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_46 = l_Lean_Parser_ParserState_mkErrorsAt(x_36, x_45, x_35); +x_11 = x_46; +goto block_28; +} +} +else +{ +obj* x_47; obj* x_48; +lean::dec(x_37); +x_47 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_36, x_47, x_35); +x_11 = x_48; +goto block_28; +} +} +else +{ +lean::dec(x_34); lean::dec(x_2); -x_49 = lean::cnstr_get(x_13, 1); -lean::inc(x_49); -x_50 = lean::nat_dec_eq(x_49, x_10); -lean::dec(x_49); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_10); -x_51 = l_Lean_nullKind; -x_52 = l_Lean_Parser_ParserState_mkNode(x_13, x_51, x_9); -x_53 = l_Lean_Parser_Command_declId___elambda__1___closed__2; -x_54 = l_Lean_Parser_ParserState_mkNode(x_52, x_53, x_5); -return x_54; +x_11 = x_33; +goto block_28; +} } else { -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_55 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); -x_56 = l_Lean_nullKind; -x_57 = l_Lean_Parser_ParserState_mkNode(x_55, x_56, x_9); -x_58 = l_Lean_Parser_Command_declId___elambda__1___closed__2; -x_59 = l_Lean_Parser_ParserState_mkNode(x_57, x_58, x_5); -return x_59; +lean::dec(x_30); +lean::dec(x_2); +x_11 = x_29; +goto block_28; } } } else { -obj* x_60; obj* x_61; +obj* x_63; obj* x_64; lean::dec(x_7); lean::dec(x_2); -x_60 = l_Lean_Parser_Command_declId___elambda__1___closed__2; -x_61 = l_Lean_Parser_ParserState_mkNode(x_6, x_60, x_5); -return x_61; +x_63 = l_Lean_Parser_Command_declId___elambda__1___closed__2; +x_64 = l_Lean_Parser_ParserState_mkNode(x_6, x_63, x_5); +return x_64; } } } @@ -3688,7 +4681,7 @@ x_1 = l_Lean_Parser_Command_declId___closed__8; return x_1; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2___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; uint8 x_9; uint8 x_10; obj* x_11; @@ -3698,7 +4691,7 @@ x_9 = lean::unbox(x_2); lean::dec(x_2); x_10 = lean::unbox(x_4); lean::dec(x_4); -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); lean::dec(x_5); return x_11; } @@ -3957,35 +4950,91 @@ return x_3; obj* l_Lean_Parser_Command_declValSimple___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Command_declValSimple___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Command_declValSimple___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Command_declValSimple___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Command_declValSimple___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -4100,7 +5149,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -4192,7 +5241,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -4434,7 +5483,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -4526,7 +5575,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -4789,7 +5838,7 @@ obj* _init_l_Lean_Parser_Command_abbrev___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_abbrev___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -4805,76 +5854,144 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_abbrev___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_abbrev___elambda__1___closed__6; +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* l_Lean_Parser_Command_abbrev___elambda__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_4; obj* x_5; obj* x_6; obj* x_22; obj* x_23; obj* x_24; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_abbrev___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_abbrev___elambda__1___closed__6; +x_22 = lean::cnstr_get(x_3, 1); +lean::inc(x_22); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_23 = l_Lean_Parser_tokenFn(x_2, x_3); +x_24 = lean::cnstr_get(x_23, 3); +lean::inc(x_24); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_25; obj* x_26; +x_25 = lean::cnstr_get(x_23, 0); +lean::inc(x_25); +x_26 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_25); +lean::dec(x_25); +if (lean::obj_tag(x_26) == 2) +{ +obj* x_27; obj* x_28; uint8 x_29; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +lean::dec(x_26); +x_28 = l_Lean_Parser_Command_abbrev___elambda__1___closed__4; +x_29 = lean::string_dec_eq(x_27, x_28); +lean::dec(x_27); +if (x_29 == 0) +{ +obj* x_30; obj* x_31; +x_30 = l_Lean_Parser_Command_abbrev___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_22); +x_6 = x_31; +goto block_21; +} +else +{ +lean::dec(x_22); +x_6 = x_23; +goto block_21; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_26); +x_32 = l_Lean_Parser_Command_abbrev___elambda__1___closed__7; +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_22); +x_6 = x_33; +goto block_21; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_24); +x_34 = l_Lean_Parser_Command_abbrev___elambda__1___closed__7; +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_22); +x_6 = x_35; +goto block_21; +} +block_21: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { obj* x_10; obj* x_11; lean::inc(x_2); -x_10 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_8); +lean::inc(x_1); +x_10 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_8); x_11 = lean::cnstr_get(x_10, 3); lean::inc(x_11); if (lean::obj_tag(x_11) == 0) { -obj* x_12; obj* x_13; -lean::inc(x_2); -lean::inc(x_1); -x_12 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_10); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_12; obj* x_13; obj* x_14; +x_12 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_10); +lean::dec(x_1); +x_13 = l_Lean_Parser_Command_abbrev___elambda__1___closed__2; +x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); +return x_14; +} +else { -obj* x_14; obj* x_15; obj* x_16; -x_14 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_12); +obj* x_15; obj* x_16; +lean::dec(x_11); +lean::dec(x_2); lean::dec(x_1); x_15 = l_Lean_Parser_Command_abbrev___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_5); +x_16 = l_Lean_Parser_ParserState_mkNode(x_10, x_15, x_5); return x_16; } +} else { obj* x_17; obj* x_18; -lean::dec(x_13); +lean::dec(x_9); lean::dec(x_2); lean::dec(x_1); x_17 = l_Lean_Parser_Command_abbrev___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_12, x_17, x_5); +x_18 = l_Lean_Parser_ParserState_mkNode(x_8, x_17, x_5); return x_18; } } else { obj* x_19; obj* x_20; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_19 = l_Lean_Parser_Command_abbrev___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_10, x_19, x_5); +x_20 = l_Lean_Parser_ParserState_mkNode(x_6, x_19, x_5); return x_20; } } -else -{ -obj* x_21; obj* x_22; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_21 = l_Lean_Parser_Command_abbrev___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_8, x_21, x_5); -return x_22; -} } } obj* _init_l_Lean_Parser_Command_abbrev___closed__1() { @@ -4999,7 +6116,7 @@ obj* _init_l_Lean_Parser_Command_def___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_def___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -5015,76 +6132,144 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_def___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_def___elambda__1___closed__6; +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* l_Lean_Parser_Command_def___elambda__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_4; obj* x_5; obj* x_6; obj* x_22; obj* x_23; obj* x_24; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_def___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_def___elambda__1___closed__6; +x_22 = lean::cnstr_get(x_3, 1); +lean::inc(x_22); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_23 = l_Lean_Parser_tokenFn(x_2, x_3); +x_24 = lean::cnstr_get(x_23, 3); +lean::inc(x_24); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_25; obj* x_26; +x_25 = lean::cnstr_get(x_23, 0); +lean::inc(x_25); +x_26 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_25); +lean::dec(x_25); +if (lean::obj_tag(x_26) == 2) +{ +obj* x_27; obj* x_28; uint8 x_29; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +lean::dec(x_26); +x_28 = l_Lean_Parser_Command_def___elambda__1___closed__4; +x_29 = lean::string_dec_eq(x_27, x_28); +lean::dec(x_27); +if (x_29 == 0) +{ +obj* x_30; obj* x_31; +x_30 = l_Lean_Parser_Command_def___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_22); +x_6 = x_31; +goto block_21; +} +else +{ +lean::dec(x_22); +x_6 = x_23; +goto block_21; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_26); +x_32 = l_Lean_Parser_Command_def___elambda__1___closed__7; +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_22); +x_6 = x_33; +goto block_21; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_24); +x_34 = l_Lean_Parser_Command_def___elambda__1___closed__7; +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_22); +x_6 = x_35; +goto block_21; +} +block_21: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { obj* x_10; obj* x_11; lean::inc(x_2); -x_10 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_8); +lean::inc(x_1); +x_10 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_8); x_11 = lean::cnstr_get(x_10, 3); lean::inc(x_11); if (lean::obj_tag(x_11) == 0) { -obj* x_12; obj* x_13; -lean::inc(x_2); -lean::inc(x_1); -x_12 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_10); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_12; obj* x_13; obj* x_14; +x_12 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_10); +lean::dec(x_1); +x_13 = l_Lean_Parser_Command_def___elambda__1___closed__2; +x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); +return x_14; +} +else { -obj* x_14; obj* x_15; obj* x_16; -x_14 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_12); +obj* x_15; obj* x_16; +lean::dec(x_11); +lean::dec(x_2); lean::dec(x_1); x_15 = l_Lean_Parser_Command_def___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_5); +x_16 = l_Lean_Parser_ParserState_mkNode(x_10, x_15, x_5); return x_16; } +} else { obj* x_17; obj* x_18; -lean::dec(x_13); +lean::dec(x_9); lean::dec(x_2); lean::dec(x_1); x_17 = l_Lean_Parser_Command_def___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_12, x_17, x_5); +x_18 = l_Lean_Parser_ParserState_mkNode(x_8, x_17, x_5); return x_18; } } else { obj* x_19; obj* x_20; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_19 = l_Lean_Parser_Command_def___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_10, x_19, x_5); +x_20 = l_Lean_Parser_ParserState_mkNode(x_6, x_19, x_5); return x_20; } } -else -{ -obj* x_21; obj* x_22; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_21 = l_Lean_Parser_Command_def___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_8, x_21, x_5); -return x_22; -} } } obj* _init_l_Lean_Parser_Command_def___closed__1() { @@ -5183,7 +6368,7 @@ obj* _init_l_Lean_Parser_Command_theorem___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_theorem___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -5199,76 +6384,144 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_theorem___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_theorem___elambda__1___closed__6; +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* l_Lean_Parser_Command_theorem___elambda__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_4; obj* x_5; obj* x_6; obj* x_22; obj* x_23; obj* x_24; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_theorem___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_theorem___elambda__1___closed__6; +x_22 = lean::cnstr_get(x_3, 1); +lean::inc(x_22); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_23 = l_Lean_Parser_tokenFn(x_2, x_3); +x_24 = lean::cnstr_get(x_23, 3); +lean::inc(x_24); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_25; obj* x_26; +x_25 = lean::cnstr_get(x_23, 0); +lean::inc(x_25); +x_26 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_25); +lean::dec(x_25); +if (lean::obj_tag(x_26) == 2) +{ +obj* x_27; obj* x_28; uint8 x_29; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +lean::dec(x_26); +x_28 = l_Lean_Parser_Command_theorem___elambda__1___closed__4; +x_29 = lean::string_dec_eq(x_27, x_28); +lean::dec(x_27); +if (x_29 == 0) +{ +obj* x_30; obj* x_31; +x_30 = l_Lean_Parser_Command_theorem___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_22); +x_6 = x_31; +goto block_21; +} +else +{ +lean::dec(x_22); +x_6 = x_23; +goto block_21; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_26); +x_32 = l_Lean_Parser_Command_theorem___elambda__1___closed__7; +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_22); +x_6 = x_33; +goto block_21; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_24); +x_34 = l_Lean_Parser_Command_theorem___elambda__1___closed__7; +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_22); +x_6 = x_35; +goto block_21; +} +block_21: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { obj* x_10; obj* x_11; lean::inc(x_2); -x_10 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_8); +lean::inc(x_1); +x_10 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_8); x_11 = lean::cnstr_get(x_10, 3); lean::inc(x_11); if (lean::obj_tag(x_11) == 0) { -obj* x_12; obj* x_13; -lean::inc(x_2); -lean::inc(x_1); -x_12 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_10); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_12; obj* x_13; obj* x_14; +x_12 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_10); +lean::dec(x_1); +x_13 = l_Lean_Parser_Command_theorem___elambda__1___closed__2; +x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); +return x_14; +} +else { -obj* x_14; obj* x_15; obj* x_16; -x_14 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_12); +obj* x_15; obj* x_16; +lean::dec(x_11); +lean::dec(x_2); lean::dec(x_1); x_15 = l_Lean_Parser_Command_theorem___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_5); +x_16 = l_Lean_Parser_ParserState_mkNode(x_10, x_15, x_5); return x_16; } +} else { obj* x_17; obj* x_18; -lean::dec(x_13); +lean::dec(x_9); lean::dec(x_2); lean::dec(x_1); x_17 = l_Lean_Parser_Command_theorem___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_12, x_17, x_5); +x_18 = l_Lean_Parser_ParserState_mkNode(x_8, x_17, x_5); return x_18; } } else { obj* x_19; obj* x_20; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_19 = l_Lean_Parser_Command_theorem___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_10, x_19, x_5); +x_20 = l_Lean_Parser_ParserState_mkNode(x_6, x_19, x_5); return x_20; } } -else -{ -obj* x_21; obj* x_22; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_21 = l_Lean_Parser_Command_theorem___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_8, x_21, x_5); -return x_22; -} } } obj* _init_l_Lean_Parser_Command_theorem___closed__1() { @@ -5393,7 +6646,7 @@ obj* _init_l_Lean_Parser_Command_constant___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_constant___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -5409,117 +6662,185 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_constant___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_constant___elambda__1___closed__6; +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* l_Lean_Parser_Command_constant___elambda__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_4; obj* x_5; obj* x_6; obj* x_39; obj* x_40; obj* x_41; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_constant___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_constant___elambda__1___closed__6; +x_39 = lean::cnstr_get(x_3, 1); +lean::inc(x_39); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_40 = l_Lean_Parser_tokenFn(x_2, x_3); +x_41 = lean::cnstr_get(x_40, 3); +lean::inc(x_41); +if (lean::obj_tag(x_41) == 0) +{ +obj* x_42; obj* x_43; +x_42 = lean::cnstr_get(x_40, 0); +lean::inc(x_42); +x_43 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_42); +lean::dec(x_42); +if (lean::obj_tag(x_43) == 2) +{ +obj* x_44; obj* x_45; uint8 x_46; +x_44 = lean::cnstr_get(x_43, 1); +lean::inc(x_44); +lean::dec(x_43); +x_45 = l_Lean_Parser_Command_constant___elambda__1___closed__4; +x_46 = lean::string_dec_eq(x_44, x_45); +lean::dec(x_44); +if (x_46 == 0) +{ +obj* x_47; obj* x_48; +x_47 = l_Lean_Parser_Command_constant___elambda__1___closed__7; +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_47, x_39); +x_6 = x_48; +goto block_38; +} +else +{ +lean::dec(x_39); +x_6 = x_40; +goto block_38; +} +} +else +{ +obj* x_49; obj* x_50; +lean::dec(x_43); +x_49 = l_Lean_Parser_Command_constant___elambda__1___closed__7; +x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_49, x_39); +x_6 = x_50; +goto block_38; +} +} +else +{ +obj* x_51; obj* x_52; +lean::dec(x_41); +x_51 = l_Lean_Parser_Command_constant___elambda__1___closed__7; +x_52 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_51, x_39); +x_6 = x_52; +goto block_38; +} +block_38: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { obj* x_10; obj* x_11; lean::inc(x_2); -x_10 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_8); +x_10 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_8); x_11 = lean::cnstr_get(x_10, 3); lean::inc(x_11); if (lean::obj_tag(x_11) == 0) { -obj* x_12; obj* x_13; -lean::inc(x_2); -x_12 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_10); -x_13 = lean::cnstr_get(x_12, 3); -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_12, 0); +obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_12 = lean::cnstr_get(x_10, 0); +lean::inc(x_12); +x_13 = lean::array_get_size(x_12); +lean::dec(x_12); +x_14 = lean::cnstr_get(x_10, 1); lean::inc(x_14); -x_15 = lean::array_get_size(x_14); -lean::dec(x_14); -x_16 = lean::cnstr_get(x_12, 1); +x_15 = l_Lean_Parser_Command_declValSimple___elambda__1___rarg(x_2, x_10); +x_16 = lean::cnstr_get(x_15, 3); lean::inc(x_16); -x_17 = l_Lean_Parser_Command_declValSimple___elambda__1___rarg(x_2, x_12); -x_18 = lean::cnstr_get(x_17, 3); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) +if (lean::obj_tag(x_16) == 0) { -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -lean::dec(x_16); -x_19 = l_Lean_nullKind; -x_20 = l_Lean_Parser_ParserState_mkNode(x_17, x_19, x_15); -x_21 = l_Lean_Parser_Command_constant___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); -return x_22; +obj* x_17; obj* x_18; obj* x_19; obj* x_20; +lean::dec(x_14); +x_17 = l_Lean_nullKind; +x_18 = l_Lean_Parser_ParserState_mkNode(x_15, x_17, x_13); +x_19 = l_Lean_Parser_Command_constant___elambda__1___closed__2; +x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_5); +return x_20; } else { -obj* x_23; uint8 x_24; -lean::dec(x_18); -x_23 = lean::cnstr_get(x_17, 1); -lean::inc(x_23); -x_24 = lean::nat_dec_eq(x_23, x_16); -lean::dec(x_23); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; +obj* x_21; uint8 x_22; lean::dec(x_16); -x_25 = l_Lean_nullKind; -x_26 = l_Lean_Parser_ParserState_mkNode(x_17, x_25, x_15); -x_27 = l_Lean_Parser_Command_constant___elambda__1___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_5); -return x_28; +x_21 = lean::cnstr_get(x_15, 1); +lean::inc(x_21); +x_22 = lean::nat_dec_eq(x_21, x_14); +lean::dec(x_21); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_14); +x_23 = l_Lean_nullKind; +x_24 = l_Lean_Parser_ParserState_mkNode(x_15, x_23, x_13); +x_25 = l_Lean_Parser_Command_constant___elambda__1___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_5); +return x_26; } else { -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_29 = l_Lean_Parser_ParserState_restore(x_17, x_15, x_16); -x_30 = l_Lean_nullKind; -x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_15); +obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; +x_27 = l_Lean_Parser_ParserState_restore(x_15, x_13, x_14); +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_13); +x_30 = l_Lean_Parser_Command_constant___elambda__1___closed__2; +x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_5); +return x_31; +} +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_11); +lean::dec(x_2); x_32 = l_Lean_Parser_Command_constant___elambda__1___closed__2; -x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +x_33 = l_Lean_Parser_ParserState_mkNode(x_10, x_32, x_5); return x_33; } } -} else { obj* x_34; obj* x_35; -lean::dec(x_13); +lean::dec(x_9); lean::dec(x_2); +lean::dec(x_1); x_34 = l_Lean_Parser_Command_constant___elambda__1___closed__2; -x_35 = l_Lean_Parser_ParserState_mkNode(x_12, x_34, x_5); +x_35 = l_Lean_Parser_ParserState_mkNode(x_8, x_34, x_5); return x_35; } } else { obj* x_36; obj* x_37; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_36 = l_Lean_Parser_Command_constant___elambda__1___closed__2; -x_37 = l_Lean_Parser_ParserState_mkNode(x_10, x_36, x_5); +x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); return x_37; } } -else -{ -obj* x_38; obj* x_39; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_38 = l_Lean_Parser_Command_constant___elambda__1___closed__2; -x_39 = l_Lean_Parser_ParserState_mkNode(x_8, x_38, x_5); -return x_39; -} } } obj* _init_l_Lean_Parser_Command_constant___closed__1() { @@ -5653,7 +6974,7 @@ obj* _init_l_Lean_Parser_Command_instance___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_instance___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -5669,196 +6990,264 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_instance___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_instance___elambda__1___closed__6; +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* l_Lean_Parser_Command_instance___elambda__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_4; obj* x_5; obj* x_6; obj* x_55; obj* x_56; obj* x_57; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_instance___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_instance___elambda__1___closed__6; +x_55 = lean::cnstr_get(x_3, 1); +lean::inc(x_55); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_56 = l_Lean_Parser_tokenFn(x_2, x_3); +x_57 = lean::cnstr_get(x_56, 3); +lean::inc(x_57); +if (lean::obj_tag(x_57) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_8, 0); +obj* x_58; obj* x_59; +x_58 = lean::cnstr_get(x_56, 0); +lean::inc(x_58); +x_59 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_58); +lean::dec(x_58); +if (lean::obj_tag(x_59) == 2) +{ +obj* x_60; obj* x_61; uint8 x_62; +x_60 = lean::cnstr_get(x_59, 1); +lean::inc(x_60); +lean::dec(x_59); +x_61 = l_Lean_Parser_Command_instance___elambda__1___closed__4; +x_62 = lean::string_dec_eq(x_60, x_61); +lean::dec(x_60); +if (x_62 == 0) +{ +obj* x_63; obj* x_64; +x_63 = l_Lean_Parser_Command_instance___elambda__1___closed__7; +x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_63, x_55); +x_6 = x_64; +goto block_54; +} +else +{ +lean::dec(x_55); +x_6 = x_56; +goto block_54; +} +} +else +{ +obj* x_65; obj* x_66; +lean::dec(x_59); +x_65 = l_Lean_Parser_Command_instance___elambda__1___closed__7; +x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_65, x_55); +x_6 = x_66; +goto block_54; +} +} +else +{ +obj* x_67; obj* x_68; +lean::dec(x_57); +x_67 = l_Lean_Parser_Command_instance___elambda__1___closed__7; +x_68 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_67, x_55); +x_6 = x_68; +goto block_54; +} +block_54: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +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; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = lean::array_get_size(x_8); +lean::dec(x_8); +x_10 = lean::cnstr_get(x_6, 1); lean::inc(x_10); -x_11 = lean::array_get_size(x_10); -lean::dec(x_10); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); lean::inc(x_2); -x_13 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_8); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +x_11 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_6); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) { -obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_12); -x_15 = l_Lean_nullKind; -x_16 = l_Lean_Parser_ParserState_mkNode(x_13, x_15, x_11); +obj* x_13; obj* x_14; obj* x_15; +lean::dec(x_10); +x_13 = l_Lean_nullKind; +x_14 = l_Lean_Parser_ParserState_mkNode(x_11, x_13, x_9); +x_15 = lean::cnstr_get(x_14, 3); +lean::inc(x_15); +if (lean::obj_tag(x_15) == 0) +{ +obj* x_16; obj* x_17; +lean::inc(x_2); +lean::inc(x_1); +x_16 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_14); x_17 = lean::cnstr_get(x_16, 3); lean::inc(x_17); if (lean::obj_tag(x_17) == 0) { -obj* x_18; obj* x_19; -lean::inc(x_2); -lean::inc(x_1); -x_18 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_16); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) +obj* x_18; obj* x_19; obj* x_20; +x_18 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_16); +lean::dec(x_1); +x_19 = l_Lean_Parser_Command_instance___elambda__1___closed__2; +x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_5); +return x_20; +} +else { -obj* x_20; obj* x_21; obj* x_22; -x_20 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_18); +obj* x_21; obj* x_22; +lean::dec(x_17); +lean::dec(x_2); lean::dec(x_1); x_21 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); +x_22 = l_Lean_Parser_ParserState_mkNode(x_16, x_21, x_5); return x_22; } +} else { obj* x_23; obj* x_24; -lean::dec(x_19); +lean::dec(x_15); lean::dec(x_2); lean::dec(x_1); x_23 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_18, x_23, x_5); +x_24 = l_Lean_Parser_ParserState_mkNode(x_14, x_23, x_5); return x_24; } } else { -obj* x_25; obj* x_26; -lean::dec(x_17); -lean::dec(x_2); -lean::dec(x_1); -x_25 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_16, x_25, x_5); -return x_26; -} -} -else -{ -obj* x_27; uint8 x_28; -lean::dec(x_14); -x_27 = lean::cnstr_get(x_13, 1); -lean::inc(x_27); -x_28 = lean::nat_dec_eq(x_27, x_12); -lean::dec(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; obj* x_31; +obj* x_25; uint8 x_26; lean::dec(x_12); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_13, x_29, x_11); +x_25 = lean::cnstr_get(x_11, 1); +lean::inc(x_25); +x_26 = lean::nat_dec_eq(x_25, x_10); +lean::dec(x_25); +if (x_26 == 0) +{ +obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_10); +x_27 = l_Lean_nullKind; +x_28 = l_Lean_Parser_ParserState_mkNode(x_11, x_27, x_9); +x_29 = lean::cnstr_get(x_28, 3); +lean::inc(x_29); +if (lean::obj_tag(x_29) == 0) +{ +obj* x_30; obj* x_31; +lean::inc(x_2); +lean::inc(x_1); +x_30 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_28); x_31 = lean::cnstr_get(x_30, 3); lean::inc(x_31); if (lean::obj_tag(x_31) == 0) { -obj* x_32; obj* x_33; -lean::inc(x_2); -lean::inc(x_1); -x_32 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_30); -x_33 = lean::cnstr_get(x_32, 3); -lean::inc(x_33); -if (lean::obj_tag(x_33) == 0) +obj* x_32; obj* x_33; obj* x_34; +x_32 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_30); +lean::dec(x_1); +x_33 = l_Lean_Parser_Command_instance___elambda__1___closed__2; +x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_5); +return x_34; +} +else { -obj* x_34; obj* x_35; obj* x_36; -x_34 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_32); +obj* x_35; obj* x_36; +lean::dec(x_31); +lean::dec(x_2); lean::dec(x_1); x_35 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_5); +x_36 = l_Lean_Parser_ParserState_mkNode(x_30, x_35, x_5); return x_36; } +} else { obj* x_37; obj* x_38; -lean::dec(x_33); +lean::dec(x_29); lean::dec(x_2); lean::dec(x_1); x_37 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_38 = l_Lean_Parser_ParserState_mkNode(x_32, x_37, x_5); +x_38 = l_Lean_Parser_ParserState_mkNode(x_28, x_37, x_5); return x_38; } } else { -obj* x_39; obj* x_40; -lean::dec(x_31); -lean::dec(x_2); -lean::dec(x_1); -x_39 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_40 = l_Lean_Parser_ParserState_mkNode(x_30, x_39, x_5); -return x_40; -} -} -else +obj* x_39; obj* x_40; obj* x_41; obj* x_42; +x_39 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +x_40 = l_Lean_nullKind; +x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_9); +x_42 = lean::cnstr_get(x_41, 3); +lean::inc(x_42); +if (lean::obj_tag(x_42) == 0) { -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = l_Lean_Parser_ParserState_restore(x_13, x_11, x_12); -x_42 = l_Lean_nullKind; -x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_11); +obj* x_43; obj* x_44; +lean::inc(x_2); +lean::inc(x_1); +x_43 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_41); x_44 = lean::cnstr_get(x_43, 3); lean::inc(x_44); if (lean::obj_tag(x_44) == 0) { -obj* x_45; obj* x_46; -lean::inc(x_2); -lean::inc(x_1); -x_45 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_43); -x_46 = lean::cnstr_get(x_45, 3); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) +obj* x_45; obj* x_46; obj* x_47; +x_45 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_43); +lean::dec(x_1); +x_46 = l_Lean_Parser_Command_instance___elambda__1___closed__2; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_5); +return x_47; +} +else { -obj* x_47; obj* x_48; obj* x_49; -x_47 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_45); +obj* x_48; obj* x_49; +lean::dec(x_44); +lean::dec(x_2); lean::dec(x_1); x_48 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_49 = l_Lean_Parser_ParserState_mkNode(x_47, x_48, x_5); +x_49 = l_Lean_Parser_ParserState_mkNode(x_43, x_48, x_5); return x_49; } +} else { obj* x_50; obj* x_51; -lean::dec(x_46); +lean::dec(x_42); lean::dec(x_2); lean::dec(x_1); x_50 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_51 = l_Lean_Parser_ParserState_mkNode(x_45, x_50, x_5); +x_51 = l_Lean_Parser_ParserState_mkNode(x_41, x_50, x_5); return x_51; } } +} +} else { obj* x_52; obj* x_53; -lean::dec(x_44); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_52 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_53 = l_Lean_Parser_ParserState_mkNode(x_43, x_52, x_5); +x_53 = l_Lean_Parser_ParserState_mkNode(x_6, x_52, x_5); return x_53; } } } } -else -{ -obj* x_54; obj* x_55; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_54 = l_Lean_Parser_Command_instance___elambda__1___closed__2; -x_55 = l_Lean_Parser_ParserState_mkNode(x_8, x_54, x_5); -return x_55; -} -} -} obj* _init_l_Lean_Parser_Command_instance___closed__1() { _start: { @@ -5976,7 +7365,7 @@ obj* _init_l_Lean_Parser_Command_axiom___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_axiom___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -5992,56 +7381,124 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_axiom___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_axiom___elambda__1___closed__6; +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* l_Lean_Parser_Command_axiom___elambda__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_4; obj* x_5; obj* x_6; obj* x_18; obj* x_19; obj* x_20; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_axiom___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_axiom___elambda__1___closed__6; +x_18 = lean::cnstr_get(x_3, 1); +lean::inc(x_18); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_19 = l_Lean_Parser_tokenFn(x_2, x_3); +x_20 = lean::cnstr_get(x_19, 3); +lean::inc(x_20); +if (lean::obj_tag(x_20) == 0) +{ +obj* x_21; obj* x_22; +x_21 = lean::cnstr_get(x_19, 0); +lean::inc(x_21); +x_22 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_21); +lean::dec(x_21); +if (lean::obj_tag(x_22) == 2) +{ +obj* x_23; obj* x_24; uint8 x_25; +x_23 = lean::cnstr_get(x_22, 1); +lean::inc(x_23); +lean::dec(x_22); +x_24 = l_Lean_Parser_Command_axiom___elambda__1___closed__4; +x_25 = lean::string_dec_eq(x_23, x_24); +lean::dec(x_23); +if (x_25 == 0) +{ +obj* x_26; obj* x_27; +x_26 = l_Lean_Parser_Command_axiom___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_26, x_18); +x_6 = x_27; +goto block_17; +} +else +{ +lean::dec(x_18); +x_6 = x_19; +goto block_17; +} +} +else +{ +obj* x_28; obj* x_29; +lean::dec(x_22); +x_28 = l_Lean_Parser_Command_axiom___elambda__1___closed__7; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_28, x_18); +x_6 = x_29; +goto block_17; +} +} +else +{ +obj* x_30; obj* x_31; +lean::dec(x_20); +x_30 = l_Lean_Parser_Command_axiom___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_30, x_18); +x_6 = x_31; +goto block_17; +} +block_17: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; -lean::inc(x_2); -x_10 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_8); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +obj* x_10; obj* x_11; obj* x_12; +x_10 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_8); +x_11 = l_Lean_Parser_Command_axiom___elambda__1___closed__2; +x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_5); +return x_12; +} +else { -obj* x_12; obj* x_13; obj* x_14; -x_12 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_10); +obj* x_13; obj* x_14; +lean::dec(x_9); +lean::dec(x_2); +lean::dec(x_1); x_13 = l_Lean_Parser_Command_axiom___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); +x_14 = l_Lean_Parser_ParserState_mkNode(x_8, x_13, x_5); return x_14; } +} else { obj* x_15; obj* x_16; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_15 = l_Lean_Parser_Command_axiom___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_10, x_15, x_5); +x_16 = l_Lean_Parser_ParserState_mkNode(x_6, x_15, x_5); return x_16; } } -else -{ -obj* x_17; obj* x_18; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_17 = l_Lean_Parser_Command_axiom___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_8, x_17, x_5); -return x_18; -} } } obj* _init_l_Lean_Parser_Command_axiom___closed__1() { @@ -6154,7 +7611,7 @@ obj* _init_l_Lean_Parser_Command_example___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_example___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -6170,58 +7627,126 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_example___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_example___elambda__1___closed__6; +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* l_Lean_Parser_Command_example___elambda__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_4; obj* x_5; obj* x_6; obj* x_18; obj* x_19; obj* x_20; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_example___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_example___elambda__1___closed__6; +x_18 = lean::cnstr_get(x_3, 1); +lean::inc(x_18); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_19 = l_Lean_Parser_tokenFn(x_2, x_3); +x_20 = lean::cnstr_get(x_19, 3); +lean::inc(x_20); +if (lean::obj_tag(x_20) == 0) +{ +obj* x_21; obj* x_22; +x_21 = lean::cnstr_get(x_19, 0); +lean::inc(x_21); +x_22 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_21); +lean::dec(x_21); +if (lean::obj_tag(x_22) == 2) +{ +obj* x_23; obj* x_24; uint8 x_25; +x_23 = lean::cnstr_get(x_22, 1); +lean::inc(x_23); +lean::dec(x_22); +x_24 = l_Lean_Parser_Command_example___elambda__1___closed__4; +x_25 = lean::string_dec_eq(x_23, x_24); +lean::dec(x_23); +if (x_25 == 0) +{ +obj* x_26; obj* x_27; +x_26 = l_Lean_Parser_Command_example___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_26, x_18); +x_6 = x_27; +goto block_17; +} +else +{ +lean::dec(x_18); +x_6 = x_19; +goto block_17; +} +} +else +{ +obj* x_28; obj* x_29; +lean::dec(x_22); +x_28 = l_Lean_Parser_Command_example___elambda__1___closed__7; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_28, x_18); +x_6 = x_29; +goto block_17; +} +} +else +{ +obj* x_30; obj* x_31; +lean::dec(x_20); +x_30 = l_Lean_Parser_Command_example___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_30, x_18); +x_6 = x_31; +goto block_17; +} +block_17: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +lean::inc(x_1); +x_8 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; -lean::inc(x_2); -lean::inc(x_1); -x_10 = l_Lean_Parser_Command_declSig___elambda__1(x_1, x_2, x_8); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +obj* x_10; obj* x_11; obj* x_12; +x_10 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_8); +lean::dec(x_1); +x_11 = l_Lean_Parser_Command_example___elambda__1___closed__2; +x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_5); +return x_12; +} +else { -obj* x_12; obj* x_13; obj* x_14; -x_12 = l_Lean_Parser_Command_declVal___elambda__1(x_1, x_2, x_10); +obj* x_13; obj* x_14; +lean::dec(x_9); +lean::dec(x_2); lean::dec(x_1); x_13 = l_Lean_Parser_Command_example___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); +x_14 = l_Lean_Parser_ParserState_mkNode(x_8, x_13, x_5); return x_14; } +} else { obj* x_15; obj* x_16; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_15 = l_Lean_Parser_Command_example___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_10, x_15, x_5); +x_16 = l_Lean_Parser_ParserState_mkNode(x_6, x_15, x_5); return x_16; } } -else -{ -obj* x_17; obj* x_18; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_17 = l_Lean_Parser_Command_example___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_8, x_17, x_5); -return x_18; -} } } obj* _init_l_Lean_Parser_Command_example___closed__1() { @@ -6302,37 +7827,216 @@ return x_3; obj* l_Lean_Parser_Command_relaxedInferMod___elambda__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_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_17; obj* x_49; obj* x_50; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); -x_4 = lean::array_get_size(x_3); +x_4 = lean::cnstr_get(x_2, 1); +lean::inc(x_4); +x_5 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; -x_6 = l_Lean_Parser_Term_structInst___elambda__1___closed__8; lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_49 = l_Lean_Parser_tokenFn(x_1, x_2); +x_50 = lean::cnstr_get(x_49, 3); +lean::inc(x_50); +if (lean::obj_tag(x_50) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_10 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_11 = l_Lean_Parser_symbolFnAux(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Command_relaxedInferMod___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_51; obj* x_52; +x_51 = lean::cnstr_get(x_49, 0); +lean::inc(x_51); +x_52 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_51); +lean::dec(x_51); +if (lean::obj_tag(x_52) == 2) +{ +obj* x_53; obj* x_54; uint8 x_55; +x_53 = lean::cnstr_get(x_52, 1); +lean::inc(x_53); +lean::dec(x_52); +x_54 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; +x_55 = lean::string_dec_eq(x_53, x_54); +lean::dec(x_53); +if (x_55 == 0) +{ +obj* x_56; obj* x_57; +x_56 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +lean::inc(x_4); +x_57 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_56, x_4); +x_17 = x_57; +goto block_48; } else { -obj* x_14; obj* x_15; +x_17 = x_49; +goto block_48; +} +} +else +{ +obj* x_58; obj* x_59; +lean::dec(x_52); +x_58 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +lean::inc(x_4); +x_59 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_58, x_4); +x_17 = x_59; +goto block_48; +} +} +else +{ +obj* x_60; obj* x_61; +lean::dec(x_50); +x_60 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +lean::inc(x_4); +x_61 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_60, x_4); +x_17 = x_61; +goto block_48; +} +block_16: +{ +if (lean::obj_tag(x_9) == 0) +{ +obj* x_10; obj* x_11; lean::dec(x_8); -lean::dec(x_1); +lean::dec(x_7); +lean::dec(x_4); +x_10 = l_Lean_Parser_Command_relaxedInferMod___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_6, x_10, x_5); +return x_11; +} +else +{ +obj* x_12; obj* x_13; obj* x_14; obj* x_15; +lean::dec(x_6); +x_12 = l_Array_shrink___main___rarg(x_7, x_5); +x_13 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_4); +lean::cnstr_set(x_13, 2, x_8); +lean::cnstr_set(x_13, 3, x_9); x_14 = l_Lean_Parser_Command_relaxedInferMod___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_5); return x_15; } } +block_48: +{ +obj* x_18; +x_18 = lean::cnstr_get(x_17, 3); +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_17, 1); +lean::inc(x_19); +x_20 = l_Lean_Parser_tokenFn(x_1, x_17); +x_21 = lean::cnstr_get(x_20, 3); +lean::inc(x_21); +if (lean::obj_tag(x_21) == 0) +{ +obj* x_22; obj* x_23; +x_22 = lean::cnstr_get(x_20, 0); +lean::inc(x_22); +x_23 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_22); +lean::dec(x_22); +if (lean::obj_tag(x_23) == 2) +{ +obj* x_24; obj* x_25; uint8 x_26; +x_24 = lean::cnstr_get(x_23, 1); +lean::inc(x_24); +lean::dec(x_23); +x_25 = l_Lean_Parser_Term_id___elambda__1___closed__8; +x_26 = lean::string_dec_eq(x_24, x_25); +lean::dec(x_24); +if (x_26 == 0) +{ +obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; +x_27 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_27, x_19); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_30 = lean::cnstr_get(x_28, 2); +lean::inc(x_30); +x_31 = lean::cnstr_get(x_28, 3); +lean::inc(x_31); +x_6 = x_28; +x_7 = x_29; +x_8 = x_30; +x_9 = x_31; +goto block_16; +} +else +{ +obj* x_32; obj* x_33; obj* x_34; +lean::dec(x_19); +x_32 = lean::cnstr_get(x_20, 0); +lean::inc(x_32); +x_33 = lean::cnstr_get(x_20, 2); +lean::inc(x_33); +x_34 = lean::cnstr_get(x_20, 3); +lean::inc(x_34); +x_6 = x_20; +x_7 = x_32; +x_8 = x_33; +x_9 = x_34; +goto block_16; +} +} +else +{ +obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; +lean::dec(x_23); +x_35 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_35, x_19); +x_37 = lean::cnstr_get(x_36, 0); +lean::inc(x_37); +x_38 = lean::cnstr_get(x_36, 2); +lean::inc(x_38); +x_39 = lean::cnstr_get(x_36, 3); +lean::inc(x_39); +x_6 = x_36; +x_7 = x_37; +x_8 = x_38; +x_9 = x_39; +goto block_16; +} +} +else +{ +obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +lean::dec(x_21); +x_40 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_40, x_19); +x_42 = lean::cnstr_get(x_41, 0); +lean::inc(x_42); +x_43 = lean::cnstr_get(x_41, 2); +lean::inc(x_43); +x_44 = lean::cnstr_get(x_41, 3); +lean::inc(x_44); +x_6 = x_41; +x_7 = x_42; +x_8 = x_43; +x_9 = x_44; +goto block_16; +} +} +else +{ +obj* x_45; obj* x_46; obj* x_47; +lean::dec(x_18); +lean::dec(x_1); +x_45 = lean::cnstr_get(x_17, 0); +lean::inc(x_45); +x_46 = lean::cnstr_get(x_17, 2); +lean::inc(x_46); +x_47 = lean::cnstr_get(x_17, 3); +lean::inc(x_47); +x_6 = x_17; +x_7 = x_45; +x_8 = x_46; +x_9 = x_47; +goto block_16; +} +} +} } obj* l_Lean_Parser_Command_relaxedInferMod___elambda__1(obj* x_1) { _start: @@ -6419,37 +8123,216 @@ return x_3; obj* l_Lean_Parser_Command_strictInferMod___elambda__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_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_17; obj* x_49; obj* x_50; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); -x_4 = lean::array_get_size(x_3); +x_4 = lean::cnstr_get(x_2, 1); +lean::inc(x_4); +x_5 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_6 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_49 = l_Lean_Parser_tokenFn(x_1, x_2); +x_50 = lean::cnstr_get(x_49, 3); +lean::inc(x_50); +if (lean::obj_tag(x_50) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_10 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_11 = l_Lean_Parser_symbolFnAux(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Command_strictInferMod___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_51; obj* x_52; +x_51 = lean::cnstr_get(x_49, 0); +lean::inc(x_51); +x_52 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_51); +lean::dec(x_51); +if (lean::obj_tag(x_52) == 2) +{ +obj* x_53; obj* x_54; uint8 x_55; +x_53 = lean::cnstr_get(x_52, 1); +lean::inc(x_53); +lean::dec(x_52); +x_54 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_55 = lean::string_dec_eq(x_53, x_54); +lean::dec(x_53); +if (x_55 == 0) +{ +obj* x_56; obj* x_57; +x_56 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_4); +x_57 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_56, x_4); +x_17 = x_57; +goto block_48; } else { -obj* x_14; obj* x_15; +x_17 = x_49; +goto block_48; +} +} +else +{ +obj* x_58; obj* x_59; +lean::dec(x_52); +x_58 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_4); +x_59 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_58, x_4); +x_17 = x_59; +goto block_48; +} +} +else +{ +obj* x_60; obj* x_61; +lean::dec(x_50); +x_60 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_4); +x_61 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_60, x_4); +x_17 = x_61; +goto block_48; +} +block_16: +{ +if (lean::obj_tag(x_9) == 0) +{ +obj* x_10; obj* x_11; lean::dec(x_8); -lean::dec(x_1); +lean::dec(x_7); +lean::dec(x_4); +x_10 = l_Lean_Parser_Command_strictInferMod___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_6, x_10, x_5); +return x_11; +} +else +{ +obj* x_12; obj* x_13; obj* x_14; obj* x_15; +lean::dec(x_6); +x_12 = l_Array_shrink___main___rarg(x_7, x_5); +x_13 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_4); +lean::cnstr_set(x_13, 2, x_8); +lean::cnstr_set(x_13, 3, x_9); x_14 = l_Lean_Parser_Command_strictInferMod___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_5); return x_15; } } +block_48: +{ +obj* x_18; +x_18 = lean::cnstr_get(x_17, 3); +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_17, 1); +lean::inc(x_19); +x_20 = l_Lean_Parser_tokenFn(x_1, x_17); +x_21 = lean::cnstr_get(x_20, 3); +lean::inc(x_21); +if (lean::obj_tag(x_21) == 0) +{ +obj* x_22; obj* x_23; +x_22 = lean::cnstr_get(x_20, 0); +lean::inc(x_22); +x_23 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_22); +lean::dec(x_22); +if (lean::obj_tag(x_23) == 2) +{ +obj* x_24; obj* x_25; uint8 x_26; +x_24 = lean::cnstr_get(x_23, 1); +lean::inc(x_24); +lean::dec(x_23); +x_25 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_26 = lean::string_dec_eq(x_24, x_25); +lean::dec(x_24); +if (x_26 == 0) +{ +obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; +x_27 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_27, x_19); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_30 = lean::cnstr_get(x_28, 2); +lean::inc(x_30); +x_31 = lean::cnstr_get(x_28, 3); +lean::inc(x_31); +x_6 = x_28; +x_7 = x_29; +x_8 = x_30; +x_9 = x_31; +goto block_16; +} +else +{ +obj* x_32; obj* x_33; obj* x_34; +lean::dec(x_19); +x_32 = lean::cnstr_get(x_20, 0); +lean::inc(x_32); +x_33 = lean::cnstr_get(x_20, 2); +lean::inc(x_33); +x_34 = lean::cnstr_get(x_20, 3); +lean::inc(x_34); +x_6 = x_20; +x_7 = x_32; +x_8 = x_33; +x_9 = x_34; +goto block_16; +} +} +else +{ +obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; +lean::dec(x_23); +x_35 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_35, x_19); +x_37 = lean::cnstr_get(x_36, 0); +lean::inc(x_37); +x_38 = lean::cnstr_get(x_36, 2); +lean::inc(x_38); +x_39 = lean::cnstr_get(x_36, 3); +lean::inc(x_39); +x_6 = x_36; +x_7 = x_37; +x_8 = x_38; +x_9 = x_39; +goto block_16; +} +} +else +{ +obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +lean::dec(x_21); +x_40 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_40, x_19); +x_42 = lean::cnstr_get(x_41, 0); +lean::inc(x_42); +x_43 = lean::cnstr_get(x_41, 2); +lean::inc(x_43); +x_44 = lean::cnstr_get(x_41, 3); +lean::inc(x_44); +x_6 = x_41; +x_7 = x_42; +x_8 = x_43; +x_9 = x_44; +goto block_16; +} +} +else +{ +obj* x_45; obj* x_46; obj* x_47; +lean::dec(x_18); +lean::dec(x_1); +x_45 = lean::cnstr_get(x_17, 0); +lean::inc(x_45); +x_46 = lean::cnstr_get(x_17, 2); +lean::inc(x_46); +x_47 = lean::cnstr_get(x_17, 3); +lean::inc(x_47); +x_6 = x_17; +x_7 = x_45; +x_8 = x_46; +x_9 = x_47; +goto block_16; +} +} +} } obj* l_Lean_Parser_Command_strictInferMod___elambda__1(obj* x_1) { _start: @@ -6648,149 +8531,205 @@ return x_3; obj* l_Lean_Parser_Command_introRule___elambda__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_4; obj* x_5; obj* x_6; obj* x_47; obj* x_48; obj* x_49; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__8; +x_47 = lean::cnstr_get(x_3, 1); +lean::inc(x_47); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_48 = l_Lean_Parser_tokenFn(x_2, x_3); +x_49 = lean::cnstr_get(x_48, 3); +lean::inc(x_49); +if (lean::obj_tag(x_49) == 0) +{ +obj* x_50; obj* x_51; +x_50 = lean::cnstr_get(x_48, 0); +lean::inc(x_50); +x_51 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_50); +lean::dec(x_50); +if (lean::obj_tag(x_51) == 2) +{ +obj* x_52; obj* x_53; uint8 x_54; +x_52 = lean::cnstr_get(x_51, 1); +lean::inc(x_52); +lean::dec(x_51); +x_53 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; +x_54 = lean::string_dec_eq(x_52, x_53); +lean::dec(x_52); +if (x_54 == 0) +{ +obj* x_55; obj* x_56; +x_55 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_56 = l_Lean_Parser_ParserState_mkErrorsAt(x_48, x_55, x_47); +x_6 = x_56; +goto block_46; +} +else +{ +lean::dec(x_47); +x_6 = x_48; +goto block_46; +} +} +else +{ +obj* x_57; obj* x_58; +lean::dec(x_51); +x_57 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_58 = l_Lean_Parser_ParserState_mkErrorsAt(x_48, x_57, x_47); +x_6 = x_58; +goto block_46; +} +} +else +{ +obj* x_59; obj* x_60; +lean::dec(x_49); +x_59 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_60 = l_Lean_Parser_ParserState_mkErrorsAt(x_48, x_59, x_47); +x_6 = x_60; +goto block_46; +} +block_46: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_identFn___rarg(x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; -lean::inc(x_2); -x_10 = l_Lean_Parser_identFn___rarg(x_2, x_8); -x_11 = lean::cnstr_get(x_10, 3); -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; -x_12 = lean::cnstr_get(x_10, 0); +obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; +x_10 = lean::cnstr_get(x_8, 0); +lean::inc(x_10); +x_11 = lean::array_get_size(x_10); +lean::dec(x_10); +x_12 = lean::cnstr_get(x_8, 1); lean::inc(x_12); -x_13 = lean::array_get_size(x_12); -lean::dec(x_12); -x_14 = lean::cnstr_get(x_10, 1); -lean::inc(x_14); lean::inc(x_2); -x_15 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_2, x_10); -x_16 = lean::cnstr_get(x_15, 3); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) +x_13 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_2, x_8); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +if (lean::obj_tag(x_14) == 0) { -obj* x_17; obj* x_18; obj* x_19; -lean::dec(x_14); -x_17 = l_Lean_nullKind; -x_18 = l_Lean_Parser_ParserState_mkNode(x_15, x_17, x_13); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) +obj* x_15; obj* x_16; obj* x_17; +lean::dec(x_12); +x_15 = l_Lean_nullKind; +x_16 = l_Lean_Parser_ParserState_mkNode(x_13, x_15, x_11); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_20; obj* x_21; obj* x_22; -x_20 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_18); +obj* x_18; obj* x_19; obj* x_20; +x_18 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_16); +x_19 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; +x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_5); +return x_20; +} +else +{ +obj* x_21; obj* x_22; +lean::dec(x_17); +lean::dec(x_2); +lean::dec(x_1); x_21 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); +x_22 = l_Lean_Parser_ParserState_mkNode(x_16, x_21, x_5); return x_22; } +} else { -obj* x_23; obj* x_24; -lean::dec(x_19); +obj* x_23; uint8 x_24; +lean::dec(x_14); +x_23 = lean::cnstr_get(x_13, 1); +lean::inc(x_23); +x_24 = lean::nat_dec_eq(x_23, x_12); +lean::dec(x_23); +if (x_24 == 0) +{ +obj* x_25; obj* x_26; obj* x_27; +lean::dec(x_12); +x_25 = l_Lean_nullKind; +x_26 = l_Lean_Parser_ParserState_mkNode(x_13, x_25, x_11); +x_27 = lean::cnstr_get(x_26, 3); +lean::inc(x_27); +if (lean::obj_tag(x_27) == 0) +{ +obj* x_28; obj* x_29; obj* x_30; +x_28 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_26); +x_29 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_5); +return x_30; +} +else +{ +obj* x_31; obj* x_32; +lean::dec(x_27); lean::dec(x_2); lean::dec(x_1); -x_23 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_18, x_23, x_5); -return x_24; -} -} -else -{ -obj* x_25; uint8 x_26; -lean::dec(x_16); -x_25 = lean::cnstr_get(x_15, 1); -lean::inc(x_25); -x_26 = lean::nat_dec_eq(x_25, x_14); -lean::dec(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -lean::dec(x_14); -x_27 = l_Lean_nullKind; -x_28 = l_Lean_Parser_ParserState_mkNode(x_15, x_27, x_13); -x_29 = lean::cnstr_get(x_28, 3); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; -x_30 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_28); x_31 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_5); +x_32 = l_Lean_Parser_ParserState_mkNode(x_26, x_31, x_5); return x_32; } +} else { -obj* x_33; obj* x_34; -lean::dec(x_29); +obj* x_33; obj* x_34; obj* x_35; obj* x_36; +x_33 = l_Lean_Parser_ParserState_restore(x_13, x_11, x_12); +x_34 = l_Lean_nullKind; +x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_11); +x_36 = lean::cnstr_get(x_35, 3); +lean::inc(x_36); +if (lean::obj_tag(x_36) == 0) +{ +obj* x_37; obj* x_38; obj* x_39; +x_37 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_35); +x_38 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_5); +return x_39; +} +else +{ +obj* x_40; obj* x_41; +lean::dec(x_36); lean::dec(x_2); lean::dec(x_1); -x_33 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_28, x_33, x_5); -return x_34; -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_35 = l_Lean_Parser_ParserState_restore(x_15, x_13, x_14); -x_36 = l_Lean_nullKind; -x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_13); -x_38 = lean::cnstr_get(x_37, 3); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; obj* x_41; -x_39 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_37); x_40 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_5); +x_41 = l_Lean_Parser_ParserState_mkNode(x_35, x_40, x_5); return x_41; } +} +} +} else { obj* x_42; obj* x_43; -lean::dec(x_38); +lean::dec(x_9); lean::dec(x_2); lean::dec(x_1); x_42 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; -x_43 = l_Lean_Parser_ParserState_mkNode(x_37, x_42, x_5); +x_43 = l_Lean_Parser_ParserState_mkNode(x_8, x_42, x_5); return x_43; } } -} -} else { obj* x_44; obj* x_45; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_44 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; -x_45 = l_Lean_Parser_ParserState_mkNode(x_10, x_44, x_5); +x_45 = l_Lean_Parser_ParserState_mkNode(x_6, x_44, x_5); return x_45; } } -else -{ -obj* x_46; obj* x_47; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_46 = l_Lean_Parser_Command_introRule___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_8, x_46, x_5); -return x_47; -} } } obj* _init_l_Lean_Parser_Command_introRule___closed__1() { @@ -6908,7 +8847,7 @@ obj* x_13; obj* x_14; lean::dec(x_3); lean::dec(x_2); x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_8, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); return x_14; } } @@ -6963,7 +8902,7 @@ obj* _init_l_Lean_Parser_Command_inductive___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_inductive___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -6979,82 +8918,150 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_inductive___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_inductive___elambda__1___closed__6; +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* l_Lean_Parser_Command_inductive___elambda__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_4; obj* x_5; obj* x_6; obj* x_27; obj* x_28; obj* x_29; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_inductive___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_inductive___elambda__1___closed__6; +x_27 = lean::cnstr_get(x_3, 1); +lean::inc(x_27); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_28 = l_Lean_Parser_tokenFn(x_2, x_3); +x_29 = lean::cnstr_get(x_28, 3); +lean::inc(x_29); +if (lean::obj_tag(x_29) == 0) +{ +obj* x_30; obj* x_31; +x_30 = lean::cnstr_get(x_28, 0); +lean::inc(x_30); +x_31 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_30); +lean::dec(x_30); +if (lean::obj_tag(x_31) == 2) +{ +obj* x_32; obj* x_33; uint8 x_34; +x_32 = lean::cnstr_get(x_31, 1); +lean::inc(x_32); +lean::dec(x_31); +x_33 = l_Lean_Parser_Command_inductive___elambda__1___closed__4; +x_34 = lean::string_dec_eq(x_32, x_33); +lean::dec(x_32); +if (x_34 == 0) +{ +obj* x_35; obj* x_36; +x_35 = l_Lean_Parser_Command_inductive___elambda__1___closed__7; +x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_35, x_27); +x_6 = x_36; +goto block_26; +} +else +{ +lean::dec(x_27); +x_6 = x_28; +goto block_26; +} +} +else +{ +obj* x_37; obj* x_38; +lean::dec(x_31); +x_37 = l_Lean_Parser_Command_inductive___elambda__1___closed__7; +x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_37, x_27); +x_6 = x_38; +goto block_26; +} +} +else +{ +obj* x_39; obj* x_40; +lean::dec(x_29); +x_39 = l_Lean_Parser_Command_inductive___elambda__1___closed__7; +x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_39, x_27); +x_6 = x_40; +goto block_26; +} +block_26: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { obj* x_10; obj* x_11; lean::inc(x_2); -x_10 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_8); +lean::inc(x_1); +x_10 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_8); x_11 = lean::cnstr_get(x_10, 3); lean::inc(x_11); if (lean::obj_tag(x_11) == 0) { -obj* x_12; obj* x_13; -lean::inc(x_2); -lean::inc(x_1); -x_12 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_10); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; +x_12 = lean::cnstr_get(x_10, 0); +lean::inc(x_12); +x_13 = lean::array_get_size(x_12); +lean::dec(x_12); +x_14 = 0; +x_15 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_inductive___elambda__1___spec__1(x_14, x_1, x_2, x_10); +x_16 = l_Lean_nullKind; +x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_13); +x_18 = l_Lean_Parser_Command_inductive___elambda__1___closed__2; +x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_5); +return x_19; +} +else { -obj* x_14; obj* x_15; uint8 x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -x_15 = lean::array_get_size(x_14); -lean::dec(x_14); -x_16 = 0; -x_17 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_inductive___elambda__1___spec__1(x_16, x_1, x_2, x_12); -x_18 = l_Lean_nullKind; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_15); +obj* x_20; obj* x_21; +lean::dec(x_11); +lean::dec(x_2); +lean::dec(x_1); x_20 = l_Lean_Parser_Command_inductive___elambda__1___closed__2; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_5); +x_21 = l_Lean_Parser_ParserState_mkNode(x_10, x_20, x_5); return x_21; } +} else { obj* x_22; obj* x_23; -lean::dec(x_13); +lean::dec(x_9); lean::dec(x_2); lean::dec(x_1); x_22 = l_Lean_Parser_Command_inductive___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_12, x_22, x_5); +x_23 = l_Lean_Parser_ParserState_mkNode(x_8, x_22, x_5); return x_23; } } else { obj* x_24; obj* x_25; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); x_24 = l_Lean_Parser_Command_inductive___elambda__1___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_10, x_24, x_5); +x_25 = l_Lean_Parser_ParserState_mkNode(x_6, x_24, x_5); return x_25; } } -else -{ -obj* x_26; obj* x_27; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_26 = l_Lean_Parser_Command_inductive___elambda__1___closed__2; -x_27 = l_Lean_Parser_ParserState_mkNode(x_8, x_26, x_5); -return x_27; -} } } obj* _init_l_Lean_Parser_Command_inductive___closed__1() { @@ -7159,6 +9166,401 @@ x_6 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_inductive___elambda_ return x_6; } } +obj* _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("classInductive"); +return x_1; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_2 = l_Lean_Parser_Command_classInductive___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__3() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("class "); +return x_1; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__4() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_Parser_Command_classInductive___elambda__1___closed__3; +x_2 = l_String_trim(x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__5() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Command_classInductive___elambda__1___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_classInductive___elambda__1___closed__5; +x_2 = l_Char_HasRepr___closed__1; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_classInductive___elambda__1___closed__6; +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* l_Lean_Parser_Command_classInductive___elambda__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_32; obj* x_64; obj* x_65; +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::array_get_size(x_4); +lean::dec(x_4); +lean::inc(x_2); +x_64 = l_Lean_Parser_tokenFn(x_2, x_3); +x_65 = lean::cnstr_get(x_64, 3); +lean::inc(x_65); +if (lean::obj_tag(x_65) == 0) +{ +obj* x_66; obj* x_67; +x_66 = lean::cnstr_get(x_64, 0); +lean::inc(x_66); +x_67 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_66); +lean::dec(x_66); +if (lean::obj_tag(x_67) == 2) +{ +obj* x_68; obj* x_69; uint8 x_70; +x_68 = lean::cnstr_get(x_67, 1); +lean::inc(x_68); +lean::dec(x_67); +x_69 = l_Lean_Parser_Command_classInductive___elambda__1___closed__4; +x_70 = lean::string_dec_eq(x_68, x_69); +lean::dec(x_68); +if (x_70 == 0) +{ +obj* x_71; obj* x_72; +x_71 = l_Lean_Parser_Command_classInductive___elambda__1___closed__7; +lean::inc(x_5); +x_72 = l_Lean_Parser_ParserState_mkErrorsAt(x_64, x_71, x_5); +x_32 = x_72; +goto block_63; +} +else +{ +x_32 = x_64; +goto block_63; +} +} +else +{ +obj* x_73; obj* x_74; +lean::dec(x_67); +x_73 = l_Lean_Parser_Command_classInductive___elambda__1___closed__7; +lean::inc(x_5); +x_74 = l_Lean_Parser_ParserState_mkErrorsAt(x_64, x_73, x_5); +x_32 = x_74; +goto block_63; +} +} +else +{ +obj* x_75; obj* x_76; +lean::dec(x_65); +x_75 = l_Lean_Parser_Command_classInductive___elambda__1___closed__7; +lean::inc(x_5); +x_76 = l_Lean_Parser_ParserState_mkErrorsAt(x_64, x_75, x_5); +x_32 = x_76; +goto block_63; +} +block_31: +{ +if (lean::obj_tag(x_10) == 0) +{ +obj* x_11; obj* x_12; +lean::dec(x_9); +lean::dec(x_8); +lean::dec(x_5); +lean::inc(x_2); +x_11 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_7); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) +{ +obj* x_13; obj* x_14; +lean::inc(x_2); +lean::inc(x_1); +x_13 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_11); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +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; obj* x_21; obj* x_22; +x_15 = lean::cnstr_get(x_13, 0); +lean::inc(x_15); +x_16 = lean::array_get_size(x_15); +lean::dec(x_15); +x_17 = 0; +x_18 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_inductive___elambda__1___spec__1(x_17, x_1, x_2, x_13); +x_19 = l_Lean_nullKind; +x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_16); +x_21 = l_Lean_Parser_Command_classInductive___elambda__1___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_6); +return x_22; +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_14); +lean::dec(x_2); +lean::dec(x_1); +x_23 = l_Lean_Parser_Command_classInductive___elambda__1___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_13, x_23, x_6); +return x_24; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_12); +lean::dec(x_2); +lean::dec(x_1); +x_25 = l_Lean_Parser_Command_classInductive___elambda__1___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_11, x_25, x_6); +return x_26; +} +} +else +{ +obj* x_27; obj* x_28; obj* x_29; obj* x_30; +lean::dec(x_7); +lean::dec(x_2); +lean::dec(x_1); +x_27 = l_Array_shrink___main___rarg(x_8, x_6); +x_28 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_5); +lean::cnstr_set(x_28, 2, x_9); +lean::cnstr_set(x_28, 3, x_10); +x_29 = l_Lean_Parser_Command_classInductive___elambda__1___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_6); +return x_30; +} +} +block_63: +{ +obj* x_33; +x_33 = lean::cnstr_get(x_32, 3); +lean::inc(x_33); +if (lean::obj_tag(x_33) == 0) +{ +obj* x_34; obj* x_35; obj* x_36; +x_34 = lean::cnstr_get(x_32, 1); +lean::inc(x_34); +lean::inc(x_2); +x_35 = l_Lean_Parser_tokenFn(x_2, x_32); +x_36 = lean::cnstr_get(x_35, 3); +lean::inc(x_36); +if (lean::obj_tag(x_36) == 0) +{ +obj* x_37; obj* x_38; +x_37 = lean::cnstr_get(x_35, 0); +lean::inc(x_37); +x_38 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_37); +lean::dec(x_37); +if (lean::obj_tag(x_38) == 2) +{ +obj* x_39; obj* x_40; uint8 x_41; +x_39 = lean::cnstr_get(x_38, 1); +lean::inc(x_39); +lean::dec(x_38); +x_40 = l_Lean_Parser_Command_inductive___elambda__1___closed__4; +x_41 = lean::string_dec_eq(x_39, x_40); +lean::dec(x_39); +if (x_41 == 0) +{ +obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; +x_42 = l_Lean_Parser_Command_inductive___elambda__1___closed__7; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_35, x_42, x_34); +x_44 = lean::cnstr_get(x_43, 0); +lean::inc(x_44); +x_45 = lean::cnstr_get(x_43, 2); +lean::inc(x_45); +x_46 = lean::cnstr_get(x_43, 3); +lean::inc(x_46); +x_7 = x_43; +x_8 = x_44; +x_9 = x_45; +x_10 = x_46; +goto block_31; +} +else +{ +obj* x_47; obj* x_48; obj* x_49; +lean::dec(x_34); +x_47 = lean::cnstr_get(x_35, 0); +lean::inc(x_47); +x_48 = lean::cnstr_get(x_35, 2); +lean::inc(x_48); +x_49 = lean::cnstr_get(x_35, 3); +lean::inc(x_49); +x_7 = x_35; +x_8 = x_47; +x_9 = x_48; +x_10 = x_49; +goto block_31; +} +} +else +{ +obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; +lean::dec(x_38); +x_50 = l_Lean_Parser_Command_inductive___elambda__1___closed__7; +x_51 = l_Lean_Parser_ParserState_mkErrorsAt(x_35, x_50, x_34); +x_52 = lean::cnstr_get(x_51, 0); +lean::inc(x_52); +x_53 = lean::cnstr_get(x_51, 2); +lean::inc(x_53); +x_54 = lean::cnstr_get(x_51, 3); +lean::inc(x_54); +x_7 = x_51; +x_8 = x_52; +x_9 = x_53; +x_10 = x_54; +goto block_31; +} +} +else +{ +obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; +lean::dec(x_36); +x_55 = l_Lean_Parser_Command_inductive___elambda__1___closed__7; +x_56 = l_Lean_Parser_ParserState_mkErrorsAt(x_35, x_55, x_34); +x_57 = lean::cnstr_get(x_56, 0); +lean::inc(x_57); +x_58 = lean::cnstr_get(x_56, 2); +lean::inc(x_58); +x_59 = lean::cnstr_get(x_56, 3); +lean::inc(x_59); +x_7 = x_56; +x_8 = x_57; +x_9 = x_58; +x_10 = x_59; +goto block_31; +} +} +else +{ +obj* x_60; obj* x_61; obj* x_62; +lean::dec(x_33); +x_60 = lean::cnstr_get(x_32, 0); +lean::inc(x_60); +x_61 = lean::cnstr_get(x_32, 2); +lean::inc(x_61); +x_62 = lean::cnstr_get(x_32, 3); +lean::inc(x_62); +x_7 = x_32; +x_8 = x_60; +x_9 = x_61; +x_10 = x_62; +goto block_31; +} +} +} +} +obj* _init_l_Lean_Parser_Command_classInductive___closed__1() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_classInductive___elambda__1___closed__4; +x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_classInductive___closed__1; +x_2 = l_Lean_Parser_Command_inductive___closed__1; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___closed__3() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_classInductive___closed__2; +x_2 = l_Lean_Parser_Command_inductive___closed__4; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___closed__4() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_Parser_Command_classInductive___closed__3; +x_2 = l_Lean_Parser_nodeInfo(x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___closed__5() { +_start: +{ +obj* x_1; +x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Command_classInductive___elambda__1), 3, 0); +return x_1; +} +} +obj* _init_l_Lean_Parser_Command_classInductive___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_classInductive___closed__4; +x_2 = l_Lean_Parser_Command_classInductive___closed__5; +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_classInductive() { +_start: +{ +obj* x_1; +x_1 = l_Lean_Parser_Command_classInductive___closed__6; +return x_1; +} +} obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(uint8 x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { @@ -7192,7 +9594,7 @@ else obj* x_13; obj* x_14; lean::dec(x_3); x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_8, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); return x_14; } } @@ -7228,237 +9630,315 @@ return x_3; obj* l_Lean_Parser_Command_structExplicitBinder___elambda__1(obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_4; obj* x_5; obj* x_6; obj* x_53; obj* x_54; obj* x_55; obj* x_56; +obj* x_4; obj* x_5; obj* x_6; obj* x_33; obj* x_56; obj* x_81; obj* x_82; obj* x_83; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_53 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_54 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; +x_81 = lean::cnstr_get(x_3, 1); +lean::inc(x_81); lean::inc(x_2); -x_55 = l_Lean_Parser_symbolFnAux(x_53, x_54, x_2, x_3); -x_56 = lean::cnstr_get(x_55, 3); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) +x_82 = l_Lean_Parser_tokenFn(x_2, x_3); +x_83 = lean::cnstr_get(x_82, 3); +lean::inc(x_83); +if (lean::obj_tag(x_83) == 0) { -obj* x_57; obj* x_58; uint8 x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_57 = lean::cnstr_get(x_55, 0); -lean::inc(x_57); -x_58 = lean::array_get_size(x_57); -lean::dec(x_57); -x_59 = 0; -lean::inc(x_2); -x_60 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_59, x_1, x_2, x_55); -x_61 = l_Lean_nullKind; -x_62 = l_Lean_Parser_ParserState_mkNode(x_60, x_61, x_58); -x_63 = lean::cnstr_get(x_62, 3); -lean::inc(x_63); -if (lean::obj_tag(x_63) == 0) +obj* x_84; obj* x_85; +x_84 = lean::cnstr_get(x_82, 0); +lean::inc(x_84); +x_85 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_84); +lean::dec(x_84); +if (lean::obj_tag(x_85) == 2) { -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -x_65 = lean::array_get_size(x_64); -lean::dec(x_64); -x_66 = lean::cnstr_get(x_62, 1); -lean::inc(x_66); -lean::inc(x_2); -x_67 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_2, x_62); -x_68 = lean::cnstr_get(x_67, 3); -lean::inc(x_68); -if (lean::obj_tag(x_68) == 0) +obj* x_86; obj* x_87; uint8 x_88; +x_86 = lean::cnstr_get(x_85, 1); +lean::inc(x_86); +lean::dec(x_85); +x_87 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_88 = lean::string_dec_eq(x_86, x_87); +lean::dec(x_86); +if (x_88 == 0) { -obj* x_69; -lean::dec(x_66); -x_69 = l_Lean_Parser_ParserState_mkNode(x_67, x_61, x_65); -x_6 = x_69; -goto block_52; +obj* x_89; obj* x_90; +x_89 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_90 = l_Lean_Parser_ParserState_mkErrorsAt(x_82, x_89, x_81); +x_56 = x_90; +goto block_80; } else { -obj* x_70; uint8 x_71; -lean::dec(x_68); -x_70 = lean::cnstr_get(x_67, 1); -lean::inc(x_70); -x_71 = lean::nat_dec_eq(x_70, x_66); -lean::dec(x_70); -if (x_71 == 0) -{ -obj* x_72; -lean::dec(x_66); -x_72 = l_Lean_Parser_ParserState_mkNode(x_67, x_61, x_65); -x_6 = x_72; -goto block_52; -} -else -{ -obj* x_73; obj* x_74; -x_73 = l_Lean_Parser_ParserState_restore(x_67, x_65, x_66); -x_74 = l_Lean_Parser_ParserState_mkNode(x_73, x_61, x_65); -x_6 = x_74; -goto block_52; -} +lean::dec(x_81); +x_56 = x_82; +goto block_80; } } else { -obj* x_75; obj* x_76; -lean::dec(x_63); -lean::dec(x_2); -lean::dec(x_1); -x_75 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_76 = l_Lean_Parser_ParserState_mkNode(x_62, x_75, x_5); -return x_76; +obj* x_91; obj* x_92; +lean::dec(x_85); +x_91 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_92 = l_Lean_Parser_ParserState_mkErrorsAt(x_82, x_91, x_81); +x_56 = x_92; +goto block_80; } } else { -obj* x_77; obj* x_78; -lean::dec(x_56); -lean::dec(x_2); -lean::dec(x_1); -x_77 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_78 = l_Lean_Parser_ParserState_mkNode(x_55, x_77, x_5); -return x_78; +obj* x_93; obj* x_94; +lean::dec(x_83); +x_93 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_94 = l_Lean_Parser_ParserState_mkErrorsAt(x_82, x_93, x_81); +x_56 = x_94; +goto block_80; } -block_52: +block_32: { obj* x_7; x_7 = lean::cnstr_get(x_6, 3); lean::inc(x_7); if (lean::obj_tag(x_7) == 0) { -obj* x_8; obj* x_9; -lean::inc(x_2); -x_8 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_6); -x_9 = lean::cnstr_get(x_8, 3); -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; -x_10 = lean::cnstr_get(x_8, 0); +obj* x_8; obj* x_9; obj* x_10; +x_8 = lean::cnstr_get(x_6, 1); +lean::inc(x_8); +x_9 = l_Lean_Parser_tokenFn(x_2, x_6); +x_10 = lean::cnstr_get(x_9, 3); lean::inc(x_10); -x_11 = lean::array_get_size(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); +x_12 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_11); +lean::dec(x_11); +if (lean::obj_tag(x_12) == 2) +{ +obj* x_13; obj* x_14; uint8 x_15; +x_13 = lean::cnstr_get(x_12, 1); +lean::inc(x_13); +lean::dec(x_12); +x_14 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_15 = lean::string_dec_eq(x_13, x_14); +lean::dec(x_13); +if (x_15 == 0) +{ +obj* x_16; obj* x_17; obj* x_18; obj* x_19; +x_16 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_17 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_16, x_8); +x_18 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_5); +return x_19; +} +else +{ +obj* x_20; obj* x_21; +lean::dec(x_8); +x_20 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_9, x_20, x_5); +return x_21; +} +} +else +{ +obj* x_22; obj* x_23; obj* x_24; obj* x_25; +lean::dec(x_12); +x_22 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_23 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_22, x_8); +x_24 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_5); +return x_25; +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_10); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -lean::inc(x_2); -x_13 = l_Lean_Parser_Term_binderDefault___elambda__1___rarg(x_2, x_8); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_12); -x_15 = l_Lean_nullKind; -x_16 = l_Lean_Parser_ParserState_mkNode(x_13, x_15, x_11); -x_17 = lean::cnstr_get(x_16, 3); -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; -x_18 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_19 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_20 = l_Lean_Parser_symbolFnAux(x_18, x_19, x_2, x_16); -x_21 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -lean::dec(x_17); -lean::dec(x_2); -x_23 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_16, x_23, x_5); -return x_24; +x_26 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_26, x_8); +x_28 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; } } else { -obj* x_25; uint8 x_26; -lean::dec(x_14); -x_25 = lean::cnstr_get(x_13, 1); -lean::inc(x_25); -x_26 = lean::nat_dec_eq(x_25, x_12); -lean::dec(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -lean::dec(x_12); -x_27 = l_Lean_nullKind; -x_28 = l_Lean_Parser_ParserState_mkNode(x_13, x_27, x_11); -x_29 = lean::cnstr_get(x_28, 3); -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 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_31 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_32 = l_Lean_Parser_symbolFnAux(x_30, x_31, x_2, x_28); -x_33 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_5); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_29); -lean::dec(x_2); -x_35 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_36 = l_Lean_Parser_ParserState_mkNode(x_28, x_35, x_5); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_37 = l_Lean_Parser_ParserState_restore(x_13, x_11, x_12); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_11); -x_40 = lean::cnstr_get(x_39, 3); -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; -x_41 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_42 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_43 = l_Lean_Parser_symbolFnAux(x_41, x_42, x_2, x_39); -x_44 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_5); -return x_45; -} -else -{ -obj* x_46; obj* x_47; -lean::dec(x_40); -lean::dec(x_2); -x_46 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_39, x_46, x_5); -return x_47; -} -} -} -} -else -{ -obj* x_48; obj* x_49; -lean::dec(x_9); -lean::dec(x_2); -x_48 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_49 = l_Lean_Parser_ParserState_mkNode(x_8, x_48, x_5); -return x_49; -} -} -else -{ -obj* x_50; obj* x_51; +obj* x_30; obj* x_31; lean::dec(x_7); lean::dec(x_2); +x_30 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_31 = l_Lean_Parser_ParserState_mkNode(x_6, x_30, x_5); +return x_31; +} +} +block_55: +{ +obj* x_34; +x_34 = lean::cnstr_get(x_33, 3); +lean::inc(x_34); +if (lean::obj_tag(x_34) == 0) +{ +obj* x_35; obj* x_36; +lean::inc(x_2); +x_35 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_33); +x_36 = lean::cnstr_get(x_35, 3); +lean::inc(x_36); +if (lean::obj_tag(x_36) == 0) +{ +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); +x_38 = lean::array_get_size(x_37); +lean::dec(x_37); +x_39 = lean::cnstr_get(x_35, 1); +lean::inc(x_39); +lean::inc(x_2); +x_40 = l_Lean_Parser_Term_binderDefault___elambda__1___rarg(x_2, x_35); +x_41 = lean::cnstr_get(x_40, 3); +lean::inc(x_41); +if (lean::obj_tag(x_41) == 0) +{ +obj* x_42; obj* x_43; +lean::dec(x_39); +x_42 = l_Lean_nullKind; +x_43 = l_Lean_Parser_ParserState_mkNode(x_40, x_42, x_38); +x_6 = x_43; +goto block_32; +} +else +{ +obj* x_44; uint8 x_45; +lean::dec(x_41); +x_44 = lean::cnstr_get(x_40, 1); +lean::inc(x_44); +x_45 = lean::nat_dec_eq(x_44, x_39); +lean::dec(x_44); +if (x_45 == 0) +{ +obj* x_46; obj* x_47; +lean::dec(x_39); +x_46 = l_Lean_nullKind; +x_47 = l_Lean_Parser_ParserState_mkNode(x_40, x_46, x_38); +x_6 = x_47; +goto block_32; +} +else +{ +obj* x_48; obj* x_49; obj* x_50; +x_48 = l_Lean_Parser_ParserState_restore(x_40, x_38, x_39); +x_49 = l_Lean_nullKind; +x_50 = l_Lean_Parser_ParserState_mkNode(x_48, x_49, x_38); +x_6 = x_50; +goto block_32; +} +} +} +else +{ +obj* x_51; obj* x_52; +lean::dec(x_36); +lean::dec(x_2); +x_51 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_52 = l_Lean_Parser_ParserState_mkNode(x_35, x_51, x_5); +return x_52; +} +} +else +{ +obj* x_53; obj* x_54; +lean::dec(x_34); +lean::dec(x_2); lean::dec(x_1); -x_50 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; -x_51 = l_Lean_Parser_ParserState_mkNode(x_6, x_50, x_5); -return x_51; +x_53 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_54 = l_Lean_Parser_ParserState_mkNode(x_33, x_53, x_5); +return x_54; +} +} +block_80: +{ +obj* x_57; +x_57 = lean::cnstr_get(x_56, 3); +lean::inc(x_57); +if (lean::obj_tag(x_57) == 0) +{ +obj* x_58; obj* x_59; uint8 x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; +x_58 = lean::cnstr_get(x_56, 0); +lean::inc(x_58); +x_59 = lean::array_get_size(x_58); +lean::dec(x_58); +x_60 = 0; +lean::inc(x_2); +x_61 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_60, x_1, x_2, x_56); +x_62 = l_Lean_nullKind; +x_63 = l_Lean_Parser_ParserState_mkNode(x_61, x_62, x_59); +x_64 = lean::cnstr_get(x_63, 3); +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; +x_65 = lean::cnstr_get(x_63, 0); +lean::inc(x_65); +x_66 = lean::array_get_size(x_65); +lean::dec(x_65); +x_67 = lean::cnstr_get(x_63, 1); +lean::inc(x_67); +lean::inc(x_2); +x_68 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_2, x_63); +x_69 = lean::cnstr_get(x_68, 3); +lean::inc(x_69); +if (lean::obj_tag(x_69) == 0) +{ +obj* x_70; +lean::dec(x_67); +x_70 = l_Lean_Parser_ParserState_mkNode(x_68, x_62, x_66); +x_33 = x_70; +goto block_55; +} +else +{ +obj* x_71; uint8 x_72; +lean::dec(x_69); +x_71 = lean::cnstr_get(x_68, 1); +lean::inc(x_71); +x_72 = lean::nat_dec_eq(x_71, x_67); +lean::dec(x_71); +if (x_72 == 0) +{ +obj* x_73; +lean::dec(x_67); +x_73 = l_Lean_Parser_ParserState_mkNode(x_68, x_62, x_66); +x_33 = x_73; +goto block_55; +} +else +{ +obj* x_74; obj* x_75; +x_74 = l_Lean_Parser_ParserState_restore(x_68, x_66, x_67); +x_75 = l_Lean_Parser_ParserState_mkNode(x_74, x_62, x_66); +x_33 = x_75; +goto block_55; +} +} +} +else +{ +obj* x_76; obj* x_77; +lean::dec(x_64); +lean::dec(x_2); +lean::dec(x_1); +x_76 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_77 = l_Lean_Parser_ParserState_mkNode(x_63, x_76, x_5); +return x_77; +} +} +else +{ +obj* x_78; obj* x_79; +lean::dec(x_57); +lean::dec(x_2); +lean::dec(x_1); +x_78 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2; +x_79 = l_Lean_Parser_ParserState_mkNode(x_56, x_78, x_5); +return x_79; } } } @@ -7604,210 +10084,252 @@ return x_3; obj* l_Lean_Parser_Command_structImplicitBinder___elambda__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_4; obj* x_5; obj* x_6; obj* x_37; obj* x_62; obj* x_63; obj* x_64; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_structInst___elambda__1___closed__8; +x_62 = lean::cnstr_get(x_3, 1); +lean::inc(x_62); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_63 = l_Lean_Parser_tokenFn(x_2, x_3); +x_64 = lean::cnstr_get(x_63, 3); +lean::inc(x_64); +if (lean::obj_tag(x_64) == 0) +{ +obj* x_65; obj* x_66; +x_65 = lean::cnstr_get(x_63, 0); +lean::inc(x_65); +x_66 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_65); +lean::dec(x_65); +if (lean::obj_tag(x_66) == 2) +{ +obj* x_67; obj* x_68; uint8 x_69; +x_67 = lean::cnstr_get(x_66, 1); +lean::inc(x_67); +lean::dec(x_66); +x_68 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; +x_69 = lean::string_dec_eq(x_67, x_68); +lean::dec(x_67); +if (x_69 == 0) +{ +obj* x_70; obj* x_71; +x_70 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_71 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_70, x_62); +x_37 = x_71; +goto block_61; +} +else +{ +lean::dec(x_62); +x_37 = x_63; +goto block_61; +} +} +else +{ +obj* x_72; obj* x_73; +lean::dec(x_66); +x_72 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_73 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_72, x_62); +x_37 = x_73; +goto block_61; +} +} +else +{ +obj* x_74; obj* x_75; +lean::dec(x_64); +x_74 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_75 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_74, x_62); +x_37 = x_75; +goto block_61; +} +block_36: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_10 = lean::cnstr_get(x_8, 0); +obj* x_10; obj* x_11; obj* x_12; +x_10 = lean::cnstr_get(x_8, 1); lean::inc(x_10); -x_11 = lean::array_get_size(x_10); -lean::dec(x_10); -x_12 = 0; -lean::inc(x_2); -x_13 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_12, x_1, x_2, x_8); -x_14 = l_Lean_nullKind; -x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_11); -x_16 = lean::cnstr_get(x_15, 3); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) +x_11 = l_Lean_Parser_tokenFn(x_2, x_8); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) { -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -x_18 = lean::array_get_size(x_17); -lean::dec(x_17); -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::inc(x_2); -x_20 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_2, x_15); -x_21 = lean::cnstr_get(x_20, 3); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) +obj* x_13; obj* x_14; +x_13 = lean::cnstr_get(x_11, 0); +lean::inc(x_13); +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_13); +lean::dec(x_13); +if (lean::obj_tag(x_14) == 2) +{ +obj* x_15; obj* x_16; uint8 x_17; +x_15 = lean::cnstr_get(x_14, 1); +lean::inc(x_15); +lean::dec(x_14); +x_16 = l_Lean_Parser_Term_id___elambda__1___closed__8; +x_17 = lean::string_dec_eq(x_15, x_16); +lean::dec(x_15); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; obj* x_20; obj* x_21; +x_18 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_18, x_10); +x_20 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_5); +return x_21; +} +else { obj* x_22; obj* x_23; -lean::dec(x_19); -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_14, x_18); -x_23 = lean::cnstr_get(x_22, 3); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -lean::inc(x_2); -x_24 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_22); -x_25 = lean::cnstr_get(x_24, 3); -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; -x_26 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_27 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_28 = l_Lean_Parser_symbolFnAux(x_26, x_27, x_2, x_24); -x_29 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_5); -return x_30; +lean::dec(x_10); +x_22 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_11, x_22, x_5); +return x_23; +} } else { -obj* x_31; obj* x_32; -lean::dec(x_25); +obj* x_24; obj* x_25; obj* x_26; obj* x_27; +lean::dec(x_14); +x_24 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_24, x_10); +x_26 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_5); +return x_27; +} +} +else +{ +obj* x_28; obj* x_29; obj* x_30; obj* x_31; +lean::dec(x_12); +x_28 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_28, x_10); +x_30 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; +x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_5); +return x_31; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_9); lean::dec(x_2); -x_31 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_24, x_31, x_5); -return x_32; +x_32 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_8, x_32, x_5); +return x_33; } } else { -obj* x_33; obj* x_34; -lean::dec(x_23); +obj* x_34; obj* x_35; +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); -x_33 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_22, x_33, x_5); -return x_34; +x_34 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_6, x_34, x_5); +return x_35; } } -else +block_61: { -obj* x_35; uint8 x_36; -lean::dec(x_21); -x_35 = lean::cnstr_get(x_20, 1); -lean::inc(x_35); -x_36 = lean::nat_dec_eq(x_35, x_19); -lean::dec(x_35); -if (x_36 == 0) -{ -obj* x_37; obj* x_38; -lean::dec(x_19); -x_37 = l_Lean_Parser_ParserState_mkNode(x_20, x_14, x_18); +obj* x_38; x_38 = lean::cnstr_get(x_37, 3); lean::inc(x_38); if (lean::obj_tag(x_38) == 0) { -obj* x_39; obj* x_40; +obj* x_39; obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; +x_39 = lean::cnstr_get(x_37, 0); +lean::inc(x_39); +x_40 = lean::array_get_size(x_39); +lean::dec(x_39); +x_41 = 0; lean::inc(x_2); -x_39 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_37); -x_40 = lean::cnstr_get(x_39, 3); -lean::inc(x_40); -if (lean::obj_tag(x_40) == 0) +x_42 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_41, x_1, x_2, x_37); +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_40); +x_45 = lean::cnstr_get(x_44, 3); +lean::inc(x_45); +if (lean::obj_tag(x_45) == 0) { -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_41 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_42 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_43 = l_Lean_Parser_symbolFnAux(x_41, x_42, x_2, x_39); -x_44 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_5); -return x_45; +obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; +x_46 = lean::cnstr_get(x_44, 0); +lean::inc(x_46); +x_47 = lean::array_get_size(x_46); +lean::dec(x_46); +x_48 = lean::cnstr_get(x_44, 1); +lean::inc(x_48); +lean::inc(x_2); +x_49 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_2, x_44); +x_50 = lean::cnstr_get(x_49, 3); +lean::inc(x_50); +if (lean::obj_tag(x_50) == 0) +{ +obj* x_51; +lean::dec(x_48); +x_51 = l_Lean_Parser_ParserState_mkNode(x_49, x_43, x_47); +x_6 = x_51; +goto block_36; } else { -obj* x_46; obj* x_47; -lean::dec(x_40); +obj* x_52; uint8 x_53; +lean::dec(x_50); +x_52 = lean::cnstr_get(x_49, 1); +lean::inc(x_52); +x_53 = lean::nat_dec_eq(x_52, x_48); +lean::dec(x_52); +if (x_53 == 0) +{ +obj* x_54; +lean::dec(x_48); +x_54 = l_Lean_Parser_ParserState_mkNode(x_49, x_43, x_47); +x_6 = x_54; +goto block_36; +} +else +{ +obj* x_55; obj* x_56; +x_55 = l_Lean_Parser_ParserState_restore(x_49, x_47, x_48); +x_56 = l_Lean_Parser_ParserState_mkNode(x_55, x_43, x_47); +x_6 = x_56; +goto block_36; +} +} +} +else +{ +obj* x_57; obj* x_58; +lean::dec(x_45); lean::dec(x_2); -x_46 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_39, x_46, x_5); -return x_47; +lean::dec(x_1); +x_57 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; +x_58 = l_Lean_Parser_ParserState_mkNode(x_44, x_57, x_5); +return x_58; } } else { -obj* x_48; obj* x_49; +obj* x_59; obj* x_60; lean::dec(x_38); lean::dec(x_2); lean::dec(x_1); -x_48 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_49 = l_Lean_Parser_ParserState_mkNode(x_37, x_48, x_5); -return x_49; +x_59 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; +x_60 = l_Lean_Parser_ParserState_mkNode(x_37, x_59, x_5); +return x_60; } } -else -{ -obj* x_50; obj* x_51; obj* x_52; -x_50 = l_Lean_Parser_ParserState_restore(x_20, x_18, x_19); -x_51 = l_Lean_Parser_ParserState_mkNode(x_50, x_14, x_18); -x_52 = lean::cnstr_get(x_51, 3); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; -lean::inc(x_2); -x_53 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_51); -x_54 = lean::cnstr_get(x_53, 3); -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; -x_55 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_56 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_57 = l_Lean_Parser_symbolFnAux(x_55, x_56, x_2, x_53); -x_58 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_59 = l_Lean_Parser_ParserState_mkNode(x_57, x_58, x_5); -return x_59; -} -else -{ -obj* x_60; obj* x_61; -lean::dec(x_54); -lean::dec(x_2); -x_60 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_61 = l_Lean_Parser_ParserState_mkNode(x_53, x_60, x_5); -return x_61; -} -} -else -{ -obj* x_62; obj* x_63; -lean::dec(x_52); -lean::dec(x_2); -lean::dec(x_1); -x_62 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_63 = l_Lean_Parser_ParserState_mkNode(x_51, x_62, x_5); -return x_63; -} -} -} -} -else -{ -obj* x_64; obj* x_65; -lean::dec(x_16); -lean::dec(x_2); -lean::dec(x_1); -x_64 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_65 = l_Lean_Parser_ParserState_mkNode(x_15, x_64, x_5); -return x_65; -} -} -else -{ -obj* x_66; obj* x_67; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_66 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__2; -x_67 = l_Lean_Parser_ParserState_mkNode(x_8, x_66, x_5); -return x_67; -} } } obj* _init_l_Lean_Parser_Command_structImplicitBinder___closed__1() { @@ -7910,210 +10432,252 @@ return x_3; obj* l_Lean_Parser_Command_structInstBinder___elambda__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_4; obj* x_5; obj* x_6; obj* x_37; obj* x_62; obj* x_63; obj* x_64; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_list___elambda__1___closed__3; -x_7 = l_Lean_Parser_Term_list___elambda__1___closed__6; +x_62 = lean::cnstr_get(x_3, 1); +lean::inc(x_62); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_63 = l_Lean_Parser_tokenFn(x_2, x_3); +x_64 = lean::cnstr_get(x_63, 3); +lean::inc(x_64); +if (lean::obj_tag(x_64) == 0) +{ +obj* x_65; obj* x_66; +x_65 = lean::cnstr_get(x_63, 0); +lean::inc(x_65); +x_66 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_65); +lean::dec(x_65); +if (lean::obj_tag(x_66) == 2) +{ +obj* x_67; obj* x_68; uint8 x_69; +x_67 = lean::cnstr_get(x_66, 1); +lean::inc(x_67); +lean::dec(x_66); +x_68 = l_Lean_Parser_Term_list___elambda__1___closed__3; +x_69 = lean::string_dec_eq(x_67, x_68); +lean::dec(x_67); +if (x_69 == 0) +{ +obj* x_70; obj* x_71; +x_70 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_71 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_70, x_62); +x_37 = x_71; +goto block_61; +} +else +{ +lean::dec(x_62); +x_37 = x_63; +goto block_61; +} +} +else +{ +obj* x_72; obj* x_73; +lean::dec(x_66); +x_72 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_73 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_72, x_62); +x_37 = x_73; +goto block_61; +} +} +else +{ +obj* x_74; obj* x_75; +lean::dec(x_64); +x_74 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_75 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_74, x_62); +x_37 = x_75; +goto block_61; +} +block_36: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_10 = lean::cnstr_get(x_8, 0); +obj* x_10; obj* x_11; obj* x_12; +x_10 = lean::cnstr_get(x_8, 1); lean::inc(x_10); -x_11 = lean::array_get_size(x_10); -lean::dec(x_10); -x_12 = 0; -lean::inc(x_2); -x_13 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_12, x_1, x_2, x_8); -x_14 = l_Lean_nullKind; -x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_11); -x_16 = lean::cnstr_get(x_15, 3); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) +x_11 = l_Lean_Parser_tokenFn(x_2, x_8); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) { -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -x_18 = lean::array_get_size(x_17); -lean::dec(x_17); -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::inc(x_2); -x_20 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_2, x_15); -x_21 = lean::cnstr_get(x_20, 3); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) +obj* x_13; obj* x_14; +x_13 = lean::cnstr_get(x_11, 0); +lean::inc(x_13); +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_13); +lean::dec(x_13); +if (lean::obj_tag(x_14) == 2) +{ +obj* x_15; obj* x_16; uint8 x_17; +x_15 = lean::cnstr_get(x_14, 1); +lean::inc(x_15); +lean::dec(x_14); +x_16 = l_Lean_Parser_Term_list___elambda__1___closed__4; +x_17 = lean::string_dec_eq(x_15, x_16); +lean::dec(x_15); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; obj* x_20; obj* x_21; +x_18 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_18, x_10); +x_20 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_5); +return x_21; +} +else { obj* x_22; obj* x_23; -lean::dec(x_19); -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_14, x_18); -x_23 = lean::cnstr_get(x_22, 3); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -lean::inc(x_2); -x_24 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_22); -x_25 = lean::cnstr_get(x_24, 3); -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; -x_26 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_27 = l_Lean_Parser_Term_list___elambda__1___closed__8; -x_28 = l_Lean_Parser_symbolFnAux(x_26, x_27, x_2, x_24); -x_29 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_5); -return x_30; +lean::dec(x_10); +x_22 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_11, x_22, x_5); +return x_23; +} } else { -obj* x_31; obj* x_32; -lean::dec(x_25); +obj* x_24; obj* x_25; obj* x_26; obj* x_27; +lean::dec(x_14); +x_24 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_24, x_10); +x_26 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_5); +return x_27; +} +} +else +{ +obj* x_28; obj* x_29; obj* x_30; obj* x_31; +lean::dec(x_12); +x_28 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_28, x_10); +x_30 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_5); +return x_31; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_9); lean::dec(x_2); -x_31 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_24, x_31, x_5); -return x_32; +x_32 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_8, x_32, x_5); +return x_33; } } else { -obj* x_33; obj* x_34; -lean::dec(x_23); +obj* x_34; obj* x_35; +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); -x_33 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_22, x_33, x_5); -return x_34; +x_34 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_6, x_34, x_5); +return x_35; } } -else +block_61: { -obj* x_35; uint8 x_36; -lean::dec(x_21); -x_35 = lean::cnstr_get(x_20, 1); -lean::inc(x_35); -x_36 = lean::nat_dec_eq(x_35, x_19); -lean::dec(x_35); -if (x_36 == 0) -{ -obj* x_37; obj* x_38; -lean::dec(x_19); -x_37 = l_Lean_Parser_ParserState_mkNode(x_20, x_14, x_18); +obj* x_38; x_38 = lean::cnstr_get(x_37, 3); lean::inc(x_38); if (lean::obj_tag(x_38) == 0) { -obj* x_39; obj* x_40; +obj* x_39; obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; +x_39 = lean::cnstr_get(x_37, 0); +lean::inc(x_39); +x_40 = lean::array_get_size(x_39); +lean::dec(x_39); +x_41 = 0; lean::inc(x_2); -x_39 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_37); -x_40 = lean::cnstr_get(x_39, 3); -lean::inc(x_40); -if (lean::obj_tag(x_40) == 0) +x_42 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_41, x_1, x_2, x_37); +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_40); +x_45 = lean::cnstr_get(x_44, 3); +lean::inc(x_45); +if (lean::obj_tag(x_45) == 0) { -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_41 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_42 = l_Lean_Parser_Term_list___elambda__1___closed__8; -x_43 = l_Lean_Parser_symbolFnAux(x_41, x_42, x_2, x_39); -x_44 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_5); -return x_45; +obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; +x_46 = lean::cnstr_get(x_44, 0); +lean::inc(x_46); +x_47 = lean::array_get_size(x_46); +lean::dec(x_46); +x_48 = lean::cnstr_get(x_44, 1); +lean::inc(x_48); +lean::inc(x_2); +x_49 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_2, x_44); +x_50 = lean::cnstr_get(x_49, 3); +lean::inc(x_50); +if (lean::obj_tag(x_50) == 0) +{ +obj* x_51; +lean::dec(x_48); +x_51 = l_Lean_Parser_ParserState_mkNode(x_49, x_43, x_47); +x_6 = x_51; +goto block_36; } else { -obj* x_46; obj* x_47; -lean::dec(x_40); +obj* x_52; uint8 x_53; +lean::dec(x_50); +x_52 = lean::cnstr_get(x_49, 1); +lean::inc(x_52); +x_53 = lean::nat_dec_eq(x_52, x_48); +lean::dec(x_52); +if (x_53 == 0) +{ +obj* x_54; +lean::dec(x_48); +x_54 = l_Lean_Parser_ParserState_mkNode(x_49, x_43, x_47); +x_6 = x_54; +goto block_36; +} +else +{ +obj* x_55; obj* x_56; +x_55 = l_Lean_Parser_ParserState_restore(x_49, x_47, x_48); +x_56 = l_Lean_Parser_ParserState_mkNode(x_55, x_43, x_47); +x_6 = x_56; +goto block_36; +} +} +} +else +{ +obj* x_57; obj* x_58; +lean::dec(x_45); lean::dec(x_2); -x_46 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_39, x_46, x_5); -return x_47; +lean::dec(x_1); +x_57 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +x_58 = l_Lean_Parser_ParserState_mkNode(x_44, x_57, x_5); +return x_58; } } else { -obj* x_48; obj* x_49; +obj* x_59; obj* x_60; lean::dec(x_38); lean::dec(x_2); lean::dec(x_1); -x_48 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_49 = l_Lean_Parser_ParserState_mkNode(x_37, x_48, x_5); -return x_49; +x_59 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +x_60 = l_Lean_Parser_ParserState_mkNode(x_37, x_59, x_5); +return x_60; } } -else -{ -obj* x_50; obj* x_51; obj* x_52; -x_50 = l_Lean_Parser_ParserState_restore(x_20, x_18, x_19); -x_51 = l_Lean_Parser_ParserState_mkNode(x_50, x_14, x_18); -x_52 = lean::cnstr_get(x_51, 3); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; -lean::inc(x_2); -x_53 = l_Lean_Parser_Command_optDeclSig___elambda__1(x_1, x_2, x_51); -x_54 = lean::cnstr_get(x_53, 3); -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; -x_55 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_56 = l_Lean_Parser_Term_list___elambda__1___closed__8; -x_57 = l_Lean_Parser_symbolFnAux(x_55, x_56, x_2, x_53); -x_58 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_59 = l_Lean_Parser_ParserState_mkNode(x_57, x_58, x_5); -return x_59; -} -else -{ -obj* x_60; obj* x_61; -lean::dec(x_54); -lean::dec(x_2); -x_60 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_61 = l_Lean_Parser_ParserState_mkNode(x_53, x_60, x_5); -return x_61; -} -} -else -{ -obj* x_62; obj* x_63; -lean::dec(x_52); -lean::dec(x_2); -lean::dec(x_1); -x_62 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_63 = l_Lean_Parser_ParserState_mkNode(x_51, x_62, x_5); -return x_63; -} -} -} -} -else -{ -obj* x_64; obj* x_65; -lean::dec(x_16); -lean::dec(x_2); -lean::dec(x_1); -x_64 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_65 = l_Lean_Parser_ParserState_mkNode(x_15, x_64, x_5); -return x_65; -} -} -else -{ -obj* x_66; obj* x_67; -lean::dec(x_9); -lean::dec(x_2); -lean::dec(x_1); -x_66 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; -x_67 = l_Lean_Parser_ParserState_mkNode(x_8, x_66, x_5); -return x_67; -} } } obj* _init_l_Lean_Parser_Command_structInstBinder___closed__1() { @@ -8314,7 +10878,7 @@ obj* x_13; obj* x_14; lean::dec(x_3); lean::dec(x_2); x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_8, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); return x_14; } } @@ -8480,7 +11044,7 @@ obj* _init_l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -8496,133 +11060,167 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Command_structCtor___elambda__1___rarg(obj* x_1, obj* x_2) { _start: { -obj* x_3; obj* x_4; obj* x_5; obj* x_6; +obj* x_3; obj* x_4; obj* x_5; obj* x_32; obj* x_33; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); lean::inc(x_1); -x_5 = l_Lean_Parser_identFn___rarg(x_1, x_2); +x_32 = l_Lean_Parser_identFn___rarg(x_1, x_2); +x_33 = lean::cnstr_get(x_32, 3); +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; +x_34 = lean::cnstr_get(x_32, 0); +lean::inc(x_34); +x_35 = lean::array_get_size(x_34); +lean::dec(x_34); +x_36 = lean::cnstr_get(x_32, 1); +lean::inc(x_36); +lean::inc(x_1); +x_37 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_1, x_32); +x_38 = lean::cnstr_get(x_37, 3); +lean::inc(x_38); +if (lean::obj_tag(x_38) == 0) +{ +obj* x_39; obj* x_40; +lean::dec(x_36); +x_39 = l_Lean_nullKind; +x_40 = l_Lean_Parser_ParserState_mkNode(x_37, x_39, x_35); +x_5 = x_40; +goto block_31; +} +else +{ +obj* x_41; uint8 x_42; +lean::dec(x_38); +x_41 = lean::cnstr_get(x_37, 1); +lean::inc(x_41); +x_42 = lean::nat_dec_eq(x_41, x_36); +lean::dec(x_41); +if (x_42 == 0) +{ +obj* x_43; obj* x_44; +lean::dec(x_36); +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_37, x_43, x_35); +x_5 = x_44; +goto block_31; +} +else +{ +obj* x_45; obj* x_46; obj* x_47; +x_45 = l_Lean_Parser_ParserState_restore(x_37, x_35, x_36); +x_46 = l_Lean_nullKind; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_35); +x_5 = x_47; +goto block_31; +} +} +} +else +{ +obj* x_48; obj* x_49; +lean::dec(x_33); +lean::dec(x_1); +x_48 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; +x_49 = l_Lean_Parser_ParserState_mkNode(x_32, x_48, x_4); +return x_49; +} +block_31: +{ +obj* x_6; x_6 = lean::cnstr_get(x_5, 3); 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); +obj* x_7; obj* x_8; obj* x_9; +x_7 = lean::cnstr_get(x_5, 1); lean::inc(x_7); -x_8 = lean::array_get_size(x_7); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_5, 1); +x_8 = l_Lean_Parser_tokenFn(x_1, x_5); +x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); -lean::inc(x_1); -x_10 = l_Lean_Parser_Command_inferMod___elambda__1___rarg(x_1, x_5); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +if (lean::obj_tag(x_9) == 0) { -obj* x_12; obj* x_13; obj* x_14; -lean::dec(x_9); -x_12 = l_Lean_nullKind; -x_13 = l_Lean_Parser_ParserState_mkNode(x_10, x_12, x_8); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +obj* x_10; obj* x_11; +x_10 = lean::cnstr_get(x_8, 0); +lean::inc(x_10); +x_11 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_10); +lean::dec(x_10); +if (lean::obj_tag(x_11) == 2) { -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__3; -x_16 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__5; -x_17 = l_Lean_Parser_symbolFnAux(x_15, x_16, x_1, x_13); -x_18 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_4); -return x_19; -} -else -{ -obj* x_20; obj* x_21; -lean::dec(x_14); -lean::dec(x_1); -x_20 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; -x_21 = l_Lean_Parser_ParserState_mkNode(x_13, x_20, x_4); -return x_21; -} -} -else -{ -obj* x_22; uint8 x_23; +obj* x_12; obj* x_13; uint8 x_14; +x_12 = lean::cnstr_get(x_11, 1); +lean::inc(x_12); lean::dec(x_11); -x_22 = lean::cnstr_get(x_10, 1); -lean::inc(x_22); -x_23 = lean::nat_dec_eq(x_22, x_9); -lean::dec(x_22); -if (x_23 == 0) +x_13 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__3; +x_14 = lean::string_dec_eq(x_12, x_13); +lean::dec(x_12); +if (x_14 == 0) { -obj* x_24; obj* x_25; obj* x_26; +obj* x_15; obj* x_16; obj* x_17; obj* x_18; +x_15 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__6; +x_16 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_15, x_7); +x_17 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_16, x_17, x_4); +return x_18; +} +else +{ +obj* x_19; obj* x_20; +lean::dec(x_7); +x_19 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; +x_20 = l_Lean_Parser_ParserState_mkNode(x_8, x_19, x_4); +return x_20; +} +} +else +{ +obj* x_21; obj* x_22; obj* x_23; obj* x_24; +lean::dec(x_11); +x_21 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__6; +x_22 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_21, x_7); +x_23 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_4); +return x_24; +} +} +else +{ +obj* x_25; obj* x_26; obj* x_27; obj* x_28; lean::dec(x_9); -x_24 = l_Lean_nullKind; -x_25 = l_Lean_Parser_ParserState_mkNode(x_10, x_24, x_8); -x_26 = lean::cnstr_get(x_25, 3); -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; -x_27 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__3; -x_28 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__5; -x_29 = l_Lean_Parser_symbolFnAux(x_27, x_28, x_1, x_25); -x_30 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; -x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_4); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -lean::dec(x_26); -lean::dec(x_1); -x_32 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; -x_33 = l_Lean_Parser_ParserState_mkNode(x_25, x_32, x_4); -return x_33; +x_25 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__6; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_25, x_7); +x_27 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); +return x_28; } } else { -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_ParserState_restore(x_10, x_8, x_9); -x_35 = l_Lean_nullKind; -x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_8); -x_37 = lean::cnstr_get(x_36, 3); -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 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__3; -x_39 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__5; -x_40 = l_Lean_Parser_symbolFnAux(x_38, x_39, x_1, x_36); -x_41 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; -x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_4); -return x_42; -} -else -{ -obj* x_43; obj* x_44; -lean::dec(x_37); -lean::dec(x_1); -x_43 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; -x_44 = l_Lean_Parser_ParserState_mkNode(x_36, x_43, x_4); -return x_44; -} -} -} -} -else -{ -obj* x_45; obj* x_46; +obj* x_29; obj* x_30; lean::dec(x_6); lean::dec(x_1); -x_45 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; -x_46 = l_Lean_Parser_ParserState_mkNode(x_5, x_45, x_4); -return x_46; +x_29 = l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_5, x_29, x_4); +return x_30; +} } } } @@ -8749,7 +11347,7 @@ obj* _init_l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -8765,20 +11363,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_structureTk___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_structureTk___elambda__1(obj* x_1) { @@ -8863,57 +11527,74 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -obj* _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("class "); -return x_1; -} -} -obj* _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__3; -x_2 = l_String_trim(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__4; -x_3 = lean::string_append(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__5; -x_2 = l_Char_HasRepr___closed__1; -x_3 = lean::string_append(x_1, x_2); -return x_3; -} -} obj* l_Lean_Parser_Command_classTk___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_classInductive___elambda__1___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_classInductive___elambda__1___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_classInductive___elambda__1___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_classInductive___elambda__1___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_classTk___elambda__1(obj* x_1) { @@ -8927,23 +11608,13 @@ return x_2; obj* _init_l_Lean_Parser_Command_classTk___closed__1() { _start: { -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__4; -x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_Command_classTk___closed__2() { -_start: -{ obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Command_classTk___closed__1; +x_1 = l_Lean_Parser_Command_classInductive___closed__1; x_2 = l_Lean_Parser_nodeInfo(x_1); return x_2; } } -obj* _init_l_Lean_Parser_Command_classTk___closed__3() { +obj* _init_l_Lean_Parser_Command_classTk___closed__2() { _start: { obj* x_1; @@ -8951,12 +11622,12 @@ x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Command_classTk_ return x_1; } } -obj* _init_l_Lean_Parser_Command_classTk___closed__4() { +obj* _init_l_Lean_Parser_Command_classTk___closed__3() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_classTk___closed__2; -x_2 = l_Lean_Parser_Command_classTk___closed__3; +x_1 = l_Lean_Parser_Command_classTk___closed__1; +x_2 = l_Lean_Parser_Command_classTk___closed__2; x_3 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_3, 0, x_1); lean::cnstr_set(x_3, 1, x_2); @@ -8967,7 +11638,7 @@ obj* _init_l_Lean_Parser_Command_classTk() { _start: { obj* x_1; -x_1 = l_Lean_Parser_Command_classTk___closed__4; +x_1 = l_Lean_Parser_Command_classTk___closed__3; return x_1; } } @@ -9019,7 +11690,7 @@ obj* _init_l_Lean_Parser_Command_extends___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_extends___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -9035,38 +11706,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_extends___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_extends___elambda__1___closed__6; +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* l_Lean_Parser_Command_extends___elambda__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_4; obj* x_5; obj* x_6; obj* x_16; obj* x_17; obj* x_18; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_extends___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_extends___elambda__1___closed__6; +x_16 = lean::cnstr_get(x_3, 1); +lean::inc(x_16); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_17 = l_Lean_Parser_tokenFn(x_2, x_3); +x_18 = lean::cnstr_get(x_17, 3); +lean::inc(x_18); +if (lean::obj_tag(x_18) == 0) { -uint8 x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = 0; -x_11 = 0; -x_12 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_10, x_11, x_1, x_2, x_8); -x_13 = l_Lean_Parser_Command_extends___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); -return x_14; +obj* x_19; obj* x_20; +x_19 = lean::cnstr_get(x_17, 0); +lean::inc(x_19); +x_20 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_19); +lean::dec(x_19); +if (lean::obj_tag(x_20) == 2) +{ +obj* x_21; obj* x_22; uint8 x_23; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +lean::dec(x_20); +x_22 = l_Lean_Parser_Command_extends___elambda__1___closed__4; +x_23 = lean::string_dec_eq(x_21, x_22); +lean::dec(x_21); +if (x_23 == 0) +{ +obj* x_24; obj* x_25; +x_24 = l_Lean_Parser_Command_extends___elambda__1___closed__7; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_24, x_16); +x_6 = x_25; +goto block_15; } else { -obj* x_15; obj* x_16; -lean::dec(x_9); +lean::dec(x_16); +x_6 = x_17; +goto block_15; +} +} +else +{ +obj* x_26; obj* x_27; +lean::dec(x_20); +x_26 = l_Lean_Parser_Command_extends___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_26, x_16); +x_6 = x_27; +goto block_15; +} +} +else +{ +obj* x_28; obj* x_29; +lean::dec(x_18); +x_28 = l_Lean_Parser_Command_extends___elambda__1___closed__7; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_28, x_16); +x_6 = x_29; +goto block_15; +} +block_15: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +uint8 x_8; uint8 x_9; obj* x_10; obj* x_11; obj* x_12; +x_8 = 0; +x_9 = 0; +x_10 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_8, x_9, x_1, x_2, x_6); +x_11 = l_Lean_Parser_Command_extends___elambda__1___closed__2; +x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_5); +return x_12; +} +else +{ +obj* x_13; obj* x_14; +lean::dec(x_7); lean::dec(x_2); -x_15 = l_Lean_Parser_Command_extends___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_8, x_15, x_5); -return x_16; +x_13 = l_Lean_Parser_Command_extends___elambda__1___closed__2; +x_14 = l_Lean_Parser_ParserState_mkNode(x_6, x_13, x_5); +return x_14; +} } } } @@ -9157,7 +11896,7 @@ return x_3; obj* l_Lean_Parser_Command_structure___elambda__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_55; obj* x_84; obj* x_85; obj* x_86; +obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_45; obj* x_68; obj* x_97; obj* x_98; obj* x_99; x_4 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___spec__1___closed__1; x_5 = lean::cnstr_get(x_4, 1); lean::inc(x_5); @@ -9165,313 +11904,369 @@ x_6 = lean::cnstr_get(x_3, 0); lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); -x_84 = lean::cnstr_get(x_3, 1); -lean::inc(x_84); +x_97 = lean::cnstr_get(x_3, 1); +lean::inc(x_97); lean::inc(x_2); -x_85 = l_Lean_Parser_Command_structureTk___elambda__1___rarg(x_2, x_3); -x_86 = lean::cnstr_get(x_85, 3); -lean::inc(x_86); -if (lean::obj_tag(x_86) == 0) +x_98 = l_Lean_Parser_Command_structureTk___elambda__1___rarg(x_2, x_3); +x_99 = lean::cnstr_get(x_98, 3); +lean::inc(x_99); +if (lean::obj_tag(x_99) == 0) { -lean::dec(x_84); -x_55 = x_85; -goto block_83; +lean::dec(x_97); +x_68 = x_98; +goto block_96; } else { -obj* x_87; obj* x_88; uint8 x_89; -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -lean::dec(x_86); -x_88 = lean::cnstr_get(x_85, 1); -lean::inc(x_88); -x_89 = lean::nat_dec_eq(x_88, x_84); -lean::dec(x_88); -if (x_89 == 0) +obj* x_100; obj* x_101; uint8 x_102; +x_100 = lean::cnstr_get(x_99, 0); +lean::inc(x_100); +lean::dec(x_99); +x_101 = lean::cnstr_get(x_98, 1); +lean::inc(x_101); +x_102 = lean::nat_dec_eq(x_101, x_97); +lean::dec(x_101); +if (x_102 == 0) { -lean::dec(x_87); -lean::dec(x_84); -x_55 = x_85; -goto block_83; +lean::dec(x_100); +lean::dec(x_97); +x_68 = x_98; +goto block_96; } else { -obj* x_90; obj* x_91; obj* x_92; -lean::inc(x_84); -x_90 = l_Lean_Parser_ParserState_restore(x_85, x_7, x_84); +obj* x_103; obj* x_104; obj* x_105; +lean::inc(x_97); +x_103 = l_Lean_Parser_ParserState_restore(x_98, x_7, x_97); lean::inc(x_2); -x_91 = l_Lean_Parser_Command_classTk___elambda__1___rarg(x_2, x_90); -x_92 = l_Lean_Parser_mergeOrElseErrors(x_91, x_87, x_84); -lean::dec(x_84); -x_55 = x_92; -goto block_83; +x_104 = l_Lean_Parser_Command_classTk___elambda__1___rarg(x_2, x_103); +x_105 = l_Lean_Parser_mergeOrElseErrors(x_104, x_100, x_97); +lean::dec(x_97); +x_68 = x_105; +goto block_96; } } -block_54: +block_44: { obj* x_9; x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; +obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; +x_10 = lean::cnstr_get(x_8, 0); +lean::inc(x_10); +x_11 = lean::array_get_size(x_10); +lean::dec(x_10); +x_12 = lean::cnstr_get(x_8, 1); +lean::inc(x_12); lean::inc(x_2); -x_10 = l_Lean_Parser_Term_optType___elambda__1___rarg(x_2, x_8); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +x_13 = l_Lean_Parser_Command_structCtor___elambda__1___rarg(x_2, x_8); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +if (lean::obj_tag(x_14) == 0) { -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_13 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; -lean::inc(x_2); -x_14 = l_Lean_Parser_symbolFnAux(x_12, x_13, x_2, x_10); -x_15 = lean::cnstr_get(x_14, 3); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) +obj* x_15; obj* x_16; obj* x_17; +lean::dec(x_12); +x_15 = l_Lean_nullKind; +x_16 = l_Lean_Parser_ParserState_mkNode(x_13, x_15, x_11); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -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); -x_17 = lean::array_get_size(x_16); -lean::dec(x_16); -x_18 = lean::cnstr_get(x_14, 1); -lean::inc(x_18); -lean::inc(x_2); -x_19 = l_Lean_Parser_Command_structCtor___elambda__1___rarg(x_2, x_14); -x_20 = lean::cnstr_get(x_19, 3); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) +obj* x_18; obj* x_19; obj* x_20; +x_18 = l_Lean_Parser_Command_structFields___elambda__1(x_1, x_2, x_16); +x_19 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_7); +return x_20; +} +else { -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_18); -x_21 = l_Lean_nullKind; -x_22 = l_Lean_Parser_ParserState_mkNode(x_19, x_21, x_17); -x_23 = lean::cnstr_get(x_22, 3); +obj* x_21; obj* x_22; +lean::dec(x_17); +lean::dec(x_2); +lean::dec(x_1); +x_21 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_16, x_21, x_7); +return x_22; +} +} +else +{ +obj* x_23; uint8 x_24; +lean::dec(x_14); +x_23 = lean::cnstr_get(x_13, 1); lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = l_Lean_Parser_Command_structFields___elambda__1(x_1, x_2, x_22); -x_25 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_7); -return x_26; -} -else -{ -obj* x_27; obj* x_28; +x_24 = lean::nat_dec_eq(x_23, x_12); lean::dec(x_23); +if (x_24 == 0) +{ +obj* x_25; obj* x_26; obj* x_27; +lean::dec(x_12); +x_25 = l_Lean_nullKind; +x_26 = l_Lean_Parser_ParserState_mkNode(x_13, x_25, x_11); +x_27 = lean::cnstr_get(x_26, 3); +lean::inc(x_27); +if (lean::obj_tag(x_27) == 0) +{ +obj* x_28; obj* x_29; obj* x_30; +x_28 = l_Lean_Parser_Command_structFields___elambda__1(x_1, x_2, x_26); +x_29 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_7); +return x_30; +} +else +{ +obj* x_31; obj* x_32; +lean::dec(x_27); lean::dec(x_2); lean::dec(x_1); -x_27 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_22, x_27, x_7); -return x_28; +x_31 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_26, x_31, x_7); +return x_32; } } else { -obj* x_29; uint8 x_30; -lean::dec(x_20); -x_29 = lean::cnstr_get(x_19, 1); -lean::inc(x_29); -x_30 = lean::nat_dec_eq(x_29, x_18); -lean::dec(x_29); -if (x_30 == 0) +obj* x_33; obj* x_34; obj* x_35; obj* x_36; +x_33 = l_Lean_Parser_ParserState_restore(x_13, x_11, x_12); +x_34 = l_Lean_nullKind; +x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_11); +x_36 = lean::cnstr_get(x_35, 3); +lean::inc(x_36); +if (lean::obj_tag(x_36) == 0) { -obj* x_31; obj* x_32; obj* x_33; -lean::dec(x_18); -x_31 = l_Lean_nullKind; -x_32 = l_Lean_Parser_ParserState_mkNode(x_19, x_31, x_17); -x_33 = lean::cnstr_get(x_32, 3); -lean::inc(x_33); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; -x_34 = l_Lean_Parser_Command_structFields___elambda__1(x_1, x_2, x_32); -x_35 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_7); -return x_36; +obj* x_37; obj* x_38; obj* x_39; +x_37 = l_Lean_Parser_Command_structFields___elambda__1(x_1, x_2, x_35); +x_38 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_7); +return x_39; } else { -obj* x_37; obj* x_38; -lean::dec(x_33); +obj* x_40; obj* x_41; +lean::dec(x_36); lean::dec(x_2); lean::dec(x_1); -x_37 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_38 = l_Lean_Parser_ParserState_mkNode(x_32, x_37, x_7); -return x_38; -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_39 = l_Lean_Parser_ParserState_restore(x_19, x_17, x_18); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_17); -x_42 = lean::cnstr_get(x_41, 3); -lean::inc(x_42); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; -x_43 = l_Lean_Parser_Command_structFields___elambda__1(x_1, x_2, x_41); -x_44 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_7); -return x_45; -} -else -{ -obj* x_46; obj* x_47; -lean::dec(x_42); -lean::dec(x_2); -lean::dec(x_1); -x_46 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_41, x_46, x_7); -return x_47; +x_40 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_41 = l_Lean_Parser_ParserState_mkNode(x_35, x_40, x_7); +return x_41; } } } } else { -obj* x_48; obj* x_49; -lean::dec(x_15); -lean::dec(x_2); -lean::dec(x_1); -x_48 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_49 = l_Lean_Parser_ParserState_mkNode(x_14, x_48, x_7); -return x_49; -} -} -else -{ -obj* x_50; obj* x_51; -lean::dec(x_11); -lean::dec(x_2); -lean::dec(x_1); -x_50 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_51 = l_Lean_Parser_ParserState_mkNode(x_10, x_50, x_7); -return x_51; -} -} -else -{ -obj* x_52; obj* x_53; +obj* x_42; obj* x_43; lean::dec(x_9); lean::dec(x_2); lean::dec(x_1); -x_52 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_53 = l_Lean_Parser_ParserState_mkNode(x_8, x_52, x_7); -return x_53; +x_42 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_43 = l_Lean_Parser_ParserState_mkNode(x_8, x_42, x_7); +return x_43; } } -block_83: +block_67: { -obj* x_56; -x_56 = lean::cnstr_get(x_55, 3); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) +obj* x_46; +x_46 = lean::cnstr_get(x_45, 3); +lean::inc(x_46); +if (lean::obj_tag(x_46) == 0) +{ +obj* x_47; obj* x_48; +lean::inc(x_2); +x_47 = l_Lean_Parser_Term_optType___elambda__1___rarg(x_2, x_45); +x_48 = lean::cnstr_get(x_47, 3); +lean::inc(x_48); +if (lean::obj_tag(x_48) == 0) +{ +obj* x_49; obj* x_50; obj* x_51; +x_49 = lean::cnstr_get(x_47, 1); +lean::inc(x_49); +lean::inc(x_2); +x_50 = l_Lean_Parser_tokenFn(x_2, x_47); +x_51 = lean::cnstr_get(x_50, 3); +lean::inc(x_51); +if (lean::obj_tag(x_51) == 0) +{ +obj* x_52; obj* x_53; +x_52 = lean::cnstr_get(x_50, 0); +lean::inc(x_52); +x_53 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_52); +lean::dec(x_52); +if (lean::obj_tag(x_53) == 2) +{ +obj* x_54; obj* x_55; uint8 x_56; +x_54 = lean::cnstr_get(x_53, 1); +lean::inc(x_54); +lean::dec(x_53); +x_55 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_56 = lean::string_dec_eq(x_54, x_55); +lean::dec(x_54); +if (x_56 == 0) { obj* x_57; obj* x_58; -lean::inc(x_2); -x_57 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_55); -x_58 = lean::cnstr_get(x_57, 3); -lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) +x_57 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_58 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_57, x_49); +x_8 = x_58; +goto block_44; +} +else { -obj* x_59; obj* x_60; uint8 x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_59 = lean::cnstr_get(x_57, 0); -lean::inc(x_59); -x_60 = lean::array_get_size(x_59); -lean::dec(x_59); -x_61 = 0; +lean::dec(x_49); +x_8 = x_50; +goto block_44; +} +} +else +{ +obj* x_59; obj* x_60; +lean::dec(x_53); +x_59 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_60 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_59, x_49); +x_8 = x_60; +goto block_44; +} +} +else +{ +obj* x_61; obj* x_62; +lean::dec(x_51); +x_61 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_62 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_61, x_49); +x_8 = x_62; +goto block_44; +} +} +else +{ +obj* x_63; obj* x_64; +lean::dec(x_48); +lean::dec(x_2); +lean::dec(x_1); +x_63 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_64 = l_Lean_Parser_ParserState_mkNode(x_47, x_63, x_7); +return x_64; +} +} +else +{ +obj* x_65; obj* x_66; +lean::dec(x_46); +lean::dec(x_2); +lean::dec(x_1); +x_65 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_66 = l_Lean_Parser_ParserState_mkNode(x_45, x_65, x_7); +return x_66; +} +} +block_96: +{ +obj* x_69; +x_69 = lean::cnstr_get(x_68, 3); +lean::inc(x_69); +if (lean::obj_tag(x_69) == 0) +{ +obj* x_70; obj* x_71; +lean::inc(x_2); +x_70 = l_Lean_Parser_Command_declId___elambda__1(x_1, x_2, x_68); +x_71 = lean::cnstr_get(x_70, 3); +lean::inc(x_71); +if (lean::obj_tag(x_71) == 0) +{ +obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; +x_72 = lean::cnstr_get(x_70, 0); +lean::inc(x_72); +x_73 = lean::array_get_size(x_72); +lean::dec(x_72); +x_74 = 0; lean::inc(x_2); lean::inc(x_1); -x_62 = l_Lean_Parser_manyAux___main(x_61, x_5, x_1, x_2, x_57); -x_63 = l_Lean_nullKind; -x_64 = l_Lean_Parser_ParserState_mkNode(x_62, x_63, x_60); -x_65 = lean::cnstr_get(x_64, 3); -lean::inc(x_65); -if (lean::obj_tag(x_65) == 0) +x_75 = l_Lean_Parser_manyAux___main(x_74, x_5, x_1, x_2, x_70); +x_76 = l_Lean_nullKind; +x_77 = l_Lean_Parser_ParserState_mkNode(x_75, x_76, x_73); +x_78 = lean::cnstr_get(x_77, 3); +lean::inc(x_78); +if (lean::obj_tag(x_78) == 0) { -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_66 = lean::cnstr_get(x_64, 0); -lean::inc(x_66); -x_67 = lean::array_get_size(x_66); -lean::dec(x_66); -x_68 = lean::cnstr_get(x_64, 1); -lean::inc(x_68); +obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_77, 0); +lean::inc(x_79); +x_80 = lean::array_get_size(x_79); +lean::dec(x_79); +x_81 = lean::cnstr_get(x_77, 1); +lean::inc(x_81); lean::inc(x_2); -x_69 = l_Lean_Parser_Command_extends___elambda__1(x_1, x_2, x_64); -x_70 = lean::cnstr_get(x_69, 3); -lean::inc(x_70); -if (lean::obj_tag(x_70) == 0) +x_82 = l_Lean_Parser_Command_extends___elambda__1(x_1, x_2, x_77); +x_83 = lean::cnstr_get(x_82, 3); +lean::inc(x_83); +if (lean::obj_tag(x_83) == 0) { -obj* x_71; -lean::dec(x_68); -x_71 = l_Lean_Parser_ParserState_mkNode(x_69, x_63, x_67); -x_8 = x_71; -goto block_54; +obj* x_84; +lean::dec(x_81); +x_84 = l_Lean_Parser_ParserState_mkNode(x_82, x_76, x_80); +x_45 = x_84; +goto block_67; } else { -obj* x_72; uint8 x_73; -lean::dec(x_70); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -x_73 = lean::nat_dec_eq(x_72, x_68); -lean::dec(x_72); -if (x_73 == 0) +obj* x_85; uint8 x_86; +lean::dec(x_83); +x_85 = lean::cnstr_get(x_82, 1); +lean::inc(x_85); +x_86 = lean::nat_dec_eq(x_85, x_81); +lean::dec(x_85); +if (x_86 == 0) { -obj* x_74; -lean::dec(x_68); -x_74 = l_Lean_Parser_ParserState_mkNode(x_69, x_63, x_67); -x_8 = x_74; -goto block_54; +obj* x_87; +lean::dec(x_81); +x_87 = l_Lean_Parser_ParserState_mkNode(x_82, x_76, x_80); +x_45 = x_87; +goto block_67; } else { -obj* x_75; obj* x_76; -x_75 = l_Lean_Parser_ParserState_restore(x_69, x_67, x_68); -x_76 = l_Lean_Parser_ParserState_mkNode(x_75, x_63, x_67); -x_8 = x_76; -goto block_54; +obj* x_88; obj* x_89; +x_88 = l_Lean_Parser_ParserState_restore(x_82, x_80, x_81); +x_89 = l_Lean_Parser_ParserState_mkNode(x_88, x_76, x_80); +x_45 = x_89; +goto block_67; } } } else { -obj* x_77; obj* x_78; -lean::dec(x_65); +obj* x_90; obj* x_91; +lean::dec(x_78); lean::dec(x_2); lean::dec(x_1); -x_77 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_78 = l_Lean_Parser_ParserState_mkNode(x_64, x_77, x_7); -return x_78; +x_90 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_91 = l_Lean_Parser_ParserState_mkNode(x_77, x_90, x_7); +return x_91; } } else { -obj* x_79; obj* x_80; -lean::dec(x_58); +obj* x_92; obj* x_93; +lean::dec(x_71); lean::dec(x_5); lean::dec(x_2); lean::dec(x_1); -x_79 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_80 = l_Lean_Parser_ParserState_mkNode(x_57, x_79, x_7); -return x_80; +x_92 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_93 = l_Lean_Parser_ParserState_mkNode(x_70, x_92, x_7); +return x_93; } } else { -obj* x_81; obj* x_82; -lean::dec(x_56); +obj* x_94; obj* x_95; +lean::dec(x_69); lean::dec(x_5); lean::dec(x_2); lean::dec(x_1); -x_81 = l_Lean_Parser_Command_structure___elambda__1___closed__2; -x_82 = l_Lean_Parser_ParserState_mkNode(x_55, x_81, x_7); -return x_82; +x_94 = l_Lean_Parser_Command_structure___elambda__1___closed__2; +x_95 = l_Lean_Parser_ParserState_mkNode(x_68, x_94, x_7); +return x_95; } } } @@ -10096,23 +12891,90 @@ 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; obj* x_168; obj* x_169; obj* x_170; obj* x_171; +obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; lean::inc(x_10); x_160 = l_Lean_Parser_ParserState_restore(x_137, x_136, x_10); lean::dec(x_136); -x_161 = l_Lean_Parser_Command_structure___elambda__1(x_1, x_2, x_160); -x_162 = l_Lean_Parser_mergeOrElseErrors(x_161, x_148, x_10); -x_163 = l_Lean_Parser_mergeOrElseErrors(x_162, x_123, x_10); -x_164 = l_Lean_Parser_mergeOrElseErrors(x_163, x_100, x_10); -x_165 = l_Lean_Parser_mergeOrElseErrors(x_164, x_79, x_10); -x_166 = l_Lean_Parser_mergeOrElseErrors(x_165, x_60, x_10); -x_167 = l_Lean_Parser_mergeOrElseErrors(x_166, x_43, x_10); -x_168 = l_Lean_Parser_mergeOrElseErrors(x_167, x_28, x_10); -x_169 = l_Lean_Parser_mergeOrElseErrors(x_168, x_15, x_10); +x_161 = lean::cnstr_get(x_160, 0); +lean::inc(x_161); +x_162 = lean::array_get_size(x_161); +lean::dec(x_161); +lean::inc(x_2); +lean::inc(x_1); +x_163 = l_Lean_Parser_Command_classInductive___elambda__1(x_1, x_2, x_160); +x_164 = lean::cnstr_get(x_163, 3); +lean::inc(x_164); +if (lean::obj_tag(x_164) == 0) +{ +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; +lean::dec(x_162); +lean::dec(x_2); +lean::dec(x_1); +x_165 = l_Lean_Parser_mergeOrElseErrors(x_163, x_148, x_10); +x_166 = l_Lean_Parser_mergeOrElseErrors(x_165, x_123, x_10); +x_167 = l_Lean_Parser_mergeOrElseErrors(x_166, x_100, x_10); +x_168 = l_Lean_Parser_mergeOrElseErrors(x_167, x_79, x_10); +x_169 = l_Lean_Parser_mergeOrElseErrors(x_168, x_60, x_10); +x_170 = l_Lean_Parser_mergeOrElseErrors(x_169, x_43, x_10); +x_171 = l_Lean_Parser_mergeOrElseErrors(x_170, x_28, x_10); +x_172 = l_Lean_Parser_mergeOrElseErrors(x_171, x_15, x_10); lean::dec(x_10); -x_170 = l_Lean_Parser_Command_declaration___elambda__1___closed__2; -x_171 = l_Lean_Parser_ParserState_mkNode(x_169, x_170, x_5); -return x_171; +x_173 = l_Lean_Parser_Command_declaration___elambda__1___closed__2; +x_174 = l_Lean_Parser_ParserState_mkNode(x_172, x_173, x_5); +return x_174; +} +else +{ +obj* x_175; obj* x_176; uint8 x_177; +x_175 = lean::cnstr_get(x_164, 0); +lean::inc(x_175); +lean::dec(x_164); +x_176 = lean::cnstr_get(x_163, 1); +lean::inc(x_176); +x_177 = lean::nat_dec_eq(x_176, x_10); +lean::dec(x_176); +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; +lean::dec(x_175); +lean::dec(x_162); +lean::dec(x_2); +lean::dec(x_1); +x_178 = l_Lean_Parser_mergeOrElseErrors(x_163, x_148, x_10); +x_179 = l_Lean_Parser_mergeOrElseErrors(x_178, x_123, x_10); +x_180 = l_Lean_Parser_mergeOrElseErrors(x_179, x_100, x_10); +x_181 = l_Lean_Parser_mergeOrElseErrors(x_180, x_79, x_10); +x_182 = l_Lean_Parser_mergeOrElseErrors(x_181, x_60, x_10); +x_183 = l_Lean_Parser_mergeOrElseErrors(x_182, x_43, x_10); +x_184 = l_Lean_Parser_mergeOrElseErrors(x_183, x_28, x_10); +x_185 = l_Lean_Parser_mergeOrElseErrors(x_184, x_15, x_10); +lean::dec(x_10); +x_186 = l_Lean_Parser_Command_declaration___elambda__1___closed__2; +x_187 = l_Lean_Parser_ParserState_mkNode(x_185, x_186, x_5); +return x_187; +} +else +{ +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; +lean::inc(x_10); +x_188 = l_Lean_Parser_ParserState_restore(x_163, x_162, x_10); +lean::dec(x_162); +x_189 = l_Lean_Parser_Command_structure___elambda__1(x_1, x_2, x_188); +x_190 = l_Lean_Parser_mergeOrElseErrors(x_189, x_175, x_10); +x_191 = l_Lean_Parser_mergeOrElseErrors(x_190, x_148, x_10); +x_192 = l_Lean_Parser_mergeOrElseErrors(x_191, x_123, x_10); +x_193 = l_Lean_Parser_mergeOrElseErrors(x_192, x_100, x_10); +x_194 = l_Lean_Parser_mergeOrElseErrors(x_193, x_79, x_10); +x_195 = l_Lean_Parser_mergeOrElseErrors(x_194, x_60, x_10); +x_196 = l_Lean_Parser_mergeOrElseErrors(x_195, x_43, x_10); +x_197 = l_Lean_Parser_mergeOrElseErrors(x_196, x_28, x_10); +x_198 = l_Lean_Parser_mergeOrElseErrors(x_197, x_15, x_10); +lean::dec(x_10); +x_199 = l_Lean_Parser_Command_declaration___elambda__1___closed__2; +x_200 = l_Lean_Parser_ParserState_mkNode(x_198, x_199, x_5); +return x_200; +} +} } } } @@ -10132,13 +12994,13 @@ return x_171; } else { -obj* x_172; obj* x_173; +obj* x_201; obj* x_202; lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); -x_172 = l_Lean_Parser_Command_declaration___elambda__1___closed__2; -x_173 = l_Lean_Parser_ParserState_mkNode(x_6, x_172, x_5); -return x_173; +x_201 = l_Lean_Parser_Command_declaration___elambda__1___closed__2; +x_202 = l_Lean_Parser_ParserState_mkNode(x_6, x_201, x_5); +return x_202; } } } @@ -10146,7 +13008,7 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__1() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Command_inductive; +x_1 = l_Lean_Parser_Command_classInductive; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_structure; @@ -10160,7 +13022,7 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__2() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Command_example; +x_1 = l_Lean_Parser_Command_inductive; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_declaration___closed__1; @@ -10172,7 +13034,7 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__3() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Command_axiom; +x_1 = l_Lean_Parser_Command_example; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_declaration___closed__2; @@ -10184,7 +13046,7 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Command_instance; +x_1 = l_Lean_Parser_Command_axiom; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_declaration___closed__3; @@ -10196,7 +13058,7 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Command_constant; +x_1 = l_Lean_Parser_Command_instance; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_declaration___closed__4; @@ -10208,7 +13070,7 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__6() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Command_theorem; +x_1 = l_Lean_Parser_Command_constant; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_declaration___closed__5; @@ -10220,7 +13082,7 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Command_def; +x_1 = l_Lean_Parser_Command_theorem; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_declaration___closed__6; @@ -10232,7 +13094,7 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__8() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Command_abbrev; +x_1 = l_Lean_Parser_Command_def; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_declaration___closed__7; @@ -10244,24 +13106,36 @@ obj* _init_l_Lean_Parser_Command_declaration___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Command_declModifiers; +x_1 = l_Lean_Parser_Command_abbrev; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_3 = l_Lean_Parser_Command_declaration___closed__8; -x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); +x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); return x_4; } } obj* _init_l_Lean_Parser_Command_declaration___closed__10() { _start: { +obj* x_1; obj* x_2; obj* x_3; obj* x_4; +x_1 = l_Lean_Parser_Command_declModifiers; +x_2 = lean::cnstr_get(x_1, 0); +lean::inc(x_2); +x_3 = l_Lean_Parser_Command_declaration___closed__9; +x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); +return x_4; +} +} +obj* _init_l_Lean_Parser_Command_declaration___closed__11() { +_start: +{ obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Command_declaration___closed__9; +x_1 = l_Lean_Parser_Command_declaration___closed__10; x_2 = l_Lean_Parser_nodeInfo(x_1); return x_2; } } -obj* _init_l_Lean_Parser_Command_declaration___closed__11() { +obj* _init_l_Lean_Parser_Command_declaration___closed__12() { _start: { obj* x_1; @@ -10269,12 +13143,12 @@ x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Command_declarat return x_1; } } -obj* _init_l_Lean_Parser_Command_declaration___closed__12() { +obj* _init_l_Lean_Parser_Command_declaration___closed__13() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_declaration___closed__10; -x_2 = l_Lean_Parser_Command_declaration___closed__11; +x_1 = l_Lean_Parser_Command_declaration___closed__11; +x_2 = l_Lean_Parser_Command_declaration___closed__12; x_3 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_3, 0, x_1); lean::cnstr_set(x_3, 1, x_2); @@ -10285,7 +13159,7 @@ obj* _init_l_Lean_Parser_Command_declaration() { _start: { obj* x_1; -x_1 = l_Lean_Parser_Command_declaration___closed__12; +x_1 = l_Lean_Parser_Command_declaration___closed__13; return x_1; } } @@ -10339,7 +13213,7 @@ obj* _init_l_Lean_Parser_Command_section___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -10355,82 +13229,150 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_section___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_section___elambda__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_3; obj* x_4; obj* x_5; obj* x_30; obj* x_31; obj* x_32; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__6; +x_30 = lean::cnstr_get(x_2, 1); +lean::inc(x_30); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_31 = l_Lean_Parser_tokenFn(x_1, x_2); +x_32 = lean::cnstr_get(x_31, 3); +lean::inc(x_32); +if (lean::obj_tag(x_32) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_7, 0); +obj* x_33; obj* x_34; +x_33 = lean::cnstr_get(x_31, 0); +lean::inc(x_33); +x_34 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_33); +lean::dec(x_33); +if (lean::obj_tag(x_34) == 2) +{ +obj* x_35; obj* x_36; uint8 x_37; +x_35 = lean::cnstr_get(x_34, 1); +lean::inc(x_35); +lean::dec(x_34); +x_36 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__4; +x_37 = lean::string_dec_eq(x_35, x_36); +lean::dec(x_35); +if (x_37 == 0) +{ +obj* x_38; obj* x_39; +x_38 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__7; +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_38, x_30); +x_5 = x_39; +goto block_29; +} +else +{ +lean::dec(x_30); +x_5 = x_31; +goto block_29; +} +} +else +{ +obj* x_40; obj* x_41; +lean::dec(x_34); +x_40 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__7; +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_40, x_30); +x_5 = x_41; +goto block_29; +} +} +else +{ +obj* x_42; obj* x_43; +lean::dec(x_32); +x_42 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__7; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_42, x_30); +x_5 = x_43; +goto block_29; +} +block_29: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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); +x_8 = lean::array_get_size(x_7); +lean::dec(x_7); +x_9 = lean::cnstr_get(x_5, 1); lean::inc(x_9); -x_10 = lean::array_get_size(x_9); -lean::dec(x_9); -x_11 = lean::cnstr_get(x_7, 1); +x_10 = l_Lean_Parser_identFn___rarg(x_1, x_5); +x_11 = lean::cnstr_get(x_10, 3); lean::inc(x_11); -x_12 = l_Lean_Parser_identFn___rarg(x_1, x_7); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +if (lean::obj_tag(x_11) == 0) { -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_11); -x_14 = l_Lean_nullKind; -x_15 = l_Lean_Parser_ParserState_mkNode(x_12, x_14, x_10); -x_16 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__2; -x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_4); -return x_17; +obj* x_12; obj* x_13; obj* x_14; obj* x_15; +lean::dec(x_9); +x_12 = l_Lean_nullKind; +x_13 = l_Lean_Parser_ParserState_mkNode(x_10, x_12, x_8); +x_14 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__2; +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_4); +return x_15; } else { -obj* x_18; uint8 x_19; -lean::dec(x_13); -x_18 = lean::cnstr_get(x_12, 1); -lean::inc(x_18); -x_19 = lean::nat_dec_eq(x_18, x_11); -lean::dec(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; +obj* x_16; uint8 x_17; lean::dec(x_11); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_12, x_20, x_10); -x_22 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_4); -return x_23; +x_16 = lean::cnstr_get(x_10, 1); +lean::inc(x_16); +x_17 = lean::nat_dec_eq(x_16, x_9); +lean::dec(x_16); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_9); +x_18 = l_Lean_nullKind; +x_19 = l_Lean_Parser_ParserState_mkNode(x_10, x_18, x_8); +x_20 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_4); +return x_21; } else { -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_24 = l_Lean_Parser_ParserState_restore(x_12, x_10, x_11); -x_25 = l_Lean_nullKind; -x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_10); +obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; +x_22 = l_Lean_Parser_ParserState_restore(x_10, x_8, x_9); +x_23 = l_Lean_nullKind; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_8); +x_25 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_6); +lean::dec(x_1); x_27 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); +x_28 = l_Lean_Parser_ParserState_mkNode(x_5, x_27, x_4); return x_28; } } } -else -{ -obj* x_29; obj* x_30; -lean::dec(x_8); -lean::dec(x_1); -x_29 = l_Lean_Parser_Command_section___elambda__1___rarg___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_7, x_29, x_4); -return x_30; -} -} } obj* l_Lean_Parser_Command_section___elambda__1(obj* x_1) { _start: @@ -10565,7 +13507,7 @@ obj* _init_l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -10581,36 +13523,104 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_namespace___elambda__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_3; obj* x_4; obj* x_5; obj* x_13; obj* x_14; obj* x_15; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__6; +x_13 = lean::cnstr_get(x_2, 1); +lean::inc(x_13); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_14 = l_Lean_Parser_tokenFn(x_1, x_2); +x_15 = lean::cnstr_get(x_14, 3); +lean::inc(x_15); +if (lean::obj_tag(x_15) == 0) { -obj* x_9; obj* x_10; obj* x_11; -x_9 = l_Lean_Parser_identFn___rarg(x_1, x_7); -x_10 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__2; -x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); -return x_11; +obj* x_16; obj* x_17; +x_16 = lean::cnstr_get(x_14, 0); +lean::inc(x_16); +x_17 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_16); +lean::dec(x_16); +if (lean::obj_tag(x_17) == 2) +{ +obj* x_18; obj* x_19; uint8 x_20; +x_18 = lean::cnstr_get(x_17, 1); +lean::inc(x_18); +lean::dec(x_17); +x_19 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__4; +x_20 = lean::string_dec_eq(x_18, x_19); +lean::dec(x_18); +if (x_20 == 0) +{ +obj* x_21; obj* x_22; +x_21 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__7; +x_22 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_21, x_13); +x_5 = x_22; +goto block_12; } else { -obj* x_12; obj* x_13; -lean::dec(x_8); +lean::dec(x_13); +x_5 = x_14; +goto block_12; +} +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_17); +x_23 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_23, x_13); +x_5 = x_24; +goto block_12; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_15); +x_25 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_25, x_13); +x_5 = x_26; +goto block_12; +} +block_12: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; +x_7 = l_Lean_Parser_identFn___rarg(x_1, x_5); +x_8 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__2; +x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); +return x_9; +} +else +{ +obj* x_10; obj* x_11; +lean::dec(x_6); lean::dec(x_1); -x_12 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_7, x_12, x_4); -return x_13; +x_10 = l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_5, x_10, x_4); +return x_11; +} } } } @@ -10738,7 +13748,7 @@ obj* _init_l_Lean_Parser_Command_end___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -10754,82 +13764,150 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_end___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_end___elambda__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_3; obj* x_4; obj* x_5; obj* x_30; obj* x_31; obj* x_32; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__6; +x_30 = lean::cnstr_get(x_2, 1); +lean::inc(x_30); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_31 = l_Lean_Parser_tokenFn(x_1, x_2); +x_32 = lean::cnstr_get(x_31, 3); +lean::inc(x_32); +if (lean::obj_tag(x_32) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_7, 0); +obj* x_33; obj* x_34; +x_33 = lean::cnstr_get(x_31, 0); +lean::inc(x_33); +x_34 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_33); +lean::dec(x_33); +if (lean::obj_tag(x_34) == 2) +{ +obj* x_35; obj* x_36; uint8 x_37; +x_35 = lean::cnstr_get(x_34, 1); +lean::inc(x_35); +lean::dec(x_34); +x_36 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__4; +x_37 = lean::string_dec_eq(x_35, x_36); +lean::dec(x_35); +if (x_37 == 0) +{ +obj* x_38; obj* x_39; +x_38 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__7; +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_38, x_30); +x_5 = x_39; +goto block_29; +} +else +{ +lean::dec(x_30); +x_5 = x_31; +goto block_29; +} +} +else +{ +obj* x_40; obj* x_41; +lean::dec(x_34); +x_40 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__7; +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_40, x_30); +x_5 = x_41; +goto block_29; +} +} +else +{ +obj* x_42; obj* x_43; +lean::dec(x_32); +x_42 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__7; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_42, x_30); +x_5 = x_43; +goto block_29; +} +block_29: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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); +x_8 = lean::array_get_size(x_7); +lean::dec(x_7); +x_9 = lean::cnstr_get(x_5, 1); lean::inc(x_9); -x_10 = lean::array_get_size(x_9); -lean::dec(x_9); -x_11 = lean::cnstr_get(x_7, 1); +x_10 = l_Lean_Parser_identFn___rarg(x_1, x_5); +x_11 = lean::cnstr_get(x_10, 3); lean::inc(x_11); -x_12 = l_Lean_Parser_identFn___rarg(x_1, x_7); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +if (lean::obj_tag(x_11) == 0) { -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_11); -x_14 = l_Lean_nullKind; -x_15 = l_Lean_Parser_ParserState_mkNode(x_12, x_14, x_10); -x_16 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__2; -x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_4); -return x_17; +obj* x_12; obj* x_13; obj* x_14; obj* x_15; +lean::dec(x_9); +x_12 = l_Lean_nullKind; +x_13 = l_Lean_Parser_ParserState_mkNode(x_10, x_12, x_8); +x_14 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__2; +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_4); +return x_15; } else { -obj* x_18; uint8 x_19; -lean::dec(x_13); -x_18 = lean::cnstr_get(x_12, 1); -lean::inc(x_18); -x_19 = lean::nat_dec_eq(x_18, x_11); -lean::dec(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; +obj* x_16; uint8 x_17; lean::dec(x_11); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_12, x_20, x_10); -x_22 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_4); -return x_23; +x_16 = lean::cnstr_get(x_10, 1); +lean::inc(x_16); +x_17 = lean::nat_dec_eq(x_16, x_9); +lean::dec(x_16); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_9); +x_18 = l_Lean_nullKind; +x_19 = l_Lean_Parser_ParserState_mkNode(x_10, x_18, x_8); +x_20 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_4); +return x_21; } else { -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_24 = l_Lean_Parser_ParserState_restore(x_12, x_10, x_11); -x_25 = l_Lean_nullKind; -x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_10); +obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; +x_22 = l_Lean_Parser_ParserState_restore(x_10, x_8, x_9); +x_23 = l_Lean_nullKind; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_8); +x_25 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_6); +lean::dec(x_1); x_27 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); +x_28 = l_Lean_Parser_ParserState_mkNode(x_5, x_27, x_4); return x_28; } } } -else -{ -obj* x_29; obj* x_30; -lean::dec(x_8); -lean::dec(x_1); -x_29 = l_Lean_Parser_Command_end___elambda__1___rarg___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_7, x_29, x_4); -return x_30; -} -} } obj* l_Lean_Parser_Command_end___elambda__1(obj* x_1) { _start: @@ -10955,7 +14033,7 @@ obj* _init_l_Lean_Parser_Command_variable___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_variable___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -10971,10 +14049,22 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_variable___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_variable___elambda__1___closed__6; +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* l_Lean_Parser_Command_variable___elambda__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; +obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_16; obj* x_17; obj* x_18; x_4 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___spec__1___closed__1; x_5 = lean::cnstr_get(x_4, 1); lean::inc(x_5); @@ -10982,30 +14072,86 @@ x_6 = lean::cnstr_get(x_3, 0); lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); -x_8 = l_Lean_Parser_Command_variable___elambda__1___closed__4; -x_9 = l_Lean_Parser_Command_variable___elambda__1___closed__6; +x_16 = lean::cnstr_get(x_3, 1); +lean::inc(x_16); lean::inc(x_2); -x_10 = l_Lean_Parser_symbolFnAux(x_8, x_9, x_2, x_3); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +x_17 = l_Lean_Parser_tokenFn(x_2, x_3); +x_18 = lean::cnstr_get(x_17, 3); +lean::inc(x_18); +if (lean::obj_tag(x_18) == 0) { -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::apply_3(x_5, x_1, x_2, x_10); -x_13 = l_Lean_Parser_Command_variable___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_7); -return x_14; +obj* x_19; obj* x_20; +x_19 = lean::cnstr_get(x_17, 0); +lean::inc(x_19); +x_20 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_19); +lean::dec(x_19); +if (lean::obj_tag(x_20) == 2) +{ +obj* x_21; obj* x_22; uint8 x_23; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +lean::dec(x_20); +x_22 = l_Lean_Parser_Command_variable___elambda__1___closed__4; +x_23 = lean::string_dec_eq(x_21, x_22); +lean::dec(x_21); +if (x_23 == 0) +{ +obj* x_24; obj* x_25; +x_24 = l_Lean_Parser_Command_variable___elambda__1___closed__7; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_24, x_16); +x_8 = x_25; +goto block_15; } else { -obj* x_15; obj* x_16; -lean::dec(x_11); +lean::dec(x_16); +x_8 = x_17; +goto block_15; +} +} +else +{ +obj* x_26; obj* x_27; +lean::dec(x_20); +x_26 = l_Lean_Parser_Command_variable___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_26, x_16); +x_8 = x_27; +goto block_15; +} +} +else +{ +obj* x_28; obj* x_29; +lean::dec(x_18); +x_28 = l_Lean_Parser_Command_variable___elambda__1___closed__7; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_28, x_16); +x_8 = x_29; +goto block_15; +} +block_15: +{ +obj* x_9; +x_9 = lean::cnstr_get(x_8, 3); +lean::inc(x_9); +if (lean::obj_tag(x_9) == 0) +{ +obj* x_10; obj* x_11; obj* x_12; +x_10 = lean::apply_3(x_5, x_1, x_2, x_8); +x_11 = l_Lean_Parser_Command_variable___elambda__1___closed__2; +x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_7); +return x_12; +} +else +{ +obj* x_13; obj* x_14; +lean::dec(x_9); lean::dec(x_5); lean::dec(x_2); lean::dec(x_1); -x_15 = l_Lean_Parser_Command_variable___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_10, x_15, x_7); -return x_16; +x_13 = l_Lean_Parser_Command_variable___elambda__1___closed__2; +x_14 = l_Lean_Parser_ParserState_mkNode(x_8, x_13, x_7); +return x_14; +} } } } @@ -11118,7 +14264,7 @@ obj* _init_l_Lean_Parser_Command_variables___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_variables___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -11134,10 +14280,22 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_variables___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_variables___elambda__1___closed__6; +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* l_Lean_Parser_Command_variables___elambda__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; +obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_27; obj* x_28; obj* x_29; x_4 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___spec__1___closed__1; x_5 = lean::cnstr_get(x_4, 1); lean::inc(x_5); @@ -11145,61 +14303,117 @@ x_6 = lean::cnstr_get(x_3, 0); lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); -x_8 = l_Lean_Parser_Command_variables___elambda__1___closed__4; -x_9 = l_Lean_Parser_Command_variables___elambda__1___closed__6; +x_27 = lean::cnstr_get(x_3, 1); +lean::inc(x_27); lean::inc(x_2); -x_10 = l_Lean_Parser_symbolFnAux(x_8, x_9, x_2, x_3); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +x_28 = l_Lean_Parser_tokenFn(x_2, x_3); +x_29 = lean::cnstr_get(x_28, 3); +lean::inc(x_29); +if (lean::obj_tag(x_29) == 0) { -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -x_13 = lean::array_get_size(x_12); -lean::dec(x_12); +obj* x_30; obj* x_31; +x_30 = lean::cnstr_get(x_28, 0); +lean::inc(x_30); +x_31 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_30); +lean::dec(x_30); +if (lean::obj_tag(x_31) == 2) +{ +obj* x_32; obj* x_33; uint8 x_34; +x_32 = lean::cnstr_get(x_31, 1); +lean::inc(x_32); +lean::dec(x_31); +x_33 = l_Lean_Parser_Command_variables___elambda__1___closed__4; +x_34 = lean::string_dec_eq(x_32, x_33); +lean::dec(x_32); +if (x_34 == 0) +{ +obj* x_35; obj* x_36; +x_35 = l_Lean_Parser_Command_variables___elambda__1___closed__7; +x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_35, x_27); +x_8 = x_36; +goto block_26; +} +else +{ +lean::dec(x_27); +x_8 = x_28; +goto block_26; +} +} +else +{ +obj* x_37; obj* x_38; +lean::dec(x_31); +x_37 = l_Lean_Parser_Command_variables___elambda__1___closed__7; +x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_37, x_27); +x_8 = x_38; +goto block_26; +} +} +else +{ +obj* x_39; obj* x_40; +lean::dec(x_29); +x_39 = l_Lean_Parser_Command_variables___elambda__1___closed__7; +x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_39, x_27); +x_8 = x_40; +goto block_26; +} +block_26: +{ +obj* x_9; +x_9 = lean::cnstr_get(x_8, 3); +lean::inc(x_9); +if (lean::obj_tag(x_9) == 0) +{ +obj* x_10; obj* x_11; obj* x_12; obj* x_13; +x_10 = lean::cnstr_get(x_8, 0); +lean::inc(x_10); +x_11 = lean::array_get_size(x_10); +lean::dec(x_10); lean::inc(x_5); lean::inc(x_2); lean::inc(x_1); -x_14 = lean::apply_3(x_5, x_1, x_2, x_10); -x_15 = lean::cnstr_get(x_14, 3); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) +x_12 = lean::apply_3(x_5, x_1, x_2, x_8); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) { -uint8 x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = 0; -x_17 = l_Lean_Parser_manyAux___main(x_16, x_5, x_1, x_2, x_14); -x_18 = l_Lean_nullKind; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_13); -x_20 = l_Lean_Parser_Command_variables___elambda__1___closed__2; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_7); -return x_21; +uint8 x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; +x_14 = 0; +x_15 = l_Lean_Parser_manyAux___main(x_14, x_5, x_1, x_2, x_12); +x_16 = l_Lean_nullKind; +x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_11); +x_18 = l_Lean_Parser_Command_variables___elambda__1___closed__2; +x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_7); +return x_19; } else { -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_15); +obj* x_20; obj* x_21; obj* x_22; obj* x_23; +lean::dec(x_13); +lean::dec(x_5); +lean::dec(x_2); +lean::dec(x_1); +x_20 = l_Lean_nullKind; +x_21 = l_Lean_Parser_ParserState_mkNode(x_12, x_20, x_11); +x_22 = l_Lean_Parser_Command_variables___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_7); +return x_23; +} +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_9); lean::dec(x_5); lean::dec(x_2); lean::dec(x_1); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_14, x_22, x_13); x_24 = l_Lean_Parser_Command_variables___elambda__1___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_7); +x_25 = l_Lean_Parser_ParserState_mkNode(x_8, x_24, x_7); return x_25; } } -else -{ -obj* x_26; obj* x_27; -lean::dec(x_11); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_26 = l_Lean_Parser_Command_variables___elambda__1___closed__2; -x_27 = l_Lean_Parser_ParserState_mkNode(x_10, x_26, x_7); -return x_27; -} } } obj* _init_l_Lean_Parser_Command_variables___closed__1() { @@ -11311,7 +14525,7 @@ obj* _init_l_Lean_Parser_Command_universe___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -11327,36 +14541,104 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_universe___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_universe___elambda__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_3; obj* x_4; obj* x_5; obj* x_13; obj* x_14; obj* x_15; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__6; +x_13 = lean::cnstr_get(x_2, 1); +lean::inc(x_13); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_14 = l_Lean_Parser_tokenFn(x_1, x_2); +x_15 = lean::cnstr_get(x_14, 3); +lean::inc(x_15); +if (lean::obj_tag(x_15) == 0) { -obj* x_9; obj* x_10; obj* x_11; -x_9 = l_Lean_Parser_identFn___rarg(x_1, x_7); -x_10 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__2; -x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); -return x_11; +obj* x_16; obj* x_17; +x_16 = lean::cnstr_get(x_14, 0); +lean::inc(x_16); +x_17 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_16); +lean::dec(x_16); +if (lean::obj_tag(x_17) == 2) +{ +obj* x_18; obj* x_19; uint8 x_20; +x_18 = lean::cnstr_get(x_17, 1); +lean::inc(x_18); +lean::dec(x_17); +x_19 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__4; +x_20 = lean::string_dec_eq(x_18, x_19); +lean::dec(x_18); +if (x_20 == 0) +{ +obj* x_21; obj* x_22; +x_21 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__7; +x_22 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_21, x_13); +x_5 = x_22; +goto block_12; } else { -obj* x_12; obj* x_13; -lean::dec(x_8); +lean::dec(x_13); +x_5 = x_14; +goto block_12; +} +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_17); +x_23 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_23, x_13); +x_5 = x_24; +goto block_12; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_15); +x_25 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_25, x_13); +x_5 = x_26; +goto block_12; +} +block_12: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; +x_7 = l_Lean_Parser_identFn___rarg(x_1, x_5); +x_8 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__2; +x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); +return x_9; +} +else +{ +obj* x_10; obj* x_11; +lean::dec(x_6); lean::dec(x_1); -x_12 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_7, x_12, x_4); -return x_13; +x_10 = l_Lean_Parser_Command_universe___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_5, x_10, x_4); +return x_11; +} } } } @@ -11484,7 +14766,7 @@ obj* _init_l_Lean_Parser_Command_universes___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_universes___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -11500,63 +14782,131 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_universes___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_universes___elambda__1___closed__6; +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* l_Lean_Parser_Command_universes___elambda__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_4; obj* x_5; obj* x_6; obj* x_25; obj* x_26; obj* x_27; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_universes___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_universes___elambda__1___closed__6; +x_25 = lean::cnstr_get(x_3, 1); +lean::inc(x_25); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_26 = l_Lean_Parser_tokenFn(x_2, x_3); +x_27 = lean::cnstr_get(x_26, 3); +lean::inc(x_27); +if (lean::obj_tag(x_27) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::array_get_size(x_10); -lean::dec(x_10); -lean::inc(x_2); -x_12 = l_Lean_Parser_identFn___rarg(x_2, x_8); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_28; obj* x_29; +x_28 = lean::cnstr_get(x_26, 0); +lean::inc(x_28); +x_29 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_28); +lean::dec(x_28); +if (lean::obj_tag(x_29) == 2) { -uint8 x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = 0; -x_15 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_14, x_1, x_2, x_12); -x_16 = l_Lean_nullKind; -x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_11); -x_18 = l_Lean_Parser_Command_universes___elambda__1___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_5); -return x_19; +obj* x_30; obj* x_31; uint8 x_32; +x_30 = lean::cnstr_get(x_29, 1); +lean::inc(x_30); +lean::dec(x_29); +x_31 = l_Lean_Parser_Command_universes___elambda__1___closed__4; +x_32 = lean::string_dec_eq(x_30, x_31); +lean::dec(x_30); +if (x_32 == 0) +{ +obj* x_33; obj* x_34; +x_33 = l_Lean_Parser_Command_universes___elambda__1___closed__7; +x_34 = l_Lean_Parser_ParserState_mkErrorsAt(x_26, x_33, x_25); +x_6 = x_34; +goto block_24; } else { -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_13); +lean::dec(x_25); +x_6 = x_26; +goto block_24; +} +} +else +{ +obj* x_35; obj* x_36; +lean::dec(x_29); +x_35 = l_Lean_Parser_Command_universes___elambda__1___closed__7; +x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_26, x_35, x_25); +x_6 = x_36; +goto block_24; +} +} +else +{ +obj* x_37; obj* x_38; +lean::dec(x_27); +x_37 = l_Lean_Parser_Command_universes___elambda__1___closed__7; +x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_26, x_37, x_25); +x_6 = x_38; +goto block_24; +} +block_24: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; obj* x_10; obj* x_11; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = lean::array_get_size(x_8); +lean::dec(x_8); +lean::inc(x_2); +x_10 = l_Lean_Parser_identFn___rarg(x_2, x_6); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; +x_12 = 0; +x_13 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_12, x_1, x_2, x_10); +x_14 = l_Lean_nullKind; +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_9); +x_16 = l_Lean_Parser_Command_universes___elambda__1___closed__2; +x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_5); +return x_17; +} +else +{ +obj* x_18; obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_11); +lean::dec(x_2); +x_18 = l_Lean_nullKind; +x_19 = l_Lean_Parser_ParserState_mkNode(x_10, x_18, x_9); +x_20 = l_Lean_Parser_Command_universes___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_5); +return x_21; +} +} +else +{ +obj* x_22; obj* x_23; +lean::dec(x_7); lean::dec(x_2); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_12, x_20, x_11); x_22 = l_Lean_Parser_Command_universes___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +x_23 = l_Lean_Parser_ParserState_mkNode(x_6, x_22, x_5); return x_23; } } -else -{ -obj* x_24; obj* x_25; -lean::dec(x_9); -lean::dec(x_2); -x_24 = l_Lean_Parser_Command_universes___elambda__1___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_8, x_24, x_5); -return x_25; -} } } obj* _init_l_Lean_Parser_Command_universes___closed__1() { @@ -11675,7 +15025,7 @@ obj* _init_l_Lean_Parser_Command_check___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -11691,38 +15041,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_check___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Command_check___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Command_check___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -11842,7 +15260,7 @@ obj* _init_l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -11858,20 +15276,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Command_init__quot___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_init__quot___elambda__1(obj* x_1) { @@ -12006,8 +15490,8 @@ obj* _init_l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__4; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__5; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -12026,8 +15510,8 @@ obj* _init_l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__5; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -12046,8 +15530,8 @@ obj* _init_l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__11() _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__6; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -12062,211 +15546,279 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__13() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__12; +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* l_Lean_Parser_Command_set__option___elambda__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_3; obj* x_4; obj* x_5; obj* x_67; obj* x_68; obj* x_69; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__8; +x_67 = lean::cnstr_get(x_2, 1); +lean::inc(x_67); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); +x_68 = l_Lean_Parser_tokenFn(x_1, x_2); +x_69 = lean::cnstr_get(x_68, 3); +lean::inc(x_69); +if (lean::obj_tag(x_69) == 0) +{ +obj* x_70; obj* x_71; +x_70 = lean::cnstr_get(x_68, 0); +lean::inc(x_70); +x_71 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_70); +lean::dec(x_70); +if (lean::obj_tag(x_71) == 2) +{ +obj* x_72; obj* x_73; uint8 x_74; +x_72 = lean::cnstr_get(x_71, 1); +lean::inc(x_72); +lean::dec(x_71); +x_73 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__4; +x_74 = lean::string_dec_eq(x_72, x_73); +lean::dec(x_72); +if (x_74 == 0) +{ +obj* x_75; obj* x_76; +x_75 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__13; +x_76 = l_Lean_Parser_ParserState_mkErrorsAt(x_68, x_75, x_67); +x_5 = x_76; +goto block_66; +} +else +{ +lean::dec(x_67); +x_5 = x_68; +goto block_66; +} +} +else +{ +obj* x_77; obj* x_78; +lean::dec(x_71); +x_77 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__13; +x_78 = l_Lean_Parser_ParserState_mkErrorsAt(x_68, x_77, x_67); +x_5 = x_78; +goto block_66; +} +} +else +{ +obj* x_79; obj* x_80; +lean::dec(x_69); +x_79 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__13; +x_80 = l_Lean_Parser_ParserState_mkErrorsAt(x_68, x_79, x_67); +x_5 = x_80; +goto block_66; +} +block_66: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; +lean::inc(x_1); +x_7 = l_Lean_Parser_identFn___rarg(x_1, x_5); x_8 = lean::cnstr_get(x_7, 3); lean::inc(x_8); if (lean::obj_tag(x_8) == 0) { -obj* x_9; obj* x_10; -lean::inc(x_1); -x_9 = l_Lean_Parser_identFn___rarg(x_1, x_7); -x_10 = lean::cnstr_get(x_9, 3); -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; -x_11 = lean::cnstr_get(x_9, 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, 0); +lean::inc(x_9); +x_10 = lean::array_get_size(x_9); +lean::dec(x_9); +x_11 = lean::cnstr_get(x_7, 1); lean::inc(x_11); -x_12 = lean::array_get_size(x_11); +x_12 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__5; +x_13 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__8; +lean::inc(x_1); +x_14 = l_Lean_Parser_symbolOrIdentFnAux(x_12, x_13, x_1, x_7); +x_15 = lean::cnstr_get(x_14, 3); +lean::inc(x_15); +if (lean::obj_tag(x_15) == 0) +{ +obj* x_16; obj* x_17; lean::dec(x_11); -x_13 = lean::cnstr_get(x_9, 1); -lean::inc(x_13); -x_14 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__5; -x_15 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__10; +lean::dec(x_10); +lean::dec(x_1); +x_16 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; +x_17 = l_Lean_Parser_ParserState_mkNode(x_14, x_16, x_4); +return x_17; +} +else +{ +obj* x_18; obj* x_19; uint8 x_20; +x_18 = lean::cnstr_get(x_15, 0); +lean::inc(x_18); +lean::dec(x_15); +x_19 = lean::cnstr_get(x_14, 1); +lean::inc(x_19); +x_20 = lean::nat_dec_eq(x_19, x_11); +lean::dec(x_19); +if (x_20 == 0) +{ +obj* x_21; obj* x_22; +lean::dec(x_18); +lean::dec(x_11); +lean::dec(x_10); +lean::dec(x_1); +x_21 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_14, x_21, x_4); +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::inc(x_11); +x_23 = l_Lean_Parser_ParserState_restore(x_14, x_10, x_11); +lean::dec(x_10); +x_24 = lean::cnstr_get(x_23, 0); +lean::inc(x_24); +x_25 = lean::array_get_size(x_24); +lean::dec(x_24); +x_26 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__6; +x_27 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__10; lean::inc(x_1); -x_16 = l_Lean_Parser_symbolOrIdentFnAux(x_14, x_15, x_1, x_9); -x_17 = lean::cnstr_get(x_16, 3); -lean::inc(x_17); -if (lean::obj_tag(x_17) == 0) +x_28 = l_Lean_Parser_symbolOrIdentFnAux(x_26, x_27, x_1, x_23); +x_29 = lean::cnstr_get(x_28, 3); +lean::inc(x_29); +if (lean::obj_tag(x_29) == 0) { -obj* x_18; obj* x_19; -lean::dec(x_13); -lean::dec(x_12); +obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_25); lean::dec(x_1); -x_18 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_16, x_18, x_4); -return x_19; +x_30 = l_Lean_Parser_mergeOrElseErrors(x_28, x_18, x_11); +lean::dec(x_11); +x_31 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_4); +return x_32; } else { -obj* x_20; obj* x_21; uint8 x_22; -x_20 = lean::cnstr_get(x_17, 0); -lean::inc(x_20); -lean::dec(x_17); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -x_22 = lean::nat_dec_eq(x_21, x_13); -lean::dec(x_21); -if (x_22 == 0) +obj* x_33; obj* x_34; uint8 x_35; +x_33 = lean::cnstr_get(x_29, 0); +lean::inc(x_33); +lean::dec(x_29); +x_34 = lean::cnstr_get(x_28, 1); +lean::inc(x_34); +x_35 = lean::nat_dec_eq(x_34, x_11); +lean::dec(x_34); +if (x_35 == 0) { -obj* x_23; obj* x_24; -lean::dec(x_20); -lean::dec(x_13); -lean::dec(x_12); +obj* x_36; obj* x_37; obj* x_38; +lean::dec(x_33); +lean::dec(x_25); lean::dec(x_1); -x_23 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_16, x_23, x_4); -return x_24; +x_36 = l_Lean_Parser_mergeOrElseErrors(x_28, x_18, x_11); +lean::dec(x_11); +x_37 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; +x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_4); +return x_38; } else { -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -lean::inc(x_13); -x_25 = l_Lean_Parser_ParserState_restore(x_16, x_12, x_13); -lean::dec(x_12); -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -x_27 = lean::array_get_size(x_26); -lean::dec(x_26); -x_28 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__6; -x_29 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__12; +obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; +lean::inc(x_11); +x_39 = l_Lean_Parser_ParserState_restore(x_28, x_25, x_11); +lean::dec(x_25); +x_40 = lean::cnstr_get(x_39, 0); +lean::inc(x_40); +x_41 = lean::array_get_size(x_40); +lean::dec(x_40); lean::inc(x_1); -x_30 = l_Lean_Parser_symbolOrIdentFnAux(x_28, x_29, x_1, x_25); -x_31 = lean::cnstr_get(x_30, 3); -lean::inc(x_31); -if (lean::obj_tag(x_31) == 0) +x_42 = l_Lean_Parser_strLitFn___rarg(x_1, x_39); +x_43 = lean::cnstr_get(x_42, 3); +lean::inc(x_43); +if (lean::obj_tag(x_43) == 0) { -obj* x_32; obj* x_33; obj* x_34; -lean::dec(x_27); +obj* x_44; obj* x_45; obj* x_46; obj* x_47; +lean::dec(x_41); lean::dec(x_1); -x_32 = l_Lean_Parser_mergeOrElseErrors(x_30, x_20, x_13); -lean::dec(x_13); -x_33 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_4); -return x_34; +x_44 = l_Lean_Parser_mergeOrElseErrors(x_42, x_33, x_11); +x_45 = l_Lean_Parser_mergeOrElseErrors(x_44, x_18, x_11); +lean::dec(x_11); +x_46 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_4); +return x_47; } else { -obj* x_35; obj* x_36; uint8 x_37; -x_35 = lean::cnstr_get(x_31, 0); -lean::inc(x_35); -lean::dec(x_31); -x_36 = lean::cnstr_get(x_30, 1); -lean::inc(x_36); -x_37 = lean::nat_dec_eq(x_36, x_13); -lean::dec(x_36); -if (x_37 == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_35); -lean::dec(x_27); -lean::dec(x_1); -x_38 = l_Lean_Parser_mergeOrElseErrors(x_30, x_20, x_13); -lean::dec(x_13); -x_39 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_4); -return x_40; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -lean::inc(x_13); -x_41 = l_Lean_Parser_ParserState_restore(x_30, x_27, x_13); -lean::dec(x_27); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::array_get_size(x_42); -lean::dec(x_42); -lean::inc(x_1); -x_44 = l_Lean_Parser_strLitFn___rarg(x_1, x_41); -x_45 = lean::cnstr_get(x_44, 3); -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_48; obj* x_49; uint8 x_50; +x_48 = lean::cnstr_get(x_43, 0); +lean::inc(x_48); lean::dec(x_43); +x_49 = lean::cnstr_get(x_42, 1); +lean::inc(x_49); +x_50 = lean::nat_dec_eq(x_49, x_11); +lean::dec(x_49); +if (x_50 == 0) +{ +obj* x_51; obj* x_52; obj* x_53; obj* x_54; +lean::dec(x_48); +lean::dec(x_41); lean::dec(x_1); -x_46 = l_Lean_Parser_mergeOrElseErrors(x_44, x_35, x_13); -x_47 = l_Lean_Parser_mergeOrElseErrors(x_46, x_20, x_13); -lean::dec(x_13); -x_48 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_49 = l_Lean_Parser_ParserState_mkNode(x_47, x_48, x_4); -return x_49; +x_51 = l_Lean_Parser_mergeOrElseErrors(x_42, x_33, x_11); +x_52 = l_Lean_Parser_mergeOrElseErrors(x_51, x_18, x_11); +lean::dec(x_11); +x_53 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; +x_54 = l_Lean_Parser_ParserState_mkNode(x_52, x_53, x_4); +return x_54; } else { -obj* x_50; obj* x_51; uint8 x_52; -x_50 = lean::cnstr_get(x_45, 0); -lean::inc(x_50); -lean::dec(x_45); -x_51 = lean::cnstr_get(x_44, 1); -lean::inc(x_51); -x_52 = lean::nat_dec_eq(x_51, x_13); -lean::dec(x_51); -if (x_52 == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; -lean::dec(x_50); -lean::dec(x_43); -lean::dec(x_1); -x_53 = l_Lean_Parser_mergeOrElseErrors(x_44, x_35, x_13); -x_54 = l_Lean_Parser_mergeOrElseErrors(x_53, x_20, x_13); -lean::dec(x_13); -x_55 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_56 = l_Lean_Parser_ParserState_mkNode(x_54, x_55, x_4); -return x_56; +obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; +lean::inc(x_11); +x_55 = l_Lean_Parser_ParserState_restore(x_42, x_41, x_11); +lean::dec(x_41); +x_56 = l_Lean_Parser_numLitFn___rarg(x_1, x_55); +x_57 = l_Lean_Parser_mergeOrElseErrors(x_56, x_48, x_11); +x_58 = l_Lean_Parser_mergeOrElseErrors(x_57, x_33, x_11); +x_59 = l_Lean_Parser_mergeOrElseErrors(x_58, x_18, x_11); +lean::dec(x_11); +x_60 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; +x_61 = l_Lean_Parser_ParserState_mkNode(x_59, x_60, x_4); +return x_61; +} +} +} +} +} +} } else { -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -lean::inc(x_13); -x_57 = l_Lean_Parser_ParserState_restore(x_44, x_43, x_13); -lean::dec(x_43); -x_58 = l_Lean_Parser_numLitFn___rarg(x_1, x_57); -x_59 = l_Lean_Parser_mergeOrElseErrors(x_58, x_50, x_13); -x_60 = l_Lean_Parser_mergeOrElseErrors(x_59, x_35, x_13); -x_61 = l_Lean_Parser_mergeOrElseErrors(x_60, x_20, x_13); -lean::dec(x_13); +obj* x_62; obj* x_63; +lean::dec(x_8); +lean::dec(x_1); x_62 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_63 = l_Lean_Parser_ParserState_mkNode(x_61, x_62, x_4); +x_63 = l_Lean_Parser_ParserState_mkNode(x_7, x_62, x_4); return x_63; } } -} -} -} -} -} else { obj* x_64; obj* x_65; -lean::dec(x_10); +lean::dec(x_6); lean::dec(x_1); x_64 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_65 = l_Lean_Parser_ParserState_mkNode(x_9, x_64, x_4); +x_65 = l_Lean_Parser_ParserState_mkNode(x_5, x_64, x_4); return x_65; } } -else -{ -obj* x_66; obj* x_67; -lean::dec(x_8); -lean::dec(x_1); -x_66 = l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__2; -x_67 = l_Lean_Parser_ParserState_mkNode(x_7, x_66, x_4); -return x_67; -} } } obj* l_Lean_Parser_Command_set__option___elambda__1(obj* x_1) { @@ -12458,7 +16010,7 @@ obj* _init_l_Lean_Parser_Command_attribute___elambda__1___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_attribute___elambda__1___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -12478,9 +16030,11 @@ obj* _init_l_Lean_Parser_Command_attribute___elambda__1___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Command_attribute___elambda__1___closed__4; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_attribute___elambda__1___closed__8; +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; } } @@ -12488,68 +16042,101 @@ obj* _init_l_Lean_Parser_Command_attribute___elambda__1___closed__10() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Command_attribute___elambda__1___closed__9; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Command_attribute___elambda__1___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Command_attribute___elambda__1___closed__11() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Command_attribute___elambda__1___closed__10; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_attribute___elambda__1___closed__12() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_attribute___elambda__1___closed__11; +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* l_Lean_Parser_Command_attribute___elambda__1(obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_4; obj* x_5; obj* x_6; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; +obj* x_4; obj* x_5; obj* x_6; obj* x_25; obj* x_50; obj* x_69; obj* x_88; obj* x_89; obj* x_101; obj* x_102; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_48 = lean::cnstr_get(x_3, 1); -lean::inc(x_48); -x_49 = l_Lean_Parser_Command_attribute___elambda__1___closed__4; -x_50 = l_Lean_Parser_Command_attribute___elambda__1___closed__10; +x_88 = lean::cnstr_get(x_3, 1); +lean::inc(x_88); lean::inc(x_2); -x_51 = l_Lean_Parser_symbolFnAux(x_49, x_50, x_2, x_3); -x_52 = lean::cnstr_get(x_51, 3); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) +x_101 = l_Lean_Parser_tokenFn(x_2, x_3); +x_102 = lean::cnstr_get(x_101, 3); +lean::inc(x_102); +if (lean::obj_tag(x_102) == 0) { -obj* x_53; obj* x_54; -lean::dec(x_48); -x_53 = l_Lean_nullKind; -lean::inc(x_5); -x_54 = l_Lean_Parser_ParserState_mkNode(x_51, x_53, x_5); -x_6 = x_54; -goto block_47; +obj* x_103; obj* x_104; +x_103 = lean::cnstr_get(x_101, 0); +lean::inc(x_103); +x_104 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_103); +lean::dec(x_103); +if (lean::obj_tag(x_104) == 2) +{ +obj* x_105; obj* x_106; uint8 x_107; +x_105 = lean::cnstr_get(x_104, 1); +lean::inc(x_105); +lean::dec(x_104); +x_106 = l_Lean_Parser_Command_attribute___elambda__1___closed__4; +x_107 = lean::string_dec_eq(x_105, x_106); +lean::dec(x_105); +if (x_107 == 0) +{ +obj* x_108; obj* x_109; +x_108 = l_Lean_Parser_Command_attribute___elambda__1___closed__12; +lean::inc(x_88); +x_109 = l_Lean_Parser_ParserState_mkErrorsAt(x_101, x_108, x_88); +x_89 = x_109; +goto block_100; } else { -obj* x_55; uint8 x_56; -lean::dec(x_52); -x_55 = lean::cnstr_get(x_51, 1); -lean::inc(x_55); -x_56 = lean::nat_dec_eq(x_55, x_48); -lean::dec(x_55); -if (x_56 == 0) -{ -obj* x_57; obj* x_58; -lean::dec(x_48); -x_57 = l_Lean_nullKind; -lean::inc(x_5); -x_58 = l_Lean_Parser_ParserState_mkNode(x_51, x_57, x_5); -x_6 = x_58; -goto block_47; +x_89 = x_101; +goto block_100; +} } else { -obj* x_59; obj* x_60; obj* x_61; -x_59 = l_Lean_Parser_ParserState_restore(x_51, x_5, x_48); -x_60 = l_Lean_nullKind; -lean::inc(x_5); -x_61 = l_Lean_Parser_ParserState_mkNode(x_59, x_60, x_5); -x_6 = x_61; -goto block_47; +obj* x_110; obj* x_111; +lean::dec(x_104); +x_110 = l_Lean_Parser_Command_attribute___elambda__1___closed__12; +lean::inc(x_88); +x_111 = l_Lean_Parser_ParserState_mkErrorsAt(x_101, x_110, x_88); +x_89 = x_111; +goto block_100; } } -block_47: +else +{ +obj* x_112; obj* x_113; +lean::dec(x_102); +x_112 = l_Lean_Parser_Command_attribute___elambda__1___closed__12; +lean::inc(x_88); +x_113 = l_Lean_Parser_ParserState_mkErrorsAt(x_101, x_112, x_88); +x_89 = x_113; +goto block_100; +} +block_24: { obj* x_7; x_7 = lean::cnstr_get(x_6, 3); @@ -12557,122 +16144,336 @@ lean::inc(x_7); if (lean::obj_tag(x_7) == 0) { obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = l_Lean_Parser_Command_attribute___elambda__1___closed__6; -x_9 = l_Lean_Parser_Command_attribute___elambda__1___closed__8; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = lean::array_get_size(x_8); +lean::dec(x_8); lean::inc(x_2); -x_10 = l_Lean_Parser_symbolFnAux(x_8, x_9, x_2, x_6); +x_10 = l_Lean_Parser_identFn___rarg(x_2, x_6); x_11 = lean::cnstr_get(x_10, 3); 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 = l_Lean_Parser_Term_list___elambda__1___closed__3; -x_13 = l_Lean_Parser_Term_list___elambda__1___closed__6; -lean::inc(x_2); -x_14 = l_Lean_Parser_symbolFnAux(x_12, x_13, x_2, x_10); -x_15 = lean::cnstr_get(x_14, 3); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_16; uint8 x_17; obj* x_18; obj* x_19; -x_16 = 0; -x_17 = 0; -lean::inc(x_2); -x_18 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_16, x_17, x_1, x_2, x_14); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_21 = l_Lean_Parser_Term_list___elambda__1___closed__8; -lean::inc(x_2); -x_22 = l_Lean_Parser_symbolFnAux(x_20, x_21, x_2, x_18); -x_23 = lean::cnstr_get(x_22, 3); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_24 = lean::cnstr_get(x_22, 0); -lean::inc(x_24); -x_25 = lean::array_get_size(x_24); -lean::dec(x_24); -lean::inc(x_2); -x_26 = l_Lean_Parser_identFn___rarg(x_2, x_22); -x_27 = lean::cnstr_get(x_26, 3); -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; -x_28 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_16, x_1, x_2, x_26); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_25); -x_31 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_5); -return x_32; +uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; +x_12 = 0; +x_13 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_12, x_1, x_2, x_10); +x_14 = l_Lean_nullKind; +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_9); +x_16 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; +x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_5); +return x_17; } else { -obj* x_33; obj* x_34; obj* x_35; obj* x_36; -lean::dec(x_27); +obj* x_18; obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_11); lean::dec(x_2); -x_33 = l_Lean_nullKind; -x_34 = l_Lean_Parser_ParserState_mkNode(x_26, x_33, x_25); -x_35 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; -x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_5); -return x_36; +x_18 = l_Lean_nullKind; +x_19 = l_Lean_Parser_ParserState_mkNode(x_10, x_18, x_9); +x_20 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_5); +return x_21; } } else { -obj* x_37; obj* x_38; -lean::dec(x_23); +obj* x_22; obj* x_23; +lean::dec(x_7); lean::dec(x_2); -x_37 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; -x_38 = l_Lean_Parser_ParserState_mkNode(x_22, x_37, x_5); -return x_38; +x_22 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_6, x_22, x_5); +return x_23; } } -else +block_49: +{ +obj* x_26; +x_26 = lean::cnstr_get(x_25, 3); +lean::inc(x_26); +if (lean::obj_tag(x_26) == 0) +{ +uint8 x_27; uint8 x_28; obj* x_29; obj* x_30; +x_27 = 0; +x_28 = 0; +lean::inc(x_2); +x_29 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_27, x_28, x_1, x_2, x_25); +x_30 = lean::cnstr_get(x_29, 3); +lean::inc(x_30); +if (lean::obj_tag(x_30) == 0) +{ +obj* x_31; obj* x_32; obj* x_33; +x_31 = lean::cnstr_get(x_29, 1); +lean::inc(x_31); +lean::inc(x_2); +x_32 = l_Lean_Parser_tokenFn(x_2, x_29); +x_33 = lean::cnstr_get(x_32, 3); +lean::inc(x_33); +if (lean::obj_tag(x_33) == 0) +{ +obj* x_34; obj* x_35; +x_34 = lean::cnstr_get(x_32, 0); +lean::inc(x_34); +x_35 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_34); +lean::dec(x_34); +if (lean::obj_tag(x_35) == 2) +{ +obj* x_36; obj* x_37; uint8 x_38; +x_36 = lean::cnstr_get(x_35, 1); +lean::inc(x_36); +lean::dec(x_35); +x_37 = l_Lean_Parser_Term_list___elambda__1___closed__4; +x_38 = lean::string_dec_eq(x_36, x_37); +lean::dec(x_36); +if (x_38 == 0) { obj* x_39; obj* x_40; -lean::dec(x_19); -lean::dec(x_2); -x_39 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; -x_40 = l_Lean_Parser_ParserState_mkNode(x_18, x_39, x_5); -return x_40; +x_39 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_32, x_39, x_31); +x_6 = x_40; +goto block_24; +} +else +{ +lean::dec(x_31); +x_6 = x_32; +goto block_24; } } else { obj* x_41; obj* x_42; -lean::dec(x_15); -lean::dec(x_2); -x_41 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; -x_42 = l_Lean_Parser_ParserState_mkNode(x_14, x_41, x_5); -return x_42; +lean::dec(x_35); +x_41 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_42 = l_Lean_Parser_ParserState_mkErrorsAt(x_32, x_41, x_31); +x_6 = x_42; +goto block_24; } } else { obj* x_43; obj* x_44; -lean::dec(x_11); -lean::dec(x_2); -x_43 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; -x_44 = l_Lean_Parser_ParserState_mkNode(x_10, x_43, x_5); -return x_44; +lean::dec(x_33); +x_43 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_44 = l_Lean_Parser_ParserState_mkErrorsAt(x_32, x_43, x_31); +x_6 = x_44; +goto block_24; } } else { obj* x_45; obj* x_46; -lean::dec(x_7); +lean::dec(x_30); lean::dec(x_2); x_45 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; -x_46 = l_Lean_Parser_ParserState_mkNode(x_6, x_45, x_5); +x_46 = l_Lean_Parser_ParserState_mkNode(x_29, x_45, x_5); return x_46; } } +else +{ +obj* x_47; obj* x_48; +lean::dec(x_26); +lean::dec(x_2); +x_47 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; +x_48 = l_Lean_Parser_ParserState_mkNode(x_25, x_47, x_5); +return x_48; +} +} +block_68: +{ +obj* x_51; +x_51 = lean::cnstr_get(x_50, 3); +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_50, 1); +lean::inc(x_52); +lean::inc(x_2); +x_53 = l_Lean_Parser_tokenFn(x_2, x_50); +x_54 = lean::cnstr_get(x_53, 3); +lean::inc(x_54); +if (lean::obj_tag(x_54) == 0) +{ +obj* x_55; obj* x_56; +x_55 = lean::cnstr_get(x_53, 0); +lean::inc(x_55); +x_56 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_55); +lean::dec(x_55); +if (lean::obj_tag(x_56) == 2) +{ +obj* x_57; obj* x_58; uint8 x_59; +x_57 = lean::cnstr_get(x_56, 1); +lean::inc(x_57); +lean::dec(x_56); +x_58 = l_Lean_Parser_Term_list___elambda__1___closed__3; +x_59 = lean::string_dec_eq(x_57, x_58); +lean::dec(x_57); +if (x_59 == 0) +{ +obj* x_60; obj* x_61; +x_60 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_61 = l_Lean_Parser_ParserState_mkErrorsAt(x_53, x_60, x_52); +x_25 = x_61; +goto block_49; +} +else +{ +lean::dec(x_52); +x_25 = x_53; +goto block_49; +} +} +else +{ +obj* x_62; obj* x_63; +lean::dec(x_56); +x_62 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_63 = l_Lean_Parser_ParserState_mkErrorsAt(x_53, x_62, x_52); +x_25 = x_63; +goto block_49; +} +} +else +{ +obj* x_64; obj* x_65; +lean::dec(x_54); +x_64 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_65 = l_Lean_Parser_ParserState_mkErrorsAt(x_53, x_64, x_52); +x_25 = x_65; +goto block_49; +} +} +else +{ +obj* x_66; obj* x_67; +lean::dec(x_51); +lean::dec(x_2); +x_66 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; +x_67 = l_Lean_Parser_ParserState_mkNode(x_50, x_66, x_5); +return x_67; +} +} +block_87: +{ +obj* x_70; +x_70 = lean::cnstr_get(x_69, 3); +lean::inc(x_70); +if (lean::obj_tag(x_70) == 0) +{ +obj* x_71; obj* x_72; obj* x_73; +x_71 = lean::cnstr_get(x_69, 1); +lean::inc(x_71); +lean::inc(x_2); +x_72 = l_Lean_Parser_tokenFn(x_2, x_69); +x_73 = lean::cnstr_get(x_72, 3); +lean::inc(x_73); +if (lean::obj_tag(x_73) == 0) +{ +obj* x_74; obj* x_75; +x_74 = lean::cnstr_get(x_72, 0); +lean::inc(x_74); +x_75 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_74); +lean::dec(x_74); +if (lean::obj_tag(x_75) == 2) +{ +obj* x_76; obj* x_77; uint8 x_78; +x_76 = lean::cnstr_get(x_75, 1); +lean::inc(x_76); +lean::dec(x_75); +x_77 = l_Lean_Parser_Command_attribute___elambda__1___closed__6; +x_78 = lean::string_dec_eq(x_76, x_77); +lean::dec(x_76); +if (x_78 == 0) +{ +obj* x_79; obj* x_80; +x_79 = l_Lean_Parser_Command_attribute___elambda__1___closed__9; +x_80 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_79, x_71); +x_50 = x_80; +goto block_68; +} +else +{ +lean::dec(x_71); +x_50 = x_72; +goto block_68; +} +} +else +{ +obj* x_81; obj* x_82; +lean::dec(x_75); +x_81 = l_Lean_Parser_Command_attribute___elambda__1___closed__9; +x_82 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_81, x_71); +x_50 = x_82; +goto block_68; +} +} +else +{ +obj* x_83; obj* x_84; +lean::dec(x_73); +x_83 = l_Lean_Parser_Command_attribute___elambda__1___closed__9; +x_84 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_83, x_71); +x_50 = x_84; +goto block_68; +} +} +else +{ +obj* x_85; obj* x_86; +lean::dec(x_70); +lean::dec(x_2); +x_85 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; +x_86 = l_Lean_Parser_ParserState_mkNode(x_69, x_85, x_5); +return x_86; +} +} +block_100: +{ +obj* x_90; +x_90 = lean::cnstr_get(x_89, 3); +lean::inc(x_90); +if (lean::obj_tag(x_90) == 0) +{ +obj* x_91; obj* x_92; +lean::dec(x_88); +x_91 = l_Lean_nullKind; +lean::inc(x_5); +x_92 = l_Lean_Parser_ParserState_mkNode(x_89, x_91, x_5); +x_69 = x_92; +goto block_87; +} +else +{ +obj* x_93; uint8 x_94; +lean::dec(x_90); +x_93 = lean::cnstr_get(x_89, 1); +lean::inc(x_93); +x_94 = lean::nat_dec_eq(x_93, x_88); +lean::dec(x_93); +if (x_94 == 0) +{ +obj* x_95; obj* x_96; +lean::dec(x_88); +x_95 = l_Lean_nullKind; +lean::inc(x_5); +x_96 = l_Lean_Parser_ParserState_mkNode(x_89, x_95, x_5); +x_69 = x_96; +goto block_87; +} +else +{ +obj* x_97; obj* x_98; obj* x_99; +x_97 = l_Lean_Parser_ParserState_restore(x_89, x_5, x_88); +x_98 = l_Lean_nullKind; +lean::inc(x_5); +x_99 = l_Lean_Parser_ParserState_mkNode(x_97, x_98, x_5); +x_69 = x_99; +goto block_87; +} +} +} } } obj* _init_l_Lean_Parser_Command_attribute___closed__1() { @@ -12850,7 +16651,7 @@ obj* _init_l_Lean_Parser_Command_export___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_export___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -12866,134 +16667,299 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_export___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_export___elambda__1___closed__6; +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* l_Lean_Parser_Command_export___elambda__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_4; obj* x_5; obj* x_6; obj* x_33; obj* x_48; obj* x_71; obj* x_72; obj* x_73; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_export___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_export___elambda__1___closed__6; +x_71 = lean::cnstr_get(x_3, 1); +lean::inc(x_71); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_72 = l_Lean_Parser_tokenFn(x_2, x_3); +x_73 = lean::cnstr_get(x_72, 3); +lean::inc(x_73); +if (lean::obj_tag(x_73) == 0) { -obj* x_10; obj* x_11; -lean::inc(x_2); -x_10 = l_Lean_Parser_identFn___rarg(x_2, x_8); -x_11 = lean::cnstr_get(x_10, 3); +obj* x_74; obj* x_75; +x_74 = lean::cnstr_get(x_72, 0); +lean::inc(x_74); +x_75 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_74); +lean::dec(x_74); +if (lean::obj_tag(x_75) == 2) +{ +obj* x_76; obj* x_77; uint8 x_78; +x_76 = lean::cnstr_get(x_75, 1); +lean::inc(x_76); +lean::dec(x_75); +x_77 = l_Lean_Parser_Command_export___elambda__1___closed__4; +x_78 = lean::string_dec_eq(x_76, x_77); +lean::dec(x_76); +if (x_78 == 0) +{ +obj* x_79; obj* x_80; +x_79 = l_Lean_Parser_Command_export___elambda__1___closed__7; +x_80 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_79, x_71); +x_48 = x_80; +goto block_70; +} +else +{ +lean::dec(x_71); +x_48 = x_72; +goto block_70; +} +} +else +{ +obj* x_81; obj* x_82; +lean::dec(x_75); +x_81 = l_Lean_Parser_Command_export___elambda__1___closed__7; +x_82 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_81, x_71); +x_48 = x_82; +goto block_70; +} +} +else +{ +obj* x_83; obj* x_84; +lean::dec(x_73); +x_83 = l_Lean_Parser_Command_export___elambda__1___closed__7; +x_84 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_83, x_71); +x_48 = x_84; +goto block_70; +} +block_32: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +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, 1); +lean::inc(x_8); +x_9 = l_Lean_Parser_tokenFn(x_2, x_6); +x_10 = lean::cnstr_get(x_9, 3); +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); -if (lean::obj_tag(x_11) == 0) +x_12 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_11); +lean::dec(x_11); +if (lean::obj_tag(x_12) == 2) { -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_13 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; -lean::inc(x_2); -x_14 = l_Lean_Parser_symbolFnAux(x_12, x_13, x_2, x_10); -x_15 = lean::cnstr_get(x_14, 3); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) +obj* x_13; obj* x_14; uint8 x_15; +x_13 = lean::cnstr_get(x_12, 1); +lean::inc(x_13); +lean::dec(x_12); +x_14 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_15 = lean::string_dec_eq(x_13, x_14); +lean::dec(x_13); +if (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); -x_17 = lean::array_get_size(x_16); -lean::dec(x_16); -lean::inc(x_2); -x_18 = l_Lean_Parser_identFn___rarg(x_2, x_14); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) +x_16 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_17 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_16, x_8); +x_18 = l_Lean_Parser_Command_export___elambda__1___closed__2; +x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_5); +return x_19; +} +else { -uint8 x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_20 = 0; -lean::inc(x_2); -x_21 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_20, x_1, x_2, x_18); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_17); -x_24 = lean::cnstr_get(x_23, 3); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) +obj* x_20; obj* x_21; +lean::dec(x_8); +x_20 = l_Lean_Parser_Command_export___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_9, x_20, x_5); +return x_21; +} +} +else { -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_26 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_27 = l_Lean_Parser_symbolFnAux(x_25, x_26, x_2, x_23); +obj* x_22; obj* x_23; obj* x_24; obj* x_25; +lean::dec(x_12); +x_22 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_23 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_22, x_8); +x_24 = l_Lean_Parser_Command_export___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_5); +return x_25; +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_10); +x_26 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_26, x_8); x_28 = l_Lean_Parser_Command_export___elambda__1___closed__2; x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); return x_29; } +} else { obj* x_30; obj* x_31; -lean::dec(x_24); +lean::dec(x_7); lean::dec(x_2); x_30 = l_Lean_Parser_Command_export___elambda__1___closed__2; -x_31 = l_Lean_Parser_ParserState_mkNode(x_23, x_30, x_5); +x_31 = l_Lean_Parser_ParserState_mkNode(x_6, x_30, x_5); return x_31; } } -else +block_47: { -obj* x_32; obj* x_33; obj* x_34; -lean::dec(x_19); -x_32 = l_Lean_nullKind; -x_33 = l_Lean_Parser_ParserState_mkNode(x_18, x_32, x_17); +obj* x_34; x_34 = lean::cnstr_get(x_33, 3); 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 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_36 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_37 = l_Lean_Parser_symbolFnAux(x_35, x_36, x_2, x_33); -x_38 = l_Lean_Parser_Command_export___elambda__1___closed__2; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_5); -return x_39; +obj* x_35; obj* x_36; obj* x_37; obj* x_38; +x_35 = lean::cnstr_get(x_33, 0); +lean::inc(x_35); +x_36 = lean::array_get_size(x_35); +lean::dec(x_35); +lean::inc(x_2); +x_37 = l_Lean_Parser_identFn___rarg(x_2, x_33); +x_38 = lean::cnstr_get(x_37, 3); +lean::inc(x_38); +if (lean::obj_tag(x_38) == 0) +{ +uint8 x_39; obj* x_40; obj* x_41; obj* x_42; +x_39 = 0; +lean::inc(x_2); +x_40 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_39, x_1, x_2, x_37); +x_41 = l_Lean_nullKind; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_36); +x_6 = x_42; +goto block_32; } else { -obj* x_40; obj* x_41; +obj* x_43; obj* x_44; +lean::dec(x_38); +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_37, x_43, x_36); +x_6 = x_44; +goto block_32; +} +} +else +{ +obj* x_45; obj* x_46; lean::dec(x_34); lean::dec(x_2); -x_40 = l_Lean_Parser_Command_export___elambda__1___closed__2; -x_41 = l_Lean_Parser_ParserState_mkNode(x_33, x_40, x_5); -return x_41; +x_45 = l_Lean_Parser_Command_export___elambda__1___closed__2; +x_46 = l_Lean_Parser_ParserState_mkNode(x_33, x_45, x_5); +return x_46; } } +block_70: +{ +obj* x_49; +x_49 = lean::cnstr_get(x_48, 3); +lean::inc(x_49); +if (lean::obj_tag(x_49) == 0) +{ +obj* x_50; obj* x_51; +lean::inc(x_2); +x_50 = l_Lean_Parser_identFn___rarg(x_2, x_48); +x_51 = lean::cnstr_get(x_50, 3); +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_50, 1); +lean::inc(x_52); +lean::inc(x_2); +x_53 = l_Lean_Parser_tokenFn(x_2, x_50); +x_54 = lean::cnstr_get(x_53, 3); +lean::inc(x_54); +if (lean::obj_tag(x_54) == 0) +{ +obj* x_55; obj* x_56; +x_55 = lean::cnstr_get(x_53, 0); +lean::inc(x_55); +x_56 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_55); +lean::dec(x_55); +if (lean::obj_tag(x_56) == 2) +{ +obj* x_57; obj* x_58; uint8 x_59; +x_57 = lean::cnstr_get(x_56, 1); +lean::inc(x_57); +lean::dec(x_56); +x_58 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_59 = lean::string_dec_eq(x_57, x_58); +lean::dec(x_57); +if (x_59 == 0) +{ +obj* x_60; obj* x_61; +x_60 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_61 = l_Lean_Parser_ParserState_mkErrorsAt(x_53, x_60, x_52); +x_33 = x_61; +goto block_47; +} +else +{ +lean::dec(x_52); +x_33 = x_53; +goto block_47; +} } else { -obj* x_42; obj* x_43; -lean::dec(x_15); -lean::dec(x_2); -x_42 = l_Lean_Parser_Command_export___elambda__1___closed__2; -x_43 = l_Lean_Parser_ParserState_mkNode(x_14, x_42, x_5); -return x_43; +obj* x_62; obj* x_63; +lean::dec(x_56); +x_62 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_63 = l_Lean_Parser_ParserState_mkErrorsAt(x_53, x_62, x_52); +x_33 = x_63; +goto block_47; } } else { -obj* x_44; obj* x_45; -lean::dec(x_11); -lean::dec(x_2); -x_44 = l_Lean_Parser_Command_export___elambda__1___closed__2; -x_45 = l_Lean_Parser_ParserState_mkNode(x_10, x_44, x_5); -return x_45; +obj* x_64; obj* x_65; +lean::dec(x_54); +x_64 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_65 = l_Lean_Parser_ParserState_mkErrorsAt(x_53, x_64, x_52); +x_33 = x_65; +goto block_47; } } else { -obj* x_46; obj* x_47; -lean::dec(x_9); +obj* x_66; obj* x_67; +lean::dec(x_51); lean::dec(x_2); -x_46 = l_Lean_Parser_Command_export___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_8, x_46, x_5); -return x_47; +x_66 = l_Lean_Parser_Command_export___elambda__1___closed__2; +x_67 = l_Lean_Parser_ParserState_mkNode(x_50, x_66, x_5); +return x_67; +} +} +else +{ +obj* x_68; obj* x_69; +lean::dec(x_49); +lean::dec(x_2); +x_68 = l_Lean_Parser_Command_export___elambda__1___closed__2; +x_69 = l_Lean_Parser_ParserState_mkNode(x_48, x_68, x_5); +return x_69; +} } } } @@ -13125,179 +17091,274 @@ return x_3; obj* l_Lean_Parser_Command_openOnly___elambda__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_4; obj* x_5; obj* x_6; obj* x_7; obj* x_43; obj* x_67; obj* x_68; 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::array_get_size(x_4); lean::dec(x_4); -x_7 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_8 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; lean::inc(x_2); -x_9 = l_Lean_Parser_symbolFnAux(x_7, x_8, x_2, x_3); -x_10 = lean::cnstr_get(x_9, 3); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) +x_67 = l_Lean_Parser_tokenFn(x_2, x_3); +x_68 = lean::cnstr_get(x_67, 3); +lean::inc(x_68); +if (lean::obj_tag(x_68) == 0) { -obj* x_11; obj* x_12; -lean::inc(x_2); -x_11 = l_Lean_Parser_identFn___rarg(x_2, x_9); -x_12 = lean::cnstr_get(x_11, 3); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) +obj* x_69; obj* x_70; +x_69 = lean::cnstr_get(x_67, 0); +lean::inc(x_69); +x_70 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_69); +lean::dec(x_69); +if (lean::obj_tag(x_70) == 2) { -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -lean::dec(x_5); -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -x_14 = lean::array_get_size(x_13); -lean::dec(x_13); -x_15 = 0; +obj* x_71; obj* x_72; uint8 x_73; +x_71 = lean::cnstr_get(x_70, 1); +lean::inc(x_71); +lean::dec(x_70); +x_72 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_73 = lean::string_dec_eq(x_71, x_72); +lean::dec(x_71); +if (x_73 == 0) +{ +obj* x_74; obj* x_75; +x_74 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_75 = l_Lean_Parser_ParserState_mkErrorsAt(x_67, x_74, x_5); +x_43 = x_75; +goto block_66; +} +else +{ +x_43 = x_67; +goto block_66; +} +} +else +{ +obj* x_76; obj* x_77; +lean::dec(x_70); +x_76 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_77 = l_Lean_Parser_ParserState_mkErrorsAt(x_67, x_76, x_5); +x_43 = x_77; +goto block_66; +} +} +else +{ +obj* x_78; obj* x_79; +lean::dec(x_68); +x_78 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_79 = l_Lean_Parser_ParserState_mkErrorsAt(x_67, x_78, x_5); +x_43 = x_79; +goto block_66; +} +block_42: +{ +obj* x_8; +x_8 = lean::cnstr_get(x_7, 3); +lean::inc(x_8); +if (lean::obj_tag(x_8) == 0) +{ +obj* x_9; obj* x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; +x_9 = lean::cnstr_get(x_7, 0); +lean::inc(x_9); +x_10 = lean::array_get_size(x_9); +lean::dec(x_9); +x_11 = 0; lean::inc(x_2); -x_16 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_15, x_1, x_2, x_11); -x_17 = l_Lean_nullKind; -x_18 = l_Lean_Parser_ParserState_mkNode(x_16, x_17, x_14); -x_19 = lean::cnstr_get(x_18, 3); +x_12 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_11, x_1, x_2, x_7); +x_13 = l_Lean_nullKind; +x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_10); +x_15 = lean::cnstr_get(x_14, 3); +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_14, 1); +lean::inc(x_16); +x_17 = l_Lean_Parser_tokenFn(x_2, x_14); +x_18 = lean::cnstr_get(x_17, 3); +lean::inc(x_18); +if (lean::obj_tag(x_18) == 0) +{ +obj* x_19; obj* x_20; +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; obj* x_22; obj* x_23; obj* x_24; -x_20 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_21 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_22 = l_Lean_Parser_symbolFnAux(x_20, x_21, x_2, x_18); -x_23 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_6); -return x_24; -} -else -{ -obj* x_25; obj* x_26; +x_20 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_19); lean::dec(x_19); -lean::dec(x_2); -x_25 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_18, x_25, x_6); -return x_26; +if (lean::obj_tag(x_20) == 2) +{ +obj* x_21; obj* x_22; uint8 x_23; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +lean::dec(x_20); +x_22 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_23 = lean::string_dec_eq(x_21, x_22); +lean::dec(x_21); +if (x_23 == 0) +{ +obj* x_24; obj* x_25; obj* x_26; obj* x_27; +x_24 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_24, x_16); +x_26 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_6); +return x_27; +} +else +{ +obj* x_28; obj* x_29; +lean::dec(x_16); +x_28 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_17, x_28, x_6); +return x_29; } } else { -uint8 x_27; -lean::dec(x_2); -x_27 = !lean::is_exclusive(x_11); -if (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_11, 0); -x_29 = lean::cnstr_get(x_11, 3); -lean::dec(x_29); -x_30 = lean::cnstr_get(x_11, 1); -lean::dec(x_30); -x_31 = l_Array_shrink___main___rarg(x_28, x_6); -lean::cnstr_set(x_11, 1, x_5); -lean::cnstr_set(x_11, 0, x_31); +obj* x_30; obj* x_31; obj* x_32; obj* x_33; +lean::dec(x_20); +x_30 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_30, x_16); x_32 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; -x_33 = l_Lean_Parser_ParserState_mkNode(x_11, x_32, x_6); +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_6); return x_33; } +} 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_11, 0); -x_35 = lean::cnstr_get(x_11, 2); -lean::inc(x_35); -lean::inc(x_34); -lean::dec(x_11); -x_36 = l_Array_shrink___main___rarg(x_34, x_6); -x_37 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_5); -lean::cnstr_set(x_37, 2, x_35); -lean::cnstr_set(x_37, 3, x_12); +obj* x_34; obj* x_35; obj* x_36; obj* x_37; +lean::dec(x_18); +x_34 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_34, x_16); +x_36 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_6); +return x_37; +} +} +else +{ +obj* x_38; obj* x_39; +lean::dec(x_15); +lean::dec(x_2); x_38 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_6); +x_39 = l_Lean_Parser_ParserState_mkNode(x_14, x_38, x_6); return x_39; } } -} else { -obj* x_40; -lean::dec(x_10); -x_40 = lean::cnstr_get(x_9, 3); -lean::inc(x_40); -if (lean::obj_tag(x_40) == 0) +obj* x_40; obj* x_41; +lean::dec(x_8); +lean::dec(x_2); +x_40 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; +x_41 = l_Lean_Parser_ParserState_mkNode(x_7, x_40, x_6); +return x_41; +} +} +block_66: { -obj* x_41; obj* x_42; uint8 x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_5); -x_41 = lean::cnstr_get(x_9, 0); -lean::inc(x_41); -x_42 = lean::array_get_size(x_41); -lean::dec(x_41); -x_43 = 0; +obj* x_44; +x_44 = lean::cnstr_get(x_43, 3); +lean::inc(x_44); +if (lean::obj_tag(x_44) == 0) +{ +obj* x_45; obj* x_46; lean::inc(x_2); -x_44 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_43, x_1, x_2, x_9); -x_45 = l_Lean_nullKind; -x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_42); -x_47 = lean::cnstr_get(x_46, 3); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) +x_45 = l_Lean_Parser_identFn___rarg(x_2, x_43); +x_46 = lean::cnstr_get(x_45, 3); +lean::inc(x_46); +if (lean::obj_tag(x_46) == 0) { -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_48 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_49 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_50 = l_Lean_Parser_symbolFnAux(x_48, x_49, x_2, x_46); -x_51 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; -x_52 = l_Lean_Parser_ParserState_mkNode(x_50, x_51, x_6); -return x_52; +lean::dec(x_5); +x_7 = x_45; +goto block_42; } else { -obj* x_53; obj* x_54; -lean::dec(x_47); -lean::dec(x_2); -x_53 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; -x_54 = l_Lean_Parser_ParserState_mkNode(x_46, x_53, x_6); -return x_54; +uint8 x_47; +x_47 = !lean::is_exclusive(x_45); +if (x_47 == 0) +{ +obj* x_48; obj* x_49; obj* x_50; obj* x_51; +x_48 = lean::cnstr_get(x_45, 0); +x_49 = lean::cnstr_get(x_45, 3); +lean::dec(x_49); +x_50 = lean::cnstr_get(x_45, 1); +lean::dec(x_50); +x_51 = l_Array_shrink___main___rarg(x_48, x_6); +lean::cnstr_set(x_45, 1, x_5); +lean::cnstr_set(x_45, 0, x_51); +x_7 = x_45; +goto block_42; +} +else +{ +obj* x_52; obj* x_53; obj* x_54; obj* x_55; +x_52 = lean::cnstr_get(x_45, 0); +x_53 = lean::cnstr_get(x_45, 2); +lean::inc(x_53); +lean::inc(x_52); +lean::dec(x_45); +x_54 = l_Array_shrink___main___rarg(x_52, x_6); +x_55 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_55, 0, x_54); +lean::cnstr_set(x_55, 1, x_5); +lean::cnstr_set(x_55, 2, x_53); +lean::cnstr_set(x_55, 3, x_46); +x_7 = x_55; +goto block_42; +} } } else { -uint8 x_55; -lean::dec(x_2); -x_55 = !lean::is_exclusive(x_9); -if (x_55 == 0) +obj* x_56; +lean::dec(x_44); +x_56 = lean::cnstr_get(x_43, 3); +lean::inc(x_56); +if (lean::obj_tag(x_56) == 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_9, 0); -x_57 = lean::cnstr_get(x_9, 3); -lean::dec(x_57); -x_58 = lean::cnstr_get(x_9, 1); -lean::dec(x_58); -x_59 = l_Array_shrink___main___rarg(x_56, x_6); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 0, x_59); -x_60 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; -x_61 = l_Lean_Parser_ParserState_mkNode(x_9, x_60, x_6); -return x_61; +lean::dec(x_5); +x_7 = x_43; +goto block_42; } else { -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_62 = lean::cnstr_get(x_9, 0); -x_63 = lean::cnstr_get(x_9, 2); +uint8 x_57; +x_57 = !lean::is_exclusive(x_43); +if (x_57 == 0) +{ +obj* x_58; obj* x_59; obj* x_60; obj* x_61; +x_58 = lean::cnstr_get(x_43, 0); +x_59 = lean::cnstr_get(x_43, 3); +lean::dec(x_59); +x_60 = lean::cnstr_get(x_43, 1); +lean::dec(x_60); +x_61 = l_Array_shrink___main___rarg(x_58, x_6); +lean::cnstr_set(x_43, 1, x_5); +lean::cnstr_set(x_43, 0, x_61); +x_7 = x_43; +goto block_42; +} +else +{ +obj* x_62; obj* x_63; obj* x_64; obj* x_65; +x_62 = lean::cnstr_get(x_43, 0); +x_63 = lean::cnstr_get(x_43, 2); lean::inc(x_63); lean::inc(x_62); -lean::dec(x_9); +lean::dec(x_43); x_64 = l_Array_shrink___main___rarg(x_62, x_6); x_65 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_65, 0, x_64); lean::cnstr_set(x_65, 1, x_5); lean::cnstr_set(x_65, 2, x_63); -lean::cnstr_set(x_65, 3, x_40); -x_66 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2; -x_67 = l_Lean_Parser_ParserState_mkNode(x_65, x_66, x_6); -return x_67; +lean::cnstr_set(x_65, 3, x_56); +x_7 = x_65; +goto block_42; +} } } } @@ -13418,7 +17479,7 @@ obj* _init_l_Lean_Parser_Command_openHiding___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_openHiding___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -13434,206 +17495,330 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_openHiding___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_openHiding___elambda__1___closed__6; +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* l_Lean_Parser_Command_openHiding___elambda__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_38; obj* x_39; obj* x_40; obj* x_41; +obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_52; obj* x_84; obj* x_85; 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::array_get_size(x_4); lean::dec(x_4); -x_38 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_39 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; lean::inc(x_2); -x_40 = l_Lean_Parser_symbolFnAux(x_38, x_39, x_2, x_3); -x_41 = lean::cnstr_get(x_40, 3); -lean::inc(x_41); -if (lean::obj_tag(x_41) == 0) +x_84 = l_Lean_Parser_tokenFn(x_2, x_3); +x_85 = lean::cnstr_get(x_84, 3); +lean::inc(x_85); +if (lean::obj_tag(x_85) == 0) { -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_42 = l_Lean_Parser_Command_openHiding___elambda__1___closed__4; -x_43 = l_Lean_Parser_Command_openHiding___elambda__1___closed__6; -lean::inc(x_2); -x_44 = l_Lean_Parser_symbolFnAux(x_42, x_43, x_2, x_40); -x_45 = lean::cnstr_get(x_44, 3); -lean::inc(x_45); -if (lean::obj_tag(x_45) == 0) +obj* x_86; obj* x_87; +x_86 = lean::cnstr_get(x_84, 0); +lean::inc(x_86); +x_87 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_86); +lean::dec(x_86); +if (lean::obj_tag(x_87) == 2) { -lean::dec(x_5); -x_7 = x_44; -goto block_37; +obj* x_88; obj* x_89; uint8 x_90; +x_88 = lean::cnstr_get(x_87, 1); +lean::inc(x_88); +lean::dec(x_87); +x_89 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_90 = lean::string_dec_eq(x_88, x_89); +lean::dec(x_88); +if (x_90 == 0) +{ +obj* x_91; obj* x_92; +x_91 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_92 = l_Lean_Parser_ParserState_mkErrorsAt(x_84, x_91, x_5); +x_52 = x_92; +goto block_83; } else { -uint8 x_46; -x_46 = !lean::is_exclusive(x_44); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_47 = lean::cnstr_get(x_44, 0); -x_48 = lean::cnstr_get(x_44, 3); -lean::dec(x_48); -x_49 = lean::cnstr_get(x_44, 1); -lean::dec(x_49); -x_50 = l_Array_shrink___main___rarg(x_47, x_6); -lean::cnstr_set(x_44, 1, x_5); -lean::cnstr_set(x_44, 0, x_50); -x_7 = x_44; -goto block_37; -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_51 = lean::cnstr_get(x_44, 0); -x_52 = lean::cnstr_get(x_44, 2); -lean::inc(x_52); -lean::inc(x_51); -lean::dec(x_44); -x_53 = l_Array_shrink___main___rarg(x_51, x_6); -x_54 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_5); -lean::cnstr_set(x_54, 2, x_52); -lean::cnstr_set(x_54, 3, x_45); -x_7 = x_54; -goto block_37; -} +x_52 = x_84; +goto block_83; } } else { -obj* x_55; -lean::dec(x_41); -x_55 = lean::cnstr_get(x_40, 3); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) -{ -lean::dec(x_5); -x_7 = x_40; -goto block_37; +obj* x_93; obj* x_94; +lean::dec(x_87); +x_93 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_94 = l_Lean_Parser_ParserState_mkErrorsAt(x_84, x_93, x_5); +x_52 = x_94; +goto block_83; +} } else { -uint8 x_56; -x_56 = !lean::is_exclusive(x_40); -if (x_56 == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_57 = lean::cnstr_get(x_40, 0); -x_58 = lean::cnstr_get(x_40, 3); -lean::dec(x_58); -x_59 = lean::cnstr_get(x_40, 1); -lean::dec(x_59); -x_60 = l_Array_shrink___main___rarg(x_57, x_6); -lean::cnstr_set(x_40, 1, x_5); -lean::cnstr_set(x_40, 0, x_60); -x_7 = x_40; -goto block_37; +obj* x_95; obj* x_96; +lean::dec(x_85); +x_95 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_96 = l_Lean_Parser_ParserState_mkErrorsAt(x_84, x_95, x_5); +x_52 = x_96; +goto block_83; } -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_61 = lean::cnstr_get(x_40, 0); -x_62 = lean::cnstr_get(x_40, 2); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_40); -x_63 = l_Array_shrink___main___rarg(x_61, x_6); -x_64 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_5); -lean::cnstr_set(x_64, 2, x_62); -lean::cnstr_set(x_64, 3, x_55); -x_7 = x_64; -goto block_37; -} -} -} -block_37: +block_33: { obj* x_8; x_8 = lean::cnstr_get(x_7, 3); lean::inc(x_8); if (lean::obj_tag(x_8) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_7, 0); +obj* x_9; obj* x_10; obj* x_11; +x_9 = lean::cnstr_get(x_7, 1); lean::inc(x_9); -x_10 = lean::array_get_size(x_9); -lean::dec(x_9); -lean::inc(x_2); -x_11 = l_Lean_Parser_identFn___rarg(x_2, x_7); -x_12 = lean::cnstr_get(x_11, 3); +x_10 = l_Lean_Parser_tokenFn(x_2, x_7); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +obj* x_12; obj* x_13; +x_12 = lean::cnstr_get(x_10, 0); lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) +x_13 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_12); +lean::dec(x_12); +if (lean::obj_tag(x_13) == 2) { -uint8 x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = 0; -lean::inc(x_2); -x_14 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_13, x_1, x_2, x_11); -x_15 = l_Lean_nullKind; -x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_10); -x_17 = lean::cnstr_get(x_16, 3); -lean::inc(x_17); -if (lean::obj_tag(x_17) == 0) +obj* x_14; obj* x_15; uint8 x_16; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +lean::dec(x_13); +x_15 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_16 = lean::string_dec_eq(x_14, x_15); +lean::dec(x_14); +if (x_16 == 0) { -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_19 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_20 = l_Lean_Parser_symbolFnAux(x_18, x_19, x_2, x_16); +obj* x_17; obj* x_18; obj* x_19; obj* x_20; +x_17 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_18 = l_Lean_Parser_ParserState_mkErrorsAt(x_10, x_17, x_9); +x_19 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; +x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_6); +return x_20; +} +else +{ +obj* x_21; obj* x_22; +lean::dec(x_9); x_21 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_6); +x_22 = l_Lean_Parser_ParserState_mkNode(x_10, x_21, x_6); return x_22; } +} else { -obj* x_23; obj* x_24; -lean::dec(x_17); -lean::dec(x_2); -x_23 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_16, x_23, x_6); -return x_24; +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_13); +x_23 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_10, x_23, x_9); +x_25 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_6); +return x_26; } } else { -obj* x_25; obj* x_26; obj* x_27; -lean::dec(x_12); -x_25 = l_Lean_nullKind; -x_26 = l_Lean_Parser_ParserState_mkNode(x_11, x_25, x_10); -x_27 = lean::cnstr_get(x_26, 3); -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; -x_28 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_29 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_30 = l_Lean_Parser_symbolFnAux(x_28, x_29, x_2, x_26); -x_31 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_6); -return x_32; -} -else -{ -obj* x_33; obj* x_34; -lean::dec(x_27); -lean::dec(x_2); -x_33 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_26, x_33, x_6); -return x_34; -} +obj* x_27; obj* x_28; obj* x_29; obj* x_30; +lean::dec(x_11); +x_27 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_10, x_27, x_9); +x_29 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_6); +return x_30; } } else { -obj* x_35; obj* x_36; +obj* x_31; obj* x_32; lean::dec(x_8); lean::dec(x_2); -x_35 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; -x_36 = l_Lean_Parser_ParserState_mkNode(x_7, x_35, x_6); -return x_36; +x_31 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_7, x_31, x_6); +return x_32; +} +} +block_51: +{ +if (lean::obj_tag(x_37) == 0) +{ +obj* x_38; obj* x_39; obj* x_40; +lean::dec(x_36); +lean::dec(x_5); +x_38 = lean::array_get_size(x_35); +lean::dec(x_35); +lean::inc(x_2); +x_39 = l_Lean_Parser_identFn___rarg(x_2, x_34); +x_40 = lean::cnstr_get(x_39, 3); +lean::inc(x_40); +if (lean::obj_tag(x_40) == 0) +{ +uint8 x_41; obj* x_42; obj* x_43; obj* x_44; +x_41 = 0; +lean::inc(x_2); +x_42 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_structExplicitBinder___elambda__1___spec__1(x_41, x_1, x_2, x_39); +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_38); +x_7 = x_44; +goto block_33; +} +else +{ +obj* x_45; obj* x_46; +lean::dec(x_40); +x_45 = l_Lean_nullKind; +x_46 = l_Lean_Parser_ParserState_mkNode(x_39, x_45, x_38); +x_7 = x_46; +goto block_33; +} +} +else +{ +obj* x_47; obj* x_48; obj* x_49; obj* x_50; +lean::dec(x_34); +lean::dec(x_2); +x_47 = l_Array_shrink___main___rarg(x_35, x_6); +x_48 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_5); +lean::cnstr_set(x_48, 2, x_36); +lean::cnstr_set(x_48, 3, x_37); +x_49 = l_Lean_Parser_Command_openHiding___elambda__1___closed__2; +x_50 = l_Lean_Parser_ParserState_mkNode(x_48, x_49, x_6); +return x_50; +} +} +block_83: +{ +obj* x_53; +x_53 = lean::cnstr_get(x_52, 3); +lean::inc(x_53); +if (lean::obj_tag(x_53) == 0) +{ +obj* x_54; obj* x_55; obj* x_56; +x_54 = lean::cnstr_get(x_52, 1); +lean::inc(x_54); +lean::inc(x_2); +x_55 = l_Lean_Parser_tokenFn(x_2, x_52); +x_56 = lean::cnstr_get(x_55, 3); +lean::inc(x_56); +if (lean::obj_tag(x_56) == 0) +{ +obj* x_57; obj* x_58; +x_57 = lean::cnstr_get(x_55, 0); +lean::inc(x_57); +x_58 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_57); +lean::dec(x_57); +if (lean::obj_tag(x_58) == 2) +{ +obj* x_59; obj* x_60; uint8 x_61; +x_59 = lean::cnstr_get(x_58, 1); +lean::inc(x_59); +lean::dec(x_58); +x_60 = l_Lean_Parser_Command_openHiding___elambda__1___closed__4; +x_61 = lean::string_dec_eq(x_59, x_60); +lean::dec(x_59); +if (x_61 == 0) +{ +obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; +x_62 = l_Lean_Parser_Command_openHiding___elambda__1___closed__7; +x_63 = l_Lean_Parser_ParserState_mkErrorsAt(x_55, x_62, x_54); +x_64 = lean::cnstr_get(x_63, 0); +lean::inc(x_64); +x_65 = lean::cnstr_get(x_63, 2); +lean::inc(x_65); +x_66 = lean::cnstr_get(x_63, 3); +lean::inc(x_66); +x_34 = x_63; +x_35 = x_64; +x_36 = x_65; +x_37 = x_66; +goto block_51; +} +else +{ +obj* x_67; obj* x_68; obj* x_69; +lean::dec(x_54); +x_67 = lean::cnstr_get(x_55, 0); +lean::inc(x_67); +x_68 = lean::cnstr_get(x_55, 2); +lean::inc(x_68); +x_69 = lean::cnstr_get(x_55, 3); +lean::inc(x_69); +x_34 = x_55; +x_35 = x_67; +x_36 = x_68; +x_37 = x_69; +goto block_51; +} +} +else +{ +obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; +lean::dec(x_58); +x_70 = l_Lean_Parser_Command_openHiding___elambda__1___closed__7; +x_71 = l_Lean_Parser_ParserState_mkErrorsAt(x_55, x_70, x_54); +x_72 = lean::cnstr_get(x_71, 0); +lean::inc(x_72); +x_73 = lean::cnstr_get(x_71, 2); +lean::inc(x_73); +x_74 = lean::cnstr_get(x_71, 3); +lean::inc(x_74); +x_34 = x_71; +x_35 = x_72; +x_36 = x_73; +x_37 = x_74; +goto block_51; +} +} +else +{ +obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; +lean::dec(x_56); +x_75 = l_Lean_Parser_Command_openHiding___elambda__1___closed__7; +x_76 = l_Lean_Parser_ParserState_mkErrorsAt(x_55, x_75, x_54); +x_77 = lean::cnstr_get(x_76, 0); +lean::inc(x_77); +x_78 = lean::cnstr_get(x_76, 2); +lean::inc(x_78); +x_79 = lean::cnstr_get(x_76, 3); +lean::inc(x_79); +x_34 = x_76; +x_35 = x_77; +x_36 = x_78; +x_37 = x_79; +goto block_51; +} +} +else +{ +obj* x_80; obj* x_81; obj* x_82; +lean::dec(x_53); +x_80 = lean::cnstr_get(x_52, 0); +lean::inc(x_80); +x_81 = lean::cnstr_get(x_52, 2); +lean::inc(x_81); +x_82 = lean::cnstr_get(x_52, 3); +lean::inc(x_82); +x_34 = x_52; +x_35 = x_80; +x_36 = x_81; +x_37 = x_82; +goto block_51; } } } @@ -13770,7 +17955,7 @@ obj* _init_l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__ _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -13806,6 +17991,18 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__11() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__10; +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* l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg(obj* x_1, obj* x_2) { _start: { @@ -13823,7 +18020,7 @@ if (lean::obj_tag(x_6) == 0) obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; x_7 = l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__4; x_8 = l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__6; -x_9 = l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__10; +x_9 = l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__11; lean::inc(x_1); x_10 = l_Lean_Parser_unicodeSymbolFnAux(x_7, x_8, x_9, x_1, x_5); x_11 = lean::cnstr_get(x_10, 3); @@ -13942,7 +18139,7 @@ lean::dec(x_1); return x_2; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 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; @@ -13958,7 +18155,7 @@ x_12 = lean::cnstr_get(x_11, 3); 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; +obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_23; obj* x_24; lean::dec(x_10); lean::dec(x_9); x_13 = lean::cnstr_get(x_11, 0); @@ -13967,19 +18164,74 @@ x_14 = lean::array_get_size(x_13); lean::dec(x_13); x_15 = lean::cnstr_get(x_11, 1); lean::inc(x_15); -x_16 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_17 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; lean::inc(x_6); -x_18 = l_Lean_Parser_symbolFnAux(x_16, x_17, x_6, x_11); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) +x_23 = l_Lean_Parser_tokenFn(x_6, x_11); +x_24 = lean::cnstr_get(x_23, 3); +lean::inc(x_24); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_25; obj* x_26; +x_25 = lean::cnstr_get(x_23, 0); +lean::inc(x_25); +x_26 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_25); +lean::dec(x_25); +if (lean::obj_tag(x_26) == 2) +{ +obj* x_27; obj* x_28; uint8 x_29; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +lean::dec(x_26); +x_28 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_29 = lean::string_dec_eq(x_27, x_28); +lean::dec(x_27); +if (x_29 == 0) +{ +obj* x_30; obj* x_31; +x_30 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); +x_16 = x_31; +goto block_22; +} +else +{ +x_16 = x_23; +goto block_22; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_26); +x_32 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); +x_16 = x_33; +goto block_22; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_24); +x_34 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); +x_16 = x_35; +goto block_22; +} +block_22: +{ +obj* x_17; +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { lean::dec(x_15); lean::dec(x_14); { uint8 _tmp_3 = x_2; -obj* _tmp_6 = x_18; +obj* _tmp_6 = x_16; x_4 = _tmp_3; x_7 = _tmp_6; } @@ -13987,14 +18239,15 @@ goto _start; } else { -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_19); +obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_17); lean::dec(x_6); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_14, x_15); +x_19 = l_Lean_Parser_ParserState_restore(x_16, x_14, x_15); lean::dec(x_14); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; +x_20 = l_Lean_nullKind; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_3); +return x_21; +} } } else @@ -14003,23 +18256,23 @@ lean::dec(x_12); lean::dec(x_6); if (x_4 == 0) { -obj* x_24; obj* x_25; obj* x_26; obj* x_27; +obj* x_36; obj* x_37; obj* x_38; obj* x_39; lean::dec(x_10); lean::dec(x_9); -x_24 = lean::box(0); -x_25 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_24); -x_26 = l_Lean_nullKind; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_3); -return x_27; +x_36 = lean::box(0); +x_37 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_36); +x_38 = l_Lean_nullKind; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_3); +return x_39; } else { -obj* x_28; obj* x_29; obj* x_30; -x_28 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +obj* x_40; obj* x_41; obj* x_42; +x_40 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); lean::dec(x_9); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_3); -return x_30; +x_41 = l_Lean_nullKind; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_3); +return x_42; } } } @@ -14033,7 +18286,7 @@ lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); x_8 = 0; -x_9 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +x_9 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); return x_9; } } @@ -14076,7 +18329,7 @@ obj* _init_l_Lean_Parser_Command_openRenaming___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -14092,176 +18345,324 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_openRenaming___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__6; +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* l_Lean_Parser_Command_openRenaming___elambda__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_4; obj* x_5; obj* x_6; obj* x_7; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_47; obj* x_79; obj* x_80; 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::array_get_size(x_4); lean::dec(x_4); -x_7 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_8 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; lean::inc(x_2); -x_9 = l_Lean_Parser_symbolFnAux(x_7, x_8, x_2, x_3); -x_10 = lean::cnstr_get(x_9, 3); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) +x_79 = l_Lean_Parser_tokenFn(x_2, x_3); +x_80 = lean::cnstr_get(x_79, 3); +lean::inc(x_80); +if (lean::obj_tag(x_80) == 0) { -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__4; -x_12 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__6; -lean::inc(x_2); -x_13 = l_Lean_Parser_symbolFnAux(x_11, x_12, x_2, x_9); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +obj* x_81; obj* x_82; +x_81 = lean::cnstr_get(x_79, 0); +lean::inc(x_81); +x_82 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_81); +lean::dec(x_81); +if (lean::obj_tag(x_82) == 2) { -uint8 x_15; uint8 x_16; obj* x_17; obj* x_18; -lean::dec(x_5); -x_15 = 0; -x_16 = 0; +obj* x_83; obj* x_84; uint8 x_85; +x_83 = lean::cnstr_get(x_82, 1); +lean::inc(x_83); +lean::dec(x_82); +x_84 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_85 = lean::string_dec_eq(x_83, x_84); +lean::dec(x_83); +if (x_85 == 0) +{ +obj* x_86; obj* x_87; +x_86 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_87 = l_Lean_Parser_ParserState_mkErrorsAt(x_79, x_86, x_5); +x_47 = x_87; +goto block_78; +} +else +{ +x_47 = x_79; +goto block_78; +} +} +else +{ +obj* x_88; obj* x_89; +lean::dec(x_82); +x_88 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_89 = l_Lean_Parser_ParserState_mkErrorsAt(x_79, x_88, x_5); +x_47 = x_89; +goto block_78; +} +} +else +{ +obj* x_90; obj* x_91; +lean::dec(x_80); +x_90 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_5); +x_91 = l_Lean_Parser_ParserState_mkErrorsAt(x_79, x_90, x_5); +x_47 = x_91; +goto block_78; +} +block_39: +{ +obj* x_8; +x_8 = lean::cnstr_get(x_7, 3); +lean::inc(x_8); +if (lean::obj_tag(x_8) == 0) +{ +uint8 x_9; uint8 x_10; obj* x_11; obj* x_12; +x_9 = 0; +x_10 = 0; lean::inc(x_2); -x_17 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(x_15, x_16, x_1, x_2, x_13); -x_18 = lean::cnstr_get(x_17, 3); +x_11 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(x_9, x_10, x_1, x_2, x_7); +x_12 = lean::cnstr_get(x_11, 3); +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_11, 1); +lean::inc(x_13); +x_14 = l_Lean_Parser_tokenFn(x_2, x_11); +x_15 = lean::cnstr_get(x_14, 3); +lean::inc(x_15); +if (lean::obj_tag(x_15) == 0) +{ +obj* x_16; obj* x_17; +x_16 = lean::cnstr_get(x_14, 0); +lean::inc(x_16); +x_17 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_16); +lean::dec(x_16); +if (lean::obj_tag(x_17) == 2) +{ +obj* x_18; obj* x_19; uint8 x_20; +x_18 = lean::cnstr_get(x_17, 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; +lean::dec(x_17); x_19 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_20 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_21 = l_Lean_Parser_symbolFnAux(x_19, x_20, x_2, x_17); -x_22 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_6); -return x_23; -} -else -{ -obj* x_24; obj* x_25; +x_20 = lean::string_dec_eq(x_18, x_19); lean::dec(x_18); -lean::dec(x_2); -x_24 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_17, x_24, x_6); -return x_25; -} +if (x_20 == 0) +{ +obj* x_21; obj* x_22; obj* x_23; obj* x_24; +x_21 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_22 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_21, x_13); +x_23 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_6); +return x_24; } else { -uint8 x_26; -lean::dec(x_2); -x_26 = !lean::is_exclusive(x_13); -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_13, 0); -x_28 = lean::cnstr_get(x_13, 3); -lean::dec(x_28); -x_29 = lean::cnstr_get(x_13, 1); -lean::dec(x_29); -x_30 = l_Array_shrink___main___rarg(x_27, x_6); -lean::cnstr_set(x_13, 1, x_5); -lean::cnstr_set(x_13, 0, x_30); -x_31 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_13, x_31, x_6); -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_13, 0); -x_34 = lean::cnstr_get(x_13, 2); -lean::inc(x_34); -lean::inc(x_33); +obj* x_25; obj* x_26; lean::dec(x_13); -x_35 = l_Array_shrink___main___rarg(x_33, x_6); -x_36 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_5); -lean::cnstr_set(x_36, 2, x_34); -lean::cnstr_set(x_36, 3, x_14); +x_25 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_14, x_25, x_6); +return x_26; +} +} +else +{ +obj* x_27; obj* x_28; obj* x_29; obj* x_30; +lean::dec(x_17); +x_27 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_27, x_13); +x_29 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_6); +return x_30; +} +} +else +{ +obj* x_31; obj* x_32; obj* x_33; obj* x_34; +lean::dec(x_15); +x_31 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_31, x_13); +x_33 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; +x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_6); +return x_34; +} +} +else +{ +obj* x_35; obj* x_36; +lean::dec(x_12); +lean::dec(x_2); +x_35 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; +x_36 = l_Lean_Parser_ParserState_mkNode(x_11, x_35, x_6); +return x_36; +} +} +else +{ +obj* x_37; obj* x_38; +lean::dec(x_8); +lean::dec(x_2); x_37 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; -x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_6); +x_38 = l_Lean_Parser_ParserState_mkNode(x_7, x_37, x_6); return x_38; } } -} -else +block_46: { -obj* x_39; -lean::dec(x_10); -x_39 = lean::cnstr_get(x_9, 3); -lean::inc(x_39); -if (lean::obj_tag(x_39) == 0) -{ -uint8 x_40; uint8 x_41; obj* x_42; obj* x_43; -lean::dec(x_5); -x_40 = 0; -x_41 = 0; -lean::inc(x_2); -x_42 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(x_40, x_41, x_1, x_2, x_9); -x_43 = lean::cnstr_get(x_42, 3); -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 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_45 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_46 = l_Lean_Parser_symbolFnAux(x_44, x_45, x_2, x_42); -x_47 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; -x_48 = l_Lean_Parser_ParserState_mkNode(x_46, x_47, x_6); -return x_48; +lean::dec(x_42); +lean::dec(x_41); +lean::dec(x_5); +x_7 = x_40; +goto block_39; } else { -obj* x_49; obj* x_50; -lean::dec(x_43); -lean::dec(x_2); -x_49 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; -x_50 = l_Lean_Parser_ParserState_mkNode(x_42, x_49, x_6); -return x_50; +obj* x_44; obj* x_45; +lean::dec(x_40); +x_44 = l_Array_shrink___main___rarg(x_41, x_6); +x_45 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_5); +lean::cnstr_set(x_45, 2, x_42); +lean::cnstr_set(x_45, 3, x_43); +x_7 = x_45; +goto block_39; } } -else +block_78: { -uint8 x_51; -lean::dec(x_2); -x_51 = !lean::is_exclusive(x_9); -if (x_51 == 0) +obj* x_48; +x_48 = lean::cnstr_get(x_47, 3); +lean::inc(x_48); +if (lean::obj_tag(x_48) == 0) { -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_52 = lean::cnstr_get(x_9, 0); -x_53 = lean::cnstr_get(x_9, 3); +obj* x_49; obj* x_50; obj* x_51; +x_49 = lean::cnstr_get(x_47, 1); +lean::inc(x_49); +lean::inc(x_2); +x_50 = l_Lean_Parser_tokenFn(x_2, x_47); +x_51 = lean::cnstr_get(x_50, 3); +lean::inc(x_51); +if (lean::obj_tag(x_51) == 0) +{ +obj* x_52; obj* x_53; +x_52 = lean::cnstr_get(x_50, 0); +lean::inc(x_52); +x_53 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_52); +lean::dec(x_52); +if (lean::obj_tag(x_53) == 2) +{ +obj* x_54; obj* x_55; uint8 x_56; +x_54 = lean::cnstr_get(x_53, 1); +lean::inc(x_54); lean::dec(x_53); -x_54 = lean::cnstr_get(x_9, 1); +x_55 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__4; +x_56 = lean::string_dec_eq(x_54, x_55); lean::dec(x_54); -x_55 = l_Array_shrink___main___rarg(x_52, x_6); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 0, x_55); -x_56 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; -x_57 = l_Lean_Parser_ParserState_mkNode(x_9, x_56, x_6); -return x_57; +if (x_56 == 0) +{ +obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; +x_57 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__7; +x_58 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_57, x_49); +x_59 = lean::cnstr_get(x_58, 0); +lean::inc(x_59); +x_60 = lean::cnstr_get(x_58, 2); +lean::inc(x_60); +x_61 = lean::cnstr_get(x_58, 3); +lean::inc(x_61); +x_40 = x_58; +x_41 = x_59; +x_42 = x_60; +x_43 = x_61; +goto block_46; } 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_9, 0); -x_59 = lean::cnstr_get(x_9, 2); -lean::inc(x_59); -lean::inc(x_58); -lean::dec(x_9); -x_60 = l_Array_shrink___main___rarg(x_58, x_6); -x_61 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_5); -lean::cnstr_set(x_61, 2, x_59); -lean::cnstr_set(x_61, 3, x_39); -x_62 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; -x_63 = l_Lean_Parser_ParserState_mkNode(x_61, x_62, x_6); -return x_63; +obj* x_62; obj* x_63; obj* x_64; +lean::dec(x_49); +x_62 = lean::cnstr_get(x_50, 0); +lean::inc(x_62); +x_63 = lean::cnstr_get(x_50, 2); +lean::inc(x_63); +x_64 = lean::cnstr_get(x_50, 3); +lean::inc(x_64); +x_40 = x_50; +x_41 = x_62; +x_42 = x_63; +x_43 = x_64; +goto block_46; } } +else +{ +obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; +lean::dec(x_53); +x_65 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__7; +x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_65, x_49); +x_67 = lean::cnstr_get(x_66, 0); +lean::inc(x_67); +x_68 = lean::cnstr_get(x_66, 2); +lean::inc(x_68); +x_69 = lean::cnstr_get(x_66, 3); +lean::inc(x_69); +x_40 = x_66; +x_41 = x_67; +x_42 = x_68; +x_43 = x_69; +goto block_46; +} +} +else +{ +obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; +lean::dec(x_51); +x_70 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__7; +x_71 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_70, x_49); +x_72 = lean::cnstr_get(x_71, 0); +lean::inc(x_72); +x_73 = lean::cnstr_get(x_71, 2); +lean::inc(x_73); +x_74 = lean::cnstr_get(x_71, 3); +lean::inc(x_74); +x_40 = x_71; +x_41 = x_72; +x_42 = x_73; +x_43 = x_74; +goto block_46; +} +} +else +{ +obj* x_75; obj* x_76; obj* x_77; +lean::dec(x_48); +x_75 = lean::cnstr_get(x_47, 0); +lean::inc(x_75); +x_76 = lean::cnstr_get(x_47, 2); +lean::inc(x_76); +x_77 = lean::cnstr_get(x_47, 3); +lean::inc(x_77); +x_40 = x_47; +x_41 = x_75; +x_42 = x_76; +x_43 = x_77; +goto block_46; +} } } } @@ -14362,7 +18763,7 @@ x_1 = l_Lean_Parser_Command_openRenaming___closed__8; return x_1; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2___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; uint8 x_9; uint8 x_10; obj* x_11; @@ -14372,7 +18773,7 @@ x_9 = lean::unbox(x_2); lean::dec(x_2); x_10 = lean::unbox(x_4); lean::dec(x_4); -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); lean::dec(x_5); return x_11; } @@ -14451,7 +18852,7 @@ obj* _init_l_Lean_Parser_Command_open___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_open___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -14467,95 +18868,81 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_open___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_open___elambda__1___closed__6; +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* l_Lean_Parser_Command_open___elambda__1(obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_4; obj* x_5; obj* x_6; obj* x_31; obj* x_50; obj* x_51; obj* x_52; obj* x_53; +obj* x_4; obj* x_5; obj* x_6; obj* x_31; obj* x_50; obj* x_73; obj* x_74; obj* x_75; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_50 = l_Lean_Parser_Command_open___elambda__1___closed__4; -x_51 = l_Lean_Parser_Command_open___elambda__1___closed__6; +x_73 = lean::cnstr_get(x_3, 1); +lean::inc(x_73); lean::inc(x_2); -x_52 = l_Lean_Parser_symbolFnAux(x_50, x_51, x_2, x_3); -x_53 = lean::cnstr_get(x_52, 3); -lean::inc(x_53); -if (lean::obj_tag(x_53) == 0) +x_74 = l_Lean_Parser_tokenFn(x_2, x_3); +x_75 = lean::cnstr_get(x_74, 3); +lean::inc(x_75); +if (lean::obj_tag(x_75) == 0) { -obj* x_54; obj* x_55; -lean::inc(x_2); -x_54 = l_Lean_Parser_identFn___rarg(x_2, x_52); -x_55 = lean::cnstr_get(x_54, 3); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) +obj* x_76; obj* x_77; +x_76 = lean::cnstr_get(x_74, 0); +lean::inc(x_76); +x_77 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_76); +lean::dec(x_76); +if (lean::obj_tag(x_77) == 2) { -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_56 = lean::cnstr_get(x_54, 0); -lean::inc(x_56); -x_57 = lean::array_get_size(x_56); -lean::dec(x_56); -x_58 = lean::cnstr_get(x_54, 1); -lean::inc(x_58); -lean::inc(x_2); -x_59 = l_Lean_Parser_Command_openOnly___elambda__1(x_1, x_2, x_54); -x_60 = lean::cnstr_get(x_59, 3); -lean::inc(x_60); -if (lean::obj_tag(x_60) == 0) +obj* x_78; obj* x_79; uint8 x_80; +x_78 = lean::cnstr_get(x_77, 1); +lean::inc(x_78); +lean::dec(x_77); +x_79 = l_Lean_Parser_Command_open___elambda__1___closed__4; +x_80 = lean::string_dec_eq(x_78, x_79); +lean::dec(x_78); +if (x_80 == 0) { -obj* x_61; obj* x_62; -lean::dec(x_58); -x_61 = l_Lean_nullKind; -x_62 = l_Lean_Parser_ParserState_mkNode(x_59, x_61, x_57); -x_31 = x_62; -goto block_49; +obj* x_81; obj* x_82; +x_81 = l_Lean_Parser_Command_open___elambda__1___closed__7; +x_82 = l_Lean_Parser_ParserState_mkErrorsAt(x_74, x_81, x_73); +x_50 = x_82; +goto block_72; } else { -obj* x_63; uint8 x_64; -lean::dec(x_60); -x_63 = lean::cnstr_get(x_59, 1); -lean::inc(x_63); -x_64 = lean::nat_dec_eq(x_63, x_58); -lean::dec(x_63); -if (x_64 == 0) -{ -obj* x_65; obj* x_66; -lean::dec(x_58); -x_65 = l_Lean_nullKind; -x_66 = l_Lean_Parser_ParserState_mkNode(x_59, x_65, x_57); -x_31 = x_66; -goto block_49; -} -else -{ -obj* x_67; obj* x_68; obj* x_69; -x_67 = l_Lean_Parser_ParserState_restore(x_59, x_57, x_58); -x_68 = l_Lean_nullKind; -x_69 = l_Lean_Parser_ParserState_mkNode(x_67, x_68, x_57); -x_31 = x_69; -goto block_49; -} +lean::dec(x_73); +x_50 = x_74; +goto block_72; } } else { -obj* x_70; obj* x_71; -lean::dec(x_55); -lean::dec(x_2); -x_70 = l_Lean_Parser_Command_open___elambda__1___closed__2; -x_71 = l_Lean_Parser_ParserState_mkNode(x_54, x_70, x_5); -return x_71; +obj* x_83; obj* x_84; +lean::dec(x_77); +x_83 = l_Lean_Parser_Command_open___elambda__1___closed__7; +x_84 = l_Lean_Parser_ParserState_mkErrorsAt(x_74, x_83, x_73); +x_50 = x_84; +goto block_72; } } else { -obj* x_72; obj* x_73; -lean::dec(x_53); -lean::dec(x_2); -x_72 = l_Lean_Parser_Command_open___elambda__1___closed__2; -x_73 = l_Lean_Parser_ParserState_mkNode(x_52, x_72, x_5); -return x_73; +obj* x_85; obj* x_86; +lean::dec(x_75); +x_85 = l_Lean_Parser_Command_open___elambda__1___closed__7; +x_86 = l_Lean_Parser_ParserState_mkErrorsAt(x_74, x_85, x_73); +x_50 = x_86; +goto block_72; } block_30: { @@ -14689,6 +19076,88 @@ x_48 = l_Lean_Parser_ParserState_mkNode(x_31, x_47, x_5); return x_48; } } +block_72: +{ +obj* x_51; +x_51 = lean::cnstr_get(x_50, 3); +lean::inc(x_51); +if (lean::obj_tag(x_51) == 0) +{ +obj* x_52; obj* x_53; +lean::inc(x_2); +x_52 = l_Lean_Parser_identFn___rarg(x_2, x_50); +x_53 = lean::cnstr_get(x_52, 3); +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_52, 0); +lean::inc(x_54); +x_55 = lean::array_get_size(x_54); +lean::dec(x_54); +x_56 = lean::cnstr_get(x_52, 1); +lean::inc(x_56); +lean::inc(x_2); +x_57 = l_Lean_Parser_Command_openOnly___elambda__1(x_1, x_2, x_52); +x_58 = lean::cnstr_get(x_57, 3); +lean::inc(x_58); +if (lean::obj_tag(x_58) == 0) +{ +obj* x_59; obj* x_60; +lean::dec(x_56); +x_59 = l_Lean_nullKind; +x_60 = l_Lean_Parser_ParserState_mkNode(x_57, x_59, x_55); +x_31 = x_60; +goto block_49; +} +else +{ +obj* x_61; uint8 x_62; +lean::dec(x_58); +x_61 = lean::cnstr_get(x_57, 1); +lean::inc(x_61); +x_62 = lean::nat_dec_eq(x_61, x_56); +lean::dec(x_61); +if (x_62 == 0) +{ +obj* x_63; obj* x_64; +lean::dec(x_56); +x_63 = l_Lean_nullKind; +x_64 = l_Lean_Parser_ParserState_mkNode(x_57, x_63, x_55); +x_31 = x_64; +goto block_49; +} +else +{ +obj* x_65; obj* x_66; obj* x_67; +x_65 = l_Lean_Parser_ParserState_restore(x_57, x_55, x_56); +x_66 = l_Lean_nullKind; +x_67 = l_Lean_Parser_ParserState_mkNode(x_65, x_66, x_55); +x_31 = x_67; +goto block_49; +} +} +} +else +{ +obj* x_68; obj* x_69; +lean::dec(x_53); +lean::dec(x_2); +x_68 = l_Lean_Parser_Command_open___elambda__1___closed__2; +x_69 = l_Lean_Parser_ParserState_mkNode(x_52, x_68, x_5); +return x_69; +} +} +else +{ +obj* x_70; obj* x_71; +lean::dec(x_51); +lean::dec(x_2); +x_70 = l_Lean_Parser_Command_open___elambda__1___closed__2; +x_71 = l_Lean_Parser_ParserState_mkNode(x_50, x_70, x_5); +return x_71; +} +} } } obj* _init_l_Lean_Parser_Command_open___closed__1() { @@ -15050,33 +19519,89 @@ return x_3; obj* l_Lean_Parser_Command_precedence___elambda__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_3; obj* x_4; obj* x_5; obj* x_13; obj* x_14; obj* x_15; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6; +x_13 = lean::cnstr_get(x_2, 1); +lean::inc(x_13); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_14 = l_Lean_Parser_tokenFn(x_1, x_2); +x_15 = lean::cnstr_get(x_14, 3); +lean::inc(x_15); +if (lean::obj_tag(x_15) == 0) { -obj* x_9; obj* x_10; obj* x_11; -x_9 = l_Lean_Parser_Command_precedenceLit___elambda__1___rarg(x_1, x_7); -x_10 = l_Lean_Parser_Command_precedence___elambda__1___rarg___closed__2; -x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); -return x_11; +obj* x_16; obj* x_17; +x_16 = lean::cnstr_get(x_14, 0); +lean::inc(x_16); +x_17 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_16); +lean::dec(x_16); +if (lean::obj_tag(x_17) == 2) +{ +obj* x_18; obj* x_19; uint8 x_20; +x_18 = lean::cnstr_get(x_17, 1); +lean::inc(x_18); +lean::dec(x_17); +x_19 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; +x_20 = lean::string_dec_eq(x_18, x_19); +lean::dec(x_18); +if (x_20 == 0) +{ +obj* x_21; obj* x_22; +x_21 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_22 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_21, x_13); +x_5 = x_22; +goto block_12; } else { -obj* x_12; obj* x_13; -lean::dec(x_8); +lean::dec(x_13); +x_5 = x_14; +goto block_12; +} +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_17); +x_23 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_23, x_13); +x_5 = x_24; +goto block_12; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_15); +x_25 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_25, x_13); +x_5 = x_26; +goto block_12; +} +block_12: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; +x_7 = l_Lean_Parser_Command_precedenceLit___elambda__1___rarg(x_1, x_5); +x_8 = l_Lean_Parser_Command_precedence___elambda__1___rarg___closed__2; +x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); +return x_9; +} +else +{ +obj* x_10; obj* x_11; +lean::dec(x_6); lean::dec(x_1); -x_12 = l_Lean_Parser_Command_precedence___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_7, x_12, x_4); -return x_13; +x_10 = l_Lean_Parser_Command_precedence___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_5, x_10, x_4); +return x_11; +} } } } @@ -15460,7 +19985,7 @@ obj* _init_l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -15476,20 +20001,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Command_prefix___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_prefix___elambda__1(obj* x_1) { @@ -15587,7 +20178,7 @@ obj* _init_l_Lean_Parser_Command_infix___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -15603,20 +20194,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_infix___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Command_infix___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_infix___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_infix___elambda__1(obj* x_1) { @@ -15714,7 +20371,7 @@ obj* _init_l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -15730,20 +20387,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Command_infixl___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_infixl___elambda__1(obj* x_1) { @@ -15841,7 +20564,7 @@ obj* _init_l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -15857,20 +20580,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Command_infixr___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_infixr___elambda__1(obj* x_1) { @@ -15968,7 +20757,7 @@ obj* _init_l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -15984,20 +20773,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Command_postfix___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Command_postfix___elambda__1(obj* x_1) { @@ -16395,7 +21250,7 @@ obj* _init_l_Lean_Parser_Command_reserve___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_reserve___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -16411,54 +21266,122 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_reserve___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_reserve___elambda__1___closed__6; +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* l_Lean_Parser_Command_reserve___elambda__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_4; obj* x_5; obj* x_6; obj* x_18; obj* x_19; obj* x_20; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Command_reserve___elambda__1___closed__4; -x_7 = l_Lean_Parser_Command_reserve___elambda__1___closed__6; +x_18 = lean::cnstr_get(x_3, 1); +lean::inc(x_18); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_19 = l_Lean_Parser_tokenFn(x_2, x_3); +x_20 = lean::cnstr_get(x_19, 3); +lean::inc(x_20); +if (lean::obj_tag(x_20) == 0) +{ +obj* x_21; obj* x_22; +x_21 = lean::cnstr_get(x_19, 0); +lean::inc(x_21); +x_22 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_21); +lean::dec(x_21); +if (lean::obj_tag(x_22) == 2) +{ +obj* x_23; obj* x_24; uint8 x_25; +x_23 = lean::cnstr_get(x_22, 1); +lean::inc(x_23); +lean::dec(x_22); +x_24 = l_Lean_Parser_Command_reserve___elambda__1___closed__4; +x_25 = lean::string_dec_eq(x_23, x_24); +lean::dec(x_23); +if (x_25 == 0) +{ +obj* x_26; obj* x_27; +x_26 = l_Lean_Parser_Command_reserve___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_26, x_18); +x_6 = x_27; +goto block_17; +} +else +{ +lean::dec(x_18); +x_6 = x_19; +goto block_17; +} +} +else +{ +obj* x_28; obj* x_29; +lean::dec(x_22); +x_28 = l_Lean_Parser_Command_reserve___elambda__1___closed__7; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_28, x_18); +x_6 = x_29; +goto block_17; +} +} +else +{ +obj* x_30; obj* x_31; +lean::dec(x_20); +x_30 = l_Lean_Parser_Command_reserve___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_30, x_18); +x_6 = x_31; +goto block_17; +} +block_17: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Command_mixfixKind___elambda__1___rarg(x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; -lean::inc(x_2); -x_10 = l_Lean_Parser_Command_mixfixKind___elambda__1___rarg(x_2, x_8); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +obj* x_10; obj* x_11; obj* x_12; +x_10 = l_Lean_Parser_Command_quotedSymbolPrec___elambda__1(x_1, x_2, x_8); +x_11 = l_Lean_Parser_Command_reserve___elambda__1___closed__2; +x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_5); +return x_12; +} +else { -obj* x_12; obj* x_13; obj* x_14; -x_12 = l_Lean_Parser_Command_quotedSymbolPrec___elambda__1(x_1, x_2, x_10); +obj* x_13; obj* x_14; +lean::dec(x_9); +lean::dec(x_2); x_13 = l_Lean_Parser_Command_reserve___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); +x_14 = l_Lean_Parser_ParserState_mkNode(x_8, x_13, x_5); return x_14; } +} else { obj* x_15; obj* x_16; -lean::dec(x_11); +lean::dec(x_7); lean::dec(x_2); x_15 = l_Lean_Parser_Command_reserve___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_10, x_15, x_5); +x_16 = l_Lean_Parser_ParserState_mkNode(x_6, x_15, x_5); return x_16; } } -else -{ -obj* x_17; obj* x_18; -lean::dec(x_9); -lean::dec(x_2); -x_17 = l_Lean_Parser_Command_reserve___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_8, x_17, x_5); -return x_18; -} } } obj* _init_l_Lean_Parser_Command_reserve___closed__1() { @@ -16681,51 +21604,144 @@ x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_11 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +obj* x_10; obj* x_11; obj* x_12; +x_10 = lean::cnstr_get(x_8, 1); +lean::inc(x_10); lean::inc(x_2); -x_12 = l_Lean_Parser_symbolFnAux(x_10, x_11, x_2, x_8); -x_13 = lean::cnstr_get(x_12, 3); +x_11 = l_Lean_Parser_tokenFn(x_2, x_8); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) +{ +obj* x_13; obj* x_14; +x_13 = lean::cnstr_get(x_11, 0); 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 = l_Lean_Parser_termParserAttribute; -x_15 = lean::mk_nat_obj(0u); -x_16 = l_Lean_Parser_ParserAttribute_runParser(x_14, x_15, x_2, x_12); -x_17 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_16, x_17, x_5); -return x_18; -} -else -{ -obj* x_19; obj* x_20; +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_13); lean::dec(x_13); +if (lean::obj_tag(x_14) == 2) +{ +obj* x_15; obj* x_16; uint8 x_17; +x_15 = lean::cnstr_get(x_14, 1); +lean::inc(x_15); +lean::dec(x_14); +x_16 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_17 = lean::string_dec_eq(x_15, x_16); +lean::dec(x_15); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; obj* x_20; +x_18 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_18, x_10); +x_20 = lean::cnstr_get(x_19, 3); +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; +x_21 = l_Lean_Parser_termParserAttribute; +x_22 = lean::mk_nat_obj(0u); +x_23 = l_Lean_Parser_ParserAttribute_runParser(x_21, x_22, x_2, x_19); +x_24 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_5); +return x_25; +} +else +{ +obj* x_26; obj* x_27; +lean::dec(x_20); lean::dec(x_2); -x_19 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_12, x_19, x_5); -return x_20; +x_26 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_19, x_26, x_5); +return x_27; } } else { -obj* x_21; obj* x_22; +obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_10); +x_28 = l_Lean_Parser_termParserAttribute; +x_29 = lean::mk_nat_obj(0u); +x_30 = l_Lean_Parser_ParserAttribute_runParser(x_28, x_29, x_2, x_11); +x_31 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_5); +return x_32; +} +} +else +{ +obj* x_33; obj* x_34; obj* x_35; +lean::dec(x_14); +x_33 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_34 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_33, x_10); +x_35 = lean::cnstr_get(x_34, 3); +lean::inc(x_35); +if (lean::obj_tag(x_35) == 0) +{ +obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; +x_36 = l_Lean_Parser_termParserAttribute; +x_37 = lean::mk_nat_obj(0u); +x_38 = l_Lean_Parser_ParserAttribute_runParser(x_36, x_37, x_2, x_34); +x_39 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_5); +return x_40; +} +else +{ +obj* x_41; obj* x_42; +lean::dec(x_35); +lean::dec(x_2); +x_41 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_42 = l_Lean_Parser_ParserState_mkNode(x_34, x_41, x_5); +return x_42; +} +} +} +else +{ +obj* x_43; obj* x_44; obj* x_45; +lean::dec(x_12); +x_43 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_44 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_43, x_10); +x_45 = lean::cnstr_get(x_44, 3); +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 = l_Lean_Parser_termParserAttribute; +x_47 = lean::mk_nat_obj(0u); +x_48 = l_Lean_Parser_ParserAttribute_runParser(x_46, x_47, x_2, x_44); +x_49 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_50 = l_Lean_Parser_ParserState_mkNode(x_48, x_49, x_5); +return x_50; +} +else +{ +obj* x_51; obj* x_52; +lean::dec(x_45); +lean::dec(x_2); +x_51 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_52 = l_Lean_Parser_ParserState_mkNode(x_44, x_51, x_5); +return x_52; +} +} +} +else +{ +obj* x_53; obj* x_54; lean::dec(x_9); lean::dec(x_2); -x_21 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_8, x_21, x_5); -return x_22; +x_53 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_54 = l_Lean_Parser_ParserState_mkNode(x_8, x_53, x_5); +return x_54; } } else { -obj* x_23; obj* x_24; +obj* x_55; obj* x_56; lean::dec(x_7); lean::dec(x_2); -x_23 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_6, x_23, x_5); -return x_24; +x_55 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; +x_56 = l_Lean_Parser_ParserState_mkNode(x_6, x_55, x_5); +return x_56; } } } @@ -17000,7 +22016,7 @@ else obj* x_13; obj* x_14; lean::dec(x_3); x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_8, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); return x_14; } } @@ -17052,7 +22068,7 @@ else obj* x_26; obj* x_27; lean::dec(x_3); x_26 = l_Lean_Parser_manyAux___main___closed__1; -x_27 = l_Lean_Parser_ParserState_mkError(x_21, x_26); +x_27 = l_Lean_Parser_ParserState_mkUnexpectedError(x_21, x_26); return x_27; } } @@ -17100,7 +22116,7 @@ obj* _init_l_Lean_Parser_Command_notation___elambda__1___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Command_notation___elambda__1___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -17116,80 +22132,83 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Command_notation___elambda__1___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Command_notation___elambda__1___closed__5; +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* l_Lean_Parser_Command_notation___elambda__1(obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_4; obj* x_5; obj* x_6; obj* x_31; obj* x_32; obj* x_33; obj* x_34; +obj* x_4; obj* x_5; obj* x_6; obj* x_63; obj* x_82; obj* x_83; obj* x_84; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_31 = l_Lean_Parser_Command_notation___elambda__1___closed__3; -x_32 = l_Lean_Parser_Command_notation___elambda__1___closed__5; +x_82 = lean::cnstr_get(x_3, 1); +lean::inc(x_82); lean::inc(x_2); -x_33 = l_Lean_Parser_symbolFnAux(x_31, x_32, x_2, x_3); -x_34 = lean::cnstr_get(x_33, 3); -lean::inc(x_34); -if (lean::obj_tag(x_34) == 0) +x_83 = l_Lean_Parser_tokenFn(x_2, x_3); +x_84 = lean::cnstr_get(x_83, 3); +lean::inc(x_84); +if (lean::obj_tag(x_84) == 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); -x_36 = lean::array_get_size(x_35); -lean::dec(x_35); -x_37 = lean::cnstr_get(x_33, 1); -lean::inc(x_37); -lean::inc(x_2); -x_38 = l_Lean_Parser_identFn___rarg(x_2, x_33); -x_39 = lean::cnstr_get(x_38, 3); -lean::inc(x_39); -if (lean::obj_tag(x_39) == 0) +obj* x_85; obj* x_86; +x_85 = lean::cnstr_get(x_83, 0); +lean::inc(x_85); +x_86 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_85); +lean::dec(x_85); +if (lean::obj_tag(x_86) == 2) { -obj* x_40; obj* x_41; -lean::dec(x_37); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_38, x_40, x_36); -x_6 = x_41; -goto block_30; +obj* x_87; obj* x_88; uint8 x_89; +x_87 = lean::cnstr_get(x_86, 1); +lean::inc(x_87); +lean::dec(x_86); +x_88 = l_Lean_Parser_Command_notation___elambda__1___closed__3; +x_89 = lean::string_dec_eq(x_87, x_88); +lean::dec(x_87); +if (x_89 == 0) +{ +obj* x_90; obj* x_91; +x_90 = l_Lean_Parser_Command_notation___elambda__1___closed__6; +x_91 = l_Lean_Parser_ParserState_mkErrorsAt(x_83, x_90, x_82); +x_63 = x_91; +goto block_81; } else { -obj* x_42; uint8 x_43; -lean::dec(x_39); -x_42 = lean::cnstr_get(x_38, 1); -lean::inc(x_42); -x_43 = lean::nat_dec_eq(x_42, x_37); -lean::dec(x_42); -if (x_43 == 0) -{ -obj* x_44; obj* x_45; -lean::dec(x_37); -x_44 = l_Lean_nullKind; -x_45 = l_Lean_Parser_ParserState_mkNode(x_38, x_44, x_36); -x_6 = x_45; -goto block_30; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; -x_46 = l_Lean_Parser_ParserState_restore(x_38, x_36, x_37); -x_47 = l_Lean_nullKind; -x_48 = l_Lean_Parser_ParserState_mkNode(x_46, x_47, x_36); -x_6 = x_48; -goto block_30; -} +lean::dec(x_82); +x_63 = x_83; +goto block_81; } } else { -obj* x_49; obj* x_50; -lean::dec(x_34); -lean::dec(x_2); -x_49 = l_Lean_Parser_Command_notation___elambda__1___closed__2; -x_50 = l_Lean_Parser_ParserState_mkNode(x_33, x_49, x_5); -return x_50; +obj* x_92; obj* x_93; +lean::dec(x_86); +x_92 = l_Lean_Parser_Command_notation___elambda__1___closed__6; +x_93 = l_Lean_Parser_ParserState_mkErrorsAt(x_83, x_92, x_82); +x_63 = x_93; +goto block_81; } -block_30: +} +else +{ +obj* x_94; obj* x_95; +lean::dec(x_84); +x_94 = l_Lean_Parser_Command_notation___elambda__1___closed__6; +x_95 = l_Lean_Parser_ParserState_mkErrorsAt(x_83, x_94, x_82); +x_63 = x_95; +goto block_81; +} +block_62: { obj* x_7; x_7 = lean::cnstr_get(x_6, 3); @@ -17210,51 +22229,209 @@ x_14 = lean::cnstr_get(x_13, 3); lean::inc(x_14); if (lean::obj_tag(x_14) == 0) { -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_16 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +obj* x_15; obj* x_16; obj* x_17; +x_15 = lean::cnstr_get(x_13, 1); +lean::inc(x_15); lean::inc(x_2); -x_17 = l_Lean_Parser_symbolFnAux(x_15, x_16, x_2, x_13); -x_18 = lean::cnstr_get(x_17, 3); +x_16 = l_Lean_Parser_tokenFn(x_2, x_13); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) +{ +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 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; -x_19 = l_Lean_Parser_termParserAttribute; -x_20 = lean::mk_nat_obj(0u); -x_21 = l_Lean_Parser_ParserAttribute_runParser(x_19, x_20, x_2, x_17); -x_22 = l_Lean_Parser_Command_notation___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); -return x_23; -} -else -{ -obj* x_24; obj* x_25; +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; obj* x_25; +x_23 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_25 = lean::cnstr_get(x_24, 3); +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; +x_26 = l_Lean_Parser_termParserAttribute; +x_27 = lean::mk_nat_obj(0u); +x_28 = l_Lean_Parser_ParserAttribute_runParser(x_26, x_27, x_2, x_24); +x_29 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_5); +return x_30; +} +else +{ +obj* x_31; obj* x_32; +lean::dec(x_25); lean::dec(x_2); -x_24 = l_Lean_Parser_Command_notation___elambda__1___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_17, x_24, x_5); -return x_25; +x_31 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_24, x_31, x_5); +return x_32; } } else { -obj* x_26; obj* x_27; +obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; +lean::dec(x_15); +x_33 = l_Lean_Parser_termParserAttribute; +x_34 = lean::mk_nat_obj(0u); +x_35 = l_Lean_Parser_ParserAttribute_runParser(x_33, x_34, x_2, x_16); +x_36 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_5); +return x_37; +} +} +else +{ +obj* x_38; obj* x_39; obj* x_40; +lean::dec(x_19); +x_38 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_38, x_15); +x_40 = lean::cnstr_get(x_39, 3); +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; +x_41 = l_Lean_Parser_termParserAttribute; +x_42 = lean::mk_nat_obj(0u); +x_43 = l_Lean_Parser_ParserAttribute_runParser(x_41, x_42, x_2, x_39); +x_44 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_5); +return x_45; +} +else +{ +obj* x_46; obj* x_47; +lean::dec(x_40); +lean::dec(x_2); +x_46 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_47 = l_Lean_Parser_ParserState_mkNode(x_39, x_46, x_5); +return x_47; +} +} +} +else +{ +obj* x_48; obj* x_49; obj* x_50; +lean::dec(x_17); +x_48 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_49 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_48, x_15); +x_50 = lean::cnstr_get(x_49, 3); +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 = l_Lean_Parser_termParserAttribute; +x_52 = lean::mk_nat_obj(0u); +x_53 = l_Lean_Parser_ParserAttribute_runParser(x_51, x_52, x_2, x_49); +x_54 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_55 = l_Lean_Parser_ParserState_mkNode(x_53, x_54, x_5); +return x_55; +} +else +{ +obj* x_56; obj* x_57; +lean::dec(x_50); +lean::dec(x_2); +x_56 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_57 = l_Lean_Parser_ParserState_mkNode(x_49, x_56, x_5); +return x_57; +} +} +} +else +{ +obj* x_58; obj* x_59; lean::dec(x_14); lean::dec(x_2); -x_26 = l_Lean_Parser_Command_notation___elambda__1___closed__2; -x_27 = l_Lean_Parser_ParserState_mkNode(x_13, x_26, x_5); -return x_27; +x_58 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_59 = l_Lean_Parser_ParserState_mkNode(x_13, x_58, x_5); +return x_59; } } else { -obj* x_28; obj* x_29; +obj* x_60; obj* x_61; lean::dec(x_7); lean::dec(x_2); -x_28 = l_Lean_Parser_Command_notation___elambda__1___closed__2; -x_29 = l_Lean_Parser_ParserState_mkNode(x_6, x_28, x_5); -return x_29; +x_60 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_61 = l_Lean_Parser_ParserState_mkNode(x_6, x_60, x_5); +return x_61; +} +} +block_81: +{ +obj* x_64; +x_64 = lean::cnstr_get(x_63, 3); +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; +x_65 = lean::cnstr_get(x_63, 0); +lean::inc(x_65); +x_66 = lean::array_get_size(x_65); +lean::dec(x_65); +x_67 = lean::cnstr_get(x_63, 1); +lean::inc(x_67); +lean::inc(x_2); +x_68 = l_Lean_Parser_identFn___rarg(x_2, x_63); +x_69 = lean::cnstr_get(x_68, 3); +lean::inc(x_69); +if (lean::obj_tag(x_69) == 0) +{ +obj* x_70; obj* x_71; +lean::dec(x_67); +x_70 = l_Lean_nullKind; +x_71 = l_Lean_Parser_ParserState_mkNode(x_68, x_70, x_66); +x_6 = x_71; +goto block_62; +} +else +{ +obj* x_72; uint8 x_73; +lean::dec(x_69); +x_72 = lean::cnstr_get(x_68, 1); +lean::inc(x_72); +x_73 = lean::nat_dec_eq(x_72, x_67); +lean::dec(x_72); +if (x_73 == 0) +{ +obj* x_74; obj* x_75; +lean::dec(x_67); +x_74 = l_Lean_nullKind; +x_75 = l_Lean_Parser_ParserState_mkNode(x_68, x_74, x_66); +x_6 = x_75; +goto block_62; +} +else +{ +obj* x_76; obj* x_77; obj* x_78; +x_76 = l_Lean_Parser_ParserState_restore(x_68, x_66, x_67); +x_77 = l_Lean_nullKind; +x_78 = l_Lean_Parser_ParserState_mkNode(x_76, x_77, x_66); +x_6 = x_78; +goto block_62; +} +} +} +else +{ +obj* x_79; obj* x_80; +lean::dec(x_64); +lean::dec(x_2); +x_79 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +x_80 = l_Lean_Parser_ParserState_mkNode(x_63, x_79, x_5); +return x_80; } } } @@ -17453,6 +22630,8 @@ l_Lean_Parser_Command_docComment___elambda__1___closed__7 = _init_l_Lean_Parser_ lean::mark_persistent(l_Lean_Parser_Command_docComment___elambda__1___closed__7); l_Lean_Parser_Command_docComment___elambda__1___closed__8 = _init_l_Lean_Parser_Command_docComment___elambda__1___closed__8(); lean::mark_persistent(l_Lean_Parser_Command_docComment___elambda__1___closed__8); +l_Lean_Parser_Command_docComment___elambda__1___closed__9 = _init_l_Lean_Parser_Command_docComment___elambda__1___closed__9(); +lean::mark_persistent(l_Lean_Parser_Command_docComment___elambda__1___closed__9); l_Lean_Parser_Command_docComment___closed__1 = _init_l_Lean_Parser_Command_docComment___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_docComment___closed__1); l_Lean_Parser_Command_docComment___closed__2 = _init_l_Lean_Parser_Command_docComment___closed__2(); @@ -17506,6 +22685,8 @@ l_Lean_Parser_Command_attributes___elambda__1___closed__5 = _init_l_Lean_Parser_ lean::mark_persistent(l_Lean_Parser_Command_attributes___elambda__1___closed__5); l_Lean_Parser_Command_attributes___elambda__1___closed__6 = _init_l_Lean_Parser_Command_attributes___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_attributes___elambda__1___closed__6); +l_Lean_Parser_Command_attributes___elambda__1___closed__7 = _init_l_Lean_Parser_Command_attributes___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_attributes___elambda__1___closed__7); l_Lean_Parser_Command_attributes___closed__1 = _init_l_Lean_Parser_Command_attributes___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_attributes___closed__1); l_Lean_Parser_Command_attributes___closed__2 = _init_l_Lean_Parser_Command_attributes___closed__2(); @@ -17535,6 +22716,8 @@ l_Lean_Parser_Command_private___elambda__1___rarg___closed__5 = _init_l_Lean_Par lean::mark_persistent(l_Lean_Parser_Command_private___elambda__1___rarg___closed__5); l_Lean_Parser_Command_private___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_private___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_private___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_private___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_private___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_private___elambda__1___rarg___closed__7); l_Lean_Parser_Command_private___closed__1 = _init_l_Lean_Parser_Command_private___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_private___closed__1); l_Lean_Parser_Command_private___closed__2 = _init_l_Lean_Parser_Command_private___closed__2(); @@ -17558,6 +22741,8 @@ l_Lean_Parser_Command_protected___elambda__1___rarg___closed__5 = _init_l_Lean_P lean::mark_persistent(l_Lean_Parser_Command_protected___elambda__1___rarg___closed__5); l_Lean_Parser_Command_protected___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_protected___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_protected___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_protected___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_protected___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_protected___elambda__1___rarg___closed__7); l_Lean_Parser_Command_protected___closed__1 = _init_l_Lean_Parser_Command_protected___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_protected___closed__1); l_Lean_Parser_Command_protected___closed__2 = _init_l_Lean_Parser_Command_protected___closed__2(); @@ -17590,6 +22775,8 @@ l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__5 = _init_l_Le lean::mark_persistent(l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__5); l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_noncomputable___elambda__1___rarg___closed__7); l_Lean_Parser_Command_noncomputable___closed__1 = _init_l_Lean_Parser_Command_noncomputable___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_noncomputable___closed__1); l_Lean_Parser_Command_noncomputable___closed__2 = _init_l_Lean_Parser_Command_noncomputable___closed__2(); @@ -17613,6 +22800,8 @@ l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__5 = _init_l_Lean_Pars lean::mark_persistent(l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__5); l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_unsafe___elambda__1___rarg___closed__7); l_Lean_Parser_Command_unsafe___closed__1 = _init_l_Lean_Parser_Command_unsafe___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_unsafe___closed__1); l_Lean_Parser_Command_unsafe___closed__2 = _init_l_Lean_Parser_Command_unsafe___closed__2(); @@ -17624,6 +22813,31 @@ lean::mark_persistent(l_Lean_Parser_Command_unsafe___closed__4); l_Lean_Parser_Command_unsafe = _init_l_Lean_Parser_Command_unsafe(); lean::mark_persistent(l_Lean_Parser_Command_unsafe); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Command"), "unsafe"), l_Lean_Parser_Command_unsafe); +l_Lean_Parser_Command_partial___elambda__1___rarg___closed__1 = _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__1(); +lean::mark_persistent(l_Lean_Parser_Command_partial___elambda__1___rarg___closed__1); +l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2 = _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2(); +lean::mark_persistent(l_Lean_Parser_Command_partial___elambda__1___rarg___closed__2); +l_Lean_Parser_Command_partial___elambda__1___rarg___closed__3 = _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__3(); +lean::mark_persistent(l_Lean_Parser_Command_partial___elambda__1___rarg___closed__3); +l_Lean_Parser_Command_partial___elambda__1___rarg___closed__4 = _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__4(); +lean::mark_persistent(l_Lean_Parser_Command_partial___elambda__1___rarg___closed__4); +l_Lean_Parser_Command_partial___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__5(); +lean::mark_persistent(l_Lean_Parser_Command_partial___elambda__1___rarg___closed__5); +l_Lean_Parser_Command_partial___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_partial___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_partial___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_partial___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_partial___elambda__1___rarg___closed__7); +l_Lean_Parser_Command_partial___closed__1 = _init_l_Lean_Parser_Command_partial___closed__1(); +lean::mark_persistent(l_Lean_Parser_Command_partial___closed__1); +l_Lean_Parser_Command_partial___closed__2 = _init_l_Lean_Parser_Command_partial___closed__2(); +lean::mark_persistent(l_Lean_Parser_Command_partial___closed__2); +l_Lean_Parser_Command_partial___closed__3 = _init_l_Lean_Parser_Command_partial___closed__3(); +lean::mark_persistent(l_Lean_Parser_Command_partial___closed__3); +l_Lean_Parser_Command_partial___closed__4 = _init_l_Lean_Parser_Command_partial___closed__4(); +lean::mark_persistent(l_Lean_Parser_Command_partial___closed__4); +l_Lean_Parser_Command_partial = _init_l_Lean_Parser_Command_partial(); +lean::mark_persistent(l_Lean_Parser_Command_partial); +lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Command"), "partial"), l_Lean_Parser_Command_partial); l_Lean_Parser_Command_declModifiers___elambda__1___closed__1 = _init_l_Lean_Parser_Command_declModifiers___elambda__1___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_declModifiers___elambda__1___closed__1); l_Lean_Parser_Command_declModifiers___elambda__1___closed__2 = _init_l_Lean_Parser_Command_declModifiers___elambda__1___closed__2(); @@ -17652,6 +22866,10 @@ l_Lean_Parser_Command_declModifiers___closed__11 = _init_l_Lean_Parser_Command_d lean::mark_persistent(l_Lean_Parser_Command_declModifiers___closed__11); l_Lean_Parser_Command_declModifiers___closed__12 = _init_l_Lean_Parser_Command_declModifiers___closed__12(); lean::mark_persistent(l_Lean_Parser_Command_declModifiers___closed__12); +l_Lean_Parser_Command_declModifiers___closed__13 = _init_l_Lean_Parser_Command_declModifiers___closed__13(); +lean::mark_persistent(l_Lean_Parser_Command_declModifiers___closed__13); +l_Lean_Parser_Command_declModifiers___closed__14 = _init_l_Lean_Parser_Command_declModifiers___closed__14(); +lean::mark_persistent(l_Lean_Parser_Command_declModifiers___closed__14); l_Lean_Parser_Command_declModifiers = _init_l_Lean_Parser_Command_declModifiers(); lean::mark_persistent(l_Lean_Parser_Command_declModifiers); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Command"), "declModifiers"), l_Lean_Parser_Command_declModifiers); @@ -17751,6 +22969,8 @@ l_Lean_Parser_Command_abbrev___elambda__1___closed__5 = _init_l_Lean_Parser_Comm lean::mark_persistent(l_Lean_Parser_Command_abbrev___elambda__1___closed__5); l_Lean_Parser_Command_abbrev___elambda__1___closed__6 = _init_l_Lean_Parser_Command_abbrev___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_abbrev___elambda__1___closed__6); +l_Lean_Parser_Command_abbrev___elambda__1___closed__7 = _init_l_Lean_Parser_Command_abbrev___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_abbrev___elambda__1___closed__7); l_Lean_Parser_Command_abbrev___closed__1 = _init_l_Lean_Parser_Command_abbrev___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_abbrev___closed__1); l_Lean_Parser_Command_abbrev___closed__2 = _init_l_Lean_Parser_Command_abbrev___closed__2(); @@ -17780,6 +23000,8 @@ l_Lean_Parser_Command_def___elambda__1___closed__5 = _init_l_Lean_Parser_Command lean::mark_persistent(l_Lean_Parser_Command_def___elambda__1___closed__5); l_Lean_Parser_Command_def___elambda__1___closed__6 = _init_l_Lean_Parser_Command_def___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_def___elambda__1___closed__6); +l_Lean_Parser_Command_def___elambda__1___closed__7 = _init_l_Lean_Parser_Command_def___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_def___elambda__1___closed__7); l_Lean_Parser_Command_def___closed__1 = _init_l_Lean_Parser_Command_def___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_def___closed__1); l_Lean_Parser_Command_def___closed__2 = _init_l_Lean_Parser_Command_def___closed__2(); @@ -17805,6 +23027,8 @@ l_Lean_Parser_Command_theorem___elambda__1___closed__5 = _init_l_Lean_Parser_Com lean::mark_persistent(l_Lean_Parser_Command_theorem___elambda__1___closed__5); l_Lean_Parser_Command_theorem___elambda__1___closed__6 = _init_l_Lean_Parser_Command_theorem___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_theorem___elambda__1___closed__6); +l_Lean_Parser_Command_theorem___elambda__1___closed__7 = _init_l_Lean_Parser_Command_theorem___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_theorem___elambda__1___closed__7); l_Lean_Parser_Command_theorem___closed__1 = _init_l_Lean_Parser_Command_theorem___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_theorem___closed__1); l_Lean_Parser_Command_theorem___closed__2 = _init_l_Lean_Parser_Command_theorem___closed__2(); @@ -17834,6 +23058,8 @@ l_Lean_Parser_Command_constant___elambda__1___closed__5 = _init_l_Lean_Parser_Co lean::mark_persistent(l_Lean_Parser_Command_constant___elambda__1___closed__5); l_Lean_Parser_Command_constant___elambda__1___closed__6 = _init_l_Lean_Parser_Command_constant___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_constant___elambda__1___closed__6); +l_Lean_Parser_Command_constant___elambda__1___closed__7 = _init_l_Lean_Parser_Command_constant___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_constant___elambda__1___closed__7); l_Lean_Parser_Command_constant___closed__1 = _init_l_Lean_Parser_Command_constant___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_constant___closed__1); l_Lean_Parser_Command_constant___closed__2 = _init_l_Lean_Parser_Command_constant___closed__2(); @@ -17865,6 +23091,8 @@ l_Lean_Parser_Command_instance___elambda__1___closed__5 = _init_l_Lean_Parser_Co lean::mark_persistent(l_Lean_Parser_Command_instance___elambda__1___closed__5); l_Lean_Parser_Command_instance___elambda__1___closed__6 = _init_l_Lean_Parser_Command_instance___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_instance___elambda__1___closed__6); +l_Lean_Parser_Command_instance___elambda__1___closed__7 = _init_l_Lean_Parser_Command_instance___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_instance___elambda__1___closed__7); l_Lean_Parser_Command_instance___closed__1 = _init_l_Lean_Parser_Command_instance___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_instance___closed__1); l_Lean_Parser_Command_instance___closed__2 = _init_l_Lean_Parser_Command_instance___closed__2(); @@ -17894,6 +23122,8 @@ l_Lean_Parser_Command_axiom___elambda__1___closed__5 = _init_l_Lean_Parser_Comma lean::mark_persistent(l_Lean_Parser_Command_axiom___elambda__1___closed__5); l_Lean_Parser_Command_axiom___elambda__1___closed__6 = _init_l_Lean_Parser_Command_axiom___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_axiom___elambda__1___closed__6); +l_Lean_Parser_Command_axiom___elambda__1___closed__7 = _init_l_Lean_Parser_Command_axiom___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_axiom___elambda__1___closed__7); l_Lean_Parser_Command_axiom___closed__1 = _init_l_Lean_Parser_Command_axiom___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_axiom___closed__1); l_Lean_Parser_Command_axiom___closed__2 = _init_l_Lean_Parser_Command_axiom___closed__2(); @@ -17921,6 +23151,8 @@ l_Lean_Parser_Command_example___elambda__1___closed__5 = _init_l_Lean_Parser_Com lean::mark_persistent(l_Lean_Parser_Command_example___elambda__1___closed__5); l_Lean_Parser_Command_example___elambda__1___closed__6 = _init_l_Lean_Parser_Command_example___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_example___elambda__1___closed__6); +l_Lean_Parser_Command_example___elambda__1___closed__7 = _init_l_Lean_Parser_Command_example___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_example___elambda__1___closed__7); l_Lean_Parser_Command_example___closed__1 = _init_l_Lean_Parser_Command_example___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_example___closed__1); l_Lean_Parser_Command_example___closed__2 = _init_l_Lean_Parser_Command_example___closed__2(); @@ -18006,6 +23238,8 @@ l_Lean_Parser_Command_inductive___elambda__1___closed__5 = _init_l_Lean_Parser_C lean::mark_persistent(l_Lean_Parser_Command_inductive___elambda__1___closed__5); l_Lean_Parser_Command_inductive___elambda__1___closed__6 = _init_l_Lean_Parser_Command_inductive___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_inductive___elambda__1___closed__6); +l_Lean_Parser_Command_inductive___elambda__1___closed__7 = _init_l_Lean_Parser_Command_inductive___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_inductive___elambda__1___closed__7); l_Lean_Parser_Command_inductive___closed__1 = _init_l_Lean_Parser_Command_inductive___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_inductive___closed__1); l_Lean_Parser_Command_inductive___closed__2 = _init_l_Lean_Parser_Command_inductive___closed__2(); @@ -18025,6 +23259,35 @@ lean::mark_persistent(l_Lean_Parser_Command_inductive___closed__8); l_Lean_Parser_Command_inductive = _init_l_Lean_Parser_Command_inductive(); lean::mark_persistent(l_Lean_Parser_Command_inductive); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Command"), "inductive"), l_Lean_Parser_Command_inductive); +l_Lean_Parser_Command_classInductive___elambda__1___closed__1 = _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__1(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___elambda__1___closed__1); +l_Lean_Parser_Command_classInductive___elambda__1___closed__2 = _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__2(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___elambda__1___closed__2); +l_Lean_Parser_Command_classInductive___elambda__1___closed__3 = _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__3(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___elambda__1___closed__3); +l_Lean_Parser_Command_classInductive___elambda__1___closed__4 = _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__4(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___elambda__1___closed__4); +l_Lean_Parser_Command_classInductive___elambda__1___closed__5 = _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__5(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___elambda__1___closed__5); +l_Lean_Parser_Command_classInductive___elambda__1___closed__6 = _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___elambda__1___closed__6); +l_Lean_Parser_Command_classInductive___elambda__1___closed__7 = _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___elambda__1___closed__7); +l_Lean_Parser_Command_classInductive___closed__1 = _init_l_Lean_Parser_Command_classInductive___closed__1(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___closed__1); +l_Lean_Parser_Command_classInductive___closed__2 = _init_l_Lean_Parser_Command_classInductive___closed__2(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___closed__2); +l_Lean_Parser_Command_classInductive___closed__3 = _init_l_Lean_Parser_Command_classInductive___closed__3(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___closed__3); +l_Lean_Parser_Command_classInductive___closed__4 = _init_l_Lean_Parser_Command_classInductive___closed__4(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___closed__4); +l_Lean_Parser_Command_classInductive___closed__5 = _init_l_Lean_Parser_Command_classInductive___closed__5(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___closed__5); +l_Lean_Parser_Command_classInductive___closed__6 = _init_l_Lean_Parser_Command_classInductive___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive___closed__6); +l_Lean_Parser_Command_classInductive = _init_l_Lean_Parser_Command_classInductive(); +lean::mark_persistent(l_Lean_Parser_Command_classInductive); +lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Command"), "classInductive"), l_Lean_Parser_Command_classInductive); l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__1 = _init_l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__1); l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2 = _init_l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2(); @@ -18123,6 +23386,8 @@ l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__4 = _init_l_Lean_ lean::mark_persistent(l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__4); l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__5); +l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_structCtor___elambda__1___rarg___closed__6); l_Lean_Parser_Command_structCtor___closed__1 = _init_l_Lean_Parser_Command_structCtor___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_structCtor___closed__1); l_Lean_Parser_Command_structCtor___closed__2 = _init_l_Lean_Parser_Command_structCtor___closed__2(); @@ -18150,6 +23415,8 @@ l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__5 = _init_l_Lean lean::mark_persistent(l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__5); l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_structureTk___elambda__1___rarg___closed__7); l_Lean_Parser_Command_structureTk___closed__1 = _init_l_Lean_Parser_Command_structureTk___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_structureTk___closed__1); l_Lean_Parser_Command_structureTk___closed__2 = _init_l_Lean_Parser_Command_structureTk___closed__2(); @@ -18165,22 +23432,12 @@ l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__1 = _init_l_Lean_Par lean::mark_persistent(l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__1); l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__2 = _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__2(); lean::mark_persistent(l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__2); -l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__3 = _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__3(); -lean::mark_persistent(l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__3); -l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__4 = _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__4(); -lean::mark_persistent(l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__4); -l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__5(); -lean::mark_persistent(l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__5); -l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__6(); -lean::mark_persistent(l_Lean_Parser_Command_classTk___elambda__1___rarg___closed__6); l_Lean_Parser_Command_classTk___closed__1 = _init_l_Lean_Parser_Command_classTk___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_classTk___closed__1); l_Lean_Parser_Command_classTk___closed__2 = _init_l_Lean_Parser_Command_classTk___closed__2(); lean::mark_persistent(l_Lean_Parser_Command_classTk___closed__2); l_Lean_Parser_Command_classTk___closed__3 = _init_l_Lean_Parser_Command_classTk___closed__3(); lean::mark_persistent(l_Lean_Parser_Command_classTk___closed__3); -l_Lean_Parser_Command_classTk___closed__4 = _init_l_Lean_Parser_Command_classTk___closed__4(); -lean::mark_persistent(l_Lean_Parser_Command_classTk___closed__4); l_Lean_Parser_Command_classTk = _init_l_Lean_Parser_Command_classTk(); lean::mark_persistent(l_Lean_Parser_Command_classTk); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Command"), "classTk"), l_Lean_Parser_Command_classTk); @@ -18196,6 +23453,8 @@ l_Lean_Parser_Command_extends___elambda__1___closed__5 = _init_l_Lean_Parser_Com lean::mark_persistent(l_Lean_Parser_Command_extends___elambda__1___closed__5); l_Lean_Parser_Command_extends___elambda__1___closed__6 = _init_l_Lean_Parser_Command_extends___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_extends___elambda__1___closed__6); +l_Lean_Parser_Command_extends___elambda__1___closed__7 = _init_l_Lean_Parser_Command_extends___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_extends___elambda__1___closed__7); l_Lean_Parser_Command_extends___closed__1 = _init_l_Lean_Parser_Command_extends___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_extends___closed__1); l_Lean_Parser_Command_extends___closed__2 = _init_l_Lean_Parser_Command_extends___closed__2(); @@ -18270,6 +23529,8 @@ l_Lean_Parser_Command_declaration___closed__11 = _init_l_Lean_Parser_Command_dec lean::mark_persistent(l_Lean_Parser_Command_declaration___closed__11); l_Lean_Parser_Command_declaration___closed__12 = _init_l_Lean_Parser_Command_declaration___closed__12(); lean::mark_persistent(l_Lean_Parser_Command_declaration___closed__12); +l_Lean_Parser_Command_declaration___closed__13 = _init_l_Lean_Parser_Command_declaration___closed__13(); +lean::mark_persistent(l_Lean_Parser_Command_declaration___closed__13); l_Lean_Parser_Command_declaration = _init_l_Lean_Parser_Command_declaration(); lean::mark_persistent(l_Lean_Parser_Command_declaration); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Command"), "declaration"), l_Lean_Parser_Command_declaration); @@ -18287,6 +23548,8 @@ l_Lean_Parser_Command_section___elambda__1___rarg___closed__5 = _init_l_Lean_Par lean::mark_persistent(l_Lean_Parser_Command_section___elambda__1___rarg___closed__5); l_Lean_Parser_Command_section___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_section___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_section___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_section___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_section___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_section___elambda__1___rarg___closed__7); l_Lean_Parser_Command_section___closed__1 = _init_l_Lean_Parser_Command_section___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_section___closed__1); l_Lean_Parser_Command_section___closed__2 = _init_l_Lean_Parser_Command_section___closed__2(); @@ -18316,6 +23579,8 @@ l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__5 = _init_l_Lean_P lean::mark_persistent(l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__5); l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_namespace___elambda__1___rarg___closed__7); l_Lean_Parser_Command_namespace___closed__1 = _init_l_Lean_Parser_Command_namespace___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_namespace___closed__1); l_Lean_Parser_Command_namespace___closed__2 = _init_l_Lean_Parser_Command_namespace___closed__2(); @@ -18343,6 +23608,8 @@ l_Lean_Parser_Command_end___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_ lean::mark_persistent(l_Lean_Parser_Command_end___elambda__1___rarg___closed__5); l_Lean_Parser_Command_end___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_end___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_end___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_end___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_end___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_end___elambda__1___rarg___closed__7); l_Lean_Parser_Command_end___closed__1 = _init_l_Lean_Parser_Command_end___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_end___closed__1); l_Lean_Parser_Command_end___closed__2 = _init_l_Lean_Parser_Command_end___closed__2(); @@ -18370,6 +23637,8 @@ l_Lean_Parser_Command_variable___elambda__1___closed__5 = _init_l_Lean_Parser_Co lean::mark_persistent(l_Lean_Parser_Command_variable___elambda__1___closed__5); l_Lean_Parser_Command_variable___elambda__1___closed__6 = _init_l_Lean_Parser_Command_variable___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_variable___elambda__1___closed__6); +l_Lean_Parser_Command_variable___elambda__1___closed__7 = _init_l_Lean_Parser_Command_variable___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_variable___elambda__1___closed__7); l_Lean_Parser_Command_variable___closed__1 = _init_l_Lean_Parser_Command_variable___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_variable___closed__1); l_Lean_Parser_Command_variable___closed__2 = _init_l_Lean_Parser_Command_variable___closed__2(); @@ -18397,6 +23666,8 @@ l_Lean_Parser_Command_variables___elambda__1___closed__5 = _init_l_Lean_Parser_C lean::mark_persistent(l_Lean_Parser_Command_variables___elambda__1___closed__5); l_Lean_Parser_Command_variables___elambda__1___closed__6 = _init_l_Lean_Parser_Command_variables___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_variables___elambda__1___closed__6); +l_Lean_Parser_Command_variables___elambda__1___closed__7 = _init_l_Lean_Parser_Command_variables___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_variables___elambda__1___closed__7); l_Lean_Parser_Command_variables___closed__1 = _init_l_Lean_Parser_Command_variables___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_variables___closed__1); l_Lean_Parser_Command_variables___closed__2 = _init_l_Lean_Parser_Command_variables___closed__2(); @@ -18424,6 +23695,8 @@ l_Lean_Parser_Command_universe___elambda__1___rarg___closed__5 = _init_l_Lean_Pa lean::mark_persistent(l_Lean_Parser_Command_universe___elambda__1___rarg___closed__5); l_Lean_Parser_Command_universe___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_universe___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_universe___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_universe___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_universe___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_universe___elambda__1___rarg___closed__7); l_Lean_Parser_Command_universe___closed__1 = _init_l_Lean_Parser_Command_universe___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_universe___closed__1); l_Lean_Parser_Command_universe___closed__2 = _init_l_Lean_Parser_Command_universe___closed__2(); @@ -18451,6 +23724,8 @@ l_Lean_Parser_Command_universes___elambda__1___closed__5 = _init_l_Lean_Parser_C lean::mark_persistent(l_Lean_Parser_Command_universes___elambda__1___closed__5); l_Lean_Parser_Command_universes___elambda__1___closed__6 = _init_l_Lean_Parser_Command_universes___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_universes___elambda__1___closed__6); +l_Lean_Parser_Command_universes___elambda__1___closed__7 = _init_l_Lean_Parser_Command_universes___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_universes___elambda__1___closed__7); l_Lean_Parser_Command_universes___closed__1 = _init_l_Lean_Parser_Command_universes___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_universes___closed__1); l_Lean_Parser_Command_universes___closed__2 = _init_l_Lean_Parser_Command_universes___closed__2(); @@ -18478,6 +23753,8 @@ l_Lean_Parser_Command_check___elambda__1___rarg___closed__5 = _init_l_Lean_Parse lean::mark_persistent(l_Lean_Parser_Command_check___elambda__1___rarg___closed__5); l_Lean_Parser_Command_check___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_check___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_check___elambda__1___rarg___closed__6); +l_Lean_Parser_Command_check___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Command_check___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_check___elambda__1___rarg___closed__7); l_Lean_Parser_Command_check___closed__1 = _init_l_Lean_Parser_Command_check___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_check___closed__1); l_Lean_Parser_Command_check___closed__2 = _init_l_Lean_Parser_Command_check___closed__2(); @@ -18503,6 +23780,8 @@ l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__4 = _init_l_Lean_ lean::mark_persistent(l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__4); l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__5); +l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_init__quot___elambda__1___rarg___closed__6); l_Lean_Parser_Command_init__quot___closed__1 = _init_l_Lean_Parser_Command_init__quot___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_init__quot___closed__1); l_Lean_Parser_Command_init__quot___closed__2 = _init_l_Lean_Parser_Command_init__quot___closed__2(); @@ -18540,6 +23819,8 @@ l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__11 = _init_l_Lea lean::mark_persistent(l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__11); l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__12 = _init_l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__12(); lean::mark_persistent(l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__12); +l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__13 = _init_l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__13(); +lean::mark_persistent(l_Lean_Parser_Command_set__option___elambda__1___rarg___closed__13); l_Lean_Parser_Command_set__option___closed__1 = _init_l_Lean_Parser_Command_set__option___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_set__option___closed__1); l_Lean_Parser_Command_set__option___closed__2 = _init_l_Lean_Parser_Command_set__option___closed__2(); @@ -18585,6 +23866,10 @@ l_Lean_Parser_Command_attribute___elambda__1___closed__9 = _init_l_Lean_Parser_C lean::mark_persistent(l_Lean_Parser_Command_attribute___elambda__1___closed__9); l_Lean_Parser_Command_attribute___elambda__1___closed__10 = _init_l_Lean_Parser_Command_attribute___elambda__1___closed__10(); lean::mark_persistent(l_Lean_Parser_Command_attribute___elambda__1___closed__10); +l_Lean_Parser_Command_attribute___elambda__1___closed__11 = _init_l_Lean_Parser_Command_attribute___elambda__1___closed__11(); +lean::mark_persistent(l_Lean_Parser_Command_attribute___elambda__1___closed__11); +l_Lean_Parser_Command_attribute___elambda__1___closed__12 = _init_l_Lean_Parser_Command_attribute___elambda__1___closed__12(); +lean::mark_persistent(l_Lean_Parser_Command_attribute___elambda__1___closed__12); l_Lean_Parser_Command_attribute___closed__1 = _init_l_Lean_Parser_Command_attribute___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_attribute___closed__1); l_Lean_Parser_Command_attribute___closed__2 = _init_l_Lean_Parser_Command_attribute___closed__2(); @@ -18624,6 +23909,8 @@ l_Lean_Parser_Command_export___elambda__1___closed__5 = _init_l_Lean_Parser_Comm lean::mark_persistent(l_Lean_Parser_Command_export___elambda__1___closed__5); l_Lean_Parser_Command_export___elambda__1___closed__6 = _init_l_Lean_Parser_Command_export___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_export___elambda__1___closed__6); +l_Lean_Parser_Command_export___elambda__1___closed__7 = _init_l_Lean_Parser_Command_export___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_export___elambda__1___closed__7); l_Lean_Parser_Command_export___closed__1 = _init_l_Lean_Parser_Command_export___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_export___closed__1); l_Lean_Parser_Command_export___closed__2 = _init_l_Lean_Parser_Command_export___closed__2(); @@ -18676,6 +23963,8 @@ l_Lean_Parser_Command_openHiding___elambda__1___closed__5 = _init_l_Lean_Parser_ lean::mark_persistent(l_Lean_Parser_Command_openHiding___elambda__1___closed__5); l_Lean_Parser_Command_openHiding___elambda__1___closed__6 = _init_l_Lean_Parser_Command_openHiding___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_openHiding___elambda__1___closed__6); +l_Lean_Parser_Command_openHiding___elambda__1___closed__7 = _init_l_Lean_Parser_Command_openHiding___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_openHiding___elambda__1___closed__7); l_Lean_Parser_Command_openHiding___closed__1 = _init_l_Lean_Parser_Command_openHiding___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_openHiding___closed__1); l_Lean_Parser_Command_openHiding___closed__2 = _init_l_Lean_Parser_Command_openHiding___closed__2(); @@ -18711,6 +24000,8 @@ l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__9 = _init_l lean::mark_persistent(l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__9); l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__10 = _init_l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__10(); lean::mark_persistent(l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__10); +l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__11 = _init_l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__11(); +lean::mark_persistent(l_Lean_Parser_Command_openRenamingItem___elambda__1___rarg___closed__11); l_Lean_Parser_Command_openRenamingItem___closed__1 = _init_l_Lean_Parser_Command_openRenamingItem___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_openRenamingItem___closed__1); l_Lean_Parser_Command_openRenamingItem___closed__2 = _init_l_Lean_Parser_Command_openRenamingItem___closed__2(); @@ -18738,6 +24029,8 @@ l_Lean_Parser_Command_openRenaming___elambda__1___closed__5 = _init_l_Lean_Parse lean::mark_persistent(l_Lean_Parser_Command_openRenaming___elambda__1___closed__5); l_Lean_Parser_Command_openRenaming___elambda__1___closed__6 = _init_l_Lean_Parser_Command_openRenaming___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_openRenaming___elambda__1___closed__6); +l_Lean_Parser_Command_openRenaming___elambda__1___closed__7 = _init_l_Lean_Parser_Command_openRenaming___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_openRenaming___elambda__1___closed__7); l_Lean_Parser_Command_openRenaming___closed__1 = _init_l_Lean_Parser_Command_openRenaming___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_openRenaming___closed__1); l_Lean_Parser_Command_openRenaming___closed__2 = _init_l_Lean_Parser_Command_openRenaming___closed__2(); @@ -18769,6 +24062,8 @@ l_Lean_Parser_Command_open___elambda__1___closed__5 = _init_l_Lean_Parser_Comman lean::mark_persistent(l_Lean_Parser_Command_open___elambda__1___closed__5); l_Lean_Parser_Command_open___elambda__1___closed__6 = _init_l_Lean_Parser_Command_open___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_open___elambda__1___closed__6); +l_Lean_Parser_Command_open___elambda__1___closed__7 = _init_l_Lean_Parser_Command_open___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_open___elambda__1___closed__7); l_Lean_Parser_Command_open___closed__1 = _init_l_Lean_Parser_Command_open___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_open___closed__1); l_Lean_Parser_Command_open___closed__2 = _init_l_Lean_Parser_Command_open___closed__2(); @@ -18873,6 +24168,8 @@ l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__4 = _init_l_Lean_Pars lean::mark_persistent(l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__4); l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__5); +l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_prefix___elambda__1___rarg___closed__6); l_Lean_Parser_Command_prefix___closed__1 = _init_l_Lean_Parser_Command_prefix___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_prefix___closed__1); l_Lean_Parser_Command_prefix___closed__2 = _init_l_Lean_Parser_Command_prefix___closed__2(); @@ -18894,6 +24191,8 @@ l_Lean_Parser_Command_infix___elambda__1___rarg___closed__4 = _init_l_Lean_Parse lean::mark_persistent(l_Lean_Parser_Command_infix___elambda__1___rarg___closed__4); l_Lean_Parser_Command_infix___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_infix___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Command_infix___elambda__1___rarg___closed__5); +l_Lean_Parser_Command_infix___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_infix___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_infix___elambda__1___rarg___closed__6); l_Lean_Parser_Command_infix___closed__1 = _init_l_Lean_Parser_Command_infix___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_infix___closed__1); l_Lean_Parser_Command_infix___closed__2 = _init_l_Lean_Parser_Command_infix___closed__2(); @@ -18915,6 +24214,8 @@ l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__4 = _init_l_Lean_Pars lean::mark_persistent(l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__4); l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__5); +l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_infixl___elambda__1___rarg___closed__6); l_Lean_Parser_Command_infixl___closed__1 = _init_l_Lean_Parser_Command_infixl___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_infixl___closed__1); l_Lean_Parser_Command_infixl___closed__2 = _init_l_Lean_Parser_Command_infixl___closed__2(); @@ -18936,6 +24237,8 @@ l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__4 = _init_l_Lean_Pars lean::mark_persistent(l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__4); l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__5); +l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_infixr___elambda__1___rarg___closed__6); l_Lean_Parser_Command_infixr___closed__1 = _init_l_Lean_Parser_Command_infixr___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_infixr___closed__1); l_Lean_Parser_Command_infixr___closed__2 = _init_l_Lean_Parser_Command_infixr___closed__2(); @@ -18957,6 +24260,8 @@ l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__4 = _init_l_Lean_Par lean::mark_persistent(l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__4); l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__5); +l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_postfix___elambda__1___rarg___closed__6); l_Lean_Parser_Command_postfix___closed__1 = _init_l_Lean_Parser_Command_postfix___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_postfix___closed__1); l_Lean_Parser_Command_postfix___closed__2 = _init_l_Lean_Parser_Command_postfix___closed__2(); @@ -18995,6 +24300,8 @@ l_Lean_Parser_Command_reserve___elambda__1___closed__5 = _init_l_Lean_Parser_Com lean::mark_persistent(l_Lean_Parser_Command_reserve___elambda__1___closed__5); l_Lean_Parser_Command_reserve___elambda__1___closed__6 = _init_l_Lean_Parser_Command_reserve___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Command_reserve___elambda__1___closed__6); +l_Lean_Parser_Command_reserve___elambda__1___closed__7 = _init_l_Lean_Parser_Command_reserve___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Command_reserve___elambda__1___closed__7); l_Lean_Parser_Command_reserve___closed__1 = _init_l_Lean_Parser_Command_reserve___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_reserve___closed__1); l_Lean_Parser_Command_reserve___closed__2 = _init_l_Lean_Parser_Command_reserve___closed__2(); @@ -19063,6 +24370,8 @@ l_Lean_Parser_Command_notation___elambda__1___closed__4 = _init_l_Lean_Parser_Co lean::mark_persistent(l_Lean_Parser_Command_notation___elambda__1___closed__4); l_Lean_Parser_Command_notation___elambda__1___closed__5 = _init_l_Lean_Parser_Command_notation___elambda__1___closed__5(); lean::mark_persistent(l_Lean_Parser_Command_notation___elambda__1___closed__5); +l_Lean_Parser_Command_notation___elambda__1___closed__6 = _init_l_Lean_Parser_Command_notation___elambda__1___closed__6(); +lean::mark_persistent(l_Lean_Parser_Command_notation___elambda__1___closed__6); l_Lean_Parser_Command_notation___closed__1 = _init_l_Lean_Parser_Command_notation___closed__1(); lean::mark_persistent(l_Lean_Parser_Command_notation___closed__1); l_Lean_Parser_Command_notation___closed__2 = _init_l_Lean_Parser_Command_notation___closed__2(); diff --git a/src/stage0/init/lean/parser/level.cpp b/src/stage0/init/lean/parser/level.cpp index 25e400f2bf..cffe0363d7 100644 --- a/src/stage0/init/lean/parser/level.cpp +++ b/src/stage0/init/lean/parser/level.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_chFn___rarg___closed__1; obj* l_Lean_Parser_Level_max___closed__2; obj* l_Lean_Parser_Level_addLit___elambda__1___closed__5; obj* l_Lean_Parser_mkLevelParserAttribute___closed__5; @@ -29,8 +28,10 @@ obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; obj* l_Lean_Parser_Level_imax___closed__2; obj* l_Lean_Parser_Level_hole___closed__4; obj* l_Lean_Parser_ParserState_restore(obj*, obj*, obj*); +obj* l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6; obj* l_Lean_Parser_symbolInfo(obj*, obj*); obj* l_Lean_Parser_Level_max___elambda__1___closed__2; +obj* l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(obj*); obj* l_Lean_Parser_andthenInfo(obj*, obj*); extern obj* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; obj* l_Lean_Parser_Level_max; @@ -42,13 +43,14 @@ obj* l_Lean_Parser_Level_addLit___elambda__1___closed__1; obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__1; obj* l_Lean_Parser_builtinLevelParsingTable; obj* l_Lean_Parser_mkLevelParserAttribute___closed__1; +obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; extern obj* l_Lean_Parser_ParserAttribute_inhabited___closed__6; +obj* l_Lean_Parser_ParserState_mkUnexpectedError(obj*, obj*); obj* l_Lean_Parser_Level_paren___closed__5; obj* l_Lean_Parser_Level_addLit___closed__6; obj* l_Lean_Parser_Level_hole___closed__2; extern obj* l_Lean_Parser_appPrec; obj* l_Lean_Parser_Level_hole___elambda__1___rarg___closed__2; -obj* l_Lean_Parser_symbolFnAux(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_registerBuiltinParserAttribute(obj*, obj*, obj*); obj* l_Lean_Parser_Level_addLit; obj* l_Lean_Parser_Level_paren___closed__3; @@ -73,6 +75,7 @@ obj* l_Lean_Parser_Level_addLit___elambda__1___closed__3; obj* l_Lean_Parser_Level_num___closed__1; obj* l_Lean_Parser_Level_paren___elambda__1(obj*); obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; +obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__11; obj* l_Lean_Parser_ParserState_mkNode(obj*, obj*, obj*); obj* l_Lean_Parser_Level_max___closed__4; obj* l_Lean_Parser_Level_paren___elambda__1___rarg(obj*, obj*); @@ -90,6 +93,7 @@ obj* l_Lean_Parser_Level_addLit___elambda__1___closed__2; obj* l_Lean_Parser_levelParser___boxed(obj*, obj*); extern obj* l_Option_HasRepr___rarg___closed__3; obj* l_Lean_Parser_Level_imax___elambda__1___closed__4; +obj* l_Lean_Parser_tokenFn(obj*, obj*); extern obj* l_Char_HasRepr___closed__1; obj* l___regBuiltinParser_Lean_Parser_Level_num___closed__2; obj* l_Lean_Parser_levelParserAttribute; @@ -117,6 +121,9 @@ obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Level_hole___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Level_ident___elambda__1(obj*); obj* l_Lean_Parser_Level_ident___closed__2; +namespace lean { +uint8 string_dec_eq(obj*, obj*); +} obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; obj* l_Lean_Parser_numLitFn___rarg(obj*, obj*); obj* l_Lean_Parser_Level_paren___closed__2; @@ -141,8 +148,8 @@ obj* l_Lean_Parser_Level_hole___elambda__1(obj*); obj* l___regBuiltinParser_Lean_Parser_Level_max(obj*); obj* l_Lean_Parser_symbolOrIdentInfo(obj*); obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -obj* l_Lean_Parser_ParserState_mkError(obj*, obj*); obj* l_Lean_Parser_nodeInfo(obj*); +obj* l_Lean_Parser_Level_addLit___elambda__1___closed__6; obj* l_Array_size(obj*, obj*); obj* l_Lean_Parser_mkLevelParserAttribute___closed__3; obj* l_Lean_Parser_Level_max___closed__5; @@ -165,6 +172,7 @@ obj* l_Lean_Parser_Level_paren___closed__8; obj* l_Lean_Parser_Level_imax___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Level_hole___closed__3; obj* l_Lean_Parser_Level_imax___elambda__1___boxed(obj*, obj*, obj*); +obj* l_Lean_Parser_ParserState_mkErrorsAt(obj*, obj*, obj*); obj* l_Lean_Parser_mkLevelParserAttribute___closed__4; obj* l_Lean_Parser_Level_max___closed__3; obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__2; @@ -374,8 +382,8 @@ obj* _init_l_Lean_Parser_Level_paren___elambda__1___rarg___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -394,9 +402,11 @@ obj* _init_l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; +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; } } @@ -404,63 +414,195 @@ obj* _init_l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Level_paren___elambda__1___rarg___closed__11() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__11; +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* l_Lean_Parser_Level_paren___elambda__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_3; obj* x_4; obj* x_5; obj* x_38; obj* x_39; obj* x_40; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_6 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; +x_38 = lean::cnstr_get(x_2, 1); +lean::inc(x_38); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_39 = l_Lean_Parser_tokenFn(x_1, x_2); +x_40 = lean::cnstr_get(x_39, 3); +lean::inc(x_40); +if (lean::obj_tag(x_40) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = l_Lean_Parser_levelParserAttribute; -x_10 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = lean::cnstr_get(x_11, 3); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) +obj* x_41; obj* x_42; +x_41 = lean::cnstr_get(x_39, 0); +lean::inc(x_41); +x_42 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_41); +lean::dec(x_41); +if (lean::obj_tag(x_42) == 2) { -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_14 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_15 = l_Lean_Parser_symbolFnAux(x_13, x_14, x_1, x_11); -x_16 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; -x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_4); -return x_17; +obj* x_43; obj* x_44; uint8 x_45; +x_43 = lean::cnstr_get(x_42, 1); +lean::inc(x_43); +lean::dec(x_42); +x_44 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_45 = lean::string_dec_eq(x_43, x_44); +lean::dec(x_43); +if (x_45 == 0) +{ +obj* x_46; obj* x_47; +x_46 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_47 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_46, x_38); +x_5 = x_47; +goto block_37; } else { -obj* x_18; obj* x_19; -lean::dec(x_12); -lean::dec(x_1); -x_18 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; -x_19 = l_Lean_Parser_ParserState_mkNode(x_11, x_18, x_4); -return x_19; +lean::dec(x_38); +x_5 = x_39; +goto block_37; } } else { -obj* x_20; obj* x_21; -lean::dec(x_8); +obj* x_48; obj* x_49; +lean::dec(x_42); +x_48 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_49 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_48, x_38); +x_5 = x_49; +goto block_37; +} +} +else +{ +obj* x_50; obj* x_51; +lean::dec(x_40); +x_50 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_51 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_50, x_38); +x_5 = x_51; +goto block_37; +} +block_37: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; obj* x_10; +x_7 = l_Lean_Parser_levelParserAttribute; +x_8 = lean::mk_nat_obj(0u); +lean::inc(x_1); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = lean::cnstr_get(x_9, 3); +lean::inc(x_10); +if (lean::obj_tag(x_10) == 0) +{ +obj* x_11; obj* x_12; obj* x_13; +x_11 = lean::cnstr_get(x_9, 1); +lean::inc(x_11); +x_12 = l_Lean_Parser_tokenFn(x_1, x_9); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) +{ +obj* x_14; obj* x_15; +x_14 = lean::cnstr_get(x_12, 0); +lean::inc(x_14); +x_15 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_14); +lean::dec(x_14); +if (lean::obj_tag(x_15) == 2) +{ +obj* x_16; obj* x_17; uint8 x_18; +x_16 = lean::cnstr_get(x_15, 1); +lean::inc(x_16); +lean::dec(x_15); +x_17 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_18 = lean::string_dec_eq(x_16, x_17); +lean::dec(x_16); +if (x_18 == 0) +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +x_19 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_19, x_11); +x_21 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_11); +x_23 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; +x_24 = l_Lean_Parser_ParserState_mkNode(x_12, x_23, x_4); +return x_24; +} +} +else +{ +obj* x_25; obj* x_26; obj* x_27; obj* x_28; +lean::dec(x_15); +x_25 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_25, x_11); +x_27 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); +return x_28; +} +} +else +{ +obj* x_29; obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_13); +x_29 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_29, x_11); +x_31 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_4); +return x_32; +} +} +else +{ +obj* x_33; obj* x_34; +lean::dec(x_10); lean::dec(x_1); -x_20 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; -x_21 = l_Lean_Parser_ParserState_mkNode(x_7, x_20, x_4); -return x_21; +x_33 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; +x_34 = l_Lean_Parser_ParserState_mkNode(x_9, x_33, x_4); +return x_34; +} +} +else +{ +obj* x_35; obj* x_36; +lean::dec(x_6); +lean::dec(x_1); +x_35 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__4; +x_36 = l_Lean_Parser_ParserState_mkNode(x_5, x_35, x_4); +return x_36; +} } } } @@ -614,7 +756,7 @@ else obj* x_15; obj* x_16; lean::dec(x_3); x_15 = l_Lean_Parser_manyAux___main___closed__1; -x_16 = l_Lean_Parser_ParserState_mkError(x_10, x_15); +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); return x_16; } } @@ -652,7 +794,7 @@ obj* _init_l_Lean_Parser_Level_max___elambda__1___closed__3() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Level_max___elambda__1___closed__2; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -839,7 +981,7 @@ obj* _init_l_Lean_Parser_Level_imax___elambda__1___closed__3() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Level_imax___elambda__1___closed__2; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -1023,7 +1165,7 @@ obj* _init_l_Lean_Parser_Level_hole___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -1039,20 +1181,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Level_hole___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Level_hole___elambda__1(obj* x_1) { @@ -1317,7 +1525,7 @@ obj* _init_l_Lean_Parser_Level_addLit___elambda__1___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Level_addLit___elambda__1___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -1333,6 +1541,18 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Level_addLit___elambda__1___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Level_addLit___elambda__1___closed__5; +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* l_Lean_Parser_Level_addLit___elambda__1(obj* x_1, obj* x_2, obj* x_3) { _start: { @@ -1345,42 +1565,130 @@ lean::inc(x_3); x_6 = l_Lean_Parser_ParserState_pushSyntax(x_3, x_1); x_7 = lean::cnstr_get(x_3, 3); lean::inc(x_7); -lean::dec(x_3); if (lean::obj_tag(x_7) == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = l_Lean_Parser_Level_addLit___elambda__1___closed__3; -x_9 = l_Lean_Parser_Level_addLit___elambda__1___closed__5; +obj* x_8; obj* x_9; obj* x_10; +x_8 = lean::cnstr_get(x_3, 1); +lean::inc(x_8); +lean::dec(x_3); lean::inc(x_2); -x_10 = l_Lean_Parser_symbolFnAux(x_8, x_9, x_2, x_6); -x_11 = lean::cnstr_get(x_10, 3); +x_9 = l_Lean_Parser_tokenFn(x_2, x_6); +x_10 = lean::cnstr_get(x_9, 3); +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); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = l_Lean_Parser_numLitFn___rarg(x_2, x_10); -x_13 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); -return x_14; -} -else -{ -obj* x_15; obj* x_16; +x_12 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_11); lean::dec(x_11); +if (lean::obj_tag(x_12) == 2) +{ +obj* x_13; obj* x_14; uint8 x_15; +x_13 = lean::cnstr_get(x_12, 1); +lean::inc(x_13); +lean::dec(x_12); +x_14 = l_Lean_Parser_Level_addLit___elambda__1___closed__3; +x_15 = lean::string_dec_eq(x_13, x_14); +lean::dec(x_13); +if (x_15 == 0) +{ +obj* x_16; obj* x_17; obj* x_18; +x_16 = l_Lean_Parser_Level_addLit___elambda__1___closed__6; +x_17 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_16, x_8); +x_18 = lean::cnstr_get(x_17, 3); +lean::inc(x_18); +if (lean::obj_tag(x_18) == 0) +{ +obj* x_19; obj* x_20; obj* x_21; +x_19 = l_Lean_Parser_numLitFn___rarg(x_2, x_17); +x_20 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_5); +return x_21; +} +else +{ +obj* x_22; obj* x_23; +lean::dec(x_18); lean::dec(x_2); -x_15 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_10, x_15, x_5); -return x_16; +x_22 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_17, x_22, x_5); +return x_23; } } else { -obj* x_17; obj* x_18; -lean::dec(x_7); +obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_8); +x_24 = l_Lean_Parser_numLitFn___rarg(x_2, x_9); +x_25 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_5); +return x_26; +} +} +else +{ +obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_12); +x_27 = l_Lean_Parser_Level_addLit___elambda__1___closed__6; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_27, x_8); +x_29 = lean::cnstr_get(x_28, 3); +lean::inc(x_29); +if (lean::obj_tag(x_29) == 0) +{ +obj* x_30; obj* x_31; obj* x_32; +x_30 = l_Lean_Parser_numLitFn___rarg(x_2, x_28); +x_31 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_5); +return x_32; +} +else +{ +obj* x_33; obj* x_34; +lean::dec(x_29); lean::dec(x_2); -x_17 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_5); -return x_18; +x_33 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; +x_34 = l_Lean_Parser_ParserState_mkNode(x_28, x_33, x_5); +return x_34; +} +} +} +else +{ +obj* x_35; obj* x_36; obj* x_37; +lean::dec(x_10); +x_35 = l_Lean_Parser_Level_addLit___elambda__1___closed__6; +x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_35, x_8); +x_37 = lean::cnstr_get(x_36, 3); +lean::inc(x_37); +if (lean::obj_tag(x_37) == 0) +{ +obj* x_38; obj* x_39; obj* x_40; +x_38 = l_Lean_Parser_numLitFn___rarg(x_2, x_36); +x_39 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_5); +return x_40; +} +else +{ +obj* x_41; obj* x_42; +lean::dec(x_37); +lean::dec(x_2); +x_41 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; +x_42 = l_Lean_Parser_ParserState_mkNode(x_36, x_41, x_5); +return x_42; +} +} +} +else +{ +obj* x_43; obj* x_44; +lean::dec(x_7); +lean::dec(x_3); +lean::dec(x_2); +x_43 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; +x_44 = l_Lean_Parser_ParserState_mkNode(x_6, x_43, x_5); +return x_44; } } } @@ -1532,6 +1840,10 @@ l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9 = _init_l_Lean_Parser_ lean::mark_persistent(l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9); l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10 = _init_l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10(); lean::mark_persistent(l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10); +l_Lean_Parser_Level_paren___elambda__1___rarg___closed__11 = _init_l_Lean_Parser_Level_paren___elambda__1___rarg___closed__11(); +lean::mark_persistent(l_Lean_Parser_Level_paren___elambda__1___rarg___closed__11); +l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12 = _init_l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12(); +lean::mark_persistent(l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12); l_Lean_Parser_Level_paren___closed__1 = _init_l_Lean_Parser_Level_paren___closed__1(); lean::mark_persistent(l_Lean_Parser_Level_paren___closed__1); l_Lean_Parser_Level_paren___closed__2 = _init_l_Lean_Parser_Level_paren___closed__2(); @@ -1609,6 +1921,8 @@ l_Lean_Parser_Level_hole___elambda__1___rarg___closed__4 = _init_l_Lean_Parser_L lean::mark_persistent(l_Lean_Parser_Level_hole___elambda__1___rarg___closed__4); l_Lean_Parser_Level_hole___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Level_hole___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Level_hole___elambda__1___rarg___closed__5); +l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6); l_Lean_Parser_Level_hole___closed__1 = _init_l_Lean_Parser_Level_hole___closed__1(); lean::mark_persistent(l_Lean_Parser_Level_hole___closed__1); l_Lean_Parser_Level_hole___closed__2 = _init_l_Lean_Parser_Level_hole___closed__2(); @@ -1656,6 +1970,8 @@ l_Lean_Parser_Level_addLit___elambda__1___closed__4 = _init_l_Lean_Parser_Level_ lean::mark_persistent(l_Lean_Parser_Level_addLit___elambda__1___closed__4); l_Lean_Parser_Level_addLit___elambda__1___closed__5 = _init_l_Lean_Parser_Level_addLit___elambda__1___closed__5(); lean::mark_persistent(l_Lean_Parser_Level_addLit___elambda__1___closed__5); +l_Lean_Parser_Level_addLit___elambda__1___closed__6 = _init_l_Lean_Parser_Level_addLit___elambda__1___closed__6(); +lean::mark_persistent(l_Lean_Parser_Level_addLit___elambda__1___closed__6); l_Lean_Parser_Level_addLit___closed__1 = _init_l_Lean_Parser_Level_addLit___closed__1(); lean::mark_persistent(l_Lean_Parser_Level_addLit___closed__1); l_Lean_Parser_Level_addLit___closed__2 = _init_l_Lean_Parser_Level_addLit___closed__2(); diff --git a/src/stage0/init/lean/parser/module.cpp b/src/stage0/init/lean/parser/module.cpp index 5b47a1e25d..af9a8c230f 100644 --- a/src/stage0/init/lean/parser/module.cpp +++ b/src/stage0/init/lean/parser/module.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_chFn___rarg___closed__1; obj* l_Lean_Parser_Module_prelude___elambda__1___boxed(obj*); obj* l_Lean_Parser_Module_import___closed__5; obj* l_Lean_Parser_Module_importPath___elambda__1___boxed(obj*, obj*, obj*); @@ -29,6 +28,7 @@ obj* l_Lean_Parser_Module_importPath___elambda__1___closed__1; obj* l___private_init_lean_parser_module_1__mkErrorMessage(obj*, obj*, obj*); obj* l_Lean_Parser_symbolInfo(obj*, obj*); obj* l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__2; +obj* l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(obj*); namespace lean { obj* test_module_parser_core(obj*, obj*, obj*, obj*); } @@ -44,6 +44,7 @@ obj* l_Lean_Parser_Module_import___closed__2; obj* l_Lean_Parser_mkModuleParser(obj*, obj*, obj*); obj* l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__5; obj* l_Lean_Parser_rawCh___elambda__1___rarg(uint32, uint8, obj*, obj*, obj*); +obj* l_Lean_Parser_ParserState_mkUnexpectedError(obj*, obj*); obj* l_Lean_Parser_initCacheForInput(obj*); obj* l_List_reverse___rarg(obj*); obj* l_Lean_Parser_Module_prelude___closed__1; @@ -52,14 +53,12 @@ obj* l_Lean_Parser_Module_header___elambda__1___boxed(obj*, obj*, obj*); uint8 l_Lean_Syntax_isOfKind___main(obj*, obj*); obj* l_Lean_Parser_rawCh(uint8, uint32, uint8); extern "C" obj* lean_io_prim_put_str(obj*, obj*); -obj* l_Lean_Parser_symbolFnAux(obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_module_2__mkEOI___closed__1; obj* l_Lean_Parser_Module_importPath___closed__2; obj* l_Lean_Parser_Module_importPath___closed__6; obj* l_Lean_Parser_mkParserState(obj*); obj* l_Array_mkEmpty(obj*, obj*); obj* l_Lean_Parser_Module_header___elambda__1___closed__2; -obj* l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(obj*); obj* l_Lean_Parser_Module_header___closed__2; obj* l___private_init_lean_parser_module_3__consumeInput(obj*, obj*); obj* l_Lean_Parser_ParserState_mkNode(obj*, obj*, obj*); @@ -75,6 +74,7 @@ obj* string_append(obj*, obj*); } obj* l_IO_print___at___private_init_lean_parser_module_4__testModuleParserAux___main___spec__2(obj*, obj*); obj* l_Lean_Parser_Module_prelude___closed__3; +obj* l_Lean_Parser_Error_toString(obj*); namespace lean { uint8 string_utf8_at_end(obj*, obj*); } @@ -91,6 +91,7 @@ namespace lean { obj* nat_add(obj*, obj*); } extern obj* l_Lean_nullKind; +obj* l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__8; obj* l_Lean_Parser_Module_import___elambda__1___closed__6; obj* l_Lean_Parser_Module_import___elambda__1___closed__3; namespace lean { @@ -101,6 +102,9 @@ obj* l_Lean_Parser_Module_import___elambda__1___boxed(obj*, obj*, obj*); extern obj* l_Lean_Parser_ident___closed__1; obj* l_Lean_Parser_Module_header___closed__6; extern obj* l_Substring_drop___main___closed__2; +namespace lean { +uint8 string_dec_eq(obj*, obj*); +} obj* l___private_init_lean_parser_module_2__mkEOI(obj*); obj* l_IO_println___at___private_init_lean_parser_module_4__testModuleParserAux___main___spec__1(obj*, obj*); obj* l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__3; @@ -124,7 +128,6 @@ obj* l_Lean_Parser_Module_importPath; obj* l_Lean_Parser_Module_prelude___closed__4; obj* l_Lean_Parser_Module_prelude___elambda__1(obj*); extern obj* l_Lean_Parser_ParserContextCore_inhabited___closed__1; -obj* l_Lean_Parser_ParserState_mkError(obj*, obj*); obj* l_Lean_Parser_nodeInfo(obj*); obj* l_Lean_Message_toString(obj*); obj* l_Array_size(obj*, obj*); @@ -136,6 +139,7 @@ obj* l_Lean_Parser_Module_import___closed__1; obj* l_Lean_Parser_Module_prelude; obj* l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Module_import___elambda__1___closed__1; +obj* l_Lean_Parser_Module_import___elambda__1___closed__7; uint8 l_List_foldr___main___at_Lean_MessageLog_hasErrors___spec__1(uint8, obj*); obj* l_Lean_Parser_Module_import___closed__4; obj* l_Lean_Parser_Module_header___closed__4; @@ -144,6 +148,7 @@ extern obj* l_IO_println___rarg___closed__1; obj* l___private_init_lean_parser_module_2__mkEOI___closed__3; obj* l___private_init_lean_parser_module_2__mkEOI___closed__2; obj* l_Lean_Parser_Module_import___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_ParserState_mkErrorsAt(obj*, obj*, obj*); obj* l_Lean_Parser_ModuleParser_inhabited; obj* l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Module_importPath___closed__5; @@ -198,7 +203,7 @@ obj* _init_l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__6() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__5; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -214,20 +219,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__8() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__7; +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* l_Lean_Parser_Module_prelude___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__5; -x_6 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__7; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__4; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__5; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__8; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__4; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__4; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__8; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__4; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__8; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__4; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Module_prelude___elambda__1(obj* x_1) { @@ -327,7 +398,7 @@ else { obj* x_15; obj* x_16; x_15 = l_Lean_Parser_manyAux___main___closed__1; -x_16 = l_Lean_Parser_ParserState_mkError(x_10, x_15); +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); return x_16; } } @@ -516,7 +587,7 @@ else obj* x_13; obj* x_14; lean::dec(x_3); x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_8, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); return x_14; } } @@ -570,7 +641,7 @@ obj* _init_l_Lean_Parser_Module_import___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Module_import___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -586,63 +657,131 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Module_import___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Module_import___elambda__1___closed__6; +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* l_Lean_Parser_Module_import___elambda__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_4; obj* x_5; obj* x_6; obj* x_25; obj* x_26; obj* x_27; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Module_import___elambda__1___closed__4; -x_7 = l_Lean_Parser_Module_import___elambda__1___closed__6; +x_25 = lean::cnstr_get(x_3, 1); +lean::inc(x_25); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_26 = l_Lean_Parser_tokenFn(x_2, x_3); +x_27 = lean::cnstr_get(x_26, 3); +lean::inc(x_27); +if (lean::obj_tag(x_27) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::array_get_size(x_10); -lean::dec(x_10); -lean::inc(x_2); -x_12 = l_Lean_Parser_Module_importPath___elambda__1(x_1, x_2, x_8); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_28; obj* x_29; +x_28 = lean::cnstr_get(x_26, 0); +lean::inc(x_28); +x_29 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_28); +lean::dec(x_28); +if (lean::obj_tag(x_29) == 2) { -uint8 x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = 0; -x_15 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Module_import___elambda__1___spec__1(x_14, x_1, x_2, x_12); -x_16 = l_Lean_nullKind; -x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_11); -x_18 = l_Lean_Parser_Module_import___elambda__1___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_5); -return x_19; +obj* x_30; obj* x_31; uint8 x_32; +x_30 = lean::cnstr_get(x_29, 1); +lean::inc(x_30); +lean::dec(x_29); +x_31 = l_Lean_Parser_Module_import___elambda__1___closed__4; +x_32 = lean::string_dec_eq(x_30, x_31); +lean::dec(x_30); +if (x_32 == 0) +{ +obj* x_33; obj* x_34; +x_33 = l_Lean_Parser_Module_import___elambda__1___closed__7; +x_34 = l_Lean_Parser_ParserState_mkErrorsAt(x_26, x_33, x_25); +x_6 = x_34; +goto block_24; } else { -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_13); +lean::dec(x_25); +x_6 = x_26; +goto block_24; +} +} +else +{ +obj* x_35; obj* x_36; +lean::dec(x_29); +x_35 = l_Lean_Parser_Module_import___elambda__1___closed__7; +x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_26, x_35, x_25); +x_6 = x_36; +goto block_24; +} +} +else +{ +obj* x_37; obj* x_38; +lean::dec(x_27); +x_37 = l_Lean_Parser_Module_import___elambda__1___closed__7; +x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_26, x_37, x_25); +x_6 = x_38; +goto block_24; +} +block_24: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; obj* x_10; obj* x_11; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = lean::array_get_size(x_8); +lean::dec(x_8); +lean::inc(x_2); +x_10 = l_Lean_Parser_Module_importPath___elambda__1(x_1, x_2, x_6); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; +x_12 = 0; +x_13 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Module_import___elambda__1___spec__1(x_12, x_1, x_2, x_10); +x_14 = l_Lean_nullKind; +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_9); +x_16 = l_Lean_Parser_Module_import___elambda__1___closed__2; +x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_5); +return x_17; +} +else +{ +obj* x_18; obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_11); +lean::dec(x_2); +x_18 = l_Lean_nullKind; +x_19 = l_Lean_Parser_ParserState_mkNode(x_10, x_18, x_9); +x_20 = l_Lean_Parser_Module_import___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_5); +return x_21; +} +} +else +{ +obj* x_22; obj* x_23; +lean::dec(x_7); lean::dec(x_2); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_12, x_20, x_11); x_22 = l_Lean_Parser_Module_import___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +x_23 = l_Lean_Parser_ParserState_mkNode(x_6, x_22, x_5); return x_23; } } -else -{ -obj* x_24; obj* x_25; -lean::dec(x_9); -lean::dec(x_2); -x_24 = l_Lean_Parser_Module_import___elambda__1___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_8, x_24, x_5); -return x_25; -} } } obj* _init_l_Lean_Parser_Module_import___closed__1() { @@ -757,7 +896,7 @@ else obj* x_13; obj* x_14; lean::dec(x_3); x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_8, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); return x_14; } } @@ -1244,7 +1383,7 @@ lean::inc(x_11); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); lean::dec(x_9); -x_13 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_11); +x_13 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_11); lean::dec(x_11); x_14 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_14, 0, x_13); @@ -1265,32 +1404,33 @@ 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; uint8 x_27; obj* x_28; obj* x_29; +obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; uint8 x_28; obj* x_29; obj* x_30; x_20 = lean::cnstr_get(x_9, 1); lean::inc(x_20); lean::dec(x_9); x_21 = lean::cnstr_get(x_10, 0); lean::inc(x_21); lean::dec(x_10); -x_22 = l___private_init_lean_parser_module_1__mkErrorMessage(x_5, x_20, x_21); -x_23 = lean::box(0); -x_24 = lean::cnstr_get(x_5, 0); -lean::inc(x_24); +x_22 = l_Lean_Parser_Error_toString(x_21); +x_23 = l___private_init_lean_parser_module_1__mkErrorMessage(x_5, x_20, x_22); +x_24 = lean::box(0); +x_25 = lean::cnstr_get(x_5, 0); +lean::inc(x_25); lean::dec(x_5); -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 = 1; -x_28 = lean::alloc_cnstr(0, 3, 1); -lean::cnstr_set(x_28, 0, x_24); -lean::cnstr_set(x_28, 1, x_20); -lean::cnstr_set(x_28, 2, x_26); -lean::cnstr_set_scalar(x_28, sizeof(void*)*3, x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_23); -lean::cnstr_set(x_29, 1, x_28); -return x_29; +x_26 = lean::box(0); +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 = 1; +x_29 = lean::alloc_cnstr(0, 3, 1); +lean::cnstr_set(x_29, 0, x_25); +lean::cnstr_set(x_29, 1, x_20); +lean::cnstr_set(x_29, 2, x_27); +lean::cnstr_set_scalar(x_29, sizeof(void*)*3, x_28); +x_30 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_30, 0, x_24); +lean::cnstr_set(x_30, 1, x_29); +return x_30; } } } @@ -1475,7 +1615,7 @@ lean::inc(x_26); x_27 = lean::cnstr_get(x_24, 1); lean::inc(x_27); lean::dec(x_24); -x_28 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_26); +x_28 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_26); lean::dec(x_26); x_29 = 0; lean::cnstr_set(x_2, 1, x_27); @@ -1489,128 +1629,130 @@ else { if (x_6 == 0) { -obj* x_31; obj* x_32; obj* x_33; obj* x_34; uint8 x_35; +obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; uint8 x_36; x_31 = lean::cnstr_get(x_24, 1); lean::inc(x_31); lean::dec(x_24); x_32 = lean::cnstr_get(x_25, 0); lean::inc(x_32); lean::dec(x_25); -x_33 = l___private_init_lean_parser_module_1__mkErrorMessage(x_17, x_31, x_32); +x_33 = l_Lean_Parser_Error_toString(x_32); +x_34 = l___private_init_lean_parser_module_1__mkErrorMessage(x_17, x_31, x_33); lean::dec(x_17); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_5); -x_35 = 1; -lean::cnstr_set(x_2, 2, x_34); +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 = 1; +lean::cnstr_set(x_2, 2, x_35); lean::cnstr_set(x_2, 1, x_31); -lean::cnstr_set_scalar(x_2, sizeof(void*)*3, x_35); +lean::cnstr_set_scalar(x_2, sizeof(void*)*3, x_36); goto _start; } else { -obj* x_37; obj* x_38; +obj* x_38; obj* x_39; lean::dec(x_25); -x_37 = lean::cnstr_get(x_24, 1); -lean::inc(x_37); +x_38 = lean::cnstr_get(x_24, 1); +lean::inc(x_38); lean::dec(x_24); -x_38 = l___private_init_lean_parser_module_3__consumeInput(x_17, x_37); -lean::cnstr_set(x_2, 1, x_38); +x_39 = l___private_init_lean_parser_module_3__consumeInput(x_17, x_38); +lean::cnstr_set(x_2, 1, x_39); goto _start; } } } 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_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; lean::dec(x_2); lean::inc(x_7); -x_40 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_40, 0, x_7); -lean::cnstr_set(x_40, 1, x_8); -lean::cnstr_set(x_40, 2, x_9); -lean::cnstr_set(x_40, 3, x_10); +x_41 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_41, 0, x_7); +lean::cnstr_set(x_41, 1, x_8); +lean::cnstr_set(x_41, 2, x_9); +lean::cnstr_set(x_41, 3, x_10); lean::inc(x_1); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_1); -x_42 = l_Lean_Parser_initCacheForInput(x_7); +x_42 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_1); +x_43 = l_Lean_Parser_initCacheForInput(x_7); lean::dec(x_7); -x_43 = lean::box(0); -x_44 = l_Array_empty___closed__1; -x_45 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_4); -lean::cnstr_set(x_45, 2, x_42); -lean::cnstr_set(x_45, 3, x_43); -x_46 = l_Lean_Parser_commandParserAttribute; -x_47 = lean::mk_nat_obj(0u); -lean::inc(x_41); -x_48 = l_Lean_Parser_ParserAttribute_runParser(x_46, x_47, x_41, x_45); -x_49 = lean::cnstr_get(x_48, 3); -lean::inc(x_49); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; obj* x_52; uint8 x_53; obj* x_54; obj* x_55; -lean::dec(x_41); -lean::dec(x_1); -x_50 = lean::cnstr_get(x_48, 0); +x_44 = lean::box(0); +x_45 = l_Array_empty___closed__1; +x_46 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_4); +lean::cnstr_set(x_46, 2, x_43); +lean::cnstr_set(x_46, 3, x_44); +x_47 = l_Lean_Parser_commandParserAttribute; +x_48 = lean::mk_nat_obj(0u); +lean::inc(x_42); +x_49 = l_Lean_Parser_ParserAttribute_runParser(x_47, x_48, x_42, x_46); +x_50 = lean::cnstr_get(x_49, 3); lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); +if (lean::obj_tag(x_50) == 0) +{ +obj* x_51; obj* x_52; obj* x_53; uint8 x_54; obj* x_55; obj* x_56; +lean::dec(x_42); +lean::dec(x_1); +x_51 = lean::cnstr_get(x_49, 0); lean::inc(x_51); -lean::dec(x_48); -x_52 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_50); -lean::dec(x_50); -x_53 = 0; -x_54 = lean::alloc_cnstr(0, 3, 1); -lean::cnstr_set(x_54, 0, x_3); -lean::cnstr_set(x_54, 1, x_51); -lean::cnstr_set(x_54, 2, x_5); -lean::cnstr_set_scalar(x_54, sizeof(void*)*3, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_52); -lean::cnstr_set(x_55, 1, x_54); -return x_55; +x_52 = lean::cnstr_get(x_49, 1); +lean::inc(x_52); +lean::dec(x_49); +x_53 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_51); +lean::dec(x_51); +x_54 = 0; +x_55 = lean::alloc_cnstr(0, 3, 1); +lean::cnstr_set(x_55, 0, x_3); +lean::cnstr_set(x_55, 1, x_52); +lean::cnstr_set(x_55, 2, x_5); +lean::cnstr_set_scalar(x_55, sizeof(void*)*3, x_54); +x_56 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_56, 0, x_53); +lean::cnstr_set(x_56, 1, x_55); +return x_56; } else { if (x_6 == 0) { -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; obj* x_61; -x_56 = lean::cnstr_get(x_48, 1); -lean::inc(x_56); -lean::dec(x_48); -x_57 = lean::cnstr_get(x_49, 0); +obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; uint8 x_62; obj* x_63; +x_57 = lean::cnstr_get(x_49, 1); lean::inc(x_57); lean::dec(x_49); -x_58 = l___private_init_lean_parser_module_1__mkErrorMessage(x_41, x_56, x_57); -lean::dec(x_41); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_5); -x_60 = 1; -x_61 = lean::alloc_cnstr(0, 3, 1); -lean::cnstr_set(x_61, 0, x_3); -lean::cnstr_set(x_61, 1, x_56); -lean::cnstr_set(x_61, 2, x_59); -lean::cnstr_set_scalar(x_61, sizeof(void*)*3, x_60); -x_2 = x_61; +x_58 = lean::cnstr_get(x_50, 0); +lean::inc(x_58); +lean::dec(x_50); +x_59 = l_Lean_Parser_Error_toString(x_58); +x_60 = l___private_init_lean_parser_module_1__mkErrorMessage(x_42, x_57, x_59); +lean::dec(x_42); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_60); +lean::cnstr_set(x_61, 1, x_5); +x_62 = 1; +x_63 = lean::alloc_cnstr(0, 3, 1); +lean::cnstr_set(x_63, 0, x_3); +lean::cnstr_set(x_63, 1, x_57); +lean::cnstr_set(x_63, 2, x_61); +lean::cnstr_set_scalar(x_63, sizeof(void*)*3, x_62); +x_2 = x_63; goto _start; } else { -obj* x_63; obj* x_64; obj* x_65; +obj* x_65; obj* x_66; obj* x_67; +lean::dec(x_50); +x_65 = lean::cnstr_get(x_49, 1); +lean::inc(x_65); lean::dec(x_49); -x_63 = lean::cnstr_get(x_48, 1); -lean::inc(x_63); -lean::dec(x_48); -x_64 = l___private_init_lean_parser_module_3__consumeInput(x_41, x_63); -x_65 = lean::alloc_cnstr(0, 3, 1); -lean::cnstr_set(x_65, 0, x_3); -lean::cnstr_set(x_65, 1, x_64); -lean::cnstr_set(x_65, 2, x_5); -lean::cnstr_set_scalar(x_65, sizeof(void*)*3, x_6); -x_2 = x_65; +x_66 = l___private_init_lean_parser_module_3__consumeInput(x_42, x_65); +x_67 = lean::alloc_cnstr(0, 3, 1); +lean::cnstr_set(x_67, 0, x_3); +lean::cnstr_set(x_67, 1, x_66); +lean::cnstr_set(x_67, 2, x_5); +lean::cnstr_set_scalar(x_67, sizeof(void*)*3, x_6); +x_2 = x_67; goto _start; } } @@ -1618,7 +1760,7 @@ goto _start; } else { -obj* x_67; obj* x_68; +obj* x_69; obj* x_70; lean::dec(x_10); lean::dec(x_9); lean::dec(x_8); @@ -1626,11 +1768,11 @@ lean::dec(x_7); lean::dec(x_5); lean::dec(x_3); lean::dec(x_1); -x_67 = l___private_init_lean_parser_module_2__mkEOI(x_4); -x_68 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_2); -return x_68; +x_69 = l___private_init_lean_parser_module_2__mkEOI(x_4); +x_70 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_70, 0, x_69); +lean::cnstr_set(x_70, 1, x_2); +return x_70; } } } @@ -1965,6 +2107,8 @@ l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__6 = _init_l_Lean_Pars lean::mark_persistent(l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__6); l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__7(); lean::mark_persistent(l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__7); +l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__8 = _init_l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__8(); +lean::mark_persistent(l_Lean_Parser_Module_prelude___elambda__1___rarg___closed__8); l_Lean_Parser_Module_prelude___closed__1 = _init_l_Lean_Parser_Module_prelude___closed__1(); lean::mark_persistent(l_Lean_Parser_Module_prelude___closed__1); l_Lean_Parser_Module_prelude___closed__2 = _init_l_Lean_Parser_Module_prelude___closed__2(); @@ -2007,6 +2151,8 @@ l_Lean_Parser_Module_import___elambda__1___closed__5 = _init_l_Lean_Parser_Modul lean::mark_persistent(l_Lean_Parser_Module_import___elambda__1___closed__5); l_Lean_Parser_Module_import___elambda__1___closed__6 = _init_l_Lean_Parser_Module_import___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Module_import___elambda__1___closed__6); +l_Lean_Parser_Module_import___elambda__1___closed__7 = _init_l_Lean_Parser_Module_import___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Module_import___elambda__1___closed__7); l_Lean_Parser_Module_import___closed__1 = _init_l_Lean_Parser_Module_import___closed__1(); lean::mark_persistent(l_Lean_Parser_Module_import___closed__1); l_Lean_Parser_Module_import___closed__2 = _init_l_Lean_Parser_Module_import___closed__2(); diff --git a/src/stage0/init/lean/parser/parser.cpp b/src/stage0/init/lean/parser/parser.cpp index 6d382d1820..ce91cdeb2a 100644 --- a/src/stage0/init/lean/parser/parser.cpp +++ b/src/stage0/init/lean/parser/parser.cpp @@ -14,10 +14,11 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64; #pragma GCC diagnostic ignored "-Wunused-label" #pragma GCC diagnostic ignored "-Wunused-but-set-variable" #endif -obj* l_Lean_Parser_chFn___rarg___closed__1; obj* l_Lean_Syntax_getTailInfo___main(obj*); +obj* l___private_init_lean_parser_parser_8__updateTokens___closed__1; obj* l_Lean_Parser_symbolNoWsFnAux___boxed(obj*, obj*, obj*, obj*, obj*); uint8 l_Lean_Parser_checkTailNoWs(obj*); +obj* l_Lean_Parser_ParserState_mkUnexpectedErrorAt(obj*, obj*, obj*); obj* l_RBNode_setBlack___main___rarg(obj*); obj* l_Lean_Parser_checkLeadingFn___closed__1; obj* l_Lean_Parser_runParser(obj*, obj*, obj*, obj*, obj*); @@ -43,6 +44,7 @@ uint8 l_Lean_Parser_isIdCont___main(obj*, obj*); obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(uint8, obj*, obj*, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_ParserState_shrinkStack(obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_whitespace___main___spec__1___boxed(obj*, obj*); +obj* l_Lean_Parser_Error_toString___closed__2; obj* l_Lean_Parser_FirstTokens_toStr___main(obj*); obj* l_Lean_Parser_anyOfFn___main(uint8, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_declareLeadingBuiltinParser(obj*, obj*, obj*, obj*); @@ -71,13 +73,11 @@ obj* l_Lean_Parser_TokenConfig_beq___boxed(obj*, obj*); obj* l_Lean_Parser_whitespace___main(obj*, obj*); uint8 l_Lean_isIdRest(uint32); obj* l_Lean_Parser_sepBy1Fn___main___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_6__mkResult(obj*, obj*); obj* l_Lean_Parser_numLit___boxed(obj*); extern obj* l_Lean_stxInh; obj* l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; obj* l_Lean_Parser_orelseFn(uint8); obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg___boxed(obj*, obj*); -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main(uint8, obj*, obj*, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_getBuiltinTokenTableUnsafe___boxed(obj*); uint8 l_Lean_isIdEndEscape(uint32); obj* l_Lean_Parser_nodeInfo___elambda__1(obj*, obj*); @@ -92,12 +92,14 @@ obj* l_Lean_Parser_symbolOrIdent___boxed(obj*, obj*); obj* l_List_toString___main___at_Lean_Parser_FirstTokens_toStr___main___spec__1(obj*); obj* l_Lean_Parser_andthenFn___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__2; +obj* l_String_intercalate(obj*, obj*); obj* l_Lean_Parser_ParserState_hasError___boxed(obj*); obj* l_Lean_Parser_mergeOrElseErrors(obj*, obj*, obj*); obj* l_Lean_Parser_symbolInfo(obj*, obj*); obj* l_Lean_Parser_ParserAttribute_inhabited___closed__3; -obj* l_Lean_Parser_mergeOrElseErrors___closed__1; +obj* l___private_init_lean_parser_parser_3__rawAux___rarg(obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_many1Fn(uint8, obj*, obj*, obj*, obj*); +obj* l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(obj*); obj* l_Lean_Parser_FirstTokens_toStr(obj*); obj* l_Lean_Parser_numLit(uint8); obj* l_Lean_Parser_decimalNumberFn(obj*, obj*, obj*); @@ -106,6 +108,7 @@ obj* l_Lean_Parser_sepByFn___main(uint8, uint8, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_leadingParser___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_andthenInfo(obj*, obj*); obj* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; +obj* l___private_init_lean_parser_parser_3__rawAux___main(uint8); obj* l_Lean_Parser_satisfyFn___main___at_Lean_Parser_rawCh___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_tryFn___main___boxed(obj*); obj* l_Lean_Parser_quotedSymbolFn___rarg___closed__1; @@ -118,6 +121,7 @@ obj* l_Lean_Parser_sepBy1Info___elambda__1(obj*, obj*, obj*); extern obj* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__2; obj* l_Lean_Parser_ParserAttribute_runParser(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_runBuiltinParser___rarg___boxed(obj*); +obj* l_List_hasDecEq___main___at_Lean_Parser_Error_toString___spec__1___boxed(obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main(obj*, obj*, obj*); obj* l_Lean_Parser_hexDigitFn___main___boxed(obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_binNumberFn___spec__3___boxed(obj*, obj*); @@ -140,26 +144,27 @@ obj* l_Lean_Parser_sepBy1Info(obj*, obj*); obj* l_Lean_Parser_quotedSymbolFn___rarg___closed__3; obj* l_Lean_Parser_rawCh___elambda__1___rarg(uint32, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_hexDigitFn___main(obj*, obj*); -obj* l_Lean_Parser_ParserState_toErrorMsg___boxed(obj*, obj*); -obj* l___private_init_lean_parser_parser_1__sepByFnAux(uint8, obj*, obj*, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_ParserAttribute_inhabited___closed__6; obj* l_Lean_Parser_mkNodeToken___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_symbolNoWsAux(obj*, obj*); +obj* l_Lean_Parser_ParserState_mkUnexpectedError(obj*, obj*); obj* l_Lean_Parser_ParserState_keepLatest(obj*, obj*); obj* l_Lean_Parser_initCacheForInput(obj*); obj* l_Lean_Parser_TokenTableAttribute_inhabited___lambda__1___closed__1; obj* l_Lean_Parser_sepBy1Fn___main(uint8, uint8, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_rawFn___boxed(obj*); +obj* l_Lean_Parser_charLitFnAux___main(obj*, obj*, obj*); extern "C" obj* lean_expr_mk_app(obj*, obj*); obj* l_Lean_Parser_tryFn___main___rarg(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_TokenTableAttribute_inhabited___closed__4; obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_whitespace___main___spec__1(obj*, obj*); +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); +uint8 l___private_init_lean_parser_parser_4__isToken(obj*, obj*, obj*); obj* l_Lean_Parser_hexDigitFn___boxed(obj*, obj*); obj* l_Lean_Parser_string2basic___boxed(obj*, obj*); obj* l_List_foldl___main___at_Lean_Parser_addBuiltinTrailingParser___spec__1(obj*, obj*, obj*); obj* l_Lean_Parser_TokenMap_insert___rarg(obj*, obj*, obj*); uint8 l_List_isEmpty___main___rarg(obj*); -obj* l___private_init_lean_parser_parser_4__tokenFnAux___main(obj*, obj*); obj* l_Lean_Parser_many1Indent(uint8, obj*, obj*); obj* l_Lean_Parser_rawFn___main___rarg(obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_pushLeading___closed__2; @@ -174,6 +179,7 @@ obj* l_Lean_Parser_ParserState_mergeErrors___boxed(obj*, obj*, obj*); obj* l_Lean_fmt___at_Lean_Parser_mkTokenTableAttribute___spec__1(obj*); uint8 l_Lean_Syntax_isOfKind___main(obj*, obj*); obj* l_Lean_Parser_addBuiltinLeadingParser___closed__1; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main(uint8, obj*, obj*, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_longestMatchFn___main___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_registerBuiltinParserAttribute___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_quotedSymbol___elambda__1___rarg(obj*, obj*, obj*); @@ -186,7 +192,6 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1(uint8, extern obj* l_Lean_mkInitAttr___lambda__1___closed__1; obj* l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__1; obj* l_IO_ofExcept___at_Lean_Parser_declareBuiltinParser___spec__1___boxed(obj*, obj*); -obj* l___private_init_lean_parser_parser_3__isToken___boxed(obj*); obj* l_Lean_Parser_appPrec; obj* l_Lean_Parser_strLitFn___rarg___closed__1; obj* l_Lean_Parser_checkWsBefore___elambda__1___rarg(obj*, obj*, obj*, obj*); @@ -203,6 +208,7 @@ obj* l_Lean_Parser_quotedCharFn___main___boxed(obj*, obj*); obj* l_Lean_Parser_optional___boxed(obj*, obj*); obj* l_Lean_Parser_rawIdentFn___boxed(obj*, obj*); obj* l_Lean_Parser_isIdCont___boxed(obj*, obj*); +obj* l_Lean_Parser_charLitFnAux___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_registerBuiltinParserAttribute(obj*, obj*, obj*); obj* l_Lean_Parser_checkLeadingFn(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_quotedCharFn(obj*, obj*); @@ -216,6 +222,7 @@ extern obj* l_Lean_Options_empty; obj* l_Lean_Parser_longestMatchFn(uint8, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_symbolFn___boxed(obj*); obj* l_Lean_Parser_takeWhileFn___at_Lean_Parser_octalNumberFn___spec__2___boxed(obj*, obj*); +obj* l_Lean_Parser_Error_toString___closed__5; obj* l_Lean_Parser_ParserAttribute_inhabited___lambda__2___boxed(obj*); obj* l_Lean_Parser_currLbp(obj*, obj*, obj*); obj* l_Lean_Parser_strLitFnAux___main___boxed(obj*, obj*, obj*); @@ -223,23 +230,25 @@ obj* l_Lean_Parser_unicodeSymbol___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_FirstTokens_toStr___main___closed__1; obj* l_IO_ofExcept___at_Lean_Parser_declareBuiltinParser___spec__1(obj*, obj*); obj* l_Lean_Parser_satisfyFn___main___at_Lean_Parser_identFnAux___main___spec__4(obj*, obj*, obj*); +obj* l___private_init_lean_parser_parser_6__updateCache(obj*, obj*); obj* l_Lean_Parser_unquotedSymbol___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_mkAtomicInfo(obj*); obj* l_Lean_Parser_registerParserAttribute___lambda__1___boxed(obj*, obj*); obj* l_Lean_Parser_satisfyFn___main(obj*, obj*, obj*, obj*); obj* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1(obj*); +obj* l_Lean_Parser_charLit___closed__1; obj* l_Lean_Parser_mkParserState(obj*); obj* l_Lean_Parser_nodeFn___boxed(obj*); obj* l_Lean_Parser_registerParserAttribute(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_ParserAttribute_inhabited___lambda__1___boxed(obj*); obj* l_Lean_Parser_hexNumberFn___closed__1; obj* l_Lean_Parser_addBuiltinTrailingParser___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_leadingParser___closed__1; obj* l_Lean_Parser_registerBuiltinParserAttribute___lambda__1___closed__5; obj* l_Lean_Parser_longestMatchFn___main___closed__1; obj* l_Lean_Parser_quotedSymbol___elambda__1___rarg___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_nodeFn___main___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_node___boxed(obj*, obj*, obj*); +obj* l_Lean_Parser_Error_Inhabited; obj* l_Lean_Parser_optional(uint8, obj*); obj* l_Lean_Parser_many1Indent___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_FirstTokens_HasToString___closed__1; @@ -250,18 +259,18 @@ obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec_ obj* l_Lean_Parser_TokenConfig_toStr___main(obj*); obj* l_Lean_Parser_Parser_inhabited___closed__2; obj* l_Lean_Parser_indexed___rarg(obj*, obj*, obj*); +obj* l_Lean_Parser_Error_beq___boxed(obj*, obj*); obj* l_Lean_Parser_strLitFn(uint8, obj*); namespace lean { obj* string_push(obj*, uint32); } obj* l_Lean_Parser_ParserState_replaceLongest(obj*, obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_octalNumberFn___spec__3___boxed(obj*, obj*); -obj* l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(obj*); obj* l_Lean_Parser_trailingLoop___main(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Parser_inhabited___boxed(obj*); obj* l_Lean_Parser_tokenTableAttribute; obj* l_Lean_Parser_fieldIdxFn(obj*, obj*); -uint8 l___private_init_lean_parser_parser_3__isToken___rarg(obj*, obj*); +obj* l___private_init_lean_parser_parser_3__rawAux___boxed(obj*); obj* l_Lean_Parser_optionalFn___boxed(obj*); obj* l_Lean_Parser_declareTrailingBuiltinParser(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_checkWsBefore(uint8, obj*); @@ -273,6 +282,7 @@ obj* l_Lean_Parser_chFn___boxed(obj*); extern obj* l_Lean_AttributeImpl_inhabited___closed__4; obj* l_Lean_Parser_whitespace(obj*, obj*); obj* l_Lean_Parser_declareBuiltinParser___boxed(obj*, obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Error_HasBeq___closed__1; obj* l_Lean_Parser_insertToken___closed__1; obj* l_Lean_Parser_symbolOrIdent(uint8, obj*); obj* l_Lean_Parser_withPosition___lambda__1(obj*, obj*, obj*, obj*); @@ -283,9 +293,11 @@ obj* l_Lean_Parser_finishCommentBlock___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_declareBuiltinParser___closed__5; obj* l_Lean_Parser_TokenMap_Inhabited(obj*); obj* l_Nat_repr(obj*); +obj* l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1___boxed(obj*); obj* l_Lean_Parser_mkNodeToken(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_node(uint8, obj*, obj*); obj* l_Lean_Parser_rawFn___main(uint8); +obj* l___private_init_lean_parser_parser_2__sepByFnAux___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_getBuiltinTokenTableUnsafe(obj*); obj* l_Lean_Parser_andthen___boxed(obj*, obj*, obj*); obj* l_Lean_AttributeImpl_inhabited___lambda__5(obj*, obj*); @@ -295,7 +307,6 @@ obj* l_Lean_Parser_symbolNoWsFn___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_ParserState_mkEOIError___closed__1; extern "C" obj* lean_expr_mk_const(obj*, obj*); obj* l_Lean_Parser_hashOrelse___boxed(obj*); -obj* l___private_init_lean_parser_parser_2__rawAux___main___rarg(obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_ParserState_restore___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_rawCh___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_satisfyFn___boxed(obj*, obj*, obj*, obj*); @@ -305,12 +316,11 @@ obj* l_Lean_Parser_satisfyFn___main___at_Lean_Parser_octalNumberFn___spec__1(obj obj* l_Array_extract___rarg(obj*, obj*, obj*); obj* l_Lean_Parser_ParserState_next___boxed(obj*, obj*, obj*); extern obj* l_List_repr___main___rarg___closed__3; -obj* l___private_init_lean_parser_parser_2__rawAux___main(uint8); obj* l_Lean_Parser_binNumberFn___closed__1; obj* l_Lean_PersistentEnvExtension_getState___rarg(obj*, obj*); obj* l_Lean_Parser_fieldIdx___lambda__1(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_2__rawAux(uint8); obj* l_Lean_Parser_many1Indent___boxed(obj*, obj*, obj*); +obj* l_Lean_Parser_charLitFn(uint8, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec__3(obj*, obj*); obj* l_Lean_Parser_declareLeadingBuiltinParser___closed__3; obj* l_Lean_Parser_symbolInfo___elambda__1(obj*, obj*, obj*); @@ -341,11 +351,11 @@ obj* l_Lean_Parser_manyFn___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_unicodeSymbol(uint8, obj*, obj*, obj*); obj* l_Lean_Parser_takeWhileFn___at_Lean_Parser_decimalNumberFn___spec__1___boxed(obj*, obj*); extern obj* l___private_init_lean_compiler_initattr_1__getIOTypeArg___main___closed__2; -obj* l_Lean_Parser_runParser___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_TokenTableAttribute_inhabited___lambda__2___boxed(obj*); obj* l_Lean_Parser_symbolOrIdentFnAux(obj*, obj*, obj*, obj*); uint8 l_UInt32_decLe(uint32, uint32); extern obj* l_List_reprAux___main___rarg___closed__1; +obj* l_Lean_Parser_Error_toString(obj*); obj* l_Lean_Parser_optionalFn(uint8); extern obj* l_Lean_FileMap_Inhabited___closed__1; obj* l_Lean_Parser_FirstTokens_toStr___main___closed__2; @@ -360,6 +370,7 @@ obj* l_Lean_Parser_andthenFn(uint8); obj* l_Lean_Parser_takeWhileFn___at_Lean_Parser_binNumberFn___spec__2___boxed(obj*, obj*); obj* l_IO_Prim_Ref_swap(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_insertNoWsToken___closed__1; +obj* l_Lean_Parser_charLit___boxed(obj*); obj* l_Lean_Parser_sepByFn___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_symbolOrIdentFn(obj*, obj*, obj*); namespace lean { @@ -368,7 +379,6 @@ uint8 nat_dec_lt(obj*, obj*); obj* l_Lean_Parser_checkLeadingFn___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_orelseFn___main___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_satisfyFn___main___at_Lean_Parser_rawCh___elambda__1___spec__1(uint32, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_2__rawAux___boxed(obj*); obj* l_Lean_Parser_strLitFnAux___main(obj*, obj*, obj*); obj* l_Lean_Parser_quotedSymbol___boxed(obj*); uint8 l_Lean_Parser_isIdCont(obj*, obj*); @@ -390,12 +400,13 @@ obj* l_Lean_Parser_sepByFn(uint8, uint8, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_whitespace___boxed(obj*, obj*); obj* l_List_append___rarg(obj*, obj*); obj* l_Lean_Parser_fieldIdxFn___boxed(obj*, obj*); +obj* l___private_init_lean_parser_parser_1__expectedToString(obj*); obj* l_Lean_Parser_declareBuiltinParser___closed__2; obj* l_Lean_Parser_orelseFn___main___boxed(obj*); extern "C" obj* lean_name_mk_string(obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_decimalNumberFn___spec__2(obj*, obj*); obj* l_Lean_nameToExprAux___main(obj*); -obj* l___private_init_lean_parser_parser_2__rawAux___rarg(obj*, uint8, obj*, obj*, obj*); +obj* l_Lean_Parser_Error_Inhabited___closed__1; obj* l_Lean_Parser_mkTokenAndFixPos___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_manyFn(uint8, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_strLit(uint8); @@ -404,12 +415,14 @@ obj* l_Lean_Parser_rawFn___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_hashOrelse(uint8); extern "C" obj* lean_add_and_compile(obj*, obj*, obj*); obj* l_List_toStringAux___main___at_Lean_Parser_FirstTokens_toStr___main___spec__2(uint8, obj*); +obj* l_Lean_Parser_charLitFn___rarg___closed__1; obj* l_Lean_Parser_longestMatchFnAux___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); namespace lean { obj* nat_add(obj*, obj*); } obj* l_Lean_Parser_symbolNoWs(obj*, obj*); obj* l_Lean_Parser_binNumberFn___boxed(obj*, obj*, obj*); +extern obj* l_Lean_charLitKind___closed__1; extern obj* l_Lean_nullKind; obj* l_Lean_Parser_many___boxed(obj*, obj*); obj* l_Lean_Parser_hexNumberFn___boxed(obj*, obj*, obj*); @@ -436,13 +449,14 @@ obj* l_Lean_Parser_ParserState_setPos(obj*, obj*); obj* l_Lean_Parser_quotedSymbolFn(uint8); extern obj* l_Lean_AttributeImpl_inhabited___closed__1; obj* l_Lean_Parser_numberFnAux___boxed(obj*, obj*); -obj* l_Lean_Parser_prattParser___boxed(obj*, obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Error_HasToString___closed__1; obj* l_ExceptT_Monad___rarg___lambda__8___boxed(obj*, obj*); obj* l_Lean_Parser_TokenConfig_toStr(obj*); obj* l_Lean_Parser_symbolFn___rarg(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_symbol___boxed(obj*, obj*, obj*); obj* l_Array_push(obj*, obj*, obj*); obj* l_Lean_Parser_Trie_empty(obj*); +obj* l_Lean_Parser_charLitFn___boxed(obj*, obj*); uint8 l_RBNode_isRed___main___rarg(obj*); obj* l_Lean_Parser_TokenTableAttribute_inhabited___lambda__1___boxed(obj*); obj* l_Lean_Parser_satisfyFn___main___boxed(obj*, obj*, obj*, obj*); @@ -461,6 +475,7 @@ obj* l_Lean_Parser_manyAux___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_registerParserAttribute___lambda__2___boxed(obj*); obj* l_Lean_Parser_takeWhileFn___at_Lean_Parser_identFnAux___main___spec__1(obj*, obj*); obj* l_Lean_Parser_symbolFn___rarg___boxed(obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Error_toString___closed__3; obj* l_Lean_Parser_satisfyFn___main___at_Lean_Parser_binNumberFn___spec__1(obj*, obj*, obj*); obj* l_Lean_Parser_insertToken___closed__5; obj* l_Lean_Parser_registerBuiltinParserAttribute___lambda__1___closed__2; @@ -482,7 +497,6 @@ obj* l_Lean_Parser_ParserAttribute_inhabited___closed__1; obj* l_Lean_Parser_takeWhile1Fn___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_leadingNode(obj*, obj*); obj* l_Lean_Parser_hexDigitFn___main___closed__1; -obj* l___private_init_lean_parser_parser_7__updateTokens___closed__1; obj* l_Lean_Parser_takeWhileFn___at_Lean_Parser_hexNumberFn___spec__2(obj*, obj*); obj* l_Lean_Parser_getParsingTable___boxed(obj*); namespace lean { @@ -494,6 +508,8 @@ obj* l_Lean_Parser_mkImportedTokenTable(obj*); uint8 l_UInt32_decEq(uint32, uint32); obj* l_Lean_Parser_indexed___rarg___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_checkWsBefore___elambda__1___rarg___boxed(obj*, obj*, obj*, obj*); +obj* l___private_init_lean_parser_parser_3__rawAux___main___boxed(obj*); +obj* l___private_init_lean_parser_parser_3__rawAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_longestMatchFn_u2081___boxed(obj*); obj* l_Lean_Parser_registerBuiltinParserAttribute___lambda__1___closed__9; obj* l_Lean_Parser_string2basic(uint8, obj*); @@ -502,7 +518,6 @@ obj* l_Lean_Parser_rawIdent___boxed(obj*); obj* l_Lean_Parser_finishCommentBlock___main(obj*, obj*, obj*); obj* l_Lean_Parser_lookahead(uint8, obj*); uint8 l_Lean_Parser_TokenConfig_beq(obj*, obj*); -obj* l___private_init_lean_parser_parser_4__tokenFnAux(obj*, obj*); obj* l_Lean_Parser_quotedSymbolFn___rarg___closed__2; obj* l_Lean_mkCApp(obj*, obj*); obj* l_Lean_Parser_numLitFn___rarg(obj*, obj*); @@ -511,7 +526,6 @@ obj* l_Lean_Parser_unquotedSymbol___boxed(obj*); obj* l_Lean_Parser_noFirstTokenInfo(obj*); extern obj* l_Lean_registerTagAttribute___lambda__5___closed__2; obj* l_Lean_Parser_ParserState_pushSyntax(obj*, obj*); -obj* l___private_init_lean_parser_parser_2__rawAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_quotedSymbolFn___rarg___closed__4; obj* l_Lean_Parser_runBuiltinParser(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); @@ -542,9 +556,9 @@ obj* l_Lean_Parser_nodeFn(uint8); obj* l_Lean_Parser_octalNumberFn___boxed(obj*, obj*, obj*); extern obj* l___private_init_lean_compiler_initattr_2__isUnitType___main___closed__2; obj* l_Lean_Parser_checkColGeFn___boxed(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_1__sepByFnAux___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_Lean_Parser_Trie_HasEmptyc___closed__1; obj* l_Lean_Parser_identFn___rarg(obj*, obj*); +obj* l___private_init_lean_parser_parser_8__updateTokens(obj*, obj*, obj*); extern obj* l_Lean_Position_Inhabited___closed__1; obj* l_Lean_Parser_longestMatchStep(uint8); obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); @@ -556,6 +570,7 @@ obj* l_Lean_Parser_registerParserAttribute___closed__1; obj* l_Lean_Parser_optionalFn___rarg(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_registerBuiltinParserAttribute___closed__1; obj* l_Lean_Parser_TokenConfig_beq___main___boxed(obj*, obj*); +obj* l___private_init_lean_parser_parser_4__isToken___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_sepBy1___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_symbolNoWsFn___closed__1; obj* l_Array_shrink___main___rarg(obj*, obj*); @@ -586,6 +601,8 @@ obj* l_Lean_Parser_unicodeSymbolFn___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_takeWhileFn___spec__1___boxed(obj*, obj*, obj*); obj* l_Lean_ConstantInfo_type(obj*); obj* l_Lean_Parser_registerParserAttribute___lambda__1(obj*, obj*); +obj* l___private_init_lean_parser_parser_1__expectedToString___main___closed__1; +obj* l_Lean_Parser_charLitFnAux(obj*, obj*, obj*); namespace lean { obj* environment_find_core(obj*, obj*); } @@ -596,12 +613,12 @@ obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec_ obj* l_Lean_Parser_TokenConfig_HasToString; obj* l_Lean_Parser_ParserState_mkEOIError(obj*); obj* l_Lean_Parser_longestMatchFn_u2081___rarg(obj*, obj*, obj*, obj*); +obj* l___private_init_lean_parser_parser_2__sepByFnAux(uint8, obj*, obj*, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_TokenTableAttribute_inhabited___closed__5; obj* l_Lean_Parser_longestMatchFn_u2081(uint8); obj* l_Lean_Parser_ParserState_setCache(obj*, obj*); obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5(obj*); obj* l_Lean_Parser_symbolAux___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParserAttribute_runParser___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_symbolOrIdentInfo(obj*); obj* l_Lean_Parser_quotedSymbolFn___rarg___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_ParserState_mkError(obj*, obj*); @@ -622,12 +639,13 @@ obj* l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; extern obj* l_Lean_fieldIdxKind___closed__1; obj* l_Lean_Parser_satisfySymbolFn(obj*, obj*, obj*, obj*); extern obj* l_Lean_Parser_Trie_empty___closed__1; -obj* l___private_init_lean_parser_parser_5__updateCache(obj*, obj*); uint8 l_Char_isWhitespace(uint32); +obj* l_Lean_Parser_Error_toString___closed__1; obj* l_Lean_Parser_ParserState_keepNewError___boxed(obj*, obj*); obj* l_Lean_Parser_rawCh___elambda__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_ParserState_keepPrevError___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_FirstTokens_toOptional(obj*); +obj* l_Lean_Parser_charLit(uint8); obj* l_Lean_Parser_manyAux(uint8, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_satisfyFn___main___at_Lean_Parser_chFn___spec__1(uint32, obj*, obj*, obj*); obj* l_Lean_Parser_TokenTableAttribute_inhabited___lambda__2(obj*); @@ -637,14 +655,17 @@ obj* l_Lean_Parser_chFn(uint8); obj* l_Lean_Parser_ParserAttribute_inhabited___lambda__1(obj*); obj* l_Lean_Parser_satisfyFn___main___at_Lean_Parser_chFn___spec__1___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_peekToken(obj*, obj*); +uint8 l_Lean_Parser_Error_beq(obj*, obj*); obj* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg(obj*, obj*); obj* l_Lean_Parser_prattParser(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_3__isToken___rarg___boxed(obj*, obj*); obj* l_Lean_Parser_registerBuiltinParserAttribute___lambda__1___closed__6; +obj* l___private_init_lean_parser_parser_7__mkResult(obj*, obj*); obj* l_Lean_Parser_strLit___closed__1; obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_quotedSymbolFn___spec__2___boxed(obj*, obj*, obj*); +obj* l_Lean_Parser_Error_toString___closed__4; obj* l_Lean_Parser_TokenTableAttribute_inhabited___closed__3; obj* l_Lean_Parser_symbolNoWs___boxed(obj*, obj*); +uint8 l_List_hasDecEq___main___at_Lean_Parser_Error_toString___spec__1(obj*, obj*); obj* l_Lean_Parser_quotedSymbolFn___rarg___closed__5; obj* l_Lean_Parser_lookaheadFn___boxed(obj*); obj* l_Lean_Parser_unicodeSymbolFn___rarg(obj*, obj*, obj*, obj*, obj*); @@ -673,7 +694,6 @@ obj* l_Lean_Parser_chFn___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_manyAux___main___boxed(obj*, obj*, obj*, obj*, obj*); extern obj* l_Lean_nameToExprAux___main___closed__4; extern obj* l_Lean_Name_toString___closed__1; -obj* l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1___boxed(obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_quotedSymbolFn___spec__2(uint32, obj*, obj*); namespace lean { uint8 nat_dec_le(obj*, obj*); @@ -687,15 +707,18 @@ namespace lean { obj* string_utf8_extract(obj*, obj*, obj*); } obj* l_Lean_Parser_symbolOrIdentInfo___closed__1; +obj* l_Lean_Parser_charLitFn___rarg(obj*, obj*); obj* l_Lean_Parser_ParsingTables_inhabited; obj* l_Lean_Parser_strLit___boxed(obj*); obj* l_Lean_Parser_satisfyFn___main___at_Lean_Parser_quotedSymbolFn___spec__1(uint32, obj*, obj*, obj*); obj* l_Lean_Parser_orelseFn___boxed(obj*); +obj* l_Lean_Parser_Error_HasBeq; obj* l_Lean_Parser_declareTrailingBuiltinParser___closed__2; namespace lean { obj* string_utf8_byte_size(obj*); } obj* l_Lean_Parser_TokenTableAttribute_inhabited___closed__6; +obj* l___private_init_lean_parser_parser_5__tokenFnAux___main(obj*, obj*); obj* l_Lean_Parser_rawIdent(uint8); obj* l_Lean_Parser_mkBuiltinTokenTable(obj*); obj* l_Lean_Parser_rawIdent___lambda__1___boxed(obj*, obj*, obj*); @@ -704,7 +727,6 @@ obj* l_Lean_Parser_ident___boxed(obj*); obj* l_Lean_Parser_takeWhileFn___at_Lean_Parser_hexNumberFn___spec__2___boxed(obj*, obj*); obj* l_Lean_Parser_rawFn___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_takeWhileFn___spec__1(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_7__updateTokens(obj*, obj*, obj*); obj* l_Lean_Parser_ParserState_stackSize___boxed(obj*); obj* l_Lean_Parser_fieldIdxFn___closed__1; obj* l_Lean_Parser_identFn(uint8, obj*); @@ -723,6 +745,7 @@ obj* l_Lean_Parser_longestMatchFnAux___main___boxed(obj*, obj*, obj*, obj*, obj* obj* l_Lean_Parser_pushLeading; obj* l_Lean_Parser_declareBuiltinParser___closed__4; obj* l_Lean_Parser_tryFn(uint8); +obj* l___private_init_lean_parser_parser_5__tokenFnAux(obj*, obj*); obj* l_Lean_Parser_epsilonInfo; obj* l_Lean_Parser_ParserState_toErrorMsg(obj*, obj*); obj* l_Lean_Parser_symbolFn(uint8); @@ -749,6 +772,7 @@ obj* l_Lean_Parser_ParserAttribute_inhabited___lambda__1___closed__1; obj* l_Lean_Parser_declareBuiltinParser(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_octalNumberFn___spec__3(obj*, obj*); extern obj* l_Lean_numLitKind___closed__1; +obj* l___private_init_lean_parser_parser_3__rawAux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_registerBuiltinParserAttribute___lambda__1___closed__1; obj* l_Lean_Parser_hexDigitFn(obj*, obj*); obj* l_Lean_Parser_takeWhileFn___boxed(obj*, obj*, obj*); @@ -771,24 +795,29 @@ obj* l_Lean_Parser_rawFn___rarg(obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_ParserState_keepLatest___boxed(obj*, obj*); obj* l_Lean_Parser_numLitFn(uint8, obj*); obj* l_Lean_FileMap_ofString(obj*); +obj* l_Lean_Parser_charLitFnAux___main___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_isIdCont___main___boxed(obj*, obj*); +obj* l_Lean_Parser_charLitFnAux___main___closed__1; obj* l_Lean_Parser_FirstTokens_toStr___main___closed__3; obj* l_Lean_Parser_withPosition(uint8, obj*); obj* l_Lean_Parser_sepByFn___main___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_rawCh___elambda__1(uint8); obj* l_IO_Prim_Ref_reset(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_2__rawAux___main___boxed(obj*); obj* l_Lean_Parser_ParserAttribute_inhabited___closed__2; obj* l_Lean_Parser_checkColGe___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_ParserState_mkErrorsAt(obj*, obj*, obj*); obj* l_Lean_Parser_quotedSymbolFn___rarg(obj*, obj*, obj*); +obj* l___private_init_lean_parser_parser_1__expectedToString___main(obj*); obj* l_Lean_Parser_longestMatchStep___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_fieldIdx___closed__2; +extern obj* l_Lean_charLitKind; obj* l_Lean_Parser_takeWhileFn___at_Lean_Parser_binNumberFn___spec__2(obj*, obj*); obj* l_Lean_Parser_pushLeadingFn___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_ParserFn_inhabited___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_declareBuiltinParser___closed__6; obj* l_Lean_Parser_fieldIdx___closed__1; obj* l_Lean_Parser_hashAndthen___boxed(obj*); +obj* l___private_init_lean_parser_parser_3__rawAux___main___rarg(obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_trailingLoop(obj*); extern obj* l_Lean_fieldIdxKind; obj* l_Lean_Parser_ParserState_mkLongestNodeAlt(obj*, obj*); @@ -798,16 +827,16 @@ obj* l_Lean_Parser_longestMatchStep___boxed(obj*); obj* l_Lean_Parser_unquotedSymbolFn___rarg(obj*, obj*); obj* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec__3___boxed(obj*, obj*); obj* l_Lean_Parser_lookaheadFn___rarg(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_2__rawAux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parser_3__isToken(obj*); -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l___private_init_lean_parser_parser_3__rawAux(uint8); obj* l_Lean_Parser_ParserState_replaceLongest___boxed(obj*, obj*, obj*); obj* l_Lean_registerTagAttribute___lambda__6___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_sepByInfo(obj*, obj*); +obj* l_Lean_Parser_Error_merge(obj*, obj*); obj* l_Lean_Parser_longestMatchFnAux___main(uint8, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_String_splitAux___main___closed__1; obj* l_Lean_Parser_orelseInfo___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_ParserFn_inhabited(uint8, obj*, obj*); +obj* l_Lean_Parser_Error_HasToString; obj* l_Lean_Parser_mkBuiltinParsingTablesRef(obj*); obj* l_Lean_Parser_addBuiltinLeadingParser___boxed(obj*, obj*, obj*, obj*); obj* _init_l_Lean_Parser_appPrec() { @@ -821,19 +850,19 @@ return x_1; uint8 l_Lean_Parser_TokenConfig_beq___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; uint8 x_9; uint8 x_20; +obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; uint8 x_17; 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::cnstr_get(x_2, 0); x_7 = lean::cnstr_get(x_2, 1); x_8 = lean::cnstr_get(x_2, 2); -x_20 = lean::string_dec_eq(x_3, x_6); -if (x_20 == 0) +x_17 = lean::string_dec_eq(x_3, x_6); +if (x_17 == 0) { -uint8 x_21; -x_21 = 0; -return x_21; +uint8 x_18; +x_18 = 0; +return x_18; } else { @@ -841,103 +870,81 @@ if (lean::obj_tag(x_4) == 0) { if (lean::obj_tag(x_7) == 0) { -uint8 x_22; -x_22 = 1; -x_9 = x_22; -goto block_19; +obj* x_19; +x_19 = lean::box(0); +x_9 = x_19; +goto block_16; } else { -uint8 x_23; -x_23 = 0; -x_9 = x_23; -goto block_19; +uint8 x_20; +x_20 = 0; +return x_20; } } else { if (lean::obj_tag(x_7) == 0) { -uint8 x_24; -x_24 = 0; -x_9 = x_24; -goto block_19; +uint8 x_21; +x_21 = 0; +return x_21; } else { -obj* x_25; obj* x_26; uint8 x_27; -x_25 = lean::cnstr_get(x_4, 0); -x_26 = lean::cnstr_get(x_7, 0); -x_27 = lean::nat_dec_eq(x_25, x_26); -if (x_27 == 0) +obj* x_22; obj* x_23; uint8 x_24; +x_22 = lean::cnstr_get(x_4, 0); +x_23 = lean::cnstr_get(x_7, 0); +x_24 = lean::nat_dec_eq(x_22, x_23); +if (x_24 == 0) { -uint8 x_28; -x_28 = 0; -x_9 = x_28; -goto block_19; +uint8 x_25; +x_25 = 0; +return x_25; } else { -uint8 x_29; -x_29 = 1; -x_9 = x_29; -goto block_19; +obj* x_26; +x_26 = lean::box(0); +x_9 = x_26; +goto block_16; } } } } -block_19: -{ -if (x_9 == 0) -{ -uint8 x_10; -x_10 = 0; -return x_10; -} -else +block_16: { +lean::dec(x_9); if (lean::obj_tag(x_5) == 0) { if (lean::obj_tag(x_8) == 0) { -uint8 x_11; -x_11 = 1; -return x_11; +uint8 x_10; +x_10 = 1; +return x_10; } else { +uint8 x_11; +x_11 = 0; +return x_11; +} +} +else +{ +if (lean::obj_tag(x_8) == 0) +{ uint8 x_12; x_12 = 0; return x_12; } -} else { -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_13; -x_13 = 0; -return x_13; -} -else -{ -obj* x_14; obj* x_15; uint8 x_16; -x_14 = lean::cnstr_get(x_5, 0); -x_15 = lean::cnstr_get(x_8, 0); -x_16 = lean::nat_dec_eq(x_14, x_15); -if (x_16 == 0) -{ -uint8 x_17; -x_17 = 0; -return x_17; -} -else -{ -uint8 x_18; -x_18 = 1; -return x_18; -} -} +obj* x_13; obj* x_14; uint8 x_15; +x_13 = lean::cnstr_get(x_5, 0); +x_14 = lean::cnstr_get(x_8, 0); +x_15 = lean::nat_dec_eq(x_13, x_14); +return x_15; } } } @@ -1161,6 +1168,420 @@ x_1 = l_Lean_Parser_ParserContextCore_inhabited___closed__1; return x_1; } } +obj* _init_l_Lean_Parser_Error_Inhabited___closed__1() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_String_splitAux___main___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_1); +return x_3; +} +} +obj* _init_l_Lean_Parser_Error_Inhabited() { +_start: +{ +obj* x_1; +x_1 = l_Lean_Parser_Error_Inhabited___closed__1; +return x_1; +} +} +obj* _init_l___private_init_lean_parser_parser_1__expectedToString___main___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string(" or "); +return x_1; +} +} +obj* l___private_init_lean_parser_parser_1__expectedToString___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___private_init_lean_parser_parser_1__expectedToString___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___private_init_lean_parser_parser_1__expectedToString___main(x_3); +x_15 = lean::string_append(x_13, x_14); +lean::dec(x_14); +return x_15; +} +} +} +} +} +obj* l___private_init_lean_parser_parser_1__expectedToString(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = l___private_init_lean_parser_parser_1__expectedToString___main(x_1); +return x_2; +} +} +uint8 l_List_hasDecEq___main___at_Lean_Parser_Error_toString___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_Error_toString___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_Error_toString___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("unexpected "); +return x_1; +} +} +obj* _init_l_Lean_Parser_Error_toString___closed__2() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("expected "); +return x_1; +} +} +obj* _init_l_Lean_Parser_Error_toString___closed__3() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string(";"); +return x_1; +} +} +obj* _init_l_Lean_Parser_Error_toString___closed__4() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = lean::box(0); +x_2 = l_List_append___rarg(x_1, x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Error_toString___closed__5() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Error_toString___closed__3; +x_2 = l_Lean_Parser_Error_toString___closed__4; +x_3 = l_String_intercalate(x_1, x_2); +return x_3; +} +} +obj* l_Lean_Parser_Error_toString(obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; uint8 x_4; obj* x_5; obj* x_6; uint8 x_7; +x_2 = lean::cnstr_get(x_1, 0); +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, 1); +lean::inc(x_5); +lean::dec(x_1); +x_6 = lean::box(0); +x_7 = l_List_hasDecEq___main___at_Lean_Parser_Error_toString___spec__1(x_5, x_6); +if (x_4 == 0) +{ +obj* x_8; obj* x_9; obj* x_10; +x_8 = l_Lean_Parser_Error_toString___closed__1; +x_9 = lean::string_append(x_8, x_2); +lean::dec(x_2); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_6); +if (x_7 == 0) +{ +obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; +x_11 = l___private_init_lean_parser_parser_1__expectedToString___main(x_5); +x_12 = l_Lean_Parser_Error_toString___closed__2; +x_13 = lean::string_append(x_12, x_11); +lean::dec(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_6); +x_15 = l_List_append___rarg(x_10, x_14); +x_16 = l_Lean_Parser_Error_toString___closed__3; +x_17 = l_String_intercalate(x_16, x_15); +return x_17; +} +else +{ +obj* x_18; obj* x_19; obj* x_20; +lean::dec(x_5); +x_18 = l_List_append___rarg(x_10, x_6); +x_19 = l_Lean_Parser_Error_toString___closed__3; +x_20 = l_String_intercalate(x_19, x_18); +return x_20; +} +} +else +{ +lean::dec(x_2); +if (x_7 == 0) +{ +obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; +x_21 = l___private_init_lean_parser_parser_1__expectedToString___main(x_5); +x_22 = l_Lean_Parser_Error_toString___closed__2; +x_23 = lean::string_append(x_22, x_21); +lean::dec(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_6); +x_25 = l_List_append___rarg(x_6, x_24); +x_26 = l_Lean_Parser_Error_toString___closed__3; +x_27 = l_String_intercalate(x_26, x_25); +return x_27; +} +else +{ +obj* x_28; +lean::dec(x_5); +x_28 = l_Lean_Parser_Error_toString___closed__5; +return x_28; +} +} +} +} +obj* l_List_hasDecEq___main___at_Lean_Parser_Error_toString___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_Error_toString___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_Error_HasToString___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Error_toString), 1, 0); +return x_1; +} +} +obj* _init_l_Lean_Parser_Error_HasToString() { +_start: +{ +obj* x_1; +x_1 = l_Lean_Parser_Error_HasToString___closed__1; +return x_1; +} +} +uint8 l_Lean_Parser_Error_beq(obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; obj* x_4; uint8 x_5; +x_3 = lean::cnstr_get(x_1, 0); +x_4 = lean::cnstr_get(x_2, 0); +x_5 = lean::string_dec_eq(x_3, x_4); +if (x_5 == 0) +{ +uint8 x_6; +x_6 = 0; +return x_6; +} +else +{ +obj* x_7; obj* x_8; uint8 x_9; +x_7 = lean::cnstr_get(x_1, 1); +x_8 = lean::cnstr_get(x_2, 1); +x_9 = l_List_hasDecEq___main___at_Lean_Parser_Error_toString___spec__1(x_7, x_8); +return x_9; +} +} +} +obj* l_Lean_Parser_Error_beq___boxed(obj* x_1, obj* x_2) { +_start: +{ +uint8 x_3; obj* x_4; +x_3 = l_Lean_Parser_Error_beq(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_Error_HasBeq___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Error_beq___boxed), 2, 0); +return x_1; +} +} +obj* _init_l_Lean_Parser_Error_HasBeq() { +_start: +{ +obj* x_1; +x_1 = l_Lean_Parser_Error_HasBeq___closed__1; +return x_1; +} +} +obj* l_Lean_Parser_Error_merge(obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; obj* x_4; obj* x_5; uint8 x_6; uint8 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_String_splitAux___main___closed__1; +x_6 = lean::string_dec_eq(x_3, x_5); +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); +x_9 = lean::cnstr_get(x_1, 1); +x_10 = l_List_append___rarg(x_9, x_4); +if (x_6 == 0) +{ +lean::dec(x_8); +lean::cnstr_set(x_1, 1, x_10); +lean::cnstr_set(x_1, 0, x_3); +return x_1; +} +else +{ +lean::dec(x_3); +lean::cnstr_set(x_1, 1, x_10); +return x_1; +} +} +else +{ +obj* x_11; obj* x_12; obj* x_13; +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 = l_List_append___rarg(x_12, x_4); +if (x_6 == 0) +{ +obj* x_14; +lean::dec(x_11); +x_14 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_14, 0, x_3); +lean::cnstr_set(x_14, 1, x_13); +return x_14; +} +else +{ +obj* x_15; +lean::dec(x_3); +x_15 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_15, 0, x_11); +lean::cnstr_set(x_15, 1, x_13); +return x_15; +} +} +} +} uint8 l_Lean_Parser_ParserState_hasError(obj* x_1) { _start: { @@ -1483,24 +1904,31 @@ _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; +lean::dec(x_2); lean::dec(x_1); x_4 = l_String_splitAux___main___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; 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_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_5 = lean::cnstr_get(x_3, 0); +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, 2); lean::inc(x_7); x_8 = lean::cnstr_get(x_2, 1); +lean::inc(x_8); +lean::dec(x_2); x_9 = l_Lean_FileMap_toPosition___main(x_7, x_8); +lean::dec(x_8); lean::dec(x_7); x_10 = lean::cnstr_get(x_6, 1); lean::inc(x_10); @@ -1521,20 +1949,13 @@ x_19 = lean::string_append(x_16, x_18); lean::dec(x_18); x_20 = l_Lean_Format_flatten___main___closed__1; x_21 = lean::string_append(x_19, x_20); -x_22 = lean::string_append(x_21, x_5); -return x_22; +x_22 = l_Lean_Parser_Error_toString(x_5); +x_23 = lean::string_append(x_21, x_22); +lean::dec(x_22); +return x_23; } } } -obj* l_Lean_Parser_ParserState_toErrorMsg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParserState_toErrorMsg(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} obj* l_Lean_Parser_ParserState_mkNode(obj* x_1, obj* x_2, obj* x_3) { _start: { @@ -1672,32 +2093,92 @@ uint8 x_3; x_3 = !lean::is_exclusive(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; +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, 3); lean::dec(x_4); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::cnstr_set(x_1, 3, x_5); +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 = l_String_splitAux___main___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); +x_9 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_1, 3, x_9); 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, 2); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); +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_10 = lean::cnstr_get(x_1, 0); +x_11 = lean::cnstr_get(x_1, 1); +x_12 = lean::cnstr_get(x_1, 2); +lean::inc(x_12); +lean::inc(x_11); +lean::inc(x_10); lean::dec(x_1); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_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_8); -lean::cnstr_set(x_10, 3, x_9); -return x_10; +x_13 = lean::box(0); +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_String_splitAux___main___closed__1; +x_16 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_16, 0, x_15); +lean::cnstr_set(x_16, 1, x_14); +x_17 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_17, 0, x_16); +x_18 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_18, 0, x_10); +lean::cnstr_set(x_18, 1, x_11); +lean::cnstr_set(x_18, 2, x_12); +lean::cnstr_set(x_18, 3, x_17); +return x_18; +} +} +} +obj* l_Lean_Parser_ParserState_mkUnexpectedError(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; obj* x_7; +x_4 = lean::cnstr_get(x_1, 3); +lean::dec(x_4); +x_5 = lean::box(0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_2); +lean::cnstr_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_1, 3, x_7); +return x_1; +} +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_1, 0); +x_9 = lean::cnstr_get(x_1, 1); +x_10 = lean::cnstr_get(x_1, 2); +lean::inc(x_10); +lean::inc(x_9); +lean::inc(x_8); +lean::dec(x_1); +x_11 = lean::box(0); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_2); +lean::cnstr_set(x_12, 1, x_11); +x_13 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_13, 0, x_12); +x_14 = lean::alloc_cnstr(0, 4, 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_13); +return x_14; } } } @@ -1714,7 +2195,7 @@ _start: { obj* x_2; obj* x_3; x_2 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_3 = l_Lean_Parser_ParserState_mkError(x_1, x_2); +x_3 = l_Lean_Parser_ParserState_mkUnexpectedError(x_1, x_2); return x_3; } } @@ -1725,33 +2206,139 @@ uint8 x_4; x_4 = !lean::is_exclusive(x_1); if (x_4 == 0) { -obj* x_5; obj* x_6; obj* x_7; +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_1, 3); lean::dec(x_5); x_6 = lean::cnstr_get(x_1, 1); lean::dec(x_6); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_2); -lean::cnstr_set(x_1, 3, x_7); +x_7 = lean::box(0); +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_String_splitAux___main___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); +x_11 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_11, 0, x_10); +lean::cnstr_set(x_1, 3, x_11); lean::cnstr_set(x_1, 1, x_3); return x_1; } else { -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 2); -lean::inc(x_9); -lean::inc(x_8); +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_1, 0); +x_13 = lean::cnstr_get(x_1, 2); +lean::inc(x_13); +lean::inc(x_12); lean::dec(x_1); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_2); -x_11 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_3); -lean::cnstr_set(x_11, 2, x_9); -lean::cnstr_set(x_11, 3, x_10); -return x_11; +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 = l_String_splitAux___main___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_15); +x_18 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_18, 0, x_17); +x_19 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_19, 0, x_12); +lean::cnstr_set(x_19, 1, x_3); +lean::cnstr_set(x_19, 2, x_13); +lean::cnstr_set(x_19, 3, x_18); +return x_19; +} +} +} +obj* l_Lean_Parser_ParserState_mkErrorsAt(obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +uint8 x_4; +x_4 = !lean::is_exclusive(x_1); +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_1, 3); +lean::dec(x_5); +x_6 = lean::cnstr_get(x_1, 1); +lean::dec(x_6); +x_7 = l_String_splitAux___main___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_2); +x_9 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_1, 3, x_9); +lean::cnstr_set(x_1, 1, x_3); +return x_1; +} +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_1, 0); +x_11 = lean::cnstr_get(x_1, 2); +lean::inc(x_11); +lean::inc(x_10); +lean::dec(x_1); +x_12 = l_String_splitAux___main___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_2); +x_14 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_14, 0, x_13); +x_15 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_15, 0, x_10); +lean::cnstr_set(x_15, 1, x_3); +lean::cnstr_set(x_15, 2, x_11); +lean::cnstr_set(x_15, 3, x_14); +return x_15; +} +} +} +obj* l_Lean_Parser_ParserState_mkUnexpectedErrorAt(obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +uint8 x_4; +x_4 = !lean::is_exclusive(x_1); +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_1, 3); +lean::dec(x_5); +x_6 = lean::cnstr_get(x_1, 1); +lean::dec(x_6); +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); +x_9 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_1, 3, x_9); +lean::cnstr_set(x_1, 1, x_3); +return x_1; +} +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_1, 0); +x_11 = lean::cnstr_get(x_1, 2); +lean::inc(x_11); +lean::inc(x_10); +lean::dec(x_1); +x_12 = lean::box(0); +x_13 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_13, 0, x_2); +lean::cnstr_set(x_13, 1, x_12); +x_14 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_14, 0, x_13); +x_15 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_15, 0, x_10); +lean::cnstr_set(x_15, 1, x_3); +lean::cnstr_set(x_15, 2, x_11); +lean::cnstr_set(x_15, 3, x_14); +return x_15; } } } @@ -2421,7 +3008,7 @@ if (x_6 == 0) { obj* x_7; obj* x_8; x_7 = l_Lean_Parser_checkLeadingFn___closed__1; -x_8 = l_Lean_Parser_ParserState_mkError(x_4, x_7); +x_8 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_7); return x_8; } else @@ -2805,14 +3392,6 @@ lean::cnstr_set(x_7, 1, x_6); return x_7; } } -obj* _init_l_Lean_Parser_mergeOrElseErrors___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("; "); -return x_1; -} -} obj* l_Lean_Parser_mergeOrElseErrors(obj* x_1, obj* x_2, obj* x_3) { _start: { @@ -2855,7 +3434,7 @@ 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; obj* x_18; +obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; x_12 = lean::cnstr_get(x_1, 3); lean::dec(x_12); x_13 = lean::cnstr_get(x_1, 2); @@ -2864,41 +3443,35 @@ x_14 = lean::cnstr_get(x_1, 1); lean::dec(x_14); x_15 = lean::cnstr_get(x_1, 0); lean::dec(x_15); -x_16 = l_Lean_Parser_mergeOrElseErrors___closed__1; -x_17 = lean::string_append(x_2, x_16); -x_18 = lean::string_append(x_17, x_9); -lean::dec(x_9); -lean::cnstr_set(x_4, 0, x_18); +x_16 = l_Lean_Parser_Error_merge(x_2, x_9); +lean::cnstr_set(x_4, 0, x_16); return x_1; } else { -obj* x_19; obj* x_20; obj* x_21; obj* x_22; +obj* x_17; obj* x_18; lean::dec(x_1); -x_19 = l_Lean_Parser_mergeOrElseErrors___closed__1; -x_20 = lean::string_append(x_2, x_19); -x_21 = lean::string_append(x_20, x_9); -lean::dec(x_9); -lean::cnstr_set(x_4, 0, x_21); -x_22 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_22, 0, x_5); -lean::cnstr_set(x_22, 1, x_6); -lean::cnstr_set(x_22, 2, x_7); -lean::cnstr_set(x_22, 3, x_4); -return x_22; +x_17 = l_Lean_Parser_Error_merge(x_2, x_9); +lean::cnstr_set(x_4, 0, x_17); +x_18 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_18, 0, x_5); +lean::cnstr_set(x_18, 1, x_6); +lean::cnstr_set(x_18, 2, x_7); +lean::cnstr_set(x_18, 3, x_4); +return x_18; } } } else { -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_4, 0); -lean::inc(x_23); +obj* x_19; uint8 x_20; +x_19 = lean::cnstr_get(x_4, 0); +lean::inc(x_19); lean::dec(x_4); -x_24 = lean::nat_dec_eq(x_6, x_3); -if (x_24 == 0) +x_20 = lean::nat_dec_eq(x_6, x_3); +if (x_20 == 0) { -lean::dec(x_23); +lean::dec(x_19); lean::dec(x_7); lean::dec(x_6); lean::dec(x_5); @@ -2907,33 +3480,30 @@ return x_1; } else { -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +obj* x_21; obj* x_22; obj* x_23; obj* x_24; if (lean::is_exclusive(x_1)) { lean::cnstr_release(x_1, 0); lean::cnstr_release(x_1, 1); lean::cnstr_release(x_1, 2); lean::cnstr_release(x_1, 3); - x_25 = x_1; + x_21 = x_1; } else { lean::dec_ref(x_1); - x_25 = lean::box(0); + x_21 = lean::box(0); } -x_26 = l_Lean_Parser_mergeOrElseErrors___closed__1; -x_27 = lean::string_append(x_2, x_26); -x_28 = lean::string_append(x_27, x_23); -lean::dec(x_23); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -if (lean::is_scalar(x_25)) { - x_30 = lean::alloc_cnstr(0, 4, 0); +x_22 = l_Lean_Parser_Error_merge(x_2, x_19); +x_23 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_23, 0, x_22); +if (lean::is_scalar(x_21)) { + x_24 = lean::alloc_cnstr(0, 4, 0); } else { - x_30 = x_25; + x_24 = x_21; } -lean::cnstr_set(x_30, 0, x_5); -lean::cnstr_set(x_30, 1, x_6); -lean::cnstr_set(x_30, 2, x_7); -lean::cnstr_set(x_30, 3, x_29); -return x_30; +lean::cnstr_set(x_24, 0, x_5); +lean::cnstr_set(x_24, 1, x_6); +lean::cnstr_set(x_24, 2, x_7); +lean::cnstr_set(x_24, 3, x_23); +return x_24; } } } @@ -3688,7 +4258,7 @@ lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); x_14 = l_Lean_Parser_manyAux___main___closed__1; -x_15 = l_Lean_Parser_ParserState_mkError(x_9, x_14); +x_15 = l_Lean_Parser_ParserState_mkUnexpectedError(x_9, x_14); return x_15; } } @@ -3877,7 +4447,7 @@ x_4 = l_Lean_Parser_many1(x_3, x_2); return x_4; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main(uint8 x_1, obj* x_2, obj* x_3, uint8 x_4, obj* x_5, uint8 x_6, obj* x_7, obj* x_8, obj* x_9) { +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main(uint8 x_1, obj* x_2, obj* x_3, uint8 x_4, obj* x_5, uint8 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; @@ -3967,7 +4537,7 @@ return x_30; } } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___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* l___private_init_lean_parser_parser_2__sepByFnAux___main___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: { uint8 x_10; uint8 x_11; uint8 x_12; obj* x_13; @@ -3977,19 +4547,19 @@ x_11 = lean::unbox(x_4); lean::dec(x_4); x_12 = lean::unbox(x_6); lean::dec(x_6); -x_13 = l___private_init_lean_parser_parser_1__sepByFnAux___main(x_10, x_2, x_3, x_11, x_5, x_12, x_7, x_8, x_9); +x_13 = l___private_init_lean_parser_parser_2__sepByFnAux___main(x_10, x_2, x_3, x_11, x_5, x_12, x_7, x_8, x_9); return x_13; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux(uint8 x_1, obj* x_2, obj* x_3, uint8 x_4, obj* x_5, uint8 x_6, obj* x_7, obj* x_8, obj* x_9) { +obj* l___private_init_lean_parser_parser_2__sepByFnAux(uint8 x_1, obj* x_2, obj* x_3, uint8 x_4, obj* x_5, uint8 x_6, obj* x_7, obj* x_8, obj* x_9) { _start: { obj* x_10; -x_10 = l___private_init_lean_parser_parser_1__sepByFnAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_init_lean_parser_parser_2__sepByFnAux___main(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_parser_1__sepByFnAux___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* l___private_init_lean_parser_parser_2__sepByFnAux___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: { uint8 x_10; uint8 x_11; uint8 x_12; obj* x_13; @@ -3999,7 +4569,7 @@ x_11 = lean::unbox(x_4); lean::dec(x_4); x_12 = lean::unbox(x_6); lean::dec(x_6); -x_13 = l___private_init_lean_parser_parser_1__sepByFnAux(x_10, x_2, x_3, x_11, x_5, x_12, x_7, x_8, x_9); +x_13 = l___private_init_lean_parser_parser_2__sepByFnAux(x_10, x_2, x_3, x_11, x_5, x_12, x_7, x_8, x_9); return x_13; } } @@ -4012,7 +4582,7 @@ lean::inc(x_8); x_9 = lean::array_get_size(x_8); lean::dec(x_8); x_10 = 1; -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main(x_1, x_3, x_4, x_2, x_9, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main(x_1, x_3, x_4, x_2, x_9, x_10, x_5, x_6, x_7); return x_11; } } @@ -4057,7 +4627,7 @@ lean::inc(x_8); x_9 = lean::array_get_size(x_8); lean::dec(x_8); x_10 = 0; -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main(x_1, x_3, x_4, x_2, x_9, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main(x_1, x_3, x_4, x_2, x_9, x_10, x_5, x_6, x_7); return x_11; } } @@ -4322,7 +4892,7 @@ if (x_12 == 0) { obj* x_13; lean::dec(x_5); -x_13 = l_Lean_Parser_ParserState_mkError(x_4, x_2); +x_13 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_2); return x_13; } else @@ -4341,7 +4911,7 @@ lean::dec(x_5); lean::dec(x_2); lean::dec(x_1); x_15 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_16 = l_Lean_Parser_ParserState_mkError(x_4, x_15); +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_15); return x_16; } } @@ -4617,7 +5187,7 @@ obj* x_25; obj* x_26; lean::dec(x_9); lean::dec(x_1); x_25 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_26 = l_Lean_Parser_ParserState_mkError(x_3, x_25); +x_26 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_25); return x_26; } } @@ -4672,7 +5242,7 @@ obj* x_39; obj* x_40; lean::dec(x_9); lean::dec(x_1); x_39 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_40 = l_Lean_Parser_ParserState_mkError(x_3, x_39); +x_40 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_39); return x_40; } } @@ -4684,7 +5254,7 @@ obj* x_45; obj* x_46; lean::dec(x_6); lean::dec(x_1); x_45 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_46 = l_Lean_Parser_ParserState_mkError(x_3, x_45); +x_46 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_45); return x_46; } } @@ -4957,7 +5527,7 @@ lean::cnstr_set(x_3, 2, x_2); return x_3; } } -obj* l___private_init_lean_parser_parser_2__rawAux___main___rarg(obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l___private_init_lean_parser_parser_3__rawAux___main___rarg(obj* x_1, uint8 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; @@ -5018,71 +5588,71 @@ return x_22; } } } -obj* l___private_init_lean_parser_parser_2__rawAux___main(uint8 x_1) { +obj* l___private_init_lean_parser_parser_3__rawAux___main(uint8 x_1) { _start: { obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parser_2__rawAux___main___rarg___boxed), 5, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parser_3__rawAux___main___rarg___boxed), 5, 0); return x_2; } } -obj* l___private_init_lean_parser_parser_2__rawAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l___private_init_lean_parser_parser_3__rawAux___main___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_2); lean::dec(x_2); -x_7 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_1, x_6, x_3, x_4, x_5); +x_7 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_1, x_6, x_3, x_4, x_5); lean::dec(x_4); lean::dec(x_3); return x_7; } } -obj* l___private_init_lean_parser_parser_2__rawAux___main___boxed(obj* x_1) { +obj* l___private_init_lean_parser_parser_3__rawAux___main___boxed(obj* x_1) { _start: { uint8 x_2; obj* x_3; x_2 = lean::unbox(x_1); lean::dec(x_1); -x_3 = l___private_init_lean_parser_parser_2__rawAux___main(x_2); +x_3 = l___private_init_lean_parser_parser_3__rawAux___main(x_2); return x_3; } } -obj* l___private_init_lean_parser_parser_2__rawAux___rarg(obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l___private_init_lean_parser_parser_3__rawAux___rarg(obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_6; -x_6 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_1, x_2, x_3, x_4, x_5); +x_6 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_1, x_2, x_3, x_4, x_5); return x_6; } } -obj* l___private_init_lean_parser_parser_2__rawAux(uint8 x_1) { +obj* l___private_init_lean_parser_parser_3__rawAux(uint8 x_1) { _start: { obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parser_2__rawAux___rarg___boxed), 5, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parser_3__rawAux___rarg___boxed), 5, 0); return x_2; } } -obj* l___private_init_lean_parser_parser_2__rawAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l___private_init_lean_parser_parser_3__rawAux___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_2); lean::dec(x_2); -x_7 = l___private_init_lean_parser_parser_2__rawAux___rarg(x_1, x_6, x_3, x_4, x_5); +x_7 = l___private_init_lean_parser_parser_3__rawAux___rarg(x_1, x_6, x_3, x_4, x_5); lean::dec(x_4); lean::dec(x_3); return x_7; } } -obj* l___private_init_lean_parser_parser_2__rawAux___boxed(obj* x_1) { +obj* l___private_init_lean_parser_parser_3__rawAux___boxed(obj* x_1) { _start: { uint8 x_2; obj* x_3; x_2 = lean::unbox(x_1); lean::dec(x_1); -x_3 = l___private_init_lean_parser_parser_2__rawAux(x_2); +x_3 = l___private_init_lean_parser_parser_3__rawAux(x_2); return x_3; } } @@ -5100,7 +5670,7 @@ lean::inc(x_8); if (lean::obj_tag(x_8) == 0) { obj* x_9; -x_9 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_6, x_2, x_3, x_4, x_7); +x_9 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_6, x_2, x_3, x_4, x_7); lean::dec(x_4); lean::dec(x_3); return x_9; @@ -5157,7 +5727,7 @@ lean::inc(x_8); if (lean::obj_tag(x_8) == 0) { obj* x_9; -x_9 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_6, x_2, x_3, x_4, x_7); +x_9 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_6, x_2, x_3, x_4, x_7); lean::dec(x_4); lean::dec(x_3); return x_9; @@ -5218,7 +5788,7 @@ if (x_10 == 0) { obj* x_11; lean::dec(x_5); -x_11 = l_Lean_Parser_ParserState_mkError(x_4, x_2); +x_11 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_2); return x_11; } else @@ -5236,46 +5806,37 @@ obj* x_13; obj* x_14; lean::dec(x_5); lean::dec(x_2); x_13 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_4, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_13); return x_14; } } } -obj* _init_l_Lean_Parser_chFn___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("expected '"); -return x_1; -} -} obj* l_Lean_Parser_chFn___rarg(uint32 x_1, uint8 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_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_5, 1); lean::inc(x_6); x_7 = l_String_splitAux___main___closed__1; x_8 = lean::string_push(x_7, x_1); -x_9 = l_Lean_Parser_chFn___rarg___closed__1; +x_9 = l_Char_HasRepr___closed__1; x_10 = lean::string_append(x_9, x_8); lean::dec(x_8); -x_11 = l_Char_HasRepr___closed__1; -x_12 = lean::string_append(x_10, x_11); -x_13 = l_Lean_Parser_satisfyFn___main___at_Lean_Parser_chFn___spec__1(x_1, x_12, x_4, x_5); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +x_11 = lean::string_append(x_10, x_9); +x_12 = l_Lean_Parser_satisfyFn___main___at_Lean_Parser_chFn___spec__1(x_1, x_11, x_4, x_5); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) { -obj* x_15; -x_15 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_6, x_2, x_3, x_4, x_13); -return x_15; +obj* x_14; +x_14 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_6, x_2, x_3, x_4, x_12); +return x_14; } else { -lean::dec(x_14); +lean::dec(x_13); lean::dec(x_6); -return x_13; +return x_12; } } } @@ -5340,7 +5901,7 @@ if (x_10 == 0) { obj* x_11; lean::dec(x_5); -x_11 = l_Lean_Parser_ParserState_mkError(x_4, x_2); +x_11 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_2); return x_11; } else @@ -5358,7 +5919,7 @@ obj* x_13; obj* x_14; lean::dec(x_5); lean::dec(x_2); x_13 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_4, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_13); return x_14; } } @@ -5366,30 +5927,29 @@ return x_14; obj* l_Lean_Parser_rawCh___elambda__1___rarg(uint32 x_1, uint8 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_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_5, 1); lean::inc(x_6); x_7 = l_String_splitAux___main___closed__1; x_8 = lean::string_push(x_7, x_1); -x_9 = l_Lean_Parser_chFn___rarg___closed__1; +x_9 = l_Char_HasRepr___closed__1; x_10 = lean::string_append(x_9, x_8); lean::dec(x_8); -x_11 = l_Char_HasRepr___closed__1; -x_12 = lean::string_append(x_10, x_11); -x_13 = l_Lean_Parser_satisfyFn___main___at_Lean_Parser_rawCh___elambda__1___spec__1(x_1, x_12, x_4, x_5); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +x_11 = lean::string_append(x_10, x_9); +x_12 = l_Lean_Parser_satisfyFn___main___at_Lean_Parser_rawCh___elambda__1___spec__1(x_1, x_11, x_4, x_5); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) { -obj* x_15; -x_15 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_6, x_2, x_3, x_4, x_13); -return x_15; +obj* x_14; +x_14 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_6, x_2, x_3, x_4, x_12); +return x_14; } else { -lean::dec(x_14); +lean::dec(x_13); lean::dec(x_6); -return x_13; +return x_12; } } } @@ -5470,7 +6030,7 @@ obj* _init_l_Lean_Parser_hexDigitFn___main___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("invalid hexadecimal numeral, hexadecimal digit expected"); +x_1 = lean::mk_string("invalid hexadecimal numeral"); return x_1; } } @@ -5539,7 +6099,7 @@ if (x_11 == 0) obj* x_12; obj* x_13; lean::dec(x_8); x_12 = l_Lean_Parser_hexDigitFn___main___closed__1; -x_13 = l_Lean_Parser_ParserState_mkError(x_2, x_12); +x_13 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_12); return x_13; } else @@ -5552,7 +6112,7 @@ if (x_15 == 0) obj* x_16; obj* x_17; lean::dec(x_8); x_16 = l_Lean_Parser_hexDigitFn___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_2, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_16); return x_17; } else @@ -5569,7 +6129,7 @@ else obj* x_29; obj* x_30; lean::dec(x_5); x_29 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_30 = l_Lean_Parser_ParserState_mkError(x_2, x_29); +x_30 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_29); return x_30; } } @@ -5706,7 +6266,7 @@ if (x_21 == 0) obj* x_22; obj* x_23; lean::dec(x_5); x_22 = l_Lean_Parser_quotedCharFn___main___closed__1; -x_23 = l_Lean_Parser_ParserState_mkError(x_2, x_22); +x_23 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_22); return x_23; } else @@ -5823,7 +6383,7 @@ else obj* x_53; obj* x_54; lean::dec(x_5); x_53 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_54 = l_Lean_Parser_ParserState_mkError(x_2, x_53); +x_54 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_53); return x_54; } } @@ -5897,6 +6457,170 @@ lean::dec(x_3); return x_5; } } +obj* _init_l_Lean_Parser_charLitFnAux___main___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("missing end of character literal"); +return x_1; +} +} +obj* l_Lean_Parser_charLitFnAux___main(obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_4; obj* x_5; obj* x_6; uint8 x_7; +x_4 = lean::cnstr_get(x_2, 0); +x_5 = lean::cnstr_get(x_4, 0); +x_6 = lean::cnstr_get(x_3, 1); +lean::inc(x_6); +x_7 = lean::string_utf8_at_end(x_5, x_6); +if (x_7 == 0) +{ +uint32 x_8; obj* x_9; obj* x_10; uint32 x_11; uint8 x_12; uint8 x_36; +x_8 = lean::string_utf8_get(x_5, x_6); +x_9 = lean::string_utf8_next(x_5, x_6); +lean::dec(x_6); +lean::inc(x_9); +lean::inc(x_3); +x_10 = l_Lean_Parser_ParserState_setPos(x_3, x_9); +x_11 = 92; +x_36 = x_8 == x_11; +if (x_36 == 0) +{ +uint8 x_37; +x_37 = 0; +x_12 = x_37; +goto block_35; +} +else +{ +uint8 x_38; +x_38 = 1; +x_12 = x_38; +goto block_35; +} +block_35: +{ +if (x_12 == 0) +{ +obj* x_13; +x_13 = lean::cnstr_get(x_3, 3); +lean::inc(x_13); +lean::dec(x_3); +if (lean::obj_tag(x_13) == 0) +{ +uint32 x_14; obj* x_15; obj* x_16; uint32 x_17; uint8 x_18; +x_14 = lean::string_utf8_get(x_5, x_9); +x_15 = lean::string_utf8_next(x_5, x_9); +lean::dec(x_9); +x_16 = l_Lean_Parser_ParserState_setPos(x_10, x_15); +x_17 = 39; +x_18 = x_14 == x_17; +if (x_18 == 0) +{ +obj* x_19; obj* x_20; +lean::dec(x_1); +x_19 = l_Lean_Parser_charLitFnAux___main___closed__1; +x_20 = l_Lean_Parser_ParserState_mkUnexpectedError(x_16, x_19); +return x_20; +} +else +{ +obj* x_21; obj* x_22; +x_21 = l_Lean_charLitKind; +x_22 = l_Lean_Parser_mkNodeToken(x_21, x_1, x_2, x_16); +return x_22; +} +} +else +{ +lean::dec(x_13); +lean::dec(x_9); +lean::dec(x_1); +return x_10; +} +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_9); +lean::dec(x_3); +x_23 = l_Lean_Parser_quotedCharFn___main(x_2, x_10); +x_24 = lean::cnstr_get(x_23, 3); +lean::inc(x_24); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_25; uint32 x_26; obj* x_27; obj* x_28; uint32 x_29; uint8 x_30; +x_25 = lean::cnstr_get(x_23, 1); +lean::inc(x_25); +x_26 = lean::string_utf8_get(x_5, x_25); +x_27 = lean::string_utf8_next(x_5, x_25); +lean::dec(x_25); +x_28 = l_Lean_Parser_ParserState_setPos(x_23, x_27); +x_29 = 39; +x_30 = x_26 == x_29; +if (x_30 == 0) +{ +obj* x_31; obj* x_32; +lean::dec(x_1); +x_31 = l_Lean_Parser_charLitFnAux___main___closed__1; +x_32 = l_Lean_Parser_ParserState_mkUnexpectedError(x_28, x_31); +return x_32; +} +else +{ +obj* x_33; obj* x_34; +x_33 = l_Lean_charLitKind; +x_34 = l_Lean_Parser_mkNodeToken(x_33, x_1, x_2, x_28); +return x_34; +} +} +else +{ +lean::dec(x_24); +lean::dec(x_1); +return x_23; +} +} +} +} +else +{ +obj* x_39; obj* x_40; +lean::dec(x_6); +lean::dec(x_1); +x_39 = l_Lean_Parser_ParserState_mkEOIError___closed__1; +x_40 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_39); +return x_40; +} +} +} +obj* l_Lean_Parser_charLitFnAux___main___boxed(obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_4; +x_4 = l_Lean_Parser_charLitFnAux___main(x_1, x_2, x_3); +lean::dec(x_2); +return x_4; +} +} +obj* l_Lean_Parser_charLitFnAux(obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_4; +x_4 = l_Lean_Parser_charLitFnAux___main(x_1, x_2, x_3); +return x_4; +} +} +obj* l_Lean_Parser_charLitFnAux___boxed(obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_4; +x_4 = l_Lean_Parser_charLitFnAux(x_1, x_2, x_3); +lean::dec(x_2); +return x_4; +} +} obj* l_Lean_Parser_strLitFnAux___main(obj* x_1, obj* x_2, obj* x_3) { _start: { @@ -5958,7 +6682,7 @@ obj* x_21; obj* x_22; lean::dec(x_6); lean::dec(x_1); x_21 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_22 = l_Lean_Parser_ParserState_mkError(x_3, x_21); +x_22 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_21); return x_22; } } @@ -6130,7 +6854,7 @@ if (x_12 == 0) { obj* x_13; lean::dec(x_4); -x_13 = l_Lean_Parser_ParserState_mkError(x_3, x_1); +x_13 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_1); return x_13; } else @@ -6157,7 +6881,7 @@ obj* x_16; obj* x_17; lean::dec(x_4); lean::dec(x_1); x_16 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_3, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_16); return x_17; } } @@ -6224,7 +6948,7 @@ obj* _init_l_Lean_Parser_binNumberFn___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("expected binary number"); +x_1 = lean::mk_string("binary number"); return x_1; } } @@ -6309,7 +7033,7 @@ if (x_10 == 0) { obj* x_11; lean::dec(x_4); -x_11 = l_Lean_Parser_ParserState_mkError(x_3, x_1); +x_11 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_1); return x_11; } else @@ -6321,7 +7045,7 @@ if (x_13 == 0) { obj* x_14; lean::dec(x_4); -x_14 = l_Lean_Parser_ParserState_mkError(x_3, x_1); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_1); return x_14; } else @@ -6340,7 +7064,7 @@ obj* x_16; obj* x_17; lean::dec(x_4); lean::dec(x_1); x_16 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_3, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_16); return x_17; } } @@ -6404,7 +7128,7 @@ obj* _init_l_Lean_Parser_octalNumberFn___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("expected octal number"); +x_1 = lean::mk_string("octal number"); return x_1; } } @@ -6527,7 +7251,7 @@ if (x_9 == 0) { obj* x_14; lean::dec(x_4); -x_14 = l_Lean_Parser_ParserState_mkError(x_3, x_1); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_1); return x_14; } else @@ -6548,7 +7272,7 @@ if (x_17 == 0) { obj* x_18; lean::dec(x_4); -x_18 = l_Lean_Parser_ParserState_mkError(x_3, x_1); +x_18 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_1); return x_18; } else @@ -6575,7 +7299,7 @@ if (x_23 == 0) { obj* x_24; lean::dec(x_4); -x_24 = l_Lean_Parser_ParserState_mkError(x_3, x_1); +x_24 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_1); return x_24; } else @@ -6587,7 +7311,7 @@ if (x_26 == 0) { obj* x_27; lean::dec(x_4); -x_27 = l_Lean_Parser_ParserState_mkError(x_3, x_1); +x_27 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_1); return x_27; } else @@ -6617,7 +7341,7 @@ obj* x_37; obj* x_38; lean::dec(x_4); lean::dec(x_1); x_37 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_38 = l_Lean_Parser_ParserState_mkError(x_3, x_37); +x_38 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_37); return x_38; } } @@ -6774,7 +7498,7 @@ obj* _init_l_Lean_Parser_hexNumberFn___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("expected hexadecimal number"); +x_1 = lean::mk_string("hexadecimal number"); return x_1; } } @@ -6844,7 +7568,7 @@ obj* _init_l_Lean_Parser_numberFnAux___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("expected numeral"); +x_1 = lean::mk_string("numeral"); return x_1; } } @@ -6999,7 +7723,7 @@ else obj* x_47; obj* x_48; lean::dec(x_5); x_47 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_48 = l_Lean_Parser_ParserState_mkError(x_2, x_47); +x_48 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_47); return x_48; } } @@ -7091,62 +7815,46 @@ x_4 = lean::box(x_3); return x_4; } } -uint8 l___private_init_lean_parser_parser_3__isToken___rarg(obj* x_1, obj* x_2) { +uint8 l___private_init_lean_parser_parser_4__isToken(obj* x_1, obj* x_2, obj* x_3) { _start: { -if (lean::obj_tag(x_2) == 0) +if (lean::obj_tag(x_3) == 0) { -uint8 x_3; -x_3 = 0; -return x_3; +uint8 x_4; +x_4 = 0; +return x_4; } 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::nat_sub(x_1, x_1); -x_6 = lean::cnstr_get(x_4, 0); -x_7 = lean::string_utf8_byte_size(x_6); -x_8 = lean::nat_dec_le(x_5, x_7); -lean::dec(x_7); -lean::dec(x_5); -return x_8; +obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; +x_5 = lean::cnstr_get(x_3, 0); +x_6 = lean::nat_sub(x_2, x_1); +x_7 = lean::cnstr_get(x_5, 0); +x_8 = lean::string_utf8_byte_size(x_7); +x_9 = lean::nat_dec_le(x_6, x_8); +lean::dec(x_8); +lean::dec(x_6); +return x_9; } } } -obj* l___private_init_lean_parser_parser_3__isToken(obj* x_1) { +obj* l___private_init_lean_parser_parser_4__isToken___boxed(obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parser_3__isToken___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parser_3__isToken___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l___private_init_lean_parser_parser_3__isToken___rarg(x_1, x_2); +uint8 x_4; obj* x_5; +x_4 = l___private_init_lean_parser_parser_4__isToken(x_1, x_2, x_3); +lean::dec(x_3); lean::dec(x_2); lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -obj* l___private_init_lean_parser_parser_3__isToken___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l___private_init_lean_parser_parser_3__isToken(x_1); -lean::dec(x_1); -return x_2; +x_5 = lean::box(x_4); +return x_5; } } obj* _init_l_Lean_Parser_mkTokenAndFixPos___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("token expected"); +x_1 = lean::mk_string("token"); return x_1; } } @@ -7263,7 +7971,7 @@ _start: obj* x_6; uint8 x_7; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); -x_7 = l___private_init_lean_parser_parser_3__isToken___rarg(x_6, x_2); +x_7 = l___private_init_lean_parser_parser_4__isToken(x_1, x_6, x_2); 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; @@ -7421,7 +8129,7 @@ if (x_9 == 0) { obj* x_10; lean::dec(x_4); -x_10 = l_Lean_Parser_ParserState_mkError(x_3, x_1); +x_10 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_1); return x_10; } else @@ -7439,7 +8147,7 @@ obj* x_12; obj* x_13; lean::dec(x_4); lean::dec(x_1); x_12 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_13 = l_Lean_Parser_ParserState_mkError(x_3, x_12); +x_13 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_12); return x_13; } } @@ -7448,7 +8156,7 @@ obj* _init_l_Lean_Parser_identFnAux___main___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("end of escaped identifier expected"); +x_1 = lean::mk_string("missing end of escaped identifier"); return x_1; } } @@ -7568,7 +8276,7 @@ lean::dec(x_3); lean::dec(x_2); lean::dec(x_1); x_37 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_38 = l_Lean_Parser_ParserState_mkError(x_5, x_37); +x_38 = l_Lean_Parser_ParserState_mkUnexpectedError(x_5, x_37); return x_38; } } @@ -7635,7 +8343,7 @@ lean::dec(x_4); return x_6; } } -obj* l___private_init_lean_parser_parser_4__tokenFnAux___main(obj* x_1, obj* x_2) { +obj* l___private_init_lean_parser_parser_5__tokenFnAux___main(obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_4; obj* x_5; uint32 x_6; uint32 x_7; uint8 x_8; @@ -7650,57 +8358,73 @@ x_7 = 34; x_8 = x_6 == x_7; if (x_8 == 0) { -uint8 x_9; -x_9 = l_Char_isDigit(x_6); -if (x_9 == 0) +uint32 x_9; uint8 x_10; +x_9 = 39; +x_10 = x_6 == x_9; +if (x_10 == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_3, 3); -lean::inc(x_10); +uint8 x_11; +x_11 = l_Char_isDigit(x_6); +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_3, 3); +lean::inc(x_12); lean::dec(x_3); lean::inc(x_5); -x_11 = l_Lean_Parser_Trie_matchPrefix___rarg(x_4, x_10, x_5); +x_13 = l_Lean_Parser_Trie_matchPrefix___rarg(x_4, x_12, x_5); lean::dec(x_4); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::box(0); -x_14 = l_Lean_Parser_identFnAux___main(x_5, x_12, x_13, x_1, x_2); +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +lean::dec(x_13); +x_15 = lean::box(0); +x_16 = l_Lean_Parser_identFnAux___main(x_5, x_14, x_15, x_1, x_2); lean::dec(x_1); -return x_14; +return x_16; } else { -obj* x_15; +obj* x_17; lean::dec(x_5); lean::dec(x_4); lean::dec(x_3); -x_15 = l_Lean_Parser_numberFnAux(x_1, x_2); -lean::dec(x_1); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_3); -x_16 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5); -lean::dec(x_4); -x_17 = l_Lean_Parser_strLitFnAux___main(x_5, x_1, x_16); +x_17 = l_Lean_Parser_numberFnAux(x_1, x_2); lean::dec(x_1); return x_17; } } +else +{ +obj* x_18; obj* x_19; +lean::dec(x_3); +x_18 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5); +lean::dec(x_4); +x_19 = l_Lean_Parser_charLitFnAux___main(x_5, x_1, x_18); +lean::dec(x_1); +return x_19; } -obj* l___private_init_lean_parser_parser_4__tokenFnAux(obj* x_1, obj* x_2) { +} +else +{ +obj* x_20; obj* x_21; +lean::dec(x_3); +x_20 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5); +lean::dec(x_4); +x_21 = l_Lean_Parser_strLitFnAux___main(x_5, x_1, x_20); +lean::dec(x_1); +return x_21; +} +} +} +obj* l___private_init_lean_parser_parser_5__tokenFnAux(obj* x_1, obj* x_2) { _start: { obj* x_3; -x_3 = l___private_init_lean_parser_parser_4__tokenFnAux___main(x_1, x_2); +x_3 = l___private_init_lean_parser_parser_5__tokenFnAux___main(x_1, x_2); return x_3; } } -obj* l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(obj* x_1) { +obj* l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(obj* x_1) { _start: { obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; @@ -7714,7 +8438,7 @@ lean::dec(x_4); return x_6; } } -obj* l___private_init_lean_parser_parser_5__updateCache(obj* x_1, obj* x_2) { +obj* l___private_init_lean_parser_parser_6__updateCache(obj* x_1, obj* x_2) { _start: { obj* x_3; @@ -7746,7 +8470,7 @@ x_12 = lean::cnstr_get(x_2, 1); lean::dec(x_12); x_13 = lean::cnstr_get(x_2, 0); lean::dec(x_13); -x_14 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_4); +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_4); lean::inc(x_5); x_15 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_15, 0, x_1); @@ -7759,7 +8483,7 @@ else { obj* x_16; obj* x_17; obj* x_18; lean::dec(x_2); -x_16 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_4); +x_16 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_4); lean::inc(x_5); x_17 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_17, 0, x_1); @@ -7789,11 +8513,11 @@ return x_2; } } } -obj* l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1___boxed(obj* x_1) { +obj* l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1___boxed(obj* x_1) { _start: { obj* x_2; -x_2 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_1); +x_2 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_1); lean::dec(x_1); return x_2; } @@ -7824,8 +8548,8 @@ if (x_9 == 0) { obj* x_10; obj* x_11; lean::dec(x_7); -x_10 = l___private_init_lean_parser_parser_4__tokenFnAux___main(x_1, x_2); -x_11 = l___private_init_lean_parser_parser_5__updateCache(x_5, x_10); +x_10 = l___private_init_lean_parser_parser_5__tokenFnAux___main(x_1, x_2); +x_11 = l___private_init_lean_parser_parser_6__updateCache(x_5, x_10); return x_11; } else @@ -7849,7 +8573,7 @@ obj* x_16; obj* x_17; lean::dec(x_5); lean::dec(x_1); x_16 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_2, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_16); return x_17; } } @@ -7872,7 +8596,7 @@ if (lean::obj_tag(x_7) == 0) obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; x_8 = lean::cnstr_get(x_6, 0); lean::inc(x_8); -x_9 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); lean::dec(x_8); x_10 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); lean::dec(x_4); @@ -7919,7 +8643,7 @@ else obj* x_10; obj* x_11; lean::dec(x_5); x_10 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_11 = l_Lean_Parser_ParserState_mkError(x_2, x_10); +x_11 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_10); return x_11; } } @@ -7947,7 +8671,7 @@ if (lean::obj_tag(x_7) == 0) obj* x_8; obj* x_9; x_8 = lean::cnstr_get(x_6, 0); lean::inc(x_8); -x_9 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); lean::dec(x_8); if (lean::obj_tag(x_9) == 2) { @@ -7961,7 +8685,7 @@ lean::dec(x_11); if (x_12 == 0) { obj* x_13; -x_13 = l_Lean_Parser_ParserState_mkErrorAt(x_6, x_2, x_5); +x_13 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_2, x_5); return x_13; } else @@ -7976,7 +8700,7 @@ else obj* x_14; lean::dec(x_9); lean::dec(x_1); -x_14 = l_Lean_Parser_ParserState_mkErrorAt(x_6, x_2, x_5); +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_2, x_5); return x_14; } } @@ -7985,7 +8709,7 @@ else obj* x_15; lean::dec(x_7); lean::dec(x_1); -x_15 = l_Lean_Parser_ParserState_mkErrorAt(x_6, x_2, x_5); +x_15 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_2, x_5); return x_15; } } @@ -7993,55 +8717,59 @@ return x_15; obj* l_Lean_Parser_symbolFnAux(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, 1); -lean::inc(x_5); -x_6 = l_Lean_Parser_tokenFn(x_3, x_4); -x_7 = lean::cnstr_get(x_6, 3); +obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; +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::cnstr_get(x_4, 1); lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) +x_8 = l_Lean_Parser_tokenFn(x_3, x_4); +x_9 = lean::cnstr_get(x_8, 3); +lean::inc(x_9); +if (lean::obj_tag(x_9) == 0) { -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -x_9 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_8); -lean::dec(x_8); -if (lean::obj_tag(x_9) == 2) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_9, 1); +obj* x_10; obj* x_11; +x_10 = lean::cnstr_get(x_8, 0); lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::string_dec_eq(x_10, x_1); +x_11 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_10); lean::dec(x_10); -if (x_11 == 0) +if (lean::obj_tag(x_11) == 2) { -obj* x_12; -x_12 = l_Lean_Parser_ParserState_mkErrorAt(x_6, x_2, x_5); -return x_12; -} -else -{ -lean::dec(x_5); -lean::dec(x_2); -return x_6; -} -} -else -{ -obj* x_13; -lean::dec(x_9); -x_13 = l_Lean_Parser_ParserState_mkErrorAt(x_6, x_2, x_5); -return x_13; -} -} -else +obj* x_12; uint8 x_13; +x_12 = lean::cnstr_get(x_11, 1); +lean::inc(x_12); +lean::dec(x_11); +x_13 = lean::string_dec_eq(x_12, x_1); +lean::dec(x_12); +if (x_13 == 0) { obj* x_14; -lean::dec(x_7); -x_14 = l_Lean_Parser_ParserState_mkErrorAt(x_6, x_2, x_5); +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_6, x_7); return x_14; } +else +{ +lean::dec(x_7); +lean::dec(x_6); +return x_8; +} +} +else +{ +obj* x_15; +lean::dec(x_11); +x_15 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_6, x_7); +return x_15; +} +} +else +{ +obj* x_16; +lean::dec(x_9); +x_16 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_6, x_7); +return x_16; +} } } obj* l_Lean_Parser_symbolFnAux___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -8270,13 +8998,62 @@ return x_9; obj* l_Lean_Parser_symbolFn___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 = l_Lean_Parser_chFn___rarg___closed__1; +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 = l_Char_HasRepr___closed__1; x_6 = lean::string_append(x_5, x_1); -x_7 = l_Char_HasRepr___closed__1; -x_8 = lean::string_append(x_6, x_7); -x_9 = l_Lean_Parser_symbolFnAux(x_1, x_8, x_3, x_4); -return x_9; +x_7 = lean::string_append(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::cnstr_get(x_4, 1); +lean::inc(x_10); +x_11 = l_Lean_Parser_tokenFn(x_3, x_4); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) +{ +obj* x_13; obj* x_14; +x_13 = lean::cnstr_get(x_11, 0); +lean::inc(x_13); +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_13); +lean::dec(x_13); +if (lean::obj_tag(x_14) == 2) +{ +obj* x_15; uint8 x_16; +x_15 = lean::cnstr_get(x_14, 1); +lean::inc(x_15); +lean::dec(x_14); +x_16 = lean::string_dec_eq(x_15, x_1); +lean::dec(x_15); +if (x_16 == 0) +{ +obj* x_17; +x_17 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_9, x_10); +return x_17; +} +else +{ +lean::dec(x_10); +lean::dec(x_9); +return x_11; +} +} +else +{ +obj* x_18; +lean::dec(x_14); +x_18 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_9, x_10); +return x_18; +} +} +else +{ +obj* x_19; +lean::dec(x_12); +x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_9, x_10); +return x_19; +} } } obj* l_Lean_Parser_symbolFn(uint8 x_1) { @@ -8375,7 +9152,7 @@ if (lean::obj_tag(x_7) == 0) obj* x_8; obj* x_9; x_8 = lean::cnstr_get(x_6, 0); lean::inc(x_8); -x_9 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); lean::dec(x_8); switch (lean::obj_tag(x_9)) { case 2: @@ -8465,13 +9242,12 @@ return x_25; obj* l_Lean_Parser_symbolOrIdentFn(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 = l_Lean_Parser_chFn___rarg___closed__1; +obj* x_4; obj* x_5; obj* x_6; obj* x_7; +x_4 = l_Char_HasRepr___closed__1; x_5 = lean::string_append(x_4, x_1); -x_6 = l_Char_HasRepr___closed__1; -x_7 = lean::string_append(x_5, x_6); -x_8 = l_Lean_Parser_symbolOrIdentFnAux(x_1, x_7, x_2, x_3); -return x_8; +x_6 = lean::string_append(x_5, x_4); +x_7 = l_Lean_Parser_symbolOrIdentFnAux(x_1, x_6, x_2, x_3); +return x_7; } } obj* l_Lean_Parser_symbolOrIdentInfo___elambda__1(obj* x_1) { @@ -8549,13 +9325,12 @@ return x_8; obj* l_Lean_Parser_symbolOrIdent___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; obj* x_9; -x_5 = l_Lean_Parser_chFn___rarg___closed__1; +obj* x_5; obj* x_6; obj* x_7; obj* x_8; +x_5 = l_Char_HasRepr___closed__1; x_6 = lean::string_append(x_5, x_1); -x_7 = l_Char_HasRepr___closed__1; -x_8 = lean::string_append(x_6, x_7); -x_9 = l_Lean_Parser_symbolOrIdentFnAux(x_1, x_8, x_3, x_4); -return x_9; +x_7 = lean::string_append(x_6, x_5); +x_8 = l_Lean_Parser_symbolOrIdentFnAux(x_1, x_7, x_3, x_4); +return x_8; } } obj* l_Lean_Parser_symbolOrIdent(uint8 x_1, obj* x_2) { @@ -8725,7 +9500,7 @@ _start: obj* x_4; obj* x_5; uint8 x_6; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); -x_5 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_4); +x_5 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_4); lean::dec(x_4); x_6 = l_Lean_Parser_checkTailWs(x_5); lean::dec(x_5); @@ -9075,7 +9850,7 @@ obj* l_Lean_Parser_symbolNoWsFn(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_Lean_Parser_chFn___rarg___closed__1; +x_5 = l_Char_HasRepr___closed__1; x_6 = lean::string_append(x_5, x_1); x_7 = l_Lean_Parser_symbolNoWsFn___closed__1; x_8 = lean::string_append(x_6, x_7); @@ -9170,7 +9945,7 @@ if (lean::obj_tag(x_8) == 0) obj* x_9; obj* x_10; x_9 = lean::cnstr_get(x_7, 0); lean::inc(x_9); -x_10 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_9); +x_10 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_9); lean::dec(x_9); if (lean::obj_tag(x_10) == 2) { @@ -9187,7 +9962,7 @@ lean::dec(x_11); if (x_13 == 0) { obj* x_14; -x_14 = l_Lean_Parser_ParserState_mkErrorAt(x_7, x_3, x_6); +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_7, x_3, x_6); return x_14; } else @@ -9209,7 +9984,7 @@ else { obj* x_15; lean::dec(x_10); -x_15 = l_Lean_Parser_ParserState_mkErrorAt(x_7, x_3, x_6); +x_15 = l_Lean_Parser_ParserState_mkErrorsAt(x_7, x_3, x_6); return x_15; } } @@ -9217,7 +9992,7 @@ else { obj* x_16; lean::dec(x_8); -x_16 = l_Lean_Parser_ParserState_mkErrorAt(x_7, x_3, x_6); +x_16 = l_Lean_Parser_ParserState_mkErrorsAt(x_7, x_3, x_6); return x_16; } } @@ -9310,23 +10085,26 @@ obj* _init_l_Lean_Parser_unicodeSymbolFn___rarg___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("' or '"); +x_1 = lean::mk_string("', '"); return x_1; } } obj* l_Lean_Parser_unicodeSymbolFn___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 = l_Lean_Parser_chFn___rarg___closed__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; +x_6 = l_Char_HasRepr___closed__1; x_7 = lean::string_append(x_6, x_1); x_8 = l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; x_9 = lean::string_append(x_7, x_8); x_10 = lean::string_append(x_9, x_2); -x_11 = l_Char_HasRepr___closed__1; -x_12 = lean::string_append(x_10, x_11); -x_13 = l_Lean_Parser_unicodeSymbolFnAux(x_1, x_2, x_12, x_4, x_5); -return x_13; +x_11 = lean::string_append(x_10, x_6); +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 = l_Lean_Parser_unicodeSymbolFnAux(x_1, x_2, x_13, x_4, x_5); +return x_14; } } obj* l_Lean_Parser_unicodeSymbolFn(uint8 x_1) { @@ -9407,7 +10185,7 @@ if (lean::obj_tag(x_12) == 0) obj* x_13; obj* x_14; x_13 = lean::cnstr_get(x_11, 0); lean::inc(x_13); -x_14 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_13); +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_13); lean::dec(x_13); if (lean::obj_tag(x_14) == 2) { @@ -9424,7 +10202,7 @@ lean::dec(x_15); if (x_17 == 0) { obj* x_18; -x_18 = l_Lean_Parser_ParserState_mkErrorAt(x_11, x_4, x_10); +x_18 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_4, x_10); return x_18; } else @@ -9446,7 +10224,7 @@ else { obj* x_19; lean::dec(x_14); -x_19 = l_Lean_Parser_ParserState_mkErrorAt(x_11, x_4, x_10); +x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_4, x_10); return x_19; } } @@ -9454,7 +10232,7 @@ else { obj* x_20; lean::dec(x_12); -x_20 = l_Lean_Parser_ParserState_mkErrorAt(x_11, x_4, x_10); +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_4, x_10); return x_20; } } @@ -9463,7 +10241,7 @@ else obj* x_21; lean::dec(x_7); lean::dec(x_4); -x_21 = l_Lean_Parser_ParserState_mkError(x_8, x_5); +x_21 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_5); return x_21; } } @@ -9499,20 +10277,25 @@ return x_1; obj* l_Lean_Parser_unicodeSymbolCheckPrecFn(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; -x_7 = l_Lean_Parser_chFn___rarg___closed__1; +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 = l_Char_HasRepr___closed__1; x_8 = lean::string_append(x_7, x_1); -x_9 = l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; -x_10 = lean::string_append(x_8, x_9); -x_11 = lean::string_append(x_10, x_2); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_11, x_12); -x_14 = l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__1; -x_15 = lean::string_append(x_14, x_1); -x_16 = l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__2; -x_17 = lean::string_append(x_15, x_16); -x_18 = l_Lean_Parser_unicodeSymbolCheckPrecFnAux(x_1, x_2, x_3, x_13, x_17, x_4, x_5, x_6); -return x_18; +x_9 = lean::string_append(x_8, x_7); +x_10 = lean::string_append(x_7, x_2); +x_11 = lean::string_append(x_10, x_7); +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_unicodeSymbolCheckPrecFn___closed__1; +x_16 = lean::string_append(x_15, x_1); +x_17 = l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__2; +x_18 = lean::string_append(x_16, x_17); +x_19 = l_Lean_Parser_unicodeSymbolCheckPrecFnAux(x_1, x_2, x_3, x_14, x_18, x_4, x_5, x_6); +return x_19; } } obj* l_Lean_Parser_unicodeSymbolCheckPrecFn___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { @@ -9612,7 +10395,7 @@ if (lean::obj_tag(x_5) == 0) obj* x_6; obj* x_7; obj* x_8; uint8 x_9; x_6 = lean::cnstr_get(x_4, 0); lean::inc(x_6); -x_7 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_6); lean::dec(x_6); x_8 = l_Lean_numLitKind; x_9 = l_Lean_Syntax_isOfKind___main(x_7, x_8); @@ -9696,7 +10479,7 @@ obj* _init_l_Lean_Parser_strLitFn___rarg___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("expected string literal"); +x_1 = lean::mk_string("string literal"); return x_1; } } @@ -9714,7 +10497,7 @@ if (lean::obj_tag(x_5) == 0) obj* x_6; obj* x_7; obj* x_8; uint8 x_9; x_6 = lean::cnstr_get(x_4, 0); lean::inc(x_6); -x_7 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_6); lean::dec(x_6); x_8 = l_Lean_strLitKind; x_9 = l_Lean_Syntax_isOfKind___main(x_7, x_8); @@ -9794,11 +10577,113 @@ x_3 = l_Lean_Parser_strLit(x_2); return x_3; } } +obj* _init_l_Lean_Parser_charLitFn___rarg___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("character literal"); +return x_1; +} +} +obj* l_Lean_Parser_charLitFn___rarg(obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; obj* x_4; obj* x_5; +x_3 = lean::cnstr_get(x_2, 1); +lean::inc(x_3); +x_4 = l_Lean_Parser_tokenFn(x_1, x_2); +x_5 = lean::cnstr_get(x_4, 3); +lean::inc(x_5); +if (lean::obj_tag(x_5) == 0) +{ +obj* x_6; obj* x_7; obj* x_8; uint8 x_9; +x_6 = lean::cnstr_get(x_4, 0); +lean::inc(x_6); +x_7 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_6); +lean::dec(x_6); +x_8 = l_Lean_charLitKind; +x_9 = l_Lean_Syntax_isOfKind___main(x_7, x_8); +lean::dec(x_7); +if (x_9 == 0) +{ +obj* x_10; obj* x_11; +x_10 = l_Lean_Parser_charLitFn___rarg___closed__1; +x_11 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_10, x_3); +return x_11; +} +else +{ +lean::dec(x_3); +return x_4; +} +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_5); +x_12 = l_Lean_Parser_charLitFn___rarg___closed__1; +x_13 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_12, x_3); +return x_13; +} +} +} +obj* l_Lean_Parser_charLitFn(uint8 x_1, obj* x_2) { +_start: +{ +obj* x_3; +x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_charLitFn___rarg), 2, 0); +return x_3; +} +} +obj* l_Lean_Parser_charLitFn___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_Lean_Parser_charLitFn(x_3, x_2); +lean::dec(x_2); +return x_4; +} +} +obj* _init_l_Lean_Parser_charLit___closed__1() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_charLitKind___closed__1; +x_2 = l_Lean_Parser_mkAtomicInfo(x_1); +return x_2; +} +} +obj* l_Lean_Parser_charLit(uint8 x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_4; obj* x_5; +x_2 = lean::box(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_charLitFn___boxed), 2, 1); +lean::closure_set(x_3, 0, x_2); +x_4 = l_Lean_Parser_charLit___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_charLit___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_charLit(x_2); +return x_3; +} +} obj* _init_l_Lean_Parser_identFn___rarg___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("expected identifier"); +x_1 = lean::mk_string("identifier"); return x_1; } } @@ -9816,7 +10701,7 @@ if (lean::obj_tag(x_5) == 0) obj* x_6; obj* x_7; uint8 x_8; x_6 = lean::cnstr_get(x_4, 0); lean::inc(x_6); -x_7 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_6); lean::dec(x_6); x_8 = l_Lean_Syntax_isIdent___main(x_7); lean::dec(x_7); @@ -9961,7 +10846,7 @@ if (x_10 == 0) { obj* x_11; lean::dec(x_5); -x_11 = l_Lean_Parser_ParserState_mkError(x_4, x_2); +x_11 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_2); return x_11; } else @@ -9979,7 +10864,7 @@ obj* x_13; obj* x_14; lean::dec(x_5); lean::dec(x_2); x_13 = l_Lean_Parser_ParserState_mkEOIError___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_4, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_4, x_13); return x_14; } } @@ -10051,7 +10936,7 @@ obj* _init_l_Lean_Parser_quotedSymbolFn___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_quotedSymbolFn___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -10086,7 +10971,7 @@ if (lean::obj_tag(x_25) == 0) { uint8 x_26; obj* x_27; obj* x_28; x_26 = 0; -x_27 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_22, x_26, x_1, x_2, x_24); +x_27 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_22, x_26, x_1, x_2, x_24); x_28 = lean::cnstr_get(x_27, 3); lean::inc(x_28); if (lean::obj_tag(x_28) == 0) @@ -10100,7 +10985,7 @@ lean::inc(x_31); if (lean::obj_tag(x_31) == 0) { obj* x_32; -x_32 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_29, x_26, x_1, x_2, x_30); +x_32 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_29, x_26, x_1, x_2, x_30); x_7 = x_32; goto block_21; } @@ -10144,7 +11029,7 @@ if (lean::obj_tag(x_12) == 0) { uint8 x_13; obj* x_14; obj* x_15; obj* x_16; x_13 = 1; -x_14 = l___private_init_lean_parser_parser_2__rawAux___main___rarg(x_9, x_13, x_1, x_2, x_11); +x_14 = l___private_init_lean_parser_parser_3__rawAux___main___rarg(x_9, x_13, x_1, x_2, x_11); x_15 = l_Lean_Parser_quotedSymbolFn___rarg___closed__2; x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_6); return x_16; @@ -10282,7 +11167,7 @@ obj* _init_l_Lean_Parser_unquotedSymbolFn___rarg___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("expected symbol"); +x_1 = lean::mk_string("symbol"); return x_1; } } @@ -10300,7 +11185,7 @@ if (lean::obj_tag(x_5) == 0) obj* x_6; obj* x_7; uint8 x_8; x_6 = lean::cnstr_get(x_4, 0); lean::inc(x_6); -x_7 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_6); lean::dec(x_6); x_8 = l_Lean_Syntax_isIdent___main(x_7); if (x_8 == 0) @@ -10429,7 +11314,7 @@ obj* _init_l_Lean_Parser_fieldIdxFn___closed__1() { _start: { obj* x_1; -x_1 = lean::mk_string("expected field index"); +x_1 = lean::mk_string("field index"); return x_1; } } @@ -10664,6 +11549,7 @@ x_4 = lean::cnstr_get(x_1, 3); lean::inc(x_4); if (lean::obj_tag(x_4) == 0) { +lean::dec(x_3); return x_1; } else @@ -10680,14 +11566,14 @@ if (x_8 == 0) { obj* x_9; uint8 x_10; x_9 = lean::cnstr_get(x_4, 0); -x_10 = lean::string_dec_eq(x_3, x_9); +x_10 = l_Lean_Parser_Error_beq(x_3, x_9); if (x_10 == 0) { 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; obj* x_18; obj* x_19; +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, 3); lean::dec(x_12); x_13 = lean::cnstr_get(x_1, 2); @@ -10697,28 +11583,24 @@ lean::dec(x_14); x_15 = lean::cnstr_get(x_1, 0); lean::dec(x_15); x_16 = l_Array_shrink___main___rarg(x_5, x_2); -x_17 = l_Lean_Parser_mergeOrElseErrors___closed__1; -x_18 = lean::string_append(x_9, x_17); -x_19 = lean::string_append(x_18, x_3); -lean::cnstr_set(x_4, 0, x_19); +x_17 = l_Lean_Parser_Error_merge(x_3, x_9); +lean::cnstr_set(x_4, 0, x_17); lean::cnstr_set(x_1, 0, x_16); return x_1; } else { -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; +obj* x_18; obj* x_19; obj* x_20; lean::dec(x_1); -x_20 = l_Array_shrink___main___rarg(x_5, x_2); -x_21 = l_Lean_Parser_mergeOrElseErrors___closed__1; -x_22 = lean::string_append(x_9, x_21); -x_23 = lean::string_append(x_22, x_3); -lean::cnstr_set(x_4, 0, x_23); -x_24 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_24, 0, x_20); -lean::cnstr_set(x_24, 1, x_6); -lean::cnstr_set(x_24, 2, x_7); -lean::cnstr_set(x_24, 3, x_4); -return x_24; +x_18 = l_Array_shrink___main___rarg(x_5, x_2); +x_19 = l_Lean_Parser_Error_merge(x_3, x_9); +lean::cnstr_set(x_4, 0, x_19); +x_20 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_6); +lean::cnstr_set(x_20, 2, x_7); +lean::cnstr_set(x_20, 3, x_4); +return x_20; } } else @@ -10728,52 +11610,52 @@ lean::dec(x_9); lean::dec(x_7); lean::dec(x_6); lean::dec(x_5); +lean::dec(x_3); return x_1; } } else { -obj* x_25; uint8 x_26; -x_25 = lean::cnstr_get(x_4, 0); -lean::inc(x_25); +obj* x_21; uint8 x_22; +x_21 = lean::cnstr_get(x_4, 0); +lean::inc(x_21); lean::dec(x_4); -x_26 = lean::string_dec_eq(x_3, x_25); -if (x_26 == 0) +x_22 = l_Lean_Parser_Error_beq(x_3, x_21); +if (x_22 == 0) { -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; +obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; if (lean::is_exclusive(x_1)) { lean::cnstr_release(x_1, 0); lean::cnstr_release(x_1, 1); lean::cnstr_release(x_1, 2); lean::cnstr_release(x_1, 3); - x_27 = x_1; + x_23 = x_1; } else { lean::dec_ref(x_1); - x_27 = lean::box(0); + x_23 = lean::box(0); } -x_28 = l_Array_shrink___main___rarg(x_5, x_2); -x_29 = l_Lean_Parser_mergeOrElseErrors___closed__1; -x_30 = lean::string_append(x_25, x_29); -x_31 = lean::string_append(x_30, x_3); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -if (lean::is_scalar(x_27)) { - x_33 = lean::alloc_cnstr(0, 4, 0); +x_24 = l_Array_shrink___main___rarg(x_5, x_2); +x_25 = l_Lean_Parser_Error_merge(x_3, x_21); +x_26 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_26, 0, x_25); +if (lean::is_scalar(x_23)) { + x_27 = lean::alloc_cnstr(0, 4, 0); } else { - x_33 = x_27; + x_27 = x_23; } -lean::cnstr_set(x_33, 0, x_28); -lean::cnstr_set(x_33, 1, x_6); -lean::cnstr_set(x_33, 2, x_7); -lean::cnstr_set(x_33, 3, x_32); -return x_33; +lean::cnstr_set(x_27, 0, x_24); +lean::cnstr_set(x_27, 1, x_6); +lean::cnstr_set(x_27, 2, x_7); +lean::cnstr_set(x_27, 3, x_26); +return x_27; } else { -lean::dec(x_25); +lean::dec(x_21); lean::dec(x_7); lean::dec(x_6); lean::dec(x_5); +lean::dec(x_3); return x_1; } } @@ -10785,7 +11667,6 @@ _start: { obj* x_4; x_4 = l_Lean_Parser_ParserState_mergeErrors(x_1, x_2, x_3); -lean::dec(x_3); lean::dec(x_2); return x_4; } @@ -10924,7 +11805,7 @@ 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); x_5 = lean::cnstr_get(x_1, 3); lean::dec(x_5); -x_6 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_4); +x_6 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_4); x_7 = l_Array_shrink___main___rarg(x_4, x_2); x_8 = lean::array_push(x_7, x_6); x_9 = lean::box(0); @@ -10942,7 +11823,7 @@ lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); lean::dec(x_1); -x_13 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_10); +x_13 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_10); x_14 = l_Array_shrink___main___rarg(x_10, x_2); x_15 = lean::array_push(x_14, x_13); x_16 = lean::box(0); @@ -11083,7 +11964,6 @@ obj* x_27; lean::dec(x_8); lean::dec(x_7); x_27 = l_Lean_Parser_ParserState_mergeErrors(x_12, x_10, x_23); -lean::dec(x_23); lean::dec(x_10); return x_27; } @@ -11746,7 +12626,7 @@ lean::dec(x_6); lean::dec(x_3); lean::dec(x_2); x_20 = l_Lean_Parser_manyAux___main___closed__1; -x_21 = l_Lean_Parser_ParserState_mkError(x_15, x_20); +x_21 = l_Lean_Parser_ParserState_mkUnexpectedError(x_15, x_20); return x_21; } } @@ -11851,7 +12731,7 @@ lean::dec(x_6); lean::dec(x_3); lean::dec(x_2); x_20 = l_Lean_Parser_manyAux___main___closed__1; -x_21 = l_Lean_Parser_ParserState_mkError(x_15, x_20); +x_21 = l_Lean_Parser_ParserState_mkUnexpectedError(x_15, x_20); return x_21; } } @@ -22113,42 +22993,29 @@ x_23 = lean_name_dec_eq(x_21, x_22); if (x_23 == 0) { obj* x_24; uint8 x_25; -x_24 = l_Lean_strLitKind; +x_24 = l_Lean_charLitKind; x_25 = lean_name_dec_eq(x_21, x_24); if (x_25 == 0) { obj* x_26; uint8 x_27; -x_26 = l_Lean_fieldIdxKind; +x_26 = l_Lean_strLitKind; x_27 = lean_name_dec_eq(x_21, x_26); -lean::dec(x_21); if (x_27 == 0) { -obj* x_28; -x_28 = lean::mk_nat_obj(0u); -lean::cnstr_set(x_4, 1, x_28); -return x_4; -} -else -{ -obj* x_29; -x_29 = l_Lean_Parser_appPrec; -lean::cnstr_set(x_4, 1, x_29); -return x_4; -} -} -else +obj* x_28; uint8 x_29; +x_28 = l_Lean_fieldIdxKind; +x_29 = lean_name_dec_eq(x_21, x_28); +lean::dec(x_21); +if (x_29 == 0) { obj* x_30; -lean::dec(x_21); -x_30 = l_Lean_Parser_appPrec; +x_30 = lean::mk_nat_obj(0u); lean::cnstr_set(x_4, 1, x_30); return x_4; } -} else { obj* x_31; -lean::dec(x_21); x_31 = l_Lean_Parser_appPrec; lean::cnstr_set(x_4, 1, x_31); return x_4; @@ -22156,266 +23023,309 @@ return x_4; } else { -obj* x_32; obj* x_33; obj* x_34; uint8 x_35; -x_32 = lean::cnstr_get(x_4, 0); -lean::inc(x_32); +obj* x_32; +lean::dec(x_21); +x_32 = l_Lean_Parser_appPrec; +lean::cnstr_set(x_4, 1, x_32); +return x_4; +} +} +else +{ +obj* x_33; +lean::dec(x_21); +x_33 = l_Lean_Parser_appPrec; +lean::cnstr_set(x_4, 1, x_33); +return x_4; +} +} +else +{ +obj* x_34; +lean::dec(x_21); +x_34 = l_Lean_Parser_appPrec; +lean::cnstr_set(x_4, 1, x_34); +return x_4; +} +} +else +{ +obj* x_35; obj* x_36; obj* x_37; uint8 x_38; +x_35 = lean::cnstr_get(x_4, 0); +lean::inc(x_35); lean::dec(x_4); -x_33 = lean::cnstr_get(x_12, 0); -lean::inc(x_33); +x_36 = lean::cnstr_get(x_12, 0); +lean::inc(x_36); lean::dec(x_12); -x_34 = l_Lean_numLitKind; -x_35 = lean_name_dec_eq(x_33, x_34); -if (x_35 == 0) +x_37 = l_Lean_numLitKind; +x_38 = lean_name_dec_eq(x_36, x_37); +if (x_38 == 0) { -obj* x_36; uint8 x_37; -x_36 = l_Lean_strLitKind; -x_37 = lean_name_dec_eq(x_33, x_36); -if (x_37 == 0) +obj* x_39; uint8 x_40; +x_39 = l_Lean_charLitKind; +x_40 = lean_name_dec_eq(x_36, x_39); +if (x_40 == 0) { -obj* x_38; uint8 x_39; -x_38 = l_Lean_fieldIdxKind; -x_39 = lean_name_dec_eq(x_33, x_38); -lean::dec(x_33); -if (x_39 == 0) +obj* x_41; uint8 x_42; +x_41 = l_Lean_strLitKind; +x_42 = lean_name_dec_eq(x_36, x_41); +if (x_42 == 0) { -obj* x_40; obj* x_41; -x_40 = lean::mk_nat_obj(0u); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_32); -lean::cnstr_set(x_41, 1, x_40); -return x_41; +obj* x_43; uint8 x_44; +x_43 = l_Lean_fieldIdxKind; +x_44 = lean_name_dec_eq(x_36, x_43); +lean::dec(x_36); +if (x_44 == 0) +{ +obj* x_45; obj* x_46; +x_45 = lean::mk_nat_obj(0u); +x_46 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_46, 0, x_35); +lean::cnstr_set(x_46, 1, x_45); +return x_46; } else { -obj* x_42; obj* x_43; -x_42 = l_Lean_Parser_appPrec; -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_32); -lean::cnstr_set(x_43, 1, x_42); -return x_43; +obj* x_47; obj* x_48; +x_47 = l_Lean_Parser_appPrec; +x_48 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_48, 0, x_35); +lean::cnstr_set(x_48, 1, x_47); +return x_48; } } else { -obj* x_44; obj* x_45; -lean::dec(x_33); -x_44 = l_Lean_Parser_appPrec; -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_32); -lean::cnstr_set(x_45, 1, x_44); -return x_45; +obj* x_49; obj* x_50; +lean::dec(x_36); +x_49 = l_Lean_Parser_appPrec; +x_50 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_50, 0, x_35); +lean::cnstr_set(x_50, 1, x_49); +return x_50; } } else { -obj* x_46; obj* x_47; -lean::dec(x_33); -x_46 = l_Lean_Parser_appPrec; -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_32); -lean::cnstr_set(x_47, 1, x_46); -return x_47; +obj* x_51; obj* x_52; +lean::dec(x_36); +x_51 = l_Lean_Parser_appPrec; +x_52 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_52, 0, x_35); +lean::cnstr_set(x_52, 1, x_51); +return x_52; +} +} +else +{ +obj* x_53; obj* x_54; +lean::dec(x_36); +x_53 = l_Lean_Parser_appPrec; +x_54 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_54, 0, x_35); +lean::cnstr_set(x_54, 1, x_53); +return x_54; } } } case 2: { -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; uint8 x_54; -x_48 = lean::cnstr_get(x_4, 0); -lean::inc(x_48); +obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; uint8 x_61; +x_55 = lean::cnstr_get(x_4, 0); +lean::inc(x_55); lean::dec(x_4); -x_49 = lean::cnstr_get(x_12, 1); -lean::inc(x_49); +x_56 = lean::cnstr_get(x_12, 1); +lean::inc(x_56); lean::dec(x_12); -x_50 = lean::cnstr_get(x_2, 0); -lean::inc(x_50); -lean::dec(x_2); -x_51 = lean::cnstr_get(x_50, 3); -lean::inc(x_51); -lean::dec(x_50); -x_52 = lean::mk_nat_obj(0u); -x_53 = l_Lean_Parser_Trie_matchPrefix___rarg(x_49, x_51, x_52); -lean::dec(x_49); -x_54 = !lean::is_exclusive(x_53); -if (x_54 == 0) -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 1); -x_56 = lean::cnstr_get(x_53, 0); -lean::dec(x_56); -if (lean::obj_tag(x_55) == 0) -{ -lean::cnstr_set(x_53, 1, x_52); -lean::cnstr_set(x_53, 0, x_48); -return x_53; -} -else -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_55, 0); +x_57 = lean::cnstr_get(x_2, 0); lean::inc(x_57); -lean::dec(x_55); -x_58 = lean::cnstr_get(x_57, 1); +lean::dec(x_2); +x_58 = lean::cnstr_get(x_57, 3); lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; -x_59 = lean::cnstr_get(x_57, 2); -lean::inc(x_59); lean::dec(x_57); -if (lean::obj_tag(x_59) == 0) -{ -lean::cnstr_set(x_53, 1, x_52); -lean::cnstr_set(x_53, 0, x_48); -return x_53; -} -else -{ -obj* x_60; -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -lean::dec(x_59); -lean::cnstr_set(x_53, 1, x_60); -lean::cnstr_set(x_53, 0, x_48); -return x_53; -} -} -else -{ -obj* x_61; -x_61 = lean::cnstr_get(x_57, 2); -lean::inc(x_61); -lean::dec(x_57); -if (lean::obj_tag(x_61) == 0) -{ -obj* x_62; -x_62 = lean::cnstr_get(x_58, 0); -lean::inc(x_62); -lean::dec(x_58); -lean::cnstr_set(x_53, 1, x_62); -lean::cnstr_set(x_53, 0, x_48); -return x_53; -} -else -{ -obj* x_63; obj* x_64; uint8 x_65; -x_63 = lean::cnstr_get(x_58, 0); -lean::inc(x_63); -lean::dec(x_58); -x_64 = lean::cnstr_get(x_61, 0); -lean::inc(x_64); -lean::dec(x_61); -x_65 = l_Lean_Parser_checkTailNoWs(x_1); -if (x_65 == 0) -{ -lean::dec(x_64); -lean::cnstr_set(x_53, 1, x_63); -lean::cnstr_set(x_53, 0, x_48); -return x_53; -} -else +x_59 = lean::mk_nat_obj(0u); +x_60 = l_Lean_Parser_Trie_matchPrefix___rarg(x_56, x_58, x_59); +lean::dec(x_56); +x_61 = !lean::is_exclusive(x_60); +if (x_61 == 0) { +obj* x_62; obj* x_63; +x_62 = lean::cnstr_get(x_60, 1); +x_63 = lean::cnstr_get(x_60, 0); lean::dec(x_63); -lean::cnstr_set(x_53, 1, x_64); -lean::cnstr_set(x_53, 0, x_48); -return x_53; -} -} -} -} +if (lean::obj_tag(x_62) == 0) +{ +lean::cnstr_set(x_60, 1, x_59); +lean::cnstr_set(x_60, 0, x_55); +return x_60; } 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::cnstr_get(x_64, 1); +lean::inc(x_65); +if (lean::obj_tag(x_65) == 0) +{ obj* x_66; -x_66 = lean::cnstr_get(x_53, 1); +x_66 = lean::cnstr_get(x_64, 2); lean::inc(x_66); -lean::dec(x_53); +lean::dec(x_64); if (lean::obj_tag(x_66) == 0) { +lean::cnstr_set(x_60, 1, x_59); +lean::cnstr_set(x_60, 0, x_55); +return x_60; +} +else +{ obj* x_67; -x_67 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_67, 0, x_48); -lean::cnstr_set(x_67, 1, x_52); -return x_67; -} -else -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); +x_67 = lean::cnstr_get(x_66, 0); +lean::inc(x_67); lean::dec(x_66); -x_69 = lean::cnstr_get(x_68, 1); +lean::cnstr_set(x_60, 1, x_67); +lean::cnstr_set(x_60, 0, x_55); +return x_60; +} +} +else +{ +obj* x_68; +x_68 = lean::cnstr_get(x_64, 2); +lean::inc(x_68); +lean::dec(x_64); +if (lean::obj_tag(x_68) == 0) +{ +obj* x_69; +x_69 = lean::cnstr_get(x_65, 0); lean::inc(x_69); -if (lean::obj_tag(x_69) == 0) +lean::dec(x_65); +lean::cnstr_set(x_60, 1, x_69); +lean::cnstr_set(x_60, 0, x_55); +return x_60; +} +else { -obj* x_70; -x_70 = lean::cnstr_get(x_68, 2); +obj* x_70; obj* x_71; uint8 x_72; +x_70 = lean::cnstr_get(x_65, 0); lean::inc(x_70); +lean::dec(x_65); +x_71 = lean::cnstr_get(x_68, 0); +lean::inc(x_71); lean::dec(x_68); -if (lean::obj_tag(x_70) == 0) +x_72 = l_Lean_Parser_checkTailNoWs(x_1); +if (x_72 == 0) { -obj* x_71; -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_48); -lean::cnstr_set(x_71, 1, x_52); -return x_71; +lean::dec(x_71); +lean::cnstr_set(x_60, 1, x_70); +lean::cnstr_set(x_60, 0, x_55); +return x_60; } else { -obj* x_72; obj* x_73; -x_72 = lean::cnstr_get(x_70, 0); -lean::inc(x_72); lean::dec(x_70); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_48); -lean::cnstr_set(x_73, 1, x_72); -return x_73; +lean::cnstr_set(x_60, 1, x_71); +lean::cnstr_set(x_60, 0, x_55); +return x_60; +} +} +} } } else { +obj* x_73; +x_73 = lean::cnstr_get(x_60, 1); +lean::inc(x_73); +lean::dec(x_60); +if (lean::obj_tag(x_73) == 0) +{ obj* x_74; -x_74 = lean::cnstr_get(x_68, 2); -lean::inc(x_74); -lean::dec(x_68); -if (lean::obj_tag(x_74) == 0) -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_69, 0); -lean::inc(x_75); -lean::dec(x_69); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_48); -lean::cnstr_set(x_76, 1, x_75); -return x_76; +x_74 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_74, 0, x_55); +lean::cnstr_set(x_74, 1, x_59); +return x_74; } else { -obj* x_77; obj* x_78; uint8 x_79; -x_77 = lean::cnstr_get(x_69, 0); -lean::inc(x_77); -lean::dec(x_69); -x_78 = lean::cnstr_get(x_74, 0); -lean::inc(x_78); -lean::dec(x_74); -x_79 = l_Lean_Parser_checkTailNoWs(x_1); -if (x_79 == 0) +obj* x_75; obj* x_76; +x_75 = lean::cnstr_get(x_73, 0); +lean::inc(x_75); +lean::dec(x_73); +x_76 = lean::cnstr_get(x_75, 1); +lean::inc(x_76); +if (lean::obj_tag(x_76) == 0) { -obj* x_80; -lean::dec(x_78); +obj* x_77; +x_77 = lean::cnstr_get(x_75, 2); +lean::inc(x_77); +lean::dec(x_75); +if (lean::obj_tag(x_77) == 0) +{ +obj* x_78; +x_78 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_78, 0, x_55); +lean::cnstr_set(x_78, 1, x_59); +return x_78; +} +else +{ +obj* x_79; obj* x_80; +x_79 = lean::cnstr_get(x_77, 0); +lean::inc(x_79); +lean::dec(x_77); x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_48); -lean::cnstr_set(x_80, 1, x_77); +lean::cnstr_set(x_80, 0, x_55); +lean::cnstr_set(x_80, 1, x_79); return x_80; } +} else { obj* x_81; -lean::dec(x_77); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_48); -lean::cnstr_set(x_81, 1, x_78); -return x_81; +x_81 = lean::cnstr_get(x_75, 2); +lean::inc(x_81); +lean::dec(x_75); +if (lean::obj_tag(x_81) == 0) +{ +obj* x_82; obj* x_83; +x_82 = lean::cnstr_get(x_76, 0); +lean::inc(x_82); +lean::dec(x_76); +x_83 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_83, 0, x_55); +lean::cnstr_set(x_83, 1, x_82); +return x_83; +} +else +{ +obj* x_84; obj* x_85; uint8 x_86; +x_84 = lean::cnstr_get(x_76, 0); +lean::inc(x_84); +lean::dec(x_76); +x_85 = lean::cnstr_get(x_81, 0); +lean::inc(x_85); +lean::dec(x_81); +x_86 = l_Lean_Parser_checkTailNoWs(x_1); +if (x_86 == 0) +{ +obj* x_87; +lean::dec(x_85); +x_87 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_87, 0, x_55); +lean::cnstr_set(x_87, 1, x_84); +return x_87; +} +else +{ +obj* x_88; +lean::dec(x_84); +x_88 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_88, 0, x_55); +lean::cnstr_set(x_88, 1, x_85); +return x_88; } } } @@ -22424,30 +23334,30 @@ return x_81; } default: { -uint8 x_82; +uint8 x_89; lean::dec(x_12); lean::dec(x_2); -x_82 = !lean::is_exclusive(x_4); -if (x_82 == 0) +x_89 = !lean::is_exclusive(x_4); +if (x_89 == 0) { -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_4, 1); -lean::dec(x_83); -x_84 = l_Lean_Parser_appPrec; -lean::cnstr_set(x_4, 1, x_84); +obj* x_90; obj* x_91; +x_90 = lean::cnstr_get(x_4, 1); +lean::dec(x_90); +x_91 = l_Lean_Parser_appPrec; +lean::cnstr_set(x_4, 1, x_91); return x_4; } else { -obj* x_85; obj* x_86; obj* x_87; -x_85 = lean::cnstr_get(x_4, 0); -lean::inc(x_85); +obj* x_92; obj* x_93; obj* x_94; +x_92 = lean::cnstr_get(x_4, 0); +lean::inc(x_92); lean::dec(x_4); -x_86 = l_Lean_Parser_appPrec; -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_85); -lean::cnstr_set(x_87, 1, x_86); -return x_87; +x_93 = l_Lean_Parser_appPrec; +x_94 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_94, 0, x_92); +lean::cnstr_set(x_94, 1, x_93); +return x_94; } } } @@ -22661,7 +23571,7 @@ lean::dec(x_1); return x_4; } } -obj* l___private_init_lean_parser_parser_6__mkResult(obj* x_1, obj* x_2) { +obj* l___private_init_lean_parser_parser_7__mkResult(obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; @@ -22688,14 +23598,6 @@ return x_1; } } } -obj* _init_l_Lean_Parser_leadingParser___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("expected "); -return x_1; -} -} obj* l_Lean_Parser_leadingParser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { @@ -22716,22 +23618,21 @@ x_12 = l_List_isEmpty___main___rarg(x_11); if (x_12 == 0) { uint8 x_13; obj* x_14; obj* x_15; +lean::dec(x_1); x_13 = 0; x_14 = l_Lean_Parser_longestMatchFn___main(x_13, x_11, x_3, x_4, x_10); -x_15 = l___private_init_lean_parser_parser_6__mkResult(x_14, x_7); +x_15 = l___private_init_lean_parser_parser_7__mkResult(x_14, x_7); return x_15; } else { -obj* x_16; obj* x_17; obj* x_18; +obj* x_16; lean::dec(x_11); lean::dec(x_7); lean::dec(x_4); lean::dec(x_3); -x_16 = l_Lean_Parser_leadingParser___closed__1; -x_17 = lean::string_append(x_16, x_1); -x_18 = l_Lean_Parser_ParserState_mkError(x_10, x_17); -return x_18; +x_16 = l_Lean_Parser_ParserState_mkError(x_10, x_1); +return x_16; } } } @@ -22741,7 +23642,6 @@ _start: obj* x_6; x_6 = l_Lean_Parser_leadingParser(x_1, x_2, x_3, x_4, x_5); lean::dec(x_2); -lean::dec(x_1); return x_6; } } @@ -22923,10 +23823,10 @@ lean::dec(x_19); lean::dec(x_18); lean::dec(x_15); lean::dec(x_4); -x_25 = l___private_init_lean_parser_parser_6__mkResult(x_21, x_24); +x_25 = l___private_init_lean_parser_parser_7__mkResult(x_21, x_24); x_26 = lean::cnstr_get(x_25, 0); lean::inc(x_26); -x_27 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_26); +x_27 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_26); lean::dec(x_26); x_28 = l_Lean_Parser_ParserState_popSyntax(x_25); x_4 = x_27; @@ -22951,10 +23851,10 @@ lean::dec(x_19); lean::dec(x_18); lean::dec(x_15); lean::dec(x_4); -x_33 = l___private_init_lean_parser_parser_6__mkResult(x_21, x_24); +x_33 = l___private_init_lean_parser_parser_7__mkResult(x_21, x_24); x_34 = lean::cnstr_get(x_33, 0); lean::inc(x_34); -x_35 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_34); +x_35 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_34); lean::dec(x_34); x_36 = l_Lean_Parser_ParserState_popSyntax(x_33); x_4 = x_35; @@ -22971,10 +23871,10 @@ lean::inc(x_3); x_39 = l_Lean_Parser_anyOfFn___main(x_20, x_15, x_4, x_3, x_38); x_40 = l_Lean_Parser_mergeOrElseErrors(x_39, x_30, x_19); lean::dec(x_19); -x_41 = l___private_init_lean_parser_parser_6__mkResult(x_40, x_24); +x_41 = l___private_init_lean_parser_parser_7__mkResult(x_40, x_24); x_42 = lean::cnstr_get(x_41, 0); lean::inc(x_42); -x_43 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_42); +x_43 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_42); lean::dec(x_42); x_44 = l_Lean_Parser_ParserState_popSyntax(x_41); x_4 = x_43; @@ -23052,7 +23952,7 @@ if (lean::obj_tag(x_7) == 0) obj* x_8; obj* x_9; obj* x_10; obj* x_11; x_8 = lean::cnstr_get(x_6, 0); lean::inc(x_8); -x_9 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); lean::dec(x_8); x_10 = l_Lean_Parser_ParserState_popSyntax(x_6); x_11 = l_Lean_Parser_trailingLoop___main(x_2, x_3, x_4, x_9, x_10); @@ -23069,15 +23969,6 @@ return x_6; } } } -obj* l_Lean_Parser_prattParser___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(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_1); -return x_6; -} -} obj* l_Lean_Parser_mkBuiltinTokenTable(obj* x_1) { _start: { @@ -23521,7 +24412,7 @@ lean::dec(x_6); x_12 = lean::cnstr_get(x_10, 0); lean::inc(x_12); lean::dec(x_10); -x_13 = l_Array_back___at___private_init_lean_parser_parser_5__updateCache___spec__1(x_12); +x_13 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_12); lean::dec(x_12); x_14 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_14, 0, x_13); @@ -23532,22 +24423,12 @@ else obj* x_15; obj* x_16; lean::dec(x_11); x_15 = l_Lean_Parser_ParserState_toErrorMsg(x_6, x_10); -lean::dec(x_10); x_16 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_16, 0, x_15); return x_16; } } } -obj* l_Lean_Parser_runParser___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_runParser(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} obj* l_Lean_Parser_mkBuiltinParsingTablesRef(obj* x_1) { _start: { @@ -23557,7 +24438,7 @@ x_3 = lean::io_mk_ref(x_2, x_1); return x_3; } } -obj* _init_l___private_init_lean_parser_parser_7__updateTokens___closed__1() { +obj* _init_l___private_init_lean_parser_parser_8__updateTokens___closed__1() { _start: { obj* x_1; @@ -23565,7 +24446,7 @@ x_1 = lean::mk_string("invalid builtin parser '"); return x_1; } } -obj* l___private_init_lean_parser_parser_7__updateTokens(obj* x_1, obj* x_2, obj* x_3) { +obj* l___private_init_lean_parser_parser_8__updateTokens(obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_4; obj* x_5; obj* x_6; @@ -23597,7 +24478,7 @@ lean::inc(x_13); lean::dec(x_12); x_14 = l_Lean_Name_toString___closed__1; x_15 = l_Lean_Name_toStringWithSep___main(x_14, x_2); -x_16 = l___private_init_lean_parser_parser_7__updateTokens___closed__1; +x_16 = l___private_init_lean_parser_parser_8__updateTokens___closed__1; x_17 = lean::string_append(x_16, x_15); lean::dec(x_15); x_18 = l_Lean_registerTagAttribute___lambda__5___closed__4; @@ -23647,7 +24528,7 @@ lean::inc(x_30); lean::dec(x_29); x_31 = l_Lean_Name_toString___closed__1; x_32 = l_Lean_Name_toStringWithSep___main(x_31, x_2); -x_33 = l___private_init_lean_parser_parser_7__updateTokens___closed__1; +x_33 = l___private_init_lean_parser_parser_8__updateTokens___closed__1; x_34 = lean::string_append(x_33, x_32); lean::dec(x_32); x_35 = l_Lean_registerTagAttribute___lambda__5___closed__4; @@ -23796,7 +24677,7 @@ x_12 = lean::cnstr_get(x_3, 0); lean::inc(x_12); lean::inc(x_2); lean::inc(x_12); -x_13 = l___private_init_lean_parser_parser_7__updateTokens(x_12, x_2, x_9); +x_13 = l___private_init_lean_parser_parser_8__updateTokens(x_12, x_2, x_9); if (lean::obj_tag(x_13) == 0) { obj* x_14; @@ -23852,7 +24733,7 @@ x_26 = lean::cnstr_get(x_13, 0); lean::dec(x_26); x_27 = l_Lean_Name_toString___closed__1; x_28 = l_Lean_Name_toStringWithSep___main(x_27, x_2); -x_29 = l___private_init_lean_parser_parser_7__updateTokens___closed__1; +x_29 = l___private_init_lean_parser_parser_8__updateTokens___closed__1; x_30 = lean::string_append(x_29, x_28); lean::dec(x_28); x_31 = l_Lean_Parser_addBuiltinLeadingParser___closed__1; @@ -23869,7 +24750,7 @@ lean::inc(x_33); lean::dec(x_13); x_34 = l_Lean_Name_toString___closed__1; x_35 = l_Lean_Name_toStringWithSep___main(x_34, x_2); -x_36 = l___private_init_lean_parser_parser_7__updateTokens___closed__1; +x_36 = l___private_init_lean_parser_parser_8__updateTokens___closed__1; x_37 = lean::string_append(x_36, x_35); lean::dec(x_35); x_38 = l_Lean_Parser_addBuiltinLeadingParser___closed__1; @@ -23921,7 +24802,7 @@ x_47 = lean::cnstr_get(x_3, 0); lean::inc(x_47); lean::inc(x_2); lean::inc(x_47); -x_48 = l___private_init_lean_parser_parser_7__updateTokens(x_47, x_2, x_46); +x_48 = l___private_init_lean_parser_parser_8__updateTokens(x_47, x_2, x_46); if (lean::obj_tag(x_48) == 0) { obj* x_49; @@ -23974,7 +24855,7 @@ if (lean::is_exclusive(x_48)) { } x_58 = l_Lean_Name_toString___closed__1; x_59 = l_Lean_Name_toStringWithSep___main(x_58, x_2); -x_60 = l___private_init_lean_parser_parser_7__updateTokens___closed__1; +x_60 = l___private_init_lean_parser_parser_8__updateTokens___closed__1; x_61 = lean::string_append(x_60, x_59); lean::dec(x_59); x_62 = l_Lean_Parser_addBuiltinLeadingParser___closed__1; @@ -24083,7 +24964,7 @@ x_81 = lean::cnstr_get(x_3, 0); lean::inc(x_81); lean::inc(x_2); lean::inc(x_81); -x_82 = l___private_init_lean_parser_parser_7__updateTokens(x_81, x_2, x_80); +x_82 = l___private_init_lean_parser_parser_8__updateTokens(x_81, x_2, x_80); if (lean::obj_tag(x_82) == 0) { obj* x_83; @@ -24136,7 +25017,7 @@ if (lean::is_exclusive(x_82)) { } x_92 = l_Lean_Name_toString___closed__1; x_93 = l_Lean_Name_toStringWithSep___main(x_92, x_2); -x_94 = l___private_init_lean_parser_parser_7__updateTokens___closed__1; +x_94 = l___private_init_lean_parser_parser_8__updateTokens___closed__1; x_95 = lean::string_append(x_94, x_93); lean::dec(x_93); x_96 = l_Lean_Parser_addBuiltinLeadingParser___closed__1; @@ -24334,7 +25215,7 @@ lean::cnstr_set(x_9, 0, x_8); x_12 = lean::cnstr_get(x_3, 0); lean::inc(x_12); lean::inc(x_12); -x_13 = l___private_init_lean_parser_parser_7__updateTokens(x_12, x_2, x_9); +x_13 = l___private_init_lean_parser_parser_8__updateTokens(x_12, x_2, x_9); if (lean::obj_tag(x_13) == 0) { uint8 x_14; @@ -24491,7 +25372,7 @@ lean::cnstr_set(x_48, 1, x_47); x_49 = lean::cnstr_get(x_3, 0); lean::inc(x_49); lean::inc(x_49); -x_50 = l___private_init_lean_parser_parser_7__updateTokens(x_49, x_2, x_48); +x_50 = l___private_init_lean_parser_parser_8__updateTokens(x_49, x_2, x_48); if (lean::obj_tag(x_50) == 0) { obj* x_51; obj* x_52; obj* x_53; obj* x_54; @@ -24650,7 +25531,7 @@ lean::cnstr_set(x_80, 1, x_78); x_81 = lean::cnstr_get(x_3, 0); lean::inc(x_81); lean::inc(x_81); -x_82 = l___private_init_lean_parser_parser_7__updateTokens(x_81, x_2, x_80); +x_82 = l___private_init_lean_parser_parser_8__updateTokens(x_81, x_2, x_80); if (lean::obj_tag(x_82) == 0) { obj* x_83; obj* x_84; obj* x_85; obj* x_86; @@ -25818,6 +26699,7 @@ obj* x_16; lean::dec(x_12); lean::dec(x_4); lean::dec(x_3); +lean::dec(x_1); x_16 = lean::box(0); x_6 = x_16; goto block_10; @@ -25849,7 +26731,6 @@ _start: obj* x_6; x_6 = l_Lean_Parser_runBuiltinParserUnsafe(x_1, x_2, x_3, x_4, x_5); lean::dec(x_2); -lean::dec(x_1); return x_6; } } @@ -26300,24 +27181,19 @@ _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 = lean::cnstr_get(x_3, 1); lean::inc(x_6); x_7 = l_Lean_PersistentEnvExtension_getState___rarg(x_5, x_6); lean::dec(x_6); +lean::dec(x_5); x_8 = lean::cnstr_get(x_1, 2); +lean::inc(x_8); +lean::dec(x_1); x_9 = l_Lean_Parser_prattParser(x_8, x_7, x_2, x_3, x_4); return x_9; } } -obj* l_Lean_Parser_ParserAttribute_runParser___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_ParserAttribute_runParser(x_1, x_2, x_3, x_4); -lean::dec(x_1); -return x_5; -} -} obj* initialize_init_lean_position(obj*); obj* initialize_init_lean_syntax(obj*); obj* initialize_init_lean_toexpr(obj*); @@ -26372,6 +27248,36 @@ lean::mark_persistent(l_Lean_Parser_ParserContextCore_inhabited___closed__1); l_Lean_Parser_ParserContextCore_inhabited = _init_l_Lean_Parser_ParserContextCore_inhabited(); lean::mark_persistent(l_Lean_Parser_ParserContextCore_inhabited); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserContextCore"), "inhabited"), l_Lean_Parser_ParserContextCore_inhabited); +l_Lean_Parser_Error_Inhabited___closed__1 = _init_l_Lean_Parser_Error_Inhabited___closed__1(); +lean::mark_persistent(l_Lean_Parser_Error_Inhabited___closed__1); +l_Lean_Parser_Error_Inhabited = _init_l_Lean_Parser_Error_Inhabited(); +lean::mark_persistent(l_Lean_Parser_Error_Inhabited); +lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Error"), "Inhabited"), l_Lean_Parser_Error_Inhabited); +l___private_init_lean_parser_parser_1__expectedToString___main___closed__1 = _init_l___private_init_lean_parser_parser_1__expectedToString___main___closed__1(); +lean::mark_persistent(l___private_init_lean_parser_parser_1__expectedToString___main___closed__1); +l_Lean_Parser_Error_toString___closed__1 = _init_l_Lean_Parser_Error_toString___closed__1(); +lean::mark_persistent(l_Lean_Parser_Error_toString___closed__1); +l_Lean_Parser_Error_toString___closed__2 = _init_l_Lean_Parser_Error_toString___closed__2(); +lean::mark_persistent(l_Lean_Parser_Error_toString___closed__2); +l_Lean_Parser_Error_toString___closed__3 = _init_l_Lean_Parser_Error_toString___closed__3(); +lean::mark_persistent(l_Lean_Parser_Error_toString___closed__3); +l_Lean_Parser_Error_toString___closed__4 = _init_l_Lean_Parser_Error_toString___closed__4(); +lean::mark_persistent(l_Lean_Parser_Error_toString___closed__4); +l_Lean_Parser_Error_toString___closed__5 = _init_l_Lean_Parser_Error_toString___closed__5(); +lean::mark_persistent(l_Lean_Parser_Error_toString___closed__5); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Error"), "toString"), 1, l_Lean_Parser_Error_toString); +l_Lean_Parser_Error_HasToString___closed__1 = _init_l_Lean_Parser_Error_HasToString___closed__1(); +lean::mark_persistent(l_Lean_Parser_Error_HasToString___closed__1); +l_Lean_Parser_Error_HasToString = _init_l_Lean_Parser_Error_HasToString(); +lean::mark_persistent(l_Lean_Parser_Error_HasToString); +lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Error"), "HasToString"), l_Lean_Parser_Error_HasToString); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Error"), "beq"), 2, l_Lean_Parser_Error_beq___boxed); +l_Lean_Parser_Error_HasBeq___closed__1 = _init_l_Lean_Parser_Error_HasBeq___closed__1(); +lean::mark_persistent(l_Lean_Parser_Error_HasBeq___closed__1); +l_Lean_Parser_Error_HasBeq = _init_l_Lean_Parser_Error_HasBeq(); +lean::mark_persistent(l_Lean_Parser_Error_HasBeq); +lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Error"), "HasBeq"), l_Lean_Parser_Error_HasBeq); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Error"), "merge"), 2, l_Lean_Parser_Error_merge); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "hasError"), 1, l_Lean_Parser_ParserState_hasError___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "stackSize"), 1, l_Lean_Parser_ParserState_stackSize___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "restore"), 3, l_Lean_Parser_ParserState_restore___boxed); @@ -26381,13 +27287,16 @@ REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_na REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "popSyntax"), 1, l_Lean_Parser_ParserState_popSyntax); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "shrinkStack"), 2, l_Lean_Parser_ParserState_shrinkStack___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "next"), 3, l_Lean_Parser_ParserState_next___boxed); -REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "toErrorMsg"), 2, l_Lean_Parser_ParserState_toErrorMsg___boxed); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "toErrorMsg"), 2, l_Lean_Parser_ParserState_toErrorMsg); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "mkNode"), 3, l_Lean_Parser_ParserState_mkNode); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "mkError"), 2, l_Lean_Parser_ParserState_mkError); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "mkUnexpectedError"), 2, l_Lean_Parser_ParserState_mkUnexpectedError); l_Lean_Parser_ParserState_mkEOIError___closed__1 = _init_l_Lean_Parser_ParserState_mkEOIError___closed__1(); lean::mark_persistent(l_Lean_Parser_ParserState_mkEOIError___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "mkEOIError"), 1, l_Lean_Parser_ParserState_mkEOIError); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "mkErrorAt"), 3, l_Lean_Parser_ParserState_mkErrorAt); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "mkErrorsAt"), 3, l_Lean_Parser_ParserState_mkErrorsAt); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserState"), "mkUnexpectedErrorAt"), 3, l_Lean_Parser_ParserState_mkUnexpectedErrorAt); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserFn"), "inhabited"), 3, l_Lean_Parser_ParserFn_inhabited___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "FirstTokens"), "merge"), 2, l_Lean_Parser_FirstTokens_merge); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "FirstTokens"), "seq"), 2, l_Lean_Parser_FirstTokens_seq); @@ -26438,8 +27347,6 @@ REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_na REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "node"), 3, l_Lean_Parser_node___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "leadingNode"), 2, l_Lean_Parser_leadingNode); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "trailingNode"), 2, l_Lean_Parser_trailingNode); -l_Lean_Parser_mergeOrElseErrors___closed__1 = _init_l_Lean_Parser_mergeOrElseErrors___closed__1(); -lean::mark_persistent(l_Lean_Parser_mergeOrElseErrors___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "mergeOrElseErrors"), 3, l_Lean_Parser_mergeOrElseErrors___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "orelseFn"), 1, l_Lean_Parser_orelseFn___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "orelseInfo"), 2, l_Lean_Parser_orelseInfo); @@ -26474,8 +27381,6 @@ REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_na REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "whitespace"), 2, l_Lean_Parser_whitespace___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "mkEmptySubstringAt"), 2, l_Lean_Parser_mkEmptySubstringAt); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "rawFn"), 1, l_Lean_Parser_rawFn___boxed); -l_Lean_Parser_chFn___rarg___closed__1 = _init_l_Lean_Parser_chFn___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_chFn___rarg___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "chFn"), 1, l_Lean_Parser_chFn___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "rawCh"), 3, l_Lean_Parser_rawCh___boxed); l_Lean_Parser_hexDigitFn___main___closed__1 = _init_l_Lean_Parser_hexDigitFn___main___closed__1(); @@ -26485,6 +27390,9 @@ l_Lean_Parser_quotedCharFn___main___closed__1 = _init_l_Lean_Parser_quotedCharFn lean::mark_persistent(l_Lean_Parser_quotedCharFn___main___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "quotedCharFn"), 2, l_Lean_Parser_quotedCharFn___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "mkNodeToken"), 4, l_Lean_Parser_mkNodeToken___boxed); +l_Lean_Parser_charLitFnAux___main___closed__1 = _init_l_Lean_Parser_charLitFnAux___main___closed__1(); +lean::mark_persistent(l_Lean_Parser_charLitFnAux___main___closed__1); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "charLitFnAux"), 3, l_Lean_Parser_charLitFnAux___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "strLitFnAux"), 3, l_Lean_Parser_strLitFnAux___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "decimalNumberFn"), 3, l_Lean_Parser_decimalNumberFn___boxed); l_Lean_Parser_binNumberFn___closed__1 = _init_l_Lean_Parser_binNumberFn___closed__1(); @@ -26580,6 +27488,12 @@ REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_na l_Lean_Parser_strLit___closed__1 = _init_l_Lean_Parser_strLit___closed__1(); lean::mark_persistent(l_Lean_Parser_strLit___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "strLit"), 1, l_Lean_Parser_strLit___boxed); +l_Lean_Parser_charLitFn___rarg___closed__1 = _init_l_Lean_Parser_charLitFn___rarg___closed__1(); +lean::mark_persistent(l_Lean_Parser_charLitFn___rarg___closed__1); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "charLitFn"), 2, l_Lean_Parser_charLitFn___boxed); +l_Lean_Parser_charLit___closed__1 = _init_l_Lean_Parser_charLit___closed__1(); +lean::mark_persistent(l_Lean_Parser_charLit___closed__1); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "charLit"), 1, l_Lean_Parser_charLit___boxed); l_Lean_Parser_identFn___rarg___closed__1 = _init_l_Lean_Parser_identFn___rarg___closed__1(); lean::mark_persistent(l_Lean_Parser_identFn___rarg___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "identFn"), 2, l_Lean_Parser_identFn___boxed); @@ -26646,11 +27560,9 @@ REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_na 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); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "indexed"), 1, l_Lean_Parser_indexed); -l_Lean_Parser_leadingParser___closed__1 = _init_l_Lean_Parser_leadingParser___closed__1(); -lean::mark_persistent(l_Lean_Parser_leadingParser___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "leadingParser"), 5, l_Lean_Parser_leadingParser___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "trailingLoop"), 1, l_Lean_Parser_trailingLoop___boxed); -REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "prattParser"), 5, l_Lean_Parser_prattParser___boxed); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "prattParser"), 5, l_Lean_Parser_prattParser); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "mkBuiltinTokenTable"), 1, l_Lean_Parser_mkBuiltinTokenTable); w = l_Lean_Parser_mkBuiltinTokenTable(w); if (io_result_is_error(w)) return w; @@ -26685,10 +27597,10 @@ lean::mark_persistent(l_Lean_Parser_tokenTableAttribute); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "tokenTableAttribute"), l_Lean_Parser_tokenTableAttribute); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "mkParserContext"), 3, l_Lean_Parser_mkParserContext); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "mkParserState"), 1, l_Lean_Parser_mkParserState___boxed); -REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "runParser"), 5, l_Lean_Parser_runParser___boxed); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "runParser"), 5, l_Lean_Parser_runParser); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "mkBuiltinParsingTablesRef"), 1, l_Lean_Parser_mkBuiltinParsingTablesRef); -l___private_init_lean_parser_parser_7__updateTokens___closed__1 = _init_l___private_init_lean_parser_parser_7__updateTokens___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_parser_7__updateTokens___closed__1); +l___private_init_lean_parser_parser_8__updateTokens___closed__1 = _init_l___private_init_lean_parser_parser_8__updateTokens___closed__1(); +lean::mark_persistent(l___private_init_lean_parser_parser_8__updateTokens___closed__1); l_Lean_Parser_addBuiltinLeadingParser___closed__1 = _init_l_Lean_Parser_addBuiltinLeadingParser___closed__1(); lean::mark_persistent(l_Lean_Parser_addBuiltinLeadingParser___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "addBuiltinLeadingParser"), 4, l_Lean_Parser_addBuiltinLeadingParser___boxed); @@ -26771,6 +27683,6 @@ lean::mark_persistent(l_Lean_Parser_registerParserAttribute___lambda__2___closed l_Lean_Parser_registerParserAttribute___closed__1 = _init_l_Lean_Parser_registerParserAttribute___closed__1(); lean::mark_persistent(l_Lean_Parser_registerParserAttribute___closed__1); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "registerParserAttribute"), 5, l_Lean_Parser_registerParserAttribute); -REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserAttribute"), "runParser"), 4, l_Lean_Parser_ParserAttribute_runParser___boxed); +REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "ParserAttribute"), "runParser"), 4, l_Lean_Parser_ParserAttribute_runParser); return w; } diff --git a/src/stage0/init/lean/parser/term.cpp b/src/stage0/init/lean/parser/term.cpp index 2eb60310b0..7acbc1f34f 100644 --- a/src/stage0/init/lean/parser/term.cpp +++ b/src/stage0/init/lean/parser/term.cpp @@ -16,7 +16,6 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64; #endif obj* l_Lean_Parser_Term_have___closed__6; obj* l_Lean_Parser_Term_typeSpec___elambda__1___rarg___closed__2; -extern obj* l_Lean_Parser_chFn___rarg___closed__1; obj* l___regBuiltinParser_Lean_Parser_Term_dollar(obj*); obj* l_Lean_Parser_Term_sortApp___closed__4; obj* l_Lean_Parser_Term_sorry___elambda__1___rarg(obj*, obj*); @@ -25,6 +24,7 @@ obj* l_Lean_Parser_Term_id___closed__2; obj* l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_fun___elambda__1___closed__11; obj* l_Lean_Parser_Term_num___elambda__1___rarg(obj*, obj*); +obj* l_Lean_Parser_Term_match___elambda__1___closed__12; obj* l_Lean_Parser_Term_simpleBinder___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Term_or___elambda__1___closed__5; obj* l_Lean_Parser_Term_arrow___elambda__1___closed__1; @@ -61,16 +61,20 @@ obj* l_Lean_Parser_termParser(uint8, obj*); obj* l_Lean_Parser_Term_tupleTail___elambda__1___closed__1; obj* l_Lean_Parser_Term_optType___closed__3; obj* l_Lean_Parser_Term_match___closed__1; +obj* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__10; obj* l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_parser_x21___closed__4; +obj* l___regBuiltinParser_Lean_Parser_Term_borrowed(obj*); obj* l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_have___closed__11; obj* l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_match___closed__5; obj* l_Lean_Parser_Term_hole___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_eq___elambda__1___closed__2; +obj* l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__2; obj* l_Lean_Parser_orelseFn___rarg(obj*, obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Term_borrowed; obj* l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_subtype___closed__9; obj* l_Lean_Parser_Term_if___closed__12; @@ -83,7 +87,6 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spe obj* l_Lean_Parser_Term_depArrow___closed__7; obj* l___regBuiltinParser_Lean_Parser_Term_parser_x21(obj*); obj* l_Lean_Parser_Term_orelse___closed__1; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_id___closed__5; obj* l_Lean_Parser_Term_andthen___closed__2; obj* l_Lean_Parser_Term_inaccessible___elambda__1___boxed(obj*); @@ -103,9 +106,11 @@ obj* l_Lean_Parser_Term_nomatch___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__9; obj* l_Lean_Parser_Term_type___closed__3; obj* l_Lean_Parser_Term_namedArgument; +obj* l_Lean_Parser_rawIdentFn(obj*, obj*); obj* l_Lean_Parser_Term_array; obj* l_Lean_Parser_Term_lt___elambda__1___closed__3; obj* l_Lean_Parser_Term_fun___elambda__1___closed__6; +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_andM; obj* l_Lean_Parser_Term_have___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__3; @@ -115,11 +120,14 @@ obj* l_Lean_Parser_Term_list___elambda__1___closed__3; obj* l_Lean_Parser_Term_hole___elambda__1(obj*); obj* l_Lean_Parser_Term_hole___closed__4; obj* l_Lean_Parser_Term_cons___elambda__1___closed__3; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1; +obj* l_Lean_Parser_Term_quotedName___closed__1; obj* l_Lean_Parser_Term_doElem___closed__1; obj* l_Lean_Parser_Term_equiv___elambda__1___closed__4; obj* l_Lean_Parser_Term_array___closed__6; obj* l_Lean_Parser_Term_id___closed__3; obj* l_Lean_Parser_Term_doPat___closed__2; +obj* l_Lean_Parser_Term_fun___elambda__1___closed__18; obj* l_Lean_FileMap_toPosition___main(obj*, obj*); namespace lean { obj* nat_sub(obj*, obj*); @@ -139,6 +147,7 @@ obj* l_Lean_Parser_Term_hole___closed__1; obj* l_Lean_Parser_Term_prop___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_ne___elambda__1___closed__4; +extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; obj* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__1; obj* l_Lean_Parser_Term_not; obj* l_Lean_Parser_Term_map; @@ -156,8 +165,10 @@ obj* l_Lean_Parser_regBuiltinTermParserAttr___closed__3; obj* l_Lean_Parser_Term_sorry___elambda__1___boxed(obj*); obj* l_Lean_Parser_ParserState_restore(obj*, obj*, obj*); obj* l_Lean_Parser_Term_structInst___elambda__1___closed__10; +obj* l_Lean_Parser_Term_structInst___elambda__1___closed__11; obj* l_Lean_Parser_Term_fromTerm; obj* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_list___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); +extern obj* l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_proj___elambda__1___closed__5; obj* l_Lean_Parser_Term_binderTactic___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__11; @@ -167,6 +178,7 @@ obj* l_Lean_Parser_Term_haveAssign___elambda__1(obj*); obj* l_Lean_Parser_Term_let___closed__6; obj* l_Lean_Parser_Term_letEqns___closed__3; obj* l_Lean_Parser_Term_haveAssign___closed__5; +obj* l_Lean_Parser_Term_char___elambda__1(obj*); obj* l_Lean_Parser_Term_prop___closed__1; obj* l_Lean_Parser_Term_app___closed__5; obj* l_Lean_Parser_Term_id___elambda__1___closed__4; @@ -187,16 +199,20 @@ obj* l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_show___elambda__1___rarg___closed__2; obj* l___regBuiltinParser_Lean_Parser_Term_seqLeft(obj*); obj* l_Lean_Parser_Term_doId___closed__5; +obj* l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_orelse___elambda__1___closed__3; obj* l_Lean_Parser_Term_list___closed__4; obj* l_Lean_Parser_Term_mod___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_Term_list___elambda__1___closed__10; obj* l_Lean_Parser_Term_anonymousCtor___closed__4; +obj* l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_show___closed__4; obj* l_Lean_Parser_Term_show___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_fun___elambda__1___closed__10; obj* l_Lean_Parser_mergeOrElseErrors(obj*, obj*, obj*); obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__10; obj* l_Lean_Parser_symbolInfo(obj*, obj*); +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; obj* l_Lean_Parser_Term_nomatch___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_bnot___closed__2; obj* l_Lean_Parser_Term_andM___elambda__1___closed__2; @@ -205,11 +221,11 @@ obj* l_Lean_Parser_Term_binderIdent___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Term_prop___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_anonymousCtor___closed__1; obj* l_Lean_Parser_Term_sub___elambda__1___closed__1; -extern obj* l_Lean_Parser_mergeOrElseErrors___closed__1; obj* l_Lean_Parser_Term_or___closed__1; obj* l_Lean_Parser_Term_cons; obj* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_id___closed__6; +obj* l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(obj*); obj* l_Lean_Parser_Term_inaccessible___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Term_pow___elambda__1___closed__1; obj* l_Lean_Parser_Term_list___elambda__1___boxed(obj*, obj*, obj*); @@ -229,9 +245,12 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spe obj* l_Lean_Parser_Term_bnot; obj* l_Lean_Parser_orelseInfo(obj*, obj*); obj* l_Lean_Parser_Term_doPat___closed__5; +extern obj* l_Lean_formatDataValue___main___closed__1; +obj* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__9; obj* l_Lean_Parser_Term_show___closed__3; obj* l_Lean_Parser_Term_dollar; obj* l_Lean_Parser_Term_id___elambda__1___closed__3; +obj* l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__6; obj* l_Lean_Parser_termParser___lambda__1(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_add___elambda__1___closed__1; obj* l_Lean_Parser_Term_and; @@ -254,11 +273,13 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spe obj* l_Lean_Parser_Term_seqLeft___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_modN; obj* l_Lean_Parser_Term_prop___elambda__1___rarg___closed__6; +obj* l_Lean_Parser_Term_anonymousCtor___closed__8; obj* l_Lean_Parser_Term_sort___elambda__1(obj*); obj* l_Lean_Parser_Term_subtype___closed__3; obj* l_Lean_Parser_Term_equation___elambda__1___closed__1; obj* l_Lean_Parser_Term_optIdent___elambda__1___boxed(obj*); obj* l___regBuiltinParser_Lean_Parser_Term_seq(obj*); +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; obj* l_Lean_Parser_Term_beq___elambda__1___closed__1; obj* l_Lean_Parser_Term_explicit___elambda__1___closed__1; obj* l_Lean_Parser_Term_fun___elambda__1___closed__14; @@ -268,19 +289,20 @@ obj* l_Lean_Parser_Term_explicit___closed__4; obj* l_Lean_Parser_Term_letPatDecl___closed__2; obj* l___regBuiltinParser_Lean_Parser_Term_inaccessible(obj*); obj* l_Lean_Parser_Term_proj___closed__9; +obj* l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_binderTactic___closed__4; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2; obj* l_Lean_Parser_Term_tparser_x21___closed__2; obj* l_Lean_Parser_Term_seqRight___closed__2; obj* l_Lean_Parser_Term_letEqns___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_subtype___elambda__1(obj*); -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); +obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__15; obj* l_Lean_Parser_Term_leftArrow___closed__3; obj* l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_emptyC___closed__2; obj* l_Lean_Parser_Term_binderType___closed__2; obj* l_Lean_Parser_Term_structInst___elambda__1___closed__7; obj* l_Lean_Parser_termParser___lambda__1___boxed(obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Term_quotedName___elambda__1(obj*); obj* l_Lean_Parser_Term_prod___closed__2; obj* l_Lean_Parser_Term_tparser_x21___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___spec__2___boxed(obj*, obj*, obj*, obj*, obj*); @@ -294,6 +316,7 @@ obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__8; obj* l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_anonymousCtor___closed__3; obj* l_Lean_Parser_Term_proj___closed__6; +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_instBinder___closed__1; obj* l_Lean_Parser_Term_bracketedDoSeq___closed__5; obj* l_Lean_Parser_Term_sortApp___closed__2; @@ -307,12 +330,14 @@ obj* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_structInst___spec__1(uint8, uin obj* l_Lean_Parser_Term_type___elambda__1(obj*); obj* l_Lean_Parser_Term_simpleBinder___closed__1; obj* l_Lean_Parser_Term_sort___elambda__1___rarg___closed__5; +obj* l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__7; obj* l_Lean_Parser_sepBy1Info(obj*, obj*); obj* l_Lean_Parser_Term_infixR___elambda__1(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_equiv; obj* l_Lean_Parser_Term_type___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_id___closed__9; obj* l_Lean_Parser_Term_doLet___closed__2; +obj* l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_type___closed__1; obj* l___regBuiltinParser_Lean_Parser_Term_do(obj*); obj* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__2; @@ -321,6 +346,7 @@ obj* l_Lean_Parser_Term_heq___closed__1; obj* l_Lean_Parser_Term_sortApp; obj* l_Lean_Parser_Term_cons___elambda__1___closed__2; obj* l_Lean_Parser_Term_bnot___elambda__1___rarg(obj*, obj*); +extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; obj* l_Lean_Parser_Term_bne; obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; obj* l_Lean_Parser_Term_gt___closed__3; @@ -335,6 +361,7 @@ obj* l___regBuiltinParser_Lean_Parser_Term_cdot(obj*); obj* l_Lean_Parser_Term_structInst___closed__8; obj* l_Lean_Parser_Term_ge___closed__3; obj* l_Lean_Parser_Term_binderType___closed__1; +obj* l_Lean_Parser_ParserState_mkUnexpectedError(obj*, obj*); obj* l_Lean_Parser_Term_namedArgument___closed__6; obj* l_Lean_Parser_Term_optType___closed__2; obj* l_Lean_Parser_mkTermParserAttribute(obj*); @@ -344,6 +371,8 @@ obj* l_Lean_Parser_Term_gt___elambda__1___closed__4; obj* l_Lean_Parser_Term_seqLeft; obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__1; obj* l_Lean_Parser_Term_tupleTail; +obj* l_Lean_Parser_Term_quotedName___closed__2; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_paren___elambda__1___closed__1; obj* l_Lean_Parser_Term_proj___closed__8; obj* l_Lean_Parser_Term_orelse___elambda__1___closed__1; @@ -369,9 +398,9 @@ obj* l_Lean_Parser_Term_or___elambda__1___closed__3; obj* l_Lean_Parser_Term_map___elambda__1___closed__1; obj* l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_doSeq; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_bor___closed__2; obj* l_Lean_Parser_Term_app___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_Term_char___closed__2; obj* l_Lean_Parser_Term_id___elambda__1___closed__11; obj* l_Lean_Parser_Term_structInst___closed__11; obj* l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__1; @@ -391,6 +420,7 @@ obj* l_Lean_Parser_Term_doPat___elambda__1(obj*); obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__8; obj* l_Lean_Parser_Term_namedArgument___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_parenSpecial___closed__2; +obj* l_Lean_Parser_Term_have___elambda__1___rarg___closed__12; obj* l_Lean_Parser_Term_seq___closed__3; obj* l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_div___elambda__1___closed__1; @@ -408,9 +438,9 @@ obj* l_Lean_Parser_Term_suffices___closed__3; obj* l_Lean_Parser_Term_binderTactic; obj* l_Lean_Parser_Term_sortApp___closed__1; obj* l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_id___elambda__1___spec__1(uint8, uint8, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolFnAux(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__3; obj* l_Lean_Parser_Term_dollar___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_prop___closed__4; obj* l_Lean_Parser_Term_sub___elambda__1(obj*, obj*, obj*); @@ -432,6 +462,8 @@ obj* l_Lean_Parser_Term_suffices; obj* l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__4; obj* l___regBuiltinParser_Lean_Parser_Term_bind(obj*); obj* l_Lean_Parser_Term_doElem___closed__4; +obj* l_Lean_Parser_Term_have___elambda__1___rarg___closed__10; +obj* l_Lean_Parser_Term_quotedName; obj* l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_mul___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_have___closed__5; @@ -453,6 +485,7 @@ obj* l_Lean_Parser_Term_match___elambda__1___closed__2; obj* l_Lean_Parser_Term_paren___closed__7; obj* l_Lean_Parser_Term_doId___closed__4; extern obj* l___regBuiltinParser_Lean_Parser_Level_num___closed__1; +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__8; obj* l_Lean_Parser_Term_explicitBinder___elambda__1___closed__2; obj* l_Lean_Parser_Term_map___elambda__1___closed__2; obj* l_Lean_Parser_Term_explicitBinder___closed__10; @@ -460,6 +493,7 @@ obj* l_Lean_Parser_Term_prop___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_anonymousCtor___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Term_letPatDecl___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Term_ne; +obj* l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_list___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_modN___elambda__1___closed__3; obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__4; @@ -468,7 +502,9 @@ obj* l_Lean_Parser_Term_explicit___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_seq___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_heq___elambda__1___closed__3; +extern obj* l_Lean_Parser_charLit___closed__1; obj* l_Lean_Parser_Term_id___elambda__1___closed__5; +obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__17; obj* l_Lean_Parser_Term_tparser_x21; obj* l_Lean_Parser_Term_arrow___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_subst___closed__3; @@ -485,6 +521,7 @@ obj* l_Lean_Parser_Term_iff___elambda__1___closed__5; obj* l_Lean_Parser_Term_div___closed__3; obj* l_Lean_Parser_Term_typeAscription___closed__4; obj* l_Lean_Parser_Term_mapConst___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_anonymousCtor___spec__1(uint8, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_prod___closed__1; obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__5; obj* l_Lean_Parser_Term_ge___elambda__1___closed__3; @@ -494,6 +531,7 @@ obj* l_Lean_Parser_Term_eq___elambda__1___closed__1; obj* l_Lean_Parser_Term_band___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_let___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_structInstSource___elambda__1___rarg(obj*, obj*); +obj* l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_implicitBinder___closed__2; obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_equiv___elambda__1___closed__1; @@ -502,14 +540,15 @@ obj* l_Lean_Parser_Term_le___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_ne___elambda__1___closed__2; obj* l_Lean_Parser_Term_seqRight___elambda__1___closed__4; obj* l_Lean_Parser_Term_doSeq___closed__1; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3; obj* l___regBuiltinParser_Lean_Parser_Term_tparser_x21(obj*); obj* l_Lean_Parser_mkTermParserAttribute___closed__1; obj* l_Lean_Parser_Term_mul___closed__2; +obj* l_Lean_Parser_Term_do___elambda__1___closed__7; obj* l_Lean_Parser_Term_type___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_match___elambda__1___closed__6; obj* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); extern obj* l_Lean_Parser_Level_paren___closed__4; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_add___closed__1; obj* l_Lean_Parser_Term_arrow___closed__2; obj* l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_id___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); @@ -524,11 +563,13 @@ obj* l_Lean_Parser_Term_infixL(obj*, obj*); obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_simpleBinder___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_letPatDecl___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_match___elambda__1___closed__7; +obj* l_Lean_Parser_Term_fun___elambda__1___closed__19; obj* l_Lean_Parser_Term_id___closed__11; obj* l_Lean_Parser_Term_str; obj* l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_subtype___closed__6; obj* l_Lean_Parser_Term_bind___closed__2; +obj* l_Lean_Parser_Term_borrowed___closed__5; obj* l_Lean_Parser_Term_type___closed__2; obj* l_Lean_Parser_Term_doPat___closed__3; obj* l_Lean_Parser_Term_modN___elambda__1(obj*, obj*, obj*); @@ -562,11 +603,11 @@ obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__7; obj* l_Lean_Parser_Term_eq___closed__3; obj* l_Lean_Parser_Term_id; obj* l_Lean_Parser_Term_equation___elambda__1___closed__2; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_not___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_eq___closed__1; obj* l_Lean_Parser_Term_structInst___elambda__1(obj*, obj*, obj*); +obj* l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_add; obj* l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_type___elambda__1___boxed(obj*); @@ -577,6 +618,8 @@ obj* l_Lean_Parser_Term_instBinder___closed__2; obj* l_Lean_Parser_Term_mapConst___elambda__1___closed__3; obj* l___regBuiltinParser_Lean_Parser_Term_proj(obj*); obj* l_Lean_Parser_Term_match___elambda__1___closed__8; +obj* l_Lean_Parser_Term_char___elambda__1___rarg(obj*, obj*); +obj* l_Lean_Parser_Term_borrowed___closed__4; obj* l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l___regBuiltinParser_Lean_Parser_Term_str(obj*); obj* l_Lean_Parser_Term_id___elambda__1___closed__12; @@ -593,6 +636,7 @@ obj* l_Lean_Parser_Term_sorry___closed__2; obj* l_Lean_Parser_Term_suffices___closed__8; obj* l_Lean_Parser_Term_have___closed__3; obj* l___regBuiltinParser_Lean_Parser_Term_bor(obj*); +obj* l___regBuiltinParser_Lean_Parser_Term_char(obj*); obj* l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_add___closed__2; @@ -604,8 +648,8 @@ obj* l_Lean_Parser_Term_structInstField___closed__4; obj* l_Lean_Parser_Term_forall___closed__4; obj* l_Lean_Parser_Term_bind___elambda__1___closed__1; obj* l_Lean_Parser_Term_list___elambda__1___closed__1; +obj* l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_mapConst___closed__1; -extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; obj* l_Lean_Parser_Term_uminus___elambda__1(obj*); obj* l_Lean_Parser_Term_app___closed__2; obj* l_Lean_Parser_Term_namedArgument___closed__1; @@ -647,6 +691,7 @@ obj* l_Lean_Parser_Term_explicit___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Term_str___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_mod___elambda__1___closed__3; obj* l_Lean_Parser_Term_structInstField___elambda__1(obj*); +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___spec__2___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_not___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Term_dollar___closed__1; @@ -659,9 +704,11 @@ obj* l_Lean_Parser_Term_binderType(uint8); obj* l_Lean_Parser_Term_bor___closed__3; extern obj* l_Lean_Parser_manyAux___main___closed__1; obj* l_Lean_Parser_Term_fun___elambda__1___closed__12; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2; obj* l_Lean_Parser_Term_equation___closed__3; +obj* l_Lean_Parser_Term_borrowed___closed__3; extern obj* l_Lean_Parser_Parser_inhabited___closed__1; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_doId___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_doPat___closed__8; @@ -670,6 +717,7 @@ obj* l_Lean_Parser_Term_list___closed__8; obj* l___regBuiltinParser_Lean_Parser_Term_eq(obj*); obj* l_Lean_Parser_Term_subst___elambda__1___closed__1; obj* l_Lean_Parser_Term_prop___elambda__1___rarg___closed__2; +obj* l_Lean_Parser_Term_quotedName___closed__4; obj* l_Lean_Parser_Term_prop___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_namedArgument___closed__4; obj* l_Lean_Parser_Term_fromTerm___closed__4; @@ -690,7 +738,6 @@ obj* l_Lean_Parser_Term_nomatch___elambda__1(obj*); obj* l_Lean_Parser_manyAux___main(uint8, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_bind___elambda__1___closed__4; obj* l_Lean_Parser_Term_doSeq___elambda__1___closed__1; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_append___elambda__1___closed__3; obj* l_Lean_Parser_Term_let___closed__5; obj* l_Lean_Parser_Term_doExpr___elambda__1___rarg___closed__2; @@ -710,6 +757,7 @@ obj* l_Lean_Parser_Term_letDecl___closed__4; extern obj* l_List_reprAux___main___rarg___closed__1; obj* l_Lean_Parser_Term_doPat___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_or___elambda__1___closed__1; +obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; obj* l___regBuiltinParser_Lean_Parser_Term_str___closed__1; obj* l_Lean_Parser_Term_typeSpec___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Term_typeAscription___closed__1; @@ -724,6 +772,7 @@ obj* l_Lean_Parser_Term_forall___closed__3; obj* l_Lean_Parser_Term_beq___closed__3; obj* l_Lean_Parser_Term_typeAscription___elambda__1(obj*); obj* l_Lean_Parser_Term_type___elambda__1___rarg___closed__2; +obj* l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1(uint8, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_binderType___closed__3; obj* l_Lean_Parser_Term_fun___elambda__1___closed__5; obj* l_Lean_Parser_Term_letIdDecl___closed__1; @@ -763,26 +812,28 @@ obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__7; obj* l_Lean_Parser_Term_append___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_list___elambda__1___closed__6; obj* l_Lean_Parser_Term_explicitBinder___closed__6; +obj* l___regBuiltinParser_Lean_Parser_Term_quotedName(obj*); obj* l_Lean_Parser_Term_structInst___elambda__1___closed__1; obj* l_Lean_Parser_Term_sort___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__3; obj* l_Lean_Parser_Term_bind___elambda__1___closed__3; obj* l_Lean_Parser_Term_bne___closed__2; +obj* l_Lean_Parser_Term_matchAlt___elambda__1___closed__11; obj* l_Lean_Parser_Term_fun___closed__6; obj* l_Lean_Parser_Term_match___elambda__1___closed__4; +obj* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_anonymousCtor___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_tokenFn(obj*, obj*); obj* l_Lean_Parser_Term_id___closed__4; obj* l_Lean_Parser_Term_heq___elambda__1(obj*, obj*, obj*); obj* l___regBuiltinParser_Lean_Parser_Term_let(obj*); extern obj* l_Char_HasRepr___closed__1; obj* l_Lean_Parser_Term_equiv___elambda__1___closed__3; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; obj* l_Lean_Parser_mkTermParserAttribute___closed__4; obj* l_Lean_Parser_Term_cdot; obj* l_Lean_Parser_Term_letEqns; obj* l_Lean_Parser_Term_leftArrow___elambda__1(obj*); obj* l_Lean_Parser_Term_structInst___elambda__1___closed__9; obj* l___regBuiltinParser_Lean_Parser_Term_subst(obj*); -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; obj* l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_gt; extern obj* l_Lean_Parser_levelParserAttribute; @@ -819,6 +870,7 @@ obj* l_Lean_Parser_Term_structInstSource___closed__2; obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_list___closed__1; obj* l_Lean_Parser_Term_infixL___boxed(obj*, obj*); +obj* l_Lean_Parser_Term_sort___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_gt___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_bind___closed__1; obj* l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__5; @@ -831,7 +883,9 @@ obj* l_Lean_Parser_Term_fun___elambda__1___boxed(obj*, obj*, obj*); namespace lean { obj* nat_add(obj*, obj*); } +obj* l_Lean_Parser_Term_char___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_fromTerm___closed__1; +obj* l_Lean_Parser_Term_show___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_fromTerm___elambda__1(obj*); extern obj* l_Lean_nullKind; obj* l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__5; @@ -847,6 +901,8 @@ obj* l_Lean_Parser_Term_match; obj* l_Lean_Parser_Term_have___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_add___elambda__1___closed__4; obj* l_Lean_Parser_Term_ge___closed__1; +obj* l_Lean_Parser_Term_structInst___elambda__1___closed__12; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_do___elambda__1___closed__4; obj* l_Lean_Parser_Term_iff___elambda__1___closed__1; obj* l_Lean_Parser_Term_explicitBinder___closed__1; @@ -862,16 +918,20 @@ obj* l_Lean_Parser_Term_bne___closed__1; obj* l_Lean_Parser_Term_matchAlt___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Term_binderType___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_fun___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*); +obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__14; +obj* l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_iff___elambda__1___closed__4; obj* l_Lean_Parser_Term_anonymousCtor___closed__5; extern obj* l_Lean_formatEntry___main___closed__1; obj* l_Lean_Parser_Term_show___elambda__1___rarg___closed__4; +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; obj* l_Lean_Parser_Term_structInst___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Term_cons___closed__3; obj* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_seqRight___closed__1; +obj* l_Lean_Parser_Term_prop___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_heq___elambda__1___closed__2; obj* l_Lean_Parser_Term_fun___elambda__1___closed__4; obj* l_Lean_Parser_Term_parser_x21___elambda__1___boxed(obj*); @@ -905,6 +965,7 @@ extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_have___closed__9; obj* l_Lean_Parser_Term_have___closed__1; obj* l_Lean_Parser_Term_unicodeInfixL___boxed(obj*, obj*, obj*); +obj* l_Lean_Parser_Term_not___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_sortApp___elambda__1___closed__1; extern obj* l_Lean_Parser_Level_hole___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__3; @@ -913,11 +974,11 @@ obj* l_Lean_Parser_symbolFn___rarg___boxed(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_parenSpecial___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Term_seq___elambda__1___closed__2; obj* l_Lean_Parser_Term_mul___closed__1; +obj* l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_ne___closed__3; obj* l_Lean_Parser_Term_paren___elambda__1___boxed(obj*, obj*, obj*); obj* l_Lean_Parser_Term_forall___closed__1; obj* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__3; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_show___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_mkTermParserAttribute___closed__5; obj* l___regBuiltinParser_Lean_Parser_Term_num___closed__1; @@ -946,20 +1007,27 @@ obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___sp obj* l_Lean_Parser_Term_subtype; obj* l_Lean_Parser_Term_fun___closed__7; obj* l_Lean_Parser_Term_not___elambda__1___rarg___closed__6; +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_infixL___elambda__1(obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_if___elambda__1(obj*); obj* l_Lean_Parser_Term_emptyC; obj* l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_cdot___closed__3; obj* l_Lean_Parser_Term_hole___closed__2; +obj* l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_bor___closed__1; +obj* l_Lean_Parser_Term_borrowed___closed__1; obj* l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_inaccessible___closed__3; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_if___closed__9; obj* l_Lean_Parser_Term_haveAssign___closed__3; obj* l_Lean_Parser_Term_forall; obj* l_Lean_Parser_Term_not___elambda__1___rarg___closed__3; +namespace lean { +uint8 string_dec_eq(obj*, obj*); +} obj* l_Lean_Parser_Term_parser_x21___closed__5; obj* l_Lean_Parser_Term_tparser_x21___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_match___elambda__1___closed__1; @@ -967,10 +1035,11 @@ obj* l_Lean_Parser_Term_ge___elambda__1___closed__1; obj* l___regBuiltinParser_Lean_Parser_Term_band(obj*); obj* l_Lean_Parser_Term_id___closed__8; obj* l_Lean_Parser_Term_id___elambda__1___closed__8; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2; obj* l_Lean_Parser_Term_explicitBinder___elambda__1___closed__1; obj* l_Lean_Parser_Term_structInstSource___closed__4; obj* l_Lean_Parser_Term_parenSpecial___closed__3; +obj* l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_nomatch___closed__5; obj* l_Lean_Parser_Term_explicitBinder___closed__3; obj* l_Lean_Parser_Term_subtype___closed__5; @@ -1038,10 +1107,12 @@ obj* l___regBuiltinParser_Lean_Parser_Term_explicit(obj*); obj* l_Lean_Parser_Term_structInstSource___closed__3; obj* l_Lean_Parser_Term_sorry___closed__3; obj* l___regBuiltinParser_Lean_Parser_Term_bne(obj*); +obj* l_Lean_Parser_Term_id___elambda__1___closed__13; obj* l_Lean_Parser_Term_add___elambda__1___closed__3; obj* l_Lean_Parser_Term_binderIdent___elambda__1(obj*); obj* l_Lean_Parser_Term_letEqns___closed__5; obj* l_Lean_Parser_Term_mod___elambda__1___closed__2; +obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__15; obj* l_Lean_Parser_Term_if___closed__1; obj* l___regBuiltinParser_Lean_Parser_Term_depArrow(obj*); obj* l_Lean_Parser_Term_gt___closed__1; @@ -1112,6 +1183,7 @@ obj* l_Lean_Parser_Term_andM___elambda__1___closed__4; obj* l_Lean_Parser_Term_bor___elambda__1___closed__2; extern obj* l_Lean_Parser_symbolNoWsFn___closed__1; obj* l_Array_shrink___main___rarg(obj*, obj*); +obj* l_Lean_Parser_Term_borrowed___elambda__1(obj*); obj* l_Lean_Parser_Term_or; obj* l_Lean_Parser_Term_id___elambda__1___closed__2; obj* l_Lean_Parser_Term_simpleBinder___elambda__1(obj*, obj*, obj*); @@ -1127,6 +1199,7 @@ extern obj* l_Int_repr___main___closed__1; obj* l_Lean_Parser_Term_sortApp___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_have___closed__7; obj* l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +obj* l_Lean_Parser_Term_borrowed___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_seqLeft___elambda__1___closed__4; obj* l_Lean_Parser_Term_show; obj* l_Lean_Parser_Term_not___elambda__1___rarg___closed__5; @@ -1141,6 +1214,8 @@ obj* l_Lean_Parser_Term_prod___elambda__1___closed__1; obj* l_Lean_Parser_Term_uminus___closed__5; obj* l_Lean_Parser_Term_doId___closed__3; obj* l_Lean_Parser_Term_let___elambda__1___closed__6; +obj* l___regBuiltinParser_Lean_Parser_Term_char___closed__1; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_explicitBinder___closed__5; obj* l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_simpleBinder___elambda__1___closed__1; @@ -1153,6 +1228,7 @@ obj* l_Lean_Parser_Term_fun___elambda__1___closed__17; obj* l_Lean_Parser_Term_have___closed__4; obj* l_Lean_Parser_Term_doElem___closed__2; obj* l_Lean_Parser_Term_fcomp___closed__2; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_structInstField___closed__2; obj* l_Lean_Parser_Term_id___elambda__1(obj*, obj*, obj*); obj* l___regBuiltinParser_Lean_Parser_Term_mapConst(obj*); @@ -1169,6 +1245,7 @@ obj* l_Lean_Parser_Term_seqRight___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__14; obj* l_Lean_Parser_Term_instBinder; obj* l___regBuiltinParser_Lean_Parser_Term_arrow(obj*); +obj* l_Lean_Parser_Term_char___closed__1; obj* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_structInst___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_subst___elambda__1___closed__4; obj* l_Lean_Parser_Term_div___elambda__1(obj*, obj*, obj*); @@ -1188,7 +1265,6 @@ obj* l_Lean_Parser_Term_lt___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_paren___closed__5; obj* l_Lean_Parser_Term_equation___closed__5; obj* l_Lean_Parser_Term_map___closed__2; -extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; obj* l_Lean_Parser_Term_fun___elambda__1___closed__16; obj* l_Lean_Parser_ParserState_mkError(obj*, obj*); obj* l_Lean_Parser_Term_dollar___elambda__1___closed__4; @@ -1197,7 +1273,9 @@ obj* l_Lean_Parser_Term_arrow___elambda__1___closed__2; obj* l_Lean_Parser_Term_sub___closed__2; obj* l_Lean_Parser_Term_and___closed__3; obj* l_Lean_Parser_Term_list; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__4; obj* l_Lean_Parser_Term_gt___elambda__1___closed__1; +obj* l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_fromTerm___closed__5; obj* l_Lean_Parser_Term_doExpr___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_nodeInfo(obj*); @@ -1245,7 +1323,9 @@ obj* l_Lean_Parser_Term_have___closed__8; obj* l_Lean_Parser_Term_gt___elambda__1___closed__3; obj* l___regBuiltinParser_Lean_Parser_Term_not(obj*); obj* l_Lean_Parser_Term_fun___closed__1; +obj* l_Lean_Parser_Term_quotedName___elambda__1___rarg(obj*, obj*); obj* l_Lean_Parser_Term_lt___elambda__1___closed__4; +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_binderDefault___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_lt___closed__1; @@ -1260,9 +1340,11 @@ obj* l_Lean_Parser_Term_andM___closed__3; obj* l_Lean_Parser_Term_show___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_iff___elambda__1___closed__2; obj* l_Lean_Parser_Term_tupleTail___closed__5; +obj* l_Lean_Parser_Term_borrowed___closed__2; obj* l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_structInst___elambda__1___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_forall___closed__8; obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__7; +obj* l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_cdot___closed__1; extern obj* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_explicit; @@ -1272,6 +1354,8 @@ obj* l_Lean_Parser_Term_doId___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_pow___elambda__1___closed__4; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Parser_Term_append___elambda__1___closed__2; +obj* l_Lean_Parser_Term_quotedName___elambda__1___boxed(obj*); +obj* l_Lean_Parser_Term_type___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_binderType___closed__4; obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__12; obj* l_Lean_Parser_Term_structInst___closed__7; @@ -1308,6 +1392,7 @@ obj* l_Lean_Parser_Term_let___closed__3; obj* l_Lean_Parser_Term_bind___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_forall___elambda__1___closed__5; +obj* l_Lean_Parser_Term_match___elambda__1___closed__11; obj* l_Lean_Parser_Term_sorry___closed__4; obj* l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__1; obj* l_Lean_Parser_Term_suffices___closed__5; @@ -1334,20 +1419,27 @@ obj* l_Lean_Parser_Term_not___closed__5; namespace lean { uint8 nat_dec_le(obj*, obj*); } +obj* l_Lean_Parser_Term_quotedName___closed__5; +obj* l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__1; +obj* l_Lean_Parser_Term_list___elambda__1___closed__9; obj* l_Lean_Parser_Term_checkIsSort___closed__2; obj* l_Lean_Parser_Term_sub___elambda__1___closed__4; obj* l___regBuiltinParser_Lean_Parser_Term_show(obj*); +obj* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__9; obj* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_id___spec__1(uint8, uint8, obj*, obj*, obj*); obj* l___regBuiltinParser_Lean_Parser_Term_prod(obj*); obj* l_Lean_Parser_Term_bracketedDoSeq___closed__2; obj* l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__3; +obj* l_Lean_Parser_Term_char; +obj* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__2; obj* l_Lean_Parser_Term_array___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_andthen___elambda__1___closed__4; obj* l___regBuiltinParser_Lean_Parser_Term_beq(obj*); obj* l_Lean_Parser_Term_implicitBinder___elambda__1___closed__1; obj* l_Lean_Parser_Term_binderTactic___closed__2; +obj* l_Lean_Parser_charLitFn___rarg(obj*, obj*); obj* l_Lean_Parser_Term_show___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_do___closed__5; obj* l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; @@ -1363,12 +1455,14 @@ obj* l_Lean_Parser_Term_if___closed__7; obj* l_Lean_Parser_Term_equiv___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_andthen___closed__1; obj* l_Lean_Parser_Term_ne___closed__1; +obj* l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_forall___elambda__1___closed__8; obj* l_Lean_Parser_Term_seqLeft___closed__1; obj* l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_gt___closed__2; obj* l_Lean_Parser_Term_tupleTail___closed__1; obj* l_Lean_Parser_Term_doExpr___closed__1; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2; obj* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_letIdDecl___closed__3; obj* l_Lean_Parser_Term_explicitBinder___boxed(obj*); @@ -1378,7 +1472,6 @@ obj* l_Lean_Parser_Term_binderType___elambda__1(obj*); obj* l_Lean_Parser_Term_nomatch; obj* l_Lean_Parser_Term_forall___elambda__1___closed__4; obj* l_Lean_Parser_Term_leftArrow; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8, uint8, obj*, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_letIdLhs___closed__6; obj* l___regBuiltinParser_Lean_Parser_Term_ge(obj*); obj* l_Lean_Parser_Term_subtype___closed__10; @@ -1398,7 +1491,9 @@ obj* l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_list___elambda__1___closed__8; obj* l_Lean_Parser_Term_instBinder___closed__3; obj* l_Lean_Parser_Term_binderTactic___elambda__1___rarg___closed__2; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; obj* l_Lean_Parser_Term_or___elambda__1___closed__2; +obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__16; obj* l_Lean_Parser_Term_le___elambda__1___closed__1; obj* l_Lean_Parser_Term_typeAscription___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_explicit___closed__5; @@ -1429,19 +1524,21 @@ obj* l_Lean_Parser_Term_inaccessible___closed__2; obj* l_Lean_Parser_Term_subst___closed__1; obj* l_Lean_Parser_Term_binderDefault___elambda__1(obj*); obj* l_Lean_Parser_Term_structInst___closed__4; +obj* l___regBuiltinParser_Lean_Parser_Term_char___closed__2; obj* l_Lean_Parser_Term_binderType___closed__5; extern obj* l_Lean_Parser_epsilonInfo; +obj* l_Lean_Parser_Term_have___elambda__1___rarg___closed__11; obj* l_Lean_Parser_Term_namedArgument___closed__5; obj* l_Lean_Parser_Term_letIdLhs___closed__2; obj* l_Lean_Parser_Term_cdot___closed__2; obj* l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__4; obj* l_Lean_Parser_Term_proj___closed__2; obj* l_Lean_Parser_Term_and___closed__1; +obj* l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__4; obj* l_Lean_Parser_checkWsBeforeFn(obj*, obj*, obj*); obj* l_Lean_Parser_Term_do___closed__1; obj* l_Lean_Parser_Term_seqLeft___elambda__1___closed__2; obj* l_Lean_Parser_Term_dollar___closed__3; -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1; obj* l_Lean_Parser_Term_letIdDecl___closed__5; obj* l_Lean_Parser_Term_doSeq___closed__2; obj* l_Lean_Parser_Term_add___closed__3; @@ -1457,6 +1554,7 @@ obj* l_Lean_Parser_Term_let___elambda__1___closed__2; obj* l_Lean_Parser_Term_structInst___closed__9; obj* l_Lean_Parser_Term_parser_x21___elambda__1___rarg(obj*, obj*); obj* l___regBuiltinParser_Lean_Parser_Term_ne(obj*); +obj* l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_if___closed__3; obj* l_Lean_Parser_Term_sorry___elambda__1(obj*); obj* l_Lean_Parser_Term_simpleBinder___closed__2; @@ -1473,6 +1571,7 @@ obj* l_Lean_Parser_Term_structInstField; obj* l_Lean_Parser_Term_seq; extern obj* l_List_repr___main___rarg___closed__2; obj* l_Lean_Parser_Term_andthen___closed__3; +obj* l_Lean_Parser_Term_id___elambda__1___closed__14; obj* l_Lean_Parser_Term_doId___closed__6; obj* l_Lean_Parser_Term_binderDefault___elambda__1___boxed(obj*); obj* l_Lean_Parser_Term_forall___elambda__1___closed__1; @@ -1509,12 +1608,14 @@ obj* l_Lean_Parser_Term_if___elambda__1___rarg___closed__12; obj* l___regBuiltinParser_Lean_Parser_Term_gt(obj*); obj* l_Lean_Parser_Term_div; obj* l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__1; +obj* l_Lean_Parser_Term_quotedName___closed__3; obj* l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_structInst___elambda__1___spec__1(uint8, uint8, obj*, obj*, obj*); obj* l_Lean_Parser_Term_if___closed__5; obj* l_Lean_Parser_Term_div___elambda__1___closed__3; obj* l_Lean_Parser_Term_iff___closed__3; obj* l_Lean_Parser_Term_mapConst___elambda__1___closed__2; obj* l_Lean_Parser_Term_iff___closed__2; +obj* l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__7; obj* l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_explicitBinder___closed__9; obj* l_Lean_Parser_Term_doExpr___closed__3; @@ -1537,8 +1638,10 @@ obj* l_Lean_Parser_Term_binderIdent___closed__1; obj* l_Lean_Parser_Term_array___elambda__1___closed__3; obj* l_Lean_Parser_Term_letPatDecl___closed__1; obj* l_Lean_Parser_Term_emptyC___elambda__1___rarg(obj*, obj*); +obj* l_Lean_Parser_Term_explicit___elambda__1___closed__7; obj* l_Lean_Parser_Term_doElem___closed__5; obj* l_Lean_Parser_Term_structInstSource___elambda__1(obj*); +obj* l_Lean_Parser_ParserState_mkErrorsAt(obj*, obj*, obj*); obj* l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__3; obj* l_Lean_Parser_Term_letDecl___elambda__1(obj*, obj*, obj*); obj* l_Lean_Parser_Term_bor; @@ -1553,7 +1656,6 @@ extern obj* l_Lean_List_format___main___rarg___closed__2; obj* l_Lean_Parser_Term_sort___elambda__1___rarg___closed__6; obj* l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_fcomp___closed__3; -extern obj* l_Lean_Parser_Level_hole___elambda__1___rarg___closed__5; obj* l_Lean_Parser_Term_fun___closed__5; obj* l_Lean_Parser_Term_fun; obj* l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__6; @@ -1580,6 +1682,7 @@ obj* l_Lean_Parser_Term_depArrow___elambda__1___closed__13; obj* l_Lean_Parser_Term_fromTerm___closed__3; obj* l_Lean_Parser_Term_map___elambda__1___closed__4; obj* l_Lean_Parser_Term_letEqns___elambda__1___closed__1; +obj* l_Lean_Parser_Term_forall___elambda__1___closed__10; obj* l_Lean_Parser_Term_match___closed__10; obj* l_Lean_Parser_Term_anonymousCtor___closed__6; obj* l_Lean_Parser_Term_seqLeft___elambda__1___closed__1; @@ -1591,6 +1694,7 @@ obj* l_Lean_Parser_Term_match___closed__7; obj* l_Lean_Parser_Term_if___closed__10; obj* l_Lean_Parser_Term_sort___closed__3; obj* l___regBuiltinParser_Lean_Parser_Term_lt(obj*); +obj* l_Lean_Parser_Term_let___elambda__1___closed__7; obj* l_Lean_Parser_Term_let___elambda__1___closed__5; obj* l_Lean_Parser_Term_map___elambda__1___closed__3; obj* l_Lean_Parser_Term_lt; @@ -1599,6 +1703,7 @@ obj* l_Lean_Parser_mkBuiltinParsingTablesRef(obj*); obj* l_Lean_Parser_Term_heq___closed__2; obj* l_Lean_Parser_Term_heq___closed__3; obj* l_Lean_Parser_Term_list___elambda__1___closed__7; +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3; obj* l_Lean_Parser_Term_band___closed__3; obj* l_Lean_Parser_Term_app; obj* l_Lean_Parser_Term_optIdent___closed__2; @@ -2016,7 +2121,7 @@ lean::dec(x_1); return x_3; } } -obj* _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1() { +obj* _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1() { _start: { obj* x_1; obj* x_2; @@ -2025,27 +2130,39 @@ x_2 = l_String_trim(x_1); return x_2; } } -obj* _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2() { +obj* _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } -obj* _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3() { +obj* _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2; +x_1 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 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; @@ -2063,7 +2180,7 @@ x_14 = lean::cnstr_get(x_13, 3); 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; +obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_25; obj* x_26; lean::dec(x_10); lean::dec(x_9); x_15 = lean::cnstr_get(x_13, 0); @@ -2072,19 +2189,74 @@ x_16 = lean::array_get_size(x_15); lean::dec(x_15); x_17 = lean::cnstr_get(x_13, 1); lean::inc(x_17); -x_18 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_19 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; lean::inc(x_6); -x_20 = l_Lean_Parser_symbolFnAux(x_18, x_19, x_6, x_13); -x_21 = lean::cnstr_get(x_20, 3); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) +x_25 = l_Lean_Parser_tokenFn(x_6, x_13); +x_26 = lean::cnstr_get(x_25, 3); +lean::inc(x_26); +if (lean::obj_tag(x_26) == 0) +{ +obj* x_27; obj* x_28; +x_27 = lean::cnstr_get(x_25, 0); +lean::inc(x_27); +x_28 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_27); +lean::dec(x_27); +if (lean::obj_tag(x_28) == 2) +{ +obj* x_29; obj* x_30; uint8 x_31; +x_29 = lean::cnstr_get(x_28, 1); +lean::inc(x_29); +lean::dec(x_28); +x_30 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_31 = lean::string_dec_eq(x_29, x_30); +lean::dec(x_29); +if (x_31 == 0) +{ +obj* x_32; obj* x_33; +x_32 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); +x_18 = x_33; +goto block_24; +} +else +{ +x_18 = x_25; +goto block_24; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_28); +x_34 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); +x_18 = x_35; +goto block_24; +} +} +else +{ +obj* x_36; obj* x_37; +lean::dec(x_26); +x_36 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); +x_18 = x_37; +goto block_24; +} +block_24: +{ +obj* x_19; +x_19 = lean::cnstr_get(x_18, 3); +lean::inc(x_19); +if (lean::obj_tag(x_19) == 0) { lean::dec(x_17); lean::dec(x_16); { uint8 _tmp_3 = x_2; -obj* _tmp_6 = x_20; +obj* _tmp_6 = x_18; x_4 = _tmp_3; x_7 = _tmp_6; } @@ -2092,14 +2264,15 @@ goto _start; } else { -obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_21); +obj* x_21; obj* x_22; obj* x_23; +lean::dec(x_19); lean::dec(x_6); -x_23 = l_Lean_Parser_ParserState_restore(x_20, x_16, x_17); +x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); lean::dec(x_16); -x_24 = l_Lean_nullKind; -x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_3); -return x_25; +x_22 = l_Lean_nullKind; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); +return x_23; +} } } else @@ -2108,23 +2281,23 @@ lean::dec(x_14); lean::dec(x_6); if (x_4 == 0) { -obj* x_26; obj* x_27; obj* x_28; obj* x_29; +obj* x_38; obj* x_39; obj* x_40; obj* x_41; lean::dec(x_10); lean::dec(x_9); -x_26 = lean::box(0); -x_27 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_26); -x_28 = l_Lean_nullKind; -x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_3); -return x_29; +x_38 = lean::box(0); +x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); +x_40 = l_Lean_nullKind; +x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); +return x_41; } else { -obj* x_30; obj* x_31; obj* x_32; -x_30 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); +obj* x_42; obj* x_43; obj* x_44; +x_42 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); lean::dec(x_9); -x_31 = l_Lean_nullKind; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_3); -return x_32; +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); +return x_44; } } } @@ -2138,7 +2311,7 @@ lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); x_8 = 0; -x_9 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +x_9 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); return x_9; } } @@ -2216,8 +2389,8 @@ obj* _init_l_Lean_Parser_Term_id___elambda__1___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_id___elambda__1___closed__6; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_id___elambda__1___closed__8; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -2236,9 +2409,11 @@ obj* _init_l_Lean_Parser_Term_id___elambda__1___closed__11() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_id___elambda__1___closed__10; +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; } } @@ -2246,12 +2421,34 @@ obj* _init_l_Lean_Parser_Term_id___elambda__1___closed__12() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_id___elambda__1___closed__6; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_id___elambda__1___closed__13() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_id___elambda__1___closed__12; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_id___elambda__1___closed__14() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_id___elambda__1___closed__13; +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* l_Lean_Parser_Term_id___elambda__1(obj* x_1, obj* x_2, obj* x_3) { _start: { @@ -2266,146 +2463,212 @@ x_7 = lean::cnstr_get(x_6, 3); 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; +obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_29; obj* x_50; obj* x_51; x_8 = lean::cnstr_get(x_6, 0); lean::inc(x_8); x_9 = lean::array_get_size(x_8); lean::dec(x_8); x_10 = lean::cnstr_get(x_6, 1); lean::inc(x_10); -x_11 = l_Lean_Parser_Term_id___elambda__1___closed__6; -x_12 = l_Lean_Parser_Term_id___elambda__1___closed__10; lean::inc(x_2); -x_13 = l_Lean_Parser_symbolFnAux(x_11, x_12, x_2, x_6); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +x_50 = l_Lean_Parser_tokenFn(x_2, x_6); +x_51 = lean::cnstr_get(x_50, 3); +lean::inc(x_51); +if (lean::obj_tag(x_51) == 0) { -uint8 x_15; uint8 x_16; obj* x_17; obj* x_18; -x_15 = 0; -x_16 = 0; -lean::inc(x_2); -x_17 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_id___elambda__1___spec__1(x_15, x_16, x_1, x_2, x_13); -x_18 = lean::cnstr_get(x_17, 3); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) +obj* x_52; obj* x_53; +x_52 = lean::cnstr_get(x_50, 0); +lean::inc(x_52); +x_53 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_52); +lean::dec(x_52); +if (lean::obj_tag(x_53) == 2) +{ +obj* x_54; obj* x_55; uint8 x_56; +x_54 = lean::cnstr_get(x_53, 1); +lean::inc(x_54); +lean::dec(x_53); +x_55 = l_Lean_Parser_Term_id___elambda__1___closed__6; +x_56 = lean::string_dec_eq(x_54, x_55); +lean::dec(x_54); +if (x_56 == 0) +{ +obj* x_57; obj* x_58; +x_57 = l_Lean_Parser_Term_id___elambda__1___closed__14; +lean::inc(x_10); +x_58 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_57, x_10); +x_29 = x_58; +goto block_49; +} +else +{ +x_29 = x_50; +goto block_49; +} +} +else +{ +obj* x_59; obj* x_60; +lean::dec(x_53); +x_59 = l_Lean_Parser_Term_id___elambda__1___closed__14; +lean::inc(x_10); +x_60 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_59, x_10); +x_29 = x_60; +goto block_49; +} +} +else +{ +obj* x_61; obj* x_62; +lean::dec(x_51); +x_61 = l_Lean_Parser_Term_id___elambda__1___closed__14; +lean::inc(x_10); +x_62 = l_Lean_Parser_ParserState_mkErrorsAt(x_50, x_61, x_10); +x_29 = x_62; +goto block_49; +} +block_28: +{ +obj* x_12; +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +lean::dec(x_10); +x_13 = l_Lean_nullKind; +x_14 = l_Lean_Parser_ParserState_mkNode(x_11, x_13, x_9); +x_15 = l_Lean_Parser_Term_id___elambda__1___closed__4; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_5); +return x_16; +} +else +{ +obj* x_17; uint8 x_18; +lean::dec(x_12); +x_17 = lean::cnstr_get(x_11, 1); +lean::inc(x_17); +x_18 = lean::nat_dec_eq(x_17, x_10); +lean::dec(x_17); +if (x_18 == 0) { obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_20 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_21 = l_Lean_Parser_symbolFnAux(x_19, x_20, x_2, x_17); -x_22 = lean::cnstr_get(x_21, 3); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; lean::dec(x_10); -x_23 = l_Lean_nullKind; -x_24 = l_Lean_Parser_ParserState_mkNode(x_21, x_23, x_9); -x_25 = l_Lean_Parser_Term_id___elambda__1___closed__4; -x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_5); -return x_26; +x_19 = l_Lean_nullKind; +x_20 = l_Lean_Parser_ParserState_mkNode(x_11, x_19, x_9); +x_21 = l_Lean_Parser_Term_id___elambda__1___closed__4; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); +return x_22; } else { -obj* x_27; uint8 x_28; -lean::dec(x_22); -x_27 = lean::cnstr_get(x_21, 1); -lean::inc(x_27); -x_28 = lean::nat_dec_eq(x_27, x_10); -lean::dec(x_27); -if (x_28 == 0) +obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; +x_23 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +x_24 = l_Lean_nullKind; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_9); +x_26 = l_Lean_Parser_Term_id___elambda__1___closed__4; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_5); +return x_27; +} +} +} +block_49: { -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -lean::dec(x_10); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_21, x_29, x_9); -x_31 = l_Lean_Parser_Term_id___elambda__1___closed__4; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_5); -return x_32; -} -else +obj* x_30; +x_30 = lean::cnstr_get(x_29, 3); +lean::inc(x_30); +if (lean::obj_tag(x_30) == 0) { -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_33 = l_Lean_Parser_ParserState_restore(x_21, x_9, x_10); -x_34 = l_Lean_nullKind; -x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_9); -x_36 = l_Lean_Parser_Term_id___elambda__1___closed__4; -x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_5); -return x_37; -} -} -} -else +uint8 x_31; uint8 x_32; obj* x_33; obj* x_34; +x_31 = 0; +x_32 = 0; +lean::inc(x_2); +x_33 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_id___elambda__1___spec__1(x_31, x_32, x_1, x_2, x_29); +x_34 = lean::cnstr_get(x_33, 3); +lean::inc(x_34); +if (lean::obj_tag(x_34) == 0) { -obj* x_38; uint8 x_39; -lean::dec(x_18); -lean::dec(x_2); -x_38 = lean::cnstr_get(x_17, 1); +obj* x_35; obj* x_36; obj* x_37; +x_35 = lean::cnstr_get(x_33, 1); +lean::inc(x_35); +x_36 = l_Lean_Parser_tokenFn(x_2, x_33); +x_37 = lean::cnstr_get(x_36, 3); +lean::inc(x_37); +if (lean::obj_tag(x_37) == 0) +{ +obj* x_38; obj* x_39; +x_38 = lean::cnstr_get(x_36, 0); lean::inc(x_38); -x_39 = lean::nat_dec_eq(x_38, x_10); +x_39 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_38); lean::dec(x_38); -if (x_39 == 0) +if (lean::obj_tag(x_39) == 2) { -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -lean::dec(x_10); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_17, x_40, x_9); -x_42 = l_Lean_Parser_Term_id___elambda__1___closed__4; -x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_5); -return x_43; +obj* x_40; obj* x_41; uint8 x_42; +x_40 = lean::cnstr_get(x_39, 1); +lean::inc(x_40); +lean::dec(x_39); +x_41 = l_Lean_Parser_Term_id___elambda__1___closed__8; +x_42 = lean::string_dec_eq(x_40, x_41); +lean::dec(x_40); +if (x_42 == 0) +{ +obj* x_43; obj* x_44; +x_43 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_44 = l_Lean_Parser_ParserState_mkErrorsAt(x_36, x_43, x_35); +x_11 = x_44; +goto block_28; } else { -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_44 = l_Lean_Parser_ParserState_restore(x_17, x_9, x_10); -x_45 = l_Lean_nullKind; -x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_9); -x_47 = l_Lean_Parser_Term_id___elambda__1___closed__4; -x_48 = l_Lean_Parser_ParserState_mkNode(x_46, x_47, x_5); -return x_48; -} +lean::dec(x_35); +x_11 = x_36; +goto block_28; } } else { -obj* x_49; uint8 x_50; -lean::dec(x_14); +obj* x_45; obj* x_46; +lean::dec(x_39); +x_45 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_46 = l_Lean_Parser_ParserState_mkErrorsAt(x_36, x_45, x_35); +x_11 = x_46; +goto block_28; +} +} +else +{ +obj* x_47; obj* x_48; +lean::dec(x_37); +x_47 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_36, x_47, x_35); +x_11 = x_48; +goto block_28; +} +} +else +{ +lean::dec(x_34); lean::dec(x_2); -x_49 = lean::cnstr_get(x_13, 1); -lean::inc(x_49); -x_50 = lean::nat_dec_eq(x_49, x_10); -lean::dec(x_49); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_10); -x_51 = l_Lean_nullKind; -x_52 = l_Lean_Parser_ParserState_mkNode(x_13, x_51, x_9); -x_53 = l_Lean_Parser_Term_id___elambda__1___closed__4; -x_54 = l_Lean_Parser_ParserState_mkNode(x_52, x_53, x_5); -return x_54; +x_11 = x_33; +goto block_28; +} } else { -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_55 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); -x_56 = l_Lean_nullKind; -x_57 = l_Lean_Parser_ParserState_mkNode(x_55, x_56, x_9); -x_58 = l_Lean_Parser_Term_id___elambda__1___closed__4; -x_59 = l_Lean_Parser_ParserState_mkNode(x_57, x_58, x_5); -return x_59; +lean::dec(x_30); +lean::dec(x_2); +x_11 = x_29; +goto block_28; } } } else { -obj* x_60; obj* x_61; +obj* x_63; obj* x_64; lean::dec(x_7); lean::dec(x_2); -x_60 = l_Lean_Parser_Term_id___elambda__1___closed__4; -x_61 = l_Lean_Parser_ParserState_mkNode(x_6, x_60, x_5); -return x_61; +x_63 = l_Lean_Parser_Term_id___elambda__1___closed__4; +x_64 = l_Lean_Parser_ParserState_mkNode(x_6, x_63, x_5); +return x_64; } } } @@ -2432,7 +2695,7 @@ _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = lean::box(0); -x_2 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_2 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); return x_3; } @@ -2533,7 +2796,7 @@ x_1 = l_Lean_Parser_Term_id___closed__11; return x_1; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___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; uint8 x_9; uint8 x_10; obj* x_11; @@ -2543,7 +2806,7 @@ x_9 = lean::unbox(x_2); lean::dec(x_2); x_10 = lean::unbox(x_4); lean::dec(x_4); -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); lean::dec(x_5); return x_11; } @@ -2750,6 +3013,88 @@ x_5 = l_Lean_Parser_addBuiltinLeadingParser(x_2, x_3, x_4, x_1); return x_5; } } +obj* l_Lean_Parser_Term_char___elambda__1___rarg(obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; +x_3 = l_Lean_Parser_charLitFn___rarg(x_1, x_2); +return x_3; +} +} +obj* l_Lean_Parser_Term_char___elambda__1(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_char___elambda__1___rarg), 2, 0); +return x_2; +} +} +obj* _init_l_Lean_Parser_Term_char___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_char___elambda__1___boxed), 1, 0); +return x_1; +} +} +obj* _init_l_Lean_Parser_Term_char___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_charLit___closed__1; +x_2 = l_Lean_Parser_Term_char___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* _init_l_Lean_Parser_Term_char() { +_start: +{ +obj* x_1; +x_1 = l_Lean_Parser_Term_char___closed__2; +return x_1; +} +} +obj* l_Lean_Parser_Term_char___elambda__1___boxed(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = l_Lean_Parser_Term_char___elambda__1(x_1); +lean::dec(x_1); +return x_2; +} +} +obj* _init_l___regBuiltinParser_Lean_Parser_Term_char___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("char"); +return x_1; +} +} +obj* _init_l___regBuiltinParser_Lean_Parser_Term_char___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_id___elambda__1___closed__2; +x_2 = l___regBuiltinParser_Lean_Parser_Term_char___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +obj* l___regBuiltinParser_Lean_Parser_Term_char(obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_4; obj* x_5; +x_2 = l_Lean_Parser_builtinTermParsingTable; +x_3 = l___regBuiltinParser_Lean_Parser_Term_char___closed__2; +x_4 = l_Lean_Parser_Term_char; +x_5 = l_Lean_Parser_addBuiltinLeadingParser(x_2, x_3, x_4, x_1); +return x_5; +} +} obj* _init_l_Lean_Parser_Term_type___elambda__1___rarg___closed__1() { _start: { @@ -2789,7 +3134,7 @@ obj* _init_l_Lean_Parser_Term_type___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -2805,20 +3150,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_type___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_type___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Term_type___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Term_type___elambda__1(obj* x_1) { @@ -2935,7 +3346,7 @@ obj* _init_l_Lean_Parser_Term_sort___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -2951,20 +3362,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_sort___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_sort___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Term_sort___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Term_sort___elambda__1(obj* x_1) { @@ -3081,7 +3558,7 @@ obj* _init_l_Lean_Parser_Term_prop___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -3097,20 +3574,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_prop___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_prop___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Term_prop___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Term_prop___elambda__1(obj* x_1) { @@ -3201,17 +3744,71 @@ return x_3; obj* l_Lean_Parser_Term_hole___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Term_hole___elambda__1___rarg___closed__1; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Term_hole___elambda__1___rarg___closed__1; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Term_hole___elambda__1___rarg___closed__1; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Term_hole___elambda__1___rarg___closed__1; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Level_hole___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Term_hole___elambda__1___rarg___closed__1; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Term_hole___elambda__1(obj* x_1) { @@ -3320,7 +3917,7 @@ obj* _init_l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -3336,20 +3933,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Term_sorry___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__3; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__6; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__6; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Term_sorry___elambda__1(obj* x_1) { @@ -3466,7 +4129,7 @@ obj* _init_l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -3482,20 +4145,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_cdot___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Term_cdot___elambda__1(obj* x_1) { @@ -3612,7 +4341,7 @@ obj* _init_l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -3628,20 +4357,86 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_emptyC___elambda__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_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::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__6; -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__2; -x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); -return x_9; +x_5 = lean::cnstr_get(x_2, 1); +lean::inc(x_5); +x_6 = l_Lean_Parser_tokenFn(x_1, x_2); +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_8); +lean::dec(x_8); +if (lean::obj_tag(x_9) == 2) +{ +obj* x_10; obj* x_11; uint8 x_12; +x_10 = lean::cnstr_get(x_9, 1); +lean::inc(x_10); +lean::dec(x_9); +x_11 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__4; +x_12 = lean::string_dec_eq(x_10, x_11); +lean::dec(x_10); +if (x_12 == 0) +{ +obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_13 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__7; +x_14 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_13, x_5); +x_15 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__2; +x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_4); +return x_16; +} +else +{ +obj* x_17; obj* x_18; +lean::dec(x_5); +x_17 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__2; +x_18 = l_Lean_Parser_ParserState_mkNode(x_6, x_17, x_4); +return x_18; +} +} +else +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_9); +x_19 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__7; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_19, x_5); +x_21 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +} +else +{ +obj* x_23; obj* x_24; obj* x_25; obj* x_26; +lean::dec(x_7); +x_23 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_6, x_23, x_5); +x_25 = l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); +return x_26; +} } } obj* l_Lean_Parser_Term_emptyC___elambda__1(obj* x_1) { @@ -3758,7 +4553,7 @@ obj* _init_l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -3774,38 +4569,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_typeAscription___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -3883,7 +4746,7 @@ lean::dec(x_1); return x_2; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 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; @@ -3901,7 +4764,7 @@ x_14 = lean::cnstr_get(x_13, 3); 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; +obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_25; obj* x_26; lean::dec(x_10); lean::dec(x_9); x_15 = lean::cnstr_get(x_13, 0); @@ -3910,19 +4773,74 @@ x_16 = lean::array_get_size(x_15); lean::dec(x_15); x_17 = lean::cnstr_get(x_13, 1); lean::inc(x_17); -x_18 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_19 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; lean::inc(x_6); -x_20 = l_Lean_Parser_symbolFnAux(x_18, x_19, x_6, x_13); -x_21 = lean::cnstr_get(x_20, 3); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) +x_25 = l_Lean_Parser_tokenFn(x_6, x_13); +x_26 = lean::cnstr_get(x_25, 3); +lean::inc(x_26); +if (lean::obj_tag(x_26) == 0) +{ +obj* x_27; obj* x_28; +x_27 = lean::cnstr_get(x_25, 0); +lean::inc(x_27); +x_28 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_27); +lean::dec(x_27); +if (lean::obj_tag(x_28) == 2) +{ +obj* x_29; obj* x_30; uint8 x_31; +x_29 = lean::cnstr_get(x_28, 1); +lean::inc(x_29); +lean::dec(x_28); +x_30 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_31 = lean::string_dec_eq(x_29, x_30); +lean::dec(x_29); +if (x_31 == 0) +{ +obj* x_32; obj* x_33; +x_32 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); +x_18 = x_33; +goto block_24; +} +else +{ +x_18 = x_25; +goto block_24; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_28); +x_34 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); +x_18 = x_35; +goto block_24; +} +} +else +{ +obj* x_36; obj* x_37; +lean::dec(x_26); +x_36 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); +x_18 = x_37; +goto block_24; +} +block_24: +{ +obj* x_19; +x_19 = lean::cnstr_get(x_18, 3); +lean::inc(x_19); +if (lean::obj_tag(x_19) == 0) { lean::dec(x_17); lean::dec(x_16); { uint8 _tmp_3 = x_2; -obj* _tmp_6 = x_20; +obj* _tmp_6 = x_18; x_4 = _tmp_3; x_7 = _tmp_6; } @@ -3930,14 +4848,15 @@ goto _start; } else { -obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_21); +obj* x_21; obj* x_22; obj* x_23; +lean::dec(x_19); lean::dec(x_6); -x_23 = l_Lean_Parser_ParserState_restore(x_20, x_16, x_17); +x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); lean::dec(x_16); -x_24 = l_Lean_nullKind; -x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_3); -return x_25; +x_22 = l_Lean_nullKind; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); +return x_23; +} } } else @@ -3946,23 +4865,23 @@ lean::dec(x_14); lean::dec(x_6); if (x_4 == 0) { -obj* x_26; obj* x_27; obj* x_28; obj* x_29; +obj* x_38; obj* x_39; obj* x_40; obj* x_41; lean::dec(x_10); lean::dec(x_9); -x_26 = lean::box(0); -x_27 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_26); -x_28 = l_Lean_nullKind; -x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_3); -return x_29; +x_38 = lean::box(0); +x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); +x_40 = l_Lean_nullKind; +x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); +return x_41; } else { -obj* x_30; obj* x_31; obj* x_32; -x_30 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); +obj* x_42; obj* x_43; obj* x_44; +x_42 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); lean::dec(x_9); -x_31 = l_Lean_nullKind; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_3); -return x_32; +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); +return x_44; } } } @@ -3976,7 +4895,7 @@ lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); x_8 = 0; -x_9 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +x_9 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); return x_9; } } @@ -4001,35 +4920,91 @@ return x_3; obj* l_Lean_Parser_Term_tupleTail___elambda__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_4; obj* x_5; obj* x_6; obj* x_16; obj* x_17; obj* x_18; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_7 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; +x_16 = lean::cnstr_get(x_3, 1); +lean::inc(x_16); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_17 = l_Lean_Parser_tokenFn(x_2, x_3); +x_18 = lean::cnstr_get(x_17, 3); +lean::inc(x_18); +if (lean::obj_tag(x_18) == 0) { -uint8 x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = 0; -x_11 = 0; -x_12 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_10, x_11, x_1, x_2, x_8); -x_13 = l_Lean_Parser_Term_tupleTail___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_5); -return x_14; +obj* x_19; obj* x_20; +x_19 = lean::cnstr_get(x_17, 0); +lean::inc(x_19); +x_20 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_19); +lean::dec(x_19); +if (lean::obj_tag(x_20) == 2) +{ +obj* x_21; obj* x_22; uint8 x_23; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +lean::dec(x_20); +x_22 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_23 = lean::string_dec_eq(x_21, x_22); +lean::dec(x_21); +if (x_23 == 0) +{ +obj* x_24; obj* x_25; +x_24 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_24, x_16); +x_6 = x_25; +goto block_15; } else { -obj* x_15; obj* x_16; -lean::dec(x_9); +lean::dec(x_16); +x_6 = x_17; +goto block_15; +} +} +else +{ +obj* x_26; obj* x_27; +lean::dec(x_20); +x_26 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_26, x_16); +x_6 = x_27; +goto block_15; +} +} +else +{ +obj* x_28; obj* x_29; +lean::dec(x_18); +x_28 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_17, x_28, x_16); +x_6 = x_29; +goto block_15; +} +block_15: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +uint8 x_8; uint8 x_9; obj* x_10; obj* x_11; obj* x_12; +x_8 = 0; +x_9 = 0; +x_10 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_8, x_9, x_1, x_2, x_6); +x_11 = l_Lean_Parser_Term_tupleTail___elambda__1___closed__2; +x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_5); +return x_12; +} +else +{ +obj* x_13; obj* x_14; +lean::dec(x_7); lean::dec(x_2); -x_15 = l_Lean_Parser_Term_tupleTail___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_8, x_15, x_5); -return x_16; +x_13 = l_Lean_Parser_Term_tupleTail___elambda__1___closed__2; +x_14 = l_Lean_Parser_ParserState_mkNode(x_6, x_13, x_5); +return x_14; +} } } } @@ -4098,7 +5073,7 @@ x_1 = l_Lean_Parser_Term_tupleTail___closed__5; return x_1; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2___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; uint8 x_9; uint8 x_10; obj* x_11; @@ -4108,7 +5083,7 @@ x_9 = lean::unbox(x_2); lean::dec(x_2); x_10 = lean::unbox(x_4); lean::dec(x_4); -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); lean::dec(x_5); return x_11; } @@ -4310,155 +5285,248 @@ return x_3; obj* l_Lean_Parser_Term_paren___elambda__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_4; obj* x_5; obj* x_6; obj* x_33; obj* x_63; obj* x_64; obj* x_65; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_7 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; +x_63 = lean::cnstr_get(x_3, 1); +lean::inc(x_63); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_64 = l_Lean_Parser_tokenFn(x_2, x_3); +x_65 = lean::cnstr_get(x_64, 3); +lean::inc(x_65); +if (lean::obj_tag(x_65) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_10 = lean::cnstr_get(x_8, 0); +obj* x_66; obj* x_67; +x_66 = lean::cnstr_get(x_64, 0); +lean::inc(x_66); +x_67 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_66); +lean::dec(x_66); +if (lean::obj_tag(x_67) == 2) +{ +obj* x_68; obj* x_69; uint8 x_70; +x_68 = lean::cnstr_get(x_67, 1); +lean::inc(x_68); +lean::dec(x_67); +x_69 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_70 = lean::string_dec_eq(x_68, x_69); +lean::dec(x_68); +if (x_70 == 0) +{ +obj* x_71; obj* x_72; +x_71 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_72 = l_Lean_Parser_ParserState_mkErrorsAt(x_64, x_71, x_63); +x_33 = x_72; +goto block_62; +} +else +{ +lean::dec(x_63); +x_33 = x_64; +goto block_62; +} +} +else +{ +obj* x_73; obj* x_74; +lean::dec(x_67); +x_73 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_74 = l_Lean_Parser_ParserState_mkErrorsAt(x_64, x_73, x_63); +x_33 = x_74; +goto block_62; +} +} +else +{ +obj* x_75; obj* x_76; +lean::dec(x_65); +x_75 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +x_76 = l_Lean_Parser_ParserState_mkErrorsAt(x_64, x_75, x_63); +x_33 = x_76; +goto block_62; +} +block_32: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +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, 1); +lean::inc(x_8); +x_9 = l_Lean_Parser_tokenFn(x_2, x_6); +x_10 = lean::cnstr_get(x_9, 3); lean::inc(x_10); -x_11 = lean::array_get_size(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); +x_12 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_11); +lean::dec(x_11); +if (lean::obj_tag(x_12) == 2) +{ +obj* x_13; obj* x_14; uint8 x_15; +x_13 = lean::cnstr_get(x_12, 1); +lean::inc(x_13); +lean::dec(x_12); +x_14 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_15 = lean::string_dec_eq(x_13, x_14); +lean::dec(x_13); +if (x_15 == 0) +{ +obj* x_16; obj* x_17; obj* x_18; obj* x_19; +x_16 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_17 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_16, x_8); +x_18 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_5); +return x_19; +} +else +{ +obj* x_20; obj* x_21; +lean::dec(x_8); +x_20 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_21 = l_Lean_Parser_ParserState_mkNode(x_9, x_20, x_5); +return x_21; +} +} +else +{ +obj* x_22; obj* x_23; obj* x_24; obj* x_25; +lean::dec(x_12); +x_22 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_23 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_22, x_8); +x_24 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_5); +return x_25; +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_10); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -x_49 = l_Lean_Parser_termParserAttribute; -x_50 = lean::mk_nat_obj(0u); +x_26 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_26, x_8); +x_28 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; +lean::dec(x_7); +lean::dec(x_2); +x_30 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_31 = l_Lean_Parser_ParserState_mkNode(x_6, x_30, x_5); +return x_31; +} +} +block_62: +{ +obj* x_34; +x_34 = lean::cnstr_get(x_33, 3); +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_33, 0); +lean::inc(x_35); +x_36 = lean::array_get_size(x_35); +lean::dec(x_35); +x_37 = lean::cnstr_get(x_33, 1); +lean::inc(x_37); +x_38 = l_Lean_Parser_termParserAttribute; +x_39 = lean::mk_nat_obj(0u); lean::inc(x_2); -x_51 = l_Lean_Parser_ParserAttribute_runParser(x_49, x_50, x_2, x_8); -x_52 = lean::cnstr_get(x_51, 3); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) +x_40 = l_Lean_Parser_ParserAttribute_runParser(x_38, x_39, x_2, x_33); +x_41 = lean::cnstr_get(x_40, 3); +lean::inc(x_41); +if (lean::obj_tag(x_41) == 0) { -obj* x_53; +obj* x_42; obj* x_43; lean::inc(x_2); -x_53 = l_Lean_Parser_Term_parenSpecial___elambda__1(x_1, x_2, x_51); -x_13 = x_53; -goto block_48; +x_42 = l_Lean_Parser_Term_parenSpecial___elambda__1(x_1, x_2, x_40); +x_43 = lean::cnstr_get(x_42, 3); +lean::inc(x_43); +if (lean::obj_tag(x_43) == 0) +{ +obj* x_44; obj* x_45; +lean::dec(x_37); +x_44 = l_Lean_nullKind; +x_45 = l_Lean_Parser_ParserState_mkNode(x_42, x_44, x_36); +x_6 = x_45; +goto block_32; } else { -lean::dec(x_52); -x_13 = x_51; -goto block_48; -} -block_48: +obj* x_46; uint8 x_47; +lean::dec(x_43); +x_46 = lean::cnstr_get(x_42, 1); +lean::inc(x_46); +x_47 = lean::nat_dec_eq(x_46, x_37); +lean::dec(x_46); +if (x_47 == 0) { -obj* x_14; -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_12); -x_15 = l_Lean_nullKind; -x_16 = l_Lean_Parser_ParserState_mkNode(x_13, x_15, x_11); -x_17 = lean::cnstr_get(x_16, 3); -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; -x_18 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_19 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_20 = l_Lean_Parser_symbolFnAux(x_18, x_19, x_2, x_16); -x_21 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); -return x_22; +obj* x_48; obj* x_49; +lean::dec(x_37); +x_48 = l_Lean_nullKind; +x_49 = l_Lean_Parser_ParserState_mkNode(x_42, x_48, x_36); +x_6 = x_49; +goto block_32; } else { -obj* x_23; obj* x_24; -lean::dec(x_17); +obj* x_50; obj* x_51; obj* x_52; +x_50 = l_Lean_Parser_ParserState_restore(x_42, x_36, x_37); +x_51 = l_Lean_nullKind; +x_52 = l_Lean_Parser_ParserState_mkNode(x_50, x_51, x_36); +x_6 = x_52; +goto block_32; +} +} +} +else +{ +obj* x_53; uint8 x_54; +lean::dec(x_41); +x_53 = lean::cnstr_get(x_40, 1); +lean::inc(x_53); +x_54 = lean::nat_dec_eq(x_53, x_37); +lean::dec(x_53); +if (x_54 == 0) +{ +obj* x_55; obj* x_56; +lean::dec(x_37); +x_55 = l_Lean_nullKind; +x_56 = l_Lean_Parser_ParserState_mkNode(x_40, x_55, x_36); +x_6 = x_56; +goto block_32; +} +else +{ +obj* x_57; obj* x_58; obj* x_59; +x_57 = l_Lean_Parser_ParserState_restore(x_40, x_36, x_37); +x_58 = l_Lean_nullKind; +x_59 = l_Lean_Parser_ParserState_mkNode(x_57, x_58, x_36); +x_6 = x_59; +goto block_32; +} +} +} +else +{ +obj* x_60; obj* x_61; +lean::dec(x_34); lean::dec(x_2); -x_23 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_24 = l_Lean_Parser_ParserState_mkNode(x_16, x_23, x_5); -return x_24; +x_60 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_61 = l_Lean_Parser_ParserState_mkNode(x_33, x_60, x_5); +return x_61; } } -else -{ -obj* x_25; uint8 x_26; -lean::dec(x_14); -x_25 = lean::cnstr_get(x_13, 1); -lean::inc(x_25); -x_26 = lean::nat_dec_eq(x_25, x_12); -lean::dec(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -lean::dec(x_12); -x_27 = l_Lean_nullKind; -x_28 = l_Lean_Parser_ParserState_mkNode(x_13, x_27, x_11); -x_29 = lean::cnstr_get(x_28, 3); -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 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_31 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_32 = l_Lean_Parser_symbolFnAux(x_30, x_31, x_2, x_28); -x_33 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_5); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_29); -lean::dec(x_2); -x_35 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_36 = l_Lean_Parser_ParserState_mkNode(x_28, x_35, x_5); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_37 = l_Lean_Parser_ParserState_restore(x_13, x_11, x_12); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_11); -x_40 = lean::cnstr_get(x_39, 3); -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; -x_41 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_42 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_43 = l_Lean_Parser_symbolFnAux(x_41, x_42, x_2, x_39); -x_44 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_5); -return x_45; -} -else -{ -obj* x_46; obj* x_47; -lean::dec(x_40); -lean::dec(x_2); -x_46 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_47 = l_Lean_Parser_ParserState_mkNode(x_39, x_46, x_5); -return x_47; -} -} -} -} -} -else -{ -obj* x_54; obj* x_55; -lean::dec(x_9); -lean::dec(x_2); -x_54 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_55 = l_Lean_Parser_ParserState_mkNode(x_8, x_54, x_5); -return x_55; -} } } obj* _init_l_Lean_Parser_Term_paren___closed__1() { @@ -4559,6 +5627,19 @@ x_5 = l_Lean_Parser_addBuiltinLeadingParser(x_2, x_3, x_4, x_1); return x_5; } } +obj* l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1(uint8 x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5) { +_start: +{ +obj* x_6; obj* x_7; uint8 x_8; obj* x_9; +x_6 = lean::cnstr_get(x_5, 0); +lean::inc(x_6); +x_7 = lean::array_get_size(x_6); +lean::dec(x_6); +x_8 = 1; +x_9 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +return x_9; +} +} obj* _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__1() { _start: { @@ -4599,8 +5680,8 @@ obj* _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -4619,9 +5700,11 @@ obj* _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__4; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__6; +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; } } @@ -4629,65 +5712,205 @@ obj* _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__8() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__7; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__3; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__9() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__8; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__10() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__9; +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* l_Lean_Parser_Term_anonymousCtor___elambda__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_4; obj* x_5; obj* x_6; obj* x_39; obj* x_40; obj* x_41; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__3; -x_7 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__6; +x_39 = lean::cnstr_get(x_3, 1); +lean::inc(x_39); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_40 = l_Lean_Parser_tokenFn(x_2, x_3); +x_41 = lean::cnstr_get(x_40, 3); +lean::inc(x_41); +if (lean::obj_tag(x_41) == 0) { -uint8 x_10; uint8 x_11; obj* x_12; obj* x_13; -x_10 = 0; -x_11 = 0; -lean::inc(x_2); -x_12 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_10, x_11, x_1, x_2, x_8); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_42; obj* x_43; +x_42 = lean::cnstr_get(x_40, 0); +lean::inc(x_42); +x_43 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_42); +lean::dec(x_42); +if (lean::obj_tag(x_43) == 2) { -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__4; -x_15 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__8; -x_16 = l_Lean_Parser_symbolFnAux(x_14, x_15, x_2, x_12); -x_17 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_16, x_17, x_5); -return x_18; +obj* x_44; obj* x_45; uint8 x_46; +x_44 = lean::cnstr_get(x_43, 1); +lean::inc(x_44); +lean::dec(x_43); +x_45 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__3; +x_46 = lean::string_dec_eq(x_44, x_45); +lean::dec(x_44); +if (x_46 == 0) +{ +obj* x_47; obj* x_48; +x_47 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__10; +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_47, x_39); +x_6 = x_48; +goto block_38; } else { -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_2); -x_19 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_12, x_19, x_5); -return x_20; +lean::dec(x_39); +x_6 = x_40; +goto block_38; } } else { -obj* x_21; obj* x_22; -lean::dec(x_9); -lean::dec(x_2); -x_21 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_8, x_21, x_5); -return x_22; +obj* x_49; obj* x_50; +lean::dec(x_43); +x_49 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__10; +x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_49, x_39); +x_6 = x_50; +goto block_38; } } +else +{ +obj* x_51; obj* x_52; +lean::dec(x_41); +x_51 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__10; +x_52 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_51, x_39); +x_6 = x_52; +goto block_38; +} +block_38: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +uint8 x_8; uint8 x_9; obj* x_10; obj* x_11; +x_8 = 0; +x_9 = 0; +lean::inc(x_2); +x_10 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1(x_8, x_9, x_1, x_2, x_6); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +obj* x_12; obj* x_13; obj* x_14; +x_12 = lean::cnstr_get(x_10, 1); +lean::inc(x_12); +x_13 = l_Lean_Parser_tokenFn(x_2, x_10); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +if (lean::obj_tag(x_14) == 0) +{ +obj* x_15; obj* x_16; +x_15 = lean::cnstr_get(x_13, 0); +lean::inc(x_15); +x_16 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_15); +lean::dec(x_15); +if (lean::obj_tag(x_16) == 2) +{ +obj* x_17; obj* x_18; uint8 x_19; +x_17 = lean::cnstr_get(x_16, 1); +lean::inc(x_17); +lean::dec(x_16); +x_18 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__4; +x_19 = lean::string_dec_eq(x_17, x_18); +lean::dec(x_17); +if (x_19 == 0) +{ +obj* x_20; obj* x_21; obj* x_22; obj* x_23; +x_20 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__7; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12); +x_22 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +return x_23; +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_12); +x_24 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_13, x_24, x_5); +return x_25; +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_16); +x_26 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_26, x_12); +x_28 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; obj* x_32; obj* x_33; +lean::dec(x_14); +x_30 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_30, x_12); +x_32 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +return x_33; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_11); +lean::dec(x_2); +x_34 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_10, x_34, x_5); +return x_35; +} +} +else +{ +obj* x_36; obj* x_37; +lean::dec(x_7); +lean::dec(x_2); +x_36 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); +return x_37; +} +} +} +} +obj* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_anonymousCtor___spec__1(uint8 x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5) { +_start: +{ +obj* x_6; +x_6 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1(x_1, x_2, x_3, x_4, x_5); +return x_6; +} } obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__1() { _start: @@ -4703,9 +5926,9 @@ obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__2() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__4; -x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); +x_1 = l_Lean_Parser_Parser_inhabited___closed__1; +x_2 = l_Lean_Parser_Term_id___closed__2; +x_3 = l_Lean_Parser_sepByInfo(x_1, x_2); return x_3; } } @@ -4713,9 +5936,9 @@ obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__3() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_id___closed__3; -x_2 = l_Lean_Parser_Term_anonymousCtor___closed__2; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__4; +x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); return x_3; } } @@ -4723,7 +5946,7 @@ obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_anonymousCtor___closed__1; +x_1 = l_Lean_Parser_Term_anonymousCtor___closed__2; x_2 = l_Lean_Parser_Term_anonymousCtor___closed__3; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -4732,13 +5955,23 @@ return x_3; obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__5() { _start: { +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_anonymousCtor___closed__1; +x_2 = l_Lean_Parser_Term_anonymousCtor___closed__4; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__6() { +_start: +{ obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Term_anonymousCtor___closed__4; +x_1 = l_Lean_Parser_Term_anonymousCtor___closed__5; x_2 = l_Lean_Parser_nodeInfo(x_1); return x_2; } } -obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__6() { +obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__7() { _start: { obj* x_1; @@ -4746,12 +5979,12 @@ x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_anonymousCt return x_1; } } -obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__7() { +obj* _init_l_Lean_Parser_Term_anonymousCtor___closed__8() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_anonymousCtor___closed__5; -x_2 = l_Lean_Parser_Term_anonymousCtor___closed__6; +x_1 = l_Lean_Parser_Term_anonymousCtor___closed__6; +x_2 = l_Lean_Parser_Term_anonymousCtor___closed__7; x_3 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_3, 0, x_1); lean::cnstr_set(x_3, 1, x_2); @@ -4762,10 +5995,23 @@ obj* _init_l_Lean_Parser_Term_anonymousCtor() { _start: { obj* x_1; -x_1 = l_Lean_Parser_Term_anonymousCtor___closed__7; +x_1 = l_Lean_Parser_Term_anonymousCtor___closed__8; return x_1; } } +obj* l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +_start: +{ +uint8 x_6; uint8 x_7; obj* x_8; +x_6 = lean::unbox(x_1); +lean::dec(x_1); +x_7 = lean::unbox(x_2); +lean::dec(x_2); +x_8 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); +lean::dec(x_3); +return x_8; +} +} obj* l_Lean_Parser_Term_anonymousCtor___elambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { _start: { @@ -4775,6 +6021,19 @@ lean::dec(x_1); return x_4; } } +obj* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_anonymousCtor___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +_start: +{ +uint8 x_6; uint8 x_7; obj* x_8; +x_6 = lean::unbox(x_1); +lean::dec(x_1); +x_7 = lean::unbox(x_2); +lean::dec(x_2); +x_8 = l_Lean_Parser_sepByFn___at_Lean_Parser_Term_anonymousCtor___spec__1(x_6, x_7, x_3, x_4, x_5); +lean::dec(x_3); +return x_8; +} +} obj* l___regBuiltinParser_Lean_Parser_Term_anonymousCtor(obj* x_1) { _start: { @@ -4789,7 +6048,7 @@ return x_5; obj* l_Lean_Parser_Term_optIdent___elambda__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_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_21; obj* x_22; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::cnstr_get(x_2, 1); @@ -4797,175 +6056,161 @@ lean::inc(x_4); x_5 = lean::array_get_size(x_3); lean::dec(x_3); lean::inc(x_1); -x_6 = l_Lean_Parser_identFn___rarg(x_1, x_2); -x_7 = lean::cnstr_get(x_6, 3); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) +x_21 = l_Lean_Parser_identFn___rarg(x_1, x_2); +x_22 = lean::cnstr_get(x_21, 3); +lean::inc(x_22); +if (lean::obj_tag(x_22) == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; -x_9 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6; -x_10 = l_Lean_Parser_symbolFnAux(x_8, x_9, x_1, x_6); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +obj* x_23; obj* x_24; obj* x_25; +x_23 = lean::cnstr_get(x_21, 1); +lean::inc(x_23); +x_24 = l_Lean_Parser_tokenFn(x_1, x_21); +x_25 = lean::cnstr_get(x_24, 3); +lean::inc(x_25); +if (lean::obj_tag(x_25) == 0) { -obj* x_12; obj* x_13; -lean::dec(x_4); -x_12 = l_Lean_nullKind; -x_13 = l_Lean_Parser_ParserState_mkNode(x_10, x_12, x_5); -return x_13; +obj* x_26; obj* x_27; +x_26 = lean::cnstr_get(x_24, 0); +lean::inc(x_26); +x_27 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_26); +lean::dec(x_26); +if (lean::obj_tag(x_27) == 2) +{ +obj* x_28; obj* x_29; uint8 x_30; +x_28 = lean::cnstr_get(x_27, 1); +lean::inc(x_28); +lean::dec(x_27); +x_29 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; +x_30 = lean::string_dec_eq(x_28, x_29); +lean::dec(x_28); +if (x_30 == 0) +{ +obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; +x_31 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_31, x_23); +x_33 = lean::cnstr_get(x_32, 0); +lean::inc(x_33); +x_34 = lean::cnstr_get(x_32, 2); +lean::inc(x_34); +x_35 = lean::cnstr_get(x_32, 3); +lean::inc(x_35); +x_6 = x_32; +x_7 = x_33; +x_8 = x_34; +x_9 = x_35; +goto block_20; } else { -uint8 x_14; -x_14 = !lean::is_exclusive(x_10); +obj* x_36; obj* x_37; obj* x_38; +lean::dec(x_23); +x_36 = lean::cnstr_get(x_24, 0); +lean::inc(x_36); +x_37 = lean::cnstr_get(x_24, 2); +lean::inc(x_37); +x_38 = lean::cnstr_get(x_24, 3); +lean::inc(x_38); +x_6 = x_24; +x_7 = x_36; +x_8 = x_37; +x_9 = x_38; +goto block_20; +} +} +else +{ +obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; +lean::dec(x_27); +x_39 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_39, x_23); +x_41 = lean::cnstr_get(x_40, 0); +lean::inc(x_41); +x_42 = lean::cnstr_get(x_40, 2); +lean::inc(x_42); +x_43 = lean::cnstr_get(x_40, 3); +lean::inc(x_43); +x_6 = x_40; +x_7 = x_41; +x_8 = x_42; +x_9 = x_43; +goto block_20; +} +} +else +{ +obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; +lean::dec(x_25); +x_44 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_44, x_23); +x_46 = lean::cnstr_get(x_45, 0); +lean::inc(x_46); +x_47 = lean::cnstr_get(x_45, 2); +lean::inc(x_47); +x_48 = lean::cnstr_get(x_45, 3); +lean::inc(x_48); +x_6 = x_45; +x_7 = x_46; +x_8 = x_47; +x_9 = x_48; +goto block_20; +} +} +else +{ +obj* x_49; obj* x_50; obj* x_51; +lean::dec(x_22); +lean::dec(x_1); +x_49 = lean::cnstr_get(x_21, 0); +lean::inc(x_49); +x_50 = lean::cnstr_get(x_21, 2); +lean::inc(x_50); +x_51 = lean::cnstr_get(x_21, 3); +lean::inc(x_51); +x_6 = x_21; +x_7 = x_49; +x_8 = x_50; +x_9 = x_51; +goto block_20; +} +block_20: +{ +if (lean::obj_tag(x_9) == 0) +{ +obj* x_10; obj* x_11; +lean::dec(x_8); +lean::dec(x_7); +lean::dec(x_4); +x_10 = l_Lean_nullKind; +x_11 = l_Lean_Parser_ParserState_mkNode(x_6, x_10, x_5); +return x_11; +} +else +{ +obj* x_12; obj* x_13; uint8 x_14; +lean::dec(x_6); +x_12 = l_Array_shrink___main___rarg(x_7, x_5); +lean::inc(x_4); +x_13 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_4); +lean::cnstr_set(x_13, 2, x_8); +lean::cnstr_set(x_13, 3, x_9); +x_14 = lean::nat_dec_eq(x_4, x_4); if (x_14 == 0) { -obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -x_15 = lean::cnstr_get(x_10, 0); -x_16 = lean::cnstr_get(x_10, 3); -lean::dec(x_16); -x_17 = lean::cnstr_get(x_10, 1); -lean::dec(x_17); -x_18 = l_Array_shrink___main___rarg(x_15, x_5); -lean::inc(x_4); -lean::cnstr_set(x_10, 1, x_4); -lean::cnstr_set(x_10, 0, x_18); -x_19 = lean::nat_dec_eq(x_4, x_4); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; +obj* x_15; obj* x_16; lean::dec(x_4); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_10, x_20, x_5); -return x_21; +x_15 = l_Lean_nullKind; +x_16 = l_Lean_Parser_ParserState_mkNode(x_13, x_15, x_5); +return x_16; } else { -obj* x_22; obj* x_23; obj* x_24; -x_22 = l_Lean_Parser_ParserState_restore(x_10, x_5, x_4); -x_23 = l_Lean_nullKind; -x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_5); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; uint8 x_29; -x_25 = lean::cnstr_get(x_10, 0); -x_26 = lean::cnstr_get(x_10, 2); -lean::inc(x_26); -lean::inc(x_25); -lean::dec(x_10); -x_27 = l_Array_shrink___main___rarg(x_25, x_5); -lean::inc(x_4); -x_28 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_4); -lean::cnstr_set(x_28, 2, x_26); -lean::cnstr_set(x_28, 3, x_11); -x_29 = lean::nat_dec_eq(x_4, x_4); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; -lean::dec(x_4); -x_30 = l_Lean_nullKind; -x_31 = l_Lean_Parser_ParserState_mkNode(x_28, x_30, x_5); -return x_31; -} -else -{ -obj* x_32; obj* x_33; obj* x_34; -x_32 = l_Lean_Parser_ParserState_restore(x_28, x_5, x_4); -x_33 = l_Lean_nullKind; -x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_5); -return x_34; -} -} -} -} -else -{ -obj* x_35; -lean::dec(x_7); -lean::dec(x_1); -x_35 = lean::cnstr_get(x_6, 3); -lean::inc(x_35); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; -lean::dec(x_4); -x_36 = l_Lean_nullKind; -x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); -return x_37; -} -else -{ -uint8 x_38; -x_38 = !lean::is_exclusive(x_6); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; uint8 x_43; -x_39 = lean::cnstr_get(x_6, 0); -x_40 = lean::cnstr_get(x_6, 3); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_6, 1); -lean::dec(x_41); -x_42 = l_Array_shrink___main___rarg(x_39, x_5); -lean::inc(x_4); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 0, x_42); -x_43 = lean::nat_dec_eq(x_4, x_4); -if (x_43 == 0) -{ -obj* x_44; obj* x_45; -lean::dec(x_4); -x_44 = l_Lean_nullKind; -x_45 = l_Lean_Parser_ParserState_mkNode(x_6, x_44, x_5); -return x_45; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; -x_46 = l_Lean_Parser_ParserState_restore(x_6, x_5, x_4); -x_47 = l_Lean_nullKind; -x_48 = l_Lean_Parser_ParserState_mkNode(x_46, x_47, x_5); -return x_48; -} -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; uint8 x_53; -x_49 = lean::cnstr_get(x_6, 0); -x_50 = lean::cnstr_get(x_6, 2); -lean::inc(x_50); -lean::inc(x_49); -lean::dec(x_6); -x_51 = l_Array_shrink___main___rarg(x_49, x_5); -lean::inc(x_4); -x_52 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_4); -lean::cnstr_set(x_52, 2, x_50); -lean::cnstr_set(x_52, 3, x_35); -x_53 = lean::nat_dec_eq(x_4, x_4); -if (x_53 == 0) -{ -obj* x_54; obj* x_55; -lean::dec(x_4); -x_54 = l_Lean_nullKind; -x_55 = l_Lean_Parser_ParserState_mkNode(x_52, x_54, x_5); -return x_55; -} -else -{ -obj* x_56; obj* x_57; obj* x_58; -x_56 = l_Lean_Parser_ParserState_restore(x_52, x_5, x_4); -x_57 = l_Lean_nullKind; -x_58 = l_Lean_Parser_ParserState_mkNode(x_56, x_57, x_5); -return x_58; -} +obj* x_17; obj* x_18; obj* x_19; +x_17 = l_Lean_Parser_ParserState_restore(x_13, x_5, x_4); +x_18 = l_Lean_nullKind; +x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_5); +return x_19; } } } @@ -5108,8 +6353,8 @@ obj* _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__4; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__8; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -5128,9 +6373,11 @@ obj* _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__11() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__6; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__10; +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; } } @@ -5138,8 +6385,8 @@ obj* _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__12() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__11; -x_2 = l_Char_HasRepr___closed__1; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -5148,8 +6395,8 @@ obj* _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__13() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__8; +x_1 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__12; +x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -5158,133 +6405,368 @@ obj* _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__14() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__13; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__13; +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_Term_if___elambda__1___rarg___closed__15() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__16() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__15; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__17() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__16; +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* l_Lean_Parser_Term_if___elambda__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_3; obj* x_4; obj* x_5; obj* x_51; obj* x_80; obj* x_81; obj* x_82; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__10; +x_80 = lean::cnstr_get(x_2, 1); +lean::inc(x_80); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_81 = l_Lean_Parser_tokenFn(x_1, x_2); +x_82 = lean::cnstr_get(x_81, 3); +lean::inc(x_82); +if (lean::obj_tag(x_82) == 0) { -obj* x_9; obj* x_10; +obj* x_83; obj* x_84; +x_83 = lean::cnstr_get(x_81, 0); +lean::inc(x_83); +x_84 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_83); +lean::dec(x_83); +if (lean::obj_tag(x_84) == 2) +{ +obj* x_85; obj* x_86; uint8 x_87; +x_85 = lean::cnstr_get(x_84, 1); +lean::inc(x_85); +lean::dec(x_84); +x_86 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__4; +x_87 = lean::string_dec_eq(x_85, x_86); +lean::dec(x_85); +if (x_87 == 0) +{ +obj* x_88; obj* x_89; +x_88 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__17; +x_89 = l_Lean_Parser_ParserState_mkErrorsAt(x_81, x_88, x_80); +x_51 = x_89; +goto block_79; +} +else +{ +lean::dec(x_80); +x_51 = x_81; +goto block_79; +} +} +else +{ +obj* x_90; obj* x_91; +lean::dec(x_84); +x_90 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__17; +x_91 = l_Lean_Parser_ParserState_mkErrorsAt(x_81, x_90, x_80); +x_51 = x_91; +goto block_79; +} +} +else +{ +obj* x_92; obj* x_93; +lean::dec(x_82); +x_92 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__17; +x_93 = l_Lean_Parser_ParserState_mkErrorsAt(x_81, x_92, x_80); +x_51 = x_93; +goto block_79; +} +block_50: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; obj* x_10; +x_7 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); lean::inc(x_1); -x_9 = l_Lean_Parser_Term_optIdent___elambda__1___rarg(x_1, x_7); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); x_10 = lean::cnstr_get(x_9, 3); lean::inc(x_10); if (lean::obj_tag(x_10) == 0) { -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = l_Lean_Parser_termParserAttribute; -x_12 = lean::mk_nat_obj(0u); +obj* x_11; obj* x_12; obj* x_13; +x_11 = lean::cnstr_get(x_9, 1); +lean::inc(x_11); lean::inc(x_1); -x_13 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_9); -x_14 = lean::cnstr_get(x_13, 3); +x_12 = l_Lean_Parser_tokenFn(x_1, x_9); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) +{ +obj* x_14; obj* x_15; +x_14 = lean::cnstr_get(x_12, 0); lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +x_15 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_14); +lean::dec(x_14); +if (lean::obj_tag(x_15) == 2) { -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__6; -x_16 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__12; -lean::inc(x_1); -x_17 = l_Lean_Parser_symbolFnAux(x_15, x_16, x_1, x_13); -x_18 = lean::cnstr_get(x_17, 3); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) +obj* x_16; obj* x_17; uint8 x_18; +x_16 = lean::cnstr_get(x_15, 1); +lean::inc(x_16); +lean::dec(x_15); +x_17 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__8; +x_18 = lean::string_dec_eq(x_16, x_17); +lean::dec(x_16); +if (x_18 == 0) { -obj* x_19; obj* x_20; -lean::inc(x_1); -x_19 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_17); -x_20 = lean::cnstr_get(x_19, 3); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) +obj* x_19; obj* x_20; obj* x_21; +x_19 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__11; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_19, x_11); +x_21 = lean::cnstr_get(x_20, 3); +lean::inc(x_21); +if (lean::obj_tag(x_21) == 0) { -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__8; -x_22 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__14; -lean::inc(x_1); -x_23 = l_Lean_Parser_symbolFnAux(x_21, x_22, x_1, x_19); -x_24 = lean::cnstr_get(x_23, 3); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; -x_25 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_23); -x_26 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_4); -return x_27; +obj* x_22; obj* x_23; obj* x_24; +x_22 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_20); +x_23 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_4); +return x_24; } else { -obj* x_28; obj* x_29; -lean::dec(x_24); +obj* x_25; obj* x_26; +lean::dec(x_21); lean::dec(x_1); +x_25 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_20, x_25, x_4); +return x_26; +} +} +else +{ +obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_11); +x_27 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_12); x_28 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; -x_29 = l_Lean_Parser_ParserState_mkNode(x_23, x_28, x_4); +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_4); return x_29; } } else { -obj* x_30; obj* x_31; -lean::dec(x_20); -lean::dec(x_1); -x_30 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; -x_31 = l_Lean_Parser_ParserState_mkNode(x_19, x_30, x_4); -return x_31; -} -} -else +obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_15); +x_30 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__11; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_30, x_11); +x_32 = lean::cnstr_get(x_31, 3); +lean::inc(x_32); +if (lean::obj_tag(x_32) == 0) { -obj* x_32; obj* x_33; -lean::dec(x_18); -lean::dec(x_1); -x_32 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; -x_33 = l_Lean_Parser_ParserState_mkNode(x_17, x_32, x_4); -return x_33; -} -} -else -{ -obj* x_34; obj* x_35; -lean::dec(x_14); -lean::dec(x_1); +obj* x_33; obj* x_34; obj* x_35; +x_33 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_31); x_34 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; -x_35 = l_Lean_Parser_ParserState_mkNode(x_13, x_34, x_4); +x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_4); return x_35; } -} else { obj* x_36; obj* x_37; -lean::dec(x_10); +lean::dec(x_32); lean::dec(x_1); x_36 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; -x_37 = l_Lean_Parser_ParserState_mkNode(x_9, x_36, x_4); +x_37 = l_Lean_Parser_ParserState_mkNode(x_31, x_36, x_4); return x_37; } } +} else { -obj* x_38; obj* x_39; -lean::dec(x_8); +obj* x_38; obj* x_39; obj* x_40; +lean::dec(x_13); +x_38 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__11; +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_38, x_11); +x_40 = lean::cnstr_get(x_39, 3); +lean::inc(x_40); +if (lean::obj_tag(x_40) == 0) +{ +obj* x_41; obj* x_42; obj* x_43; +x_41 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_39); +x_42 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_4); +return x_43; +} +else +{ +obj* x_44; obj* x_45; +lean::dec(x_40); lean::dec(x_1); -x_38 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; -x_39 = l_Lean_Parser_ParserState_mkNode(x_7, x_38, x_4); -return x_39; +x_44 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_45 = l_Lean_Parser_ParserState_mkNode(x_39, x_44, x_4); +return x_45; +} +} +} +else +{ +obj* x_46; obj* x_47; +lean::dec(x_10); +lean::dec(x_1); +x_46 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_47 = l_Lean_Parser_ParserState_mkNode(x_9, x_46, x_4); +return x_47; +} +} +else +{ +obj* x_48; obj* x_49; +lean::dec(x_6); +lean::dec(x_1); +x_48 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_49 = l_Lean_Parser_ParserState_mkNode(x_5, x_48, x_4); +return x_49; +} +} +block_79: +{ +obj* x_52; +x_52 = lean::cnstr_get(x_51, 3); +lean::inc(x_52); +if (lean::obj_tag(x_52) == 0) +{ +obj* x_53; obj* x_54; +lean::inc(x_1); +x_53 = l_Lean_Parser_Term_optIdent___elambda__1___rarg(x_1, x_51); +x_54 = lean::cnstr_get(x_53, 3); +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 = l_Lean_Parser_termParserAttribute; +x_56 = lean::mk_nat_obj(0u); +lean::inc(x_1); +x_57 = l_Lean_Parser_ParserAttribute_runParser(x_55, x_56, x_1, x_53); +x_58 = lean::cnstr_get(x_57, 3); +lean::inc(x_58); +if (lean::obj_tag(x_58) == 0) +{ +obj* x_59; obj* x_60; obj* x_61; +x_59 = lean::cnstr_get(x_57, 1); +lean::inc(x_59); +lean::inc(x_1); +x_60 = l_Lean_Parser_tokenFn(x_1, x_57); +x_61 = lean::cnstr_get(x_60, 3); +lean::inc(x_61); +if (lean::obj_tag(x_61) == 0) +{ +obj* x_62; obj* x_63; +x_62 = lean::cnstr_get(x_60, 0); +lean::inc(x_62); +x_63 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_62); +lean::dec(x_62); +if (lean::obj_tag(x_63) == 2) +{ +obj* x_64; obj* x_65; uint8 x_66; +x_64 = lean::cnstr_get(x_63, 1); +lean::inc(x_64); +lean::dec(x_63); +x_65 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__6; +x_66 = lean::string_dec_eq(x_64, x_65); +lean::dec(x_64); +if (x_66 == 0) +{ +obj* x_67; obj* x_68; +x_67 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__14; +x_68 = l_Lean_Parser_ParserState_mkErrorsAt(x_60, x_67, x_59); +x_5 = x_68; +goto block_50; +} +else +{ +lean::dec(x_59); +x_5 = x_60; +goto block_50; +} +} +else +{ +obj* x_69; obj* x_70; +lean::dec(x_63); +x_69 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__14; +x_70 = l_Lean_Parser_ParserState_mkErrorsAt(x_60, x_69, x_59); +x_5 = x_70; +goto block_50; +} +} +else +{ +obj* x_71; obj* x_72; +lean::dec(x_61); +x_71 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__14; +x_72 = l_Lean_Parser_ParserState_mkErrorsAt(x_60, x_71, x_59); +x_5 = x_72; +goto block_50; +} +} +else +{ +obj* x_73; obj* x_74; +lean::dec(x_58); +lean::dec(x_1); +x_73 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_74 = l_Lean_Parser_ParserState_mkNode(x_57, x_73, x_4); +return x_74; +} +} +else +{ +obj* x_75; obj* x_76; +lean::dec(x_54); +lean::dec(x_1); +x_75 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_76 = l_Lean_Parser_ParserState_mkNode(x_53, x_75, x_4); +return x_76; +} +} +else +{ +obj* x_77; obj* x_78; +lean::dec(x_52); +lean::dec(x_1); +x_77 = l_Lean_Parser_Term_if___elambda__1___rarg___closed__2; +x_78 = l_Lean_Parser_ParserState_mkNode(x_51, x_77, x_4); +return x_78; +} } } } @@ -5484,7 +6966,7 @@ obj* _init_l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -5500,38 +6982,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_fromTerm___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -5640,7 +7190,7 @@ obj* _init_l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -5656,38 +7206,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Term_haveAssign___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -5803,28 +7421,26 @@ return x_2; obj* _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__5() { _start: { -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_mergeOrElseErrors___closed__1; -x_2 = l_String_trim(x_1); -return x_2; +obj* x_1; +x_1 = lean::mk_string("; "); +return x_1; } } obj* _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__6() { _start: { -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__4; -x_3 = lean::string_append(x_1, x_2); -return x_3; +obj* x_1; obj* x_2; +x_1 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__5; +x_2 = l_String_trim(x_1); +return x_2; } } obj* _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__6; -x_2 = l_Char_HasRepr___closed__1; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -5833,8 +7449,8 @@ obj* _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__8() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__5; +x_1 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__7; +x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -5843,184 +7459,350 @@ obj* _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__8; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__8; +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_Term_have___elambda__1___rarg___closed__10() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__11() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__10; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__12() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__11; +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* l_Lean_Parser_Term_have___elambda__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_3; obj* x_4; obj* x_5; obj* x_53; obj* x_79; obj* x_80; obj* x_81; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__7; +x_79 = lean::cnstr_get(x_2, 1); +lean::inc(x_79); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_80 = l_Lean_Parser_tokenFn(x_1, x_2); +x_81 = lean::cnstr_get(x_80, 3); +lean::inc(x_81); +if (lean::obj_tag(x_81) == 0) { -obj* x_9; obj* x_10; +obj* x_82; obj* x_83; +x_82 = lean::cnstr_get(x_80, 0); +lean::inc(x_82); +x_83 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_82); +lean::dec(x_82); +if (lean::obj_tag(x_83) == 2) +{ +obj* x_84; obj* x_85; uint8 x_86; +x_84 = lean::cnstr_get(x_83, 1); +lean::inc(x_84); +lean::dec(x_83); +x_85 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__4; +x_86 = lean::string_dec_eq(x_84, x_85); +lean::dec(x_84); +if (x_86 == 0) +{ +obj* x_87; obj* x_88; +x_87 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__12; +x_88 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_87, x_79); +x_53 = x_88; +goto block_78; +} +else +{ +lean::dec(x_79); +x_53 = x_80; +goto block_78; +} +} +else +{ +obj* x_89; obj* x_90; +lean::dec(x_83); +x_89 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__12; +x_90 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_89, x_79); +x_53 = x_90; +goto block_78; +} +} +else +{ +obj* x_91; obj* x_92; +lean::dec(x_81); +x_91 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__12; +x_92 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_91, x_79); +x_53 = x_92; +goto block_78; +} +block_52: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; +x_7 = lean::cnstr_get(x_5, 1); +lean::inc(x_7); lean::inc(x_1); -x_9 = l_Lean_Parser_Term_optIdent___elambda__1___rarg(x_1, x_7); -x_10 = lean::cnstr_get(x_9, 3); +x_8 = l_Lean_Parser_tokenFn(x_1, x_5); +x_9 = lean::cnstr_get(x_8, 3); +lean::inc(x_9); +if (lean::obj_tag(x_9) == 0) +{ +obj* x_10; obj* x_11; +x_10 = lean::cnstr_get(x_8, 0); lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = l_Lean_Parser_termParserAttribute; -x_12 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_13 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_9); -x_14 = lean::cnstr_get(x_13, 3); -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; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::array_get_size(x_15); -lean::dec(x_15); -x_17 = lean::cnstr_get(x_13, 1); -lean::inc(x_17); -lean::inc(x_1); -x_18 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg(x_1, x_13); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_17); -lean::dec(x_16); -x_20 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__5; -x_21 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; -lean::inc(x_1); -x_22 = l_Lean_Parser_symbolFnAux(x_20, x_21, x_1, x_18); -x_23 = lean::cnstr_get(x_22, 3); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_22); -x_25 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_4); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -lean::dec(x_23); -lean::dec(x_1); -x_27 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_22, x_27, x_4); -return x_28; -} -} -else -{ -obj* x_29; obj* x_30; uint8 x_31; -x_29 = lean::cnstr_get(x_19, 0); -lean::inc(x_29); -lean::dec(x_19); -x_30 = lean::cnstr_get(x_18, 1); -lean::inc(x_30); -x_31 = lean::nat_dec_eq(x_30, x_17); -lean::dec(x_30); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; -lean::dec(x_29); -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_1); -x_32 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_33 = l_Lean_Parser_ParserState_mkNode(x_18, x_32, x_4); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -lean::inc(x_17); -x_34 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); -lean::dec(x_16); -lean::inc(x_1); -x_35 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg(x_1, x_34); -x_36 = l_Lean_Parser_mergeOrElseErrors(x_35, x_29, x_17); -lean::dec(x_17); -x_37 = lean::cnstr_get(x_36, 3); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__5; -x_39 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; -lean::inc(x_1); -x_40 = l_Lean_Parser_symbolFnAux(x_38, x_39, x_1, x_36); -x_41 = lean::cnstr_get(x_40, 3); -lean::inc(x_41); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; -x_42 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_40); -x_43 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_4); -return x_44; -} -else -{ -obj* x_45; obj* x_46; -lean::dec(x_41); -lean::dec(x_1); -x_45 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_46 = l_Lean_Parser_ParserState_mkNode(x_40, x_45, x_4); -return x_46; -} -} -else -{ -obj* x_47; obj* x_48; -lean::dec(x_37); -lean::dec(x_1); -x_47 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_48 = l_Lean_Parser_ParserState_mkNode(x_36, x_47, x_4); -return x_48; -} -} -} -} -else -{ -obj* x_49; obj* x_50; -lean::dec(x_14); -lean::dec(x_1); -x_49 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_50 = l_Lean_Parser_ParserState_mkNode(x_13, x_49, x_4); -return x_50; -} -} -else -{ -obj* x_51; obj* x_52; +x_11 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_10); lean::dec(x_10); +if (lean::obj_tag(x_11) == 2) +{ +obj* x_12; obj* x_13; uint8 x_14; +x_12 = lean::cnstr_get(x_11, 1); +lean::inc(x_12); +lean::dec(x_11); +x_13 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__6; +x_14 = lean::string_dec_eq(x_12, x_13); +lean::dec(x_12); +if (x_14 == 0) +{ +obj* x_15; obj* x_16; obj* x_17; +x_15 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_16 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_15, x_7); +x_17 = lean::cnstr_get(x_16, 3); +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; +x_18 = l_Lean_Parser_termParserAttribute; +x_19 = lean::mk_nat_obj(0u); +x_20 = l_Lean_Parser_ParserAttribute_runParser(x_18, x_19, x_1, x_16); +x_21 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_17); lean::dec(x_1); -x_51 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_52 = l_Lean_Parser_ParserState_mkNode(x_9, x_51, x_4); -return x_52; +x_23 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_16, x_23, x_4); +return x_24; } } else { -obj* x_53; obj* x_54; -lean::dec(x_8); +obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_7); +x_25 = l_Lean_Parser_termParserAttribute; +x_26 = lean::mk_nat_obj(0u); +x_27 = l_Lean_Parser_ParserAttribute_runParser(x_25, x_26, x_1, x_8); +x_28 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_4); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_11); +x_30 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_30, x_7); +x_32 = lean::cnstr_get(x_31, 3); +lean::inc(x_32); +if (lean::obj_tag(x_32) == 0) +{ +obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; +x_33 = l_Lean_Parser_termParserAttribute; +x_34 = lean::mk_nat_obj(0u); +x_35 = l_Lean_Parser_ParserAttribute_runParser(x_33, x_34, x_1, x_31); +x_36 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_4); +return x_37; +} +else +{ +obj* x_38; obj* x_39; +lean::dec(x_32); lean::dec(x_1); -x_53 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; -x_54 = l_Lean_Parser_ParserState_mkNode(x_7, x_53, x_4); -return x_54; +x_38 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_39 = l_Lean_Parser_ParserState_mkNode(x_31, x_38, x_4); +return x_39; +} +} +} +else +{ +obj* x_40; obj* x_41; obj* x_42; +lean::dec(x_9); +x_40 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_40, x_7); +x_42 = lean::cnstr_get(x_41, 3); +lean::inc(x_42); +if (lean::obj_tag(x_42) == 0) +{ +obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; +x_43 = l_Lean_Parser_termParserAttribute; +x_44 = lean::mk_nat_obj(0u); +x_45 = l_Lean_Parser_ParserAttribute_runParser(x_43, x_44, x_1, x_41); +x_46 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_4); +return x_47; +} +else +{ +obj* x_48; obj* x_49; +lean::dec(x_42); +lean::dec(x_1); +x_48 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_49 = l_Lean_Parser_ParserState_mkNode(x_41, x_48, x_4); +return x_49; +} +} +} +else +{ +obj* x_50; obj* x_51; +lean::dec(x_6); +lean::dec(x_1); +x_50 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_51 = l_Lean_Parser_ParserState_mkNode(x_5, x_50, x_4); +return x_51; +} +} +block_78: +{ +obj* x_54; +x_54 = lean::cnstr_get(x_53, 3); +lean::inc(x_54); +if (lean::obj_tag(x_54) == 0) +{ +obj* x_55; obj* x_56; +lean::inc(x_1); +x_55 = l_Lean_Parser_Term_optIdent___elambda__1___rarg(x_1, x_53); +x_56 = lean::cnstr_get(x_55, 3); +lean::inc(x_56); +if (lean::obj_tag(x_56) == 0) +{ +obj* x_57; obj* x_58; obj* x_59; obj* x_60; +x_57 = l_Lean_Parser_termParserAttribute; +x_58 = lean::mk_nat_obj(0u); +lean::inc(x_1); +x_59 = l_Lean_Parser_ParserAttribute_runParser(x_57, x_58, x_1, x_55); +x_60 = lean::cnstr_get(x_59, 3); +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_59, 0); +lean::inc(x_61); +x_62 = lean::array_get_size(x_61); +lean::dec(x_61); +x_63 = lean::cnstr_get(x_59, 1); +lean::inc(x_63); +lean::inc(x_1); +x_64 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg(x_1, x_59); +x_65 = lean::cnstr_get(x_64, 3); +lean::inc(x_65); +if (lean::obj_tag(x_65) == 0) +{ +lean::dec(x_63); +lean::dec(x_62); +x_5 = x_64; +goto block_52; +} +else +{ +obj* x_66; obj* x_67; uint8 x_68; +x_66 = lean::cnstr_get(x_65, 0); +lean::inc(x_66); +lean::dec(x_65); +x_67 = lean::cnstr_get(x_64, 1); +lean::inc(x_67); +x_68 = lean::nat_dec_eq(x_67, x_63); +lean::dec(x_67); +if (x_68 == 0) +{ +lean::dec(x_66); +lean::dec(x_63); +lean::dec(x_62); +x_5 = x_64; +goto block_52; +} +else +{ +obj* x_69; obj* x_70; obj* x_71; +lean::inc(x_63); +x_69 = l_Lean_Parser_ParserState_restore(x_64, x_62, x_63); +lean::dec(x_62); +lean::inc(x_1); +x_70 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg(x_1, x_69); +x_71 = l_Lean_Parser_mergeOrElseErrors(x_70, x_66, x_63); +lean::dec(x_63); +x_5 = x_71; +goto block_52; +} +} +} +else +{ +obj* x_72; obj* x_73; +lean::dec(x_60); +lean::dec(x_1); +x_72 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_73 = l_Lean_Parser_ParserState_mkNode(x_59, x_72, x_4); +return x_73; +} +} +else +{ +obj* x_74; obj* x_75; +lean::dec(x_56); +lean::dec(x_1); +x_74 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_75 = l_Lean_Parser_ParserState_mkNode(x_55, x_74, x_4); +return x_75; +} +} +else +{ +obj* x_76; obj* x_77; +lean::dec(x_54); +lean::dec(x_1); +x_76 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__2; +x_77 = l_Lean_Parser_ParserState_mkNode(x_53, x_76, x_4); +return x_77; +} } } } @@ -6061,7 +7843,7 @@ _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__5; +x_2 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__6; x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); return x_3; } @@ -6214,7 +7996,7 @@ obj* _init_l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -6230,108 +8012,263 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_suffices___elambda__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_3; obj* x_4; obj* x_5; obj* x_59; obj* x_60; obj* x_61; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__6; +x_59 = lean::cnstr_get(x_2, 1); +lean::inc(x_59); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); +x_60 = l_Lean_Parser_tokenFn(x_1, x_2); +x_61 = lean::cnstr_get(x_60, 3); +lean::inc(x_61); +if (lean::obj_tag(x_61) == 0) +{ +obj* x_62; obj* x_63; +x_62 = lean::cnstr_get(x_60, 0); +lean::inc(x_62); +x_63 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_62); +lean::dec(x_62); +if (lean::obj_tag(x_63) == 2) +{ +obj* x_64; obj* x_65; uint8 x_66; +x_64 = lean::cnstr_get(x_63, 1); +lean::inc(x_64); +lean::dec(x_63); +x_65 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__4; +x_66 = lean::string_dec_eq(x_64, x_65); +lean::dec(x_64); +if (x_66 == 0) +{ +obj* x_67; obj* x_68; +x_67 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7; +x_68 = l_Lean_Parser_ParserState_mkErrorsAt(x_60, x_67, x_59); +x_5 = x_68; +goto block_58; +} +else +{ +lean::dec(x_59); +x_5 = x_60; +goto block_58; +} +} +else +{ +obj* x_69; obj* x_70; +lean::dec(x_63); +x_69 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7; +x_70 = l_Lean_Parser_ParserState_mkErrorsAt(x_60, x_69, x_59); +x_5 = x_70; +goto block_58; +} +} +else +{ +obj* x_71; obj* x_72; +lean::dec(x_61); +x_71 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7; +x_72 = l_Lean_Parser_ParserState_mkErrorsAt(x_60, x_71, x_59); +x_5 = x_72; +goto block_58; +} +block_58: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; +lean::inc(x_1); +x_7 = l_Lean_Parser_Term_optIdent___elambda__1___rarg(x_1, x_5); x_8 = lean::cnstr_get(x_7, 3); lean::inc(x_8); if (lean::obj_tag(x_8) == 0) { -obj* x_9; obj* x_10; +obj* x_9; obj* x_10; obj* x_11; obj* x_12; +x_9 = l_Lean_Parser_termParserAttribute; +x_10 = lean::mk_nat_obj(0u); lean::inc(x_1); -x_9 = l_Lean_Parser_Term_optIdent___elambda__1___rarg(x_1, x_7); -x_10 = lean::cnstr_get(x_9, 3); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) +x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) { -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = l_Lean_Parser_termParserAttribute; -x_12 = lean::mk_nat_obj(0u); +obj* x_13; obj* x_14; lean::inc(x_1); -x_13 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_9); +x_13 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg(x_1, x_11); x_14 = lean::cnstr_get(x_13, 3); lean::inc(x_14); if (lean::obj_tag(x_14) == 0) { -obj* x_15; obj* x_16; +obj* x_15; obj* x_16; obj* x_17; +x_15 = lean::cnstr_get(x_13, 1); +lean::inc(x_15); lean::inc(x_1); -x_15 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg(x_1, x_13); -x_16 = lean::cnstr_get(x_15, 3); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_13); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__5; -x_18 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; -lean::inc(x_1); -x_19 = l_Lean_Parser_symbolFnAux(x_17, x_18, x_1, x_15); -x_20 = lean::cnstr_get(x_19, 3); +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_19); -x_22 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_4); -return x_23; -} -else -{ -obj* x_24; obj* x_25; +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__6; +x_22 = lean::string_dec_eq(x_20, x_21); lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; obj* x_25; +x_23 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_25 = lean::cnstr_get(x_24, 3); +lean::inc(x_25); +if (lean::obj_tag(x_25) == 0) +{ +obj* x_26; obj* x_27; obj* x_28; +x_26 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_24); +x_27 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); +return x_28; +} +else +{ +obj* x_29; obj* x_30; +lean::dec(x_25); lean::dec(x_1); -x_24 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_19, x_24, x_4); -return x_25; +x_29 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_24, x_29, x_4); +return x_30; } } else { -obj* x_26; obj* x_27; -lean::dec(x_16); -lean::dec(x_1); -x_26 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; -x_27 = l_Lean_Parser_ParserState_mkNode(x_15, x_26, x_4); -return x_27; +obj* x_31; obj* x_32; obj* x_33; +lean::dec(x_15); +x_31 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_16); +x_32 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_4); +return x_33; } } else { -obj* x_28; obj* x_29; +obj* x_34; obj* x_35; obj* x_36; +lean::dec(x_19); +x_34 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_34, x_15); +x_36 = lean::cnstr_get(x_35, 3); +lean::inc(x_36); +if (lean::obj_tag(x_36) == 0) +{ +obj* x_37; obj* x_38; obj* x_39; +x_37 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_35); +x_38 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_4); +return x_39; +} +else +{ +obj* x_40; obj* x_41; +lean::dec(x_36); +lean::dec(x_1); +x_40 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_41 = l_Lean_Parser_ParserState_mkNode(x_35, x_40, x_4); +return x_41; +} +} +} +else +{ +obj* x_42; obj* x_43; obj* x_44; +lean::dec(x_17); +x_42 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_42, x_15); +x_44 = lean::cnstr_get(x_43, 3); +lean::inc(x_44); +if (lean::obj_tag(x_44) == 0) +{ +obj* x_45; obj* x_46; obj* x_47; +x_45 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_43); +x_46 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_4); +return x_47; +} +else +{ +obj* x_48; obj* x_49; +lean::dec(x_44); +lean::dec(x_1); +x_48 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_49 = l_Lean_Parser_ParserState_mkNode(x_43, x_48, x_4); +return x_49; +} +} +} +else +{ +obj* x_50; obj* x_51; lean::dec(x_14); lean::dec(x_1); -x_28 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; -x_29 = l_Lean_Parser_ParserState_mkNode(x_13, x_28, x_4); -return x_29; +x_50 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_51 = l_Lean_Parser_ParserState_mkNode(x_13, x_50, x_4); +return x_51; } } else { -obj* x_30; obj* x_31; -lean::dec(x_10); +obj* x_52; obj* x_53; +lean::dec(x_12); lean::dec(x_1); -x_30 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; -x_31 = l_Lean_Parser_ParserState_mkNode(x_9, x_30, x_4); -return x_31; +x_52 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_53 = l_Lean_Parser_ParserState_mkNode(x_11, x_52, x_4); +return x_53; } } else { -obj* x_32; obj* x_33; +obj* x_54; obj* x_55; lean::dec(x_8); lean::dec(x_1); -x_32 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; -x_33 = l_Lean_Parser_ParserState_mkNode(x_7, x_32, x_4); -return x_33; +x_54 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_55 = l_Lean_Parser_ParserState_mkNode(x_7, x_54, x_4); +return x_55; +} +} +else +{ +obj* x_56; obj* x_57; +lean::dec(x_6); +lean::dec(x_1); +x_56 = l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__2; +x_57 = l_Lean_Parser_ParserState_mkNode(x_5, x_56, x_4); +return x_57; +} } } } @@ -6493,7 +8430,7 @@ obj* _init_l_Lean_Parser_Term_show___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -6509,56 +8446,124 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_show___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_show___elambda__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_3; obj* x_4; obj* x_5; obj* x_19; obj* x_20; obj* x_21; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__6; +x_19 = lean::cnstr_get(x_2, 1); +lean::inc(x_19); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_20 = l_Lean_Parser_tokenFn(x_1, x_2); +x_21 = lean::cnstr_get(x_20, 3); +lean::inc(x_21); +if (lean::obj_tag(x_21) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); +obj* x_22; obj* x_23; +x_22 = lean::cnstr_get(x_20, 0); +lean::inc(x_22); +x_23 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_22); +lean::dec(x_22); +if (lean::obj_tag(x_23) == 2) +{ +obj* x_24; obj* x_25; uint8 x_26; +x_24 = lean::cnstr_get(x_23, 1); +lean::inc(x_24); +lean::dec(x_23); +x_25 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__4; +x_26 = lean::string_dec_eq(x_24, x_25); +lean::dec(x_24); +if (x_26 == 0) +{ +obj* x_27; obj* x_28; +x_27 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_27, x_19); +x_5 = x_28; +goto block_18; +} +else +{ +lean::dec(x_19); +x_5 = x_20; +goto block_18; +} +} +else +{ +obj* x_29; obj* x_30; +lean::dec(x_23); +x_29 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__7; +x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_29, x_19); +x_5 = x_30; +goto block_18; +} +} +else +{ +obj* x_31; obj* x_32; +lean::dec(x_21); +x_31 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__7; +x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_31, x_19); +x_5 = x_32; +goto block_18; +} +block_18: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; obj* x_10; +x_7 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); lean::inc(x_1); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = lean::cnstr_get(x_11, 3); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = lean::cnstr_get(x_9, 3); +lean::inc(x_10); +if (lean::obj_tag(x_10) == 0) { -obj* x_13; obj* x_14; obj* x_15; -x_13 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg(x_1, x_11); +obj* x_11; obj* x_12; obj* x_13; +x_11 = l_Lean_Parser_Term_fromTerm___elambda__1___rarg(x_1, x_9); +x_12 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); +return x_13; +} +else +{ +obj* x_14; obj* x_15; +lean::dec(x_10); +lean::dec(x_1); x_14 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_4); +x_15 = l_Lean_Parser_ParserState_mkNode(x_9, x_14, x_4); return x_15; } +} else { obj* x_16; obj* x_17; -lean::dec(x_12); +lean::dec(x_6); lean::dec(x_1); x_16 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__2; -x_17 = l_Lean_Parser_ParserState_mkNode(x_11, x_16, x_4); +x_17 = l_Lean_Parser_ParserState_mkNode(x_5, x_16, x_4); return x_17; } } -else -{ -obj* x_18; obj* x_19; -lean::dec(x_8); -lean::dec(x_1); -x_18 = l_Lean_Parser_Term_show___elambda__1___rarg___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_7, x_18, x_4); -return x_19; -} } } obj* l_Lean_Parser_Term_show___elambda__1(obj* x_1) { @@ -6693,7 +8698,7 @@ else obj* x_15; obj* x_16; lean::dec(x_3); x_15 = l_Lean_Parser_manyAux___main___closed__1; -x_16 = l_Lean_Parser_ParserState_mkError(x_10, x_15); +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); return x_16; } } @@ -6790,7 +8795,7 @@ obj* _init_l_Lean_Parser_Term_fun___elambda__1___closed__10() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_fun___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -6830,9 +8835,11 @@ obj* _init_l_Lean_Parser_Term_fun___elambda__1___closed__14() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_fun___elambda__1___closed__7; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_fun___elambda__1___closed__13; +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; } } @@ -6840,8 +8847,8 @@ obj* _init_l_Lean_Parser_Term_fun___elambda__1___closed__15() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_fun___elambda__1___closed__14; -x_2 = l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_fun___elambda__1___closed__7; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -6851,7 +8858,7 @@ _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = l_Lean_Parser_Term_fun___elambda__1___closed__15; -x_2 = l_Lean_Parser_Term_fun___elambda__1___closed__9; +x_2 = l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -6861,11 +8868,33 @@ _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = l_Lean_Parser_Term_fun___elambda__1___closed__16; +x_2 = l_Lean_Parser_Term_fun___elambda__1___closed__9; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_fun___elambda__1___closed__18() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_fun___elambda__1___closed__17; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_fun___elambda__1___closed__19() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_fun___elambda__1___closed__18; +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* l_Lean_Parser_Term_fun___elambda__1(obj* x_1, obj* x_2, obj* x_3) { _start: { @@ -6876,7 +8905,7 @@ x_5 = lean::array_get_size(x_4); lean::dec(x_4); x_6 = l_Lean_Parser_Term_fun___elambda__1___closed__4; x_7 = l_Lean_Parser_Term_fun___elambda__1___closed__5; -x_8 = l_Lean_Parser_Term_fun___elambda__1___closed__13; +x_8 = l_Lean_Parser_Term_fun___elambda__1___closed__14; lean::inc(x_2); x_9 = l_Lean_Parser_unicodeSymbolFnAux(x_6, x_7, x_8, x_2, x_3); x_10 = lean::cnstr_get(x_9, 3); @@ -6909,7 +8938,7 @@ if (lean::obj_tag(x_21) == 0) obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; x_22 = l_Lean_Parser_Term_fun___elambda__1___closed__7; x_23 = l_Lean_Parser_Term_fun___elambda__1___closed__9; -x_24 = l_Lean_Parser_Term_fun___elambda__1___closed__17; +x_24 = l_Lean_Parser_Term_fun___elambda__1___closed__19; lean::inc(x_2); x_25 = l_Lean_Parser_unicodeSymbolFnAux(x_22, x_23, x_24, x_2, x_20); x_26 = lean::cnstr_get(x_25, 3); @@ -6956,7 +8985,7 @@ if (lean::obj_tag(x_37) == 0) obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; x_38 = l_Lean_Parser_Term_fun___elambda__1___closed__7; x_39 = l_Lean_Parser_Term_fun___elambda__1___closed__9; -x_40 = l_Lean_Parser_Term_fun___elambda__1___closed__17; +x_40 = l_Lean_Parser_Term_fun___elambda__1___closed__19; lean::inc(x_2); x_41 = l_Lean_Parser_unicodeSymbolFnAux(x_38, x_39, x_40, x_2, x_36); x_42 = lean::cnstr_get(x_41, 3); @@ -7154,41 +9183,134 @@ x_6 = lean::cnstr_get(x_5, 3); lean::inc(x_6); if (lean::obj_tag(x_6) == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_8 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +obj* x_7; obj* x_8; obj* x_9; +x_7 = lean::cnstr_get(x_5, 1); +lean::inc(x_7); lean::inc(x_1); -x_9 = l_Lean_Parser_symbolFnAux(x_7, x_8, x_1, x_5); -x_10 = lean::cnstr_get(x_9, 3); +x_8 = l_Lean_Parser_tokenFn(x_1, x_5); +x_9 = lean::cnstr_get(x_8, 3); +lean::inc(x_9); +if (lean::obj_tag(x_9) == 0) +{ +obj* x_10; obj* x_11; +x_10 = lean::cnstr_get(x_8, 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; -x_11 = l_Lean_Parser_termParserAttribute; -x_12 = lean::mk_nat_obj(0u); -x_13 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_9); -x_14 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_4); -return x_15; -} -else -{ -obj* x_16; obj* x_17; +x_11 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_10); lean::dec(x_10); +if (lean::obj_tag(x_11) == 2) +{ +obj* x_12; obj* x_13; uint8 x_14; +x_12 = lean::cnstr_get(x_11, 1); +lean::inc(x_12); +lean::dec(x_11); +x_13 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_14 = lean::string_dec_eq(x_12, x_13); +lean::dec(x_12); +if (x_14 == 0) +{ +obj* x_15; obj* x_16; obj* x_17; +x_15 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_16 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_15, x_7); +x_17 = lean::cnstr_get(x_16, 3); +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; +x_18 = l_Lean_Parser_termParserAttribute; +x_19 = lean::mk_nat_obj(0u); +x_20 = l_Lean_Parser_ParserAttribute_runParser(x_18, x_19, x_1, x_16); +x_21 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_17); lean::dec(x_1); -x_16 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; -x_17 = l_Lean_Parser_ParserState_mkNode(x_9, x_16, x_4); -return x_17; +x_23 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_16, x_23, x_4); +return x_24; } } else { -obj* x_18; obj* x_19; +obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_7); +x_25 = l_Lean_Parser_termParserAttribute; +x_26 = lean::mk_nat_obj(0u); +x_27 = l_Lean_Parser_ParserAttribute_runParser(x_25, x_26, x_1, x_8); +x_28 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_4); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_11); +x_30 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_30, x_7); +x_32 = lean::cnstr_get(x_31, 3); +lean::inc(x_32); +if (lean::obj_tag(x_32) == 0) +{ +obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; +x_33 = l_Lean_Parser_termParserAttribute; +x_34 = lean::mk_nat_obj(0u); +x_35 = l_Lean_Parser_ParserAttribute_runParser(x_33, x_34, x_1, x_31); +x_36 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_4); +return x_37; +} +else +{ +obj* x_38; obj* x_39; +lean::dec(x_32); +lean::dec(x_1); +x_38 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; +x_39 = l_Lean_Parser_ParserState_mkNode(x_31, x_38, x_4); +return x_39; +} +} +} +else +{ +obj* x_40; obj* x_41; obj* x_42; +lean::dec(x_9); +x_40 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_8, x_40, x_7); +x_42 = lean::cnstr_get(x_41, 3); +lean::inc(x_42); +if (lean::obj_tag(x_42) == 0) +{ +obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; +x_43 = l_Lean_Parser_termParserAttribute; +x_44 = lean::mk_nat_obj(0u); +x_45 = l_Lean_Parser_ParserAttribute_runParser(x_43, x_44, x_1, x_41); +x_46 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_4); +return x_47; +} +else +{ +obj* x_48; obj* x_49; +lean::dec(x_42); +lean::dec(x_1); +x_48 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; +x_49 = l_Lean_Parser_ParserState_mkNode(x_41, x_48, x_4); +return x_49; +} +} +} +else +{ +obj* x_50; obj* x_51; lean::dec(x_6); lean::dec(x_1); -x_18 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_5, x_18, x_4); -return x_19; +x_50 = l_Lean_Parser_Term_structInstField___elambda__1___rarg___closed__2; +x_51 = l_Lean_Parser_ParserState_mkNode(x_5, x_50, x_4); +return x_51; } } } @@ -7295,7 +9417,7 @@ obj* _init_l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__5() _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -7311,84 +9433,152 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_structInstSource___elambda__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_3; obj* x_4; obj* x_5; obj* x_32; obj* x_33; obj* x_34; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__6; +x_32 = lean::cnstr_get(x_2, 1); +lean::inc(x_32); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_33 = l_Lean_Parser_tokenFn(x_1, x_2); +x_34 = lean::cnstr_get(x_33, 3); +lean::inc(x_34); +if (lean::obj_tag(x_34) == 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, 0); +obj* x_35; obj* x_36; +x_35 = lean::cnstr_get(x_33, 0); +lean::inc(x_35); +x_36 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_35); +lean::dec(x_35); +if (lean::obj_tag(x_36) == 2) +{ +obj* x_37; obj* x_38; uint8 x_39; +x_37 = lean::cnstr_get(x_36, 1); +lean::inc(x_37); +lean::dec(x_36); +x_38 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__4; +x_39 = lean::string_dec_eq(x_37, x_38); +lean::dec(x_37); +if (x_39 == 0) +{ +obj* x_40; obj* x_41; +x_40 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__7; +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_40, x_32); +x_5 = x_41; +goto block_31; +} +else +{ +lean::dec(x_32); +x_5 = x_33; +goto block_31; +} +} +else +{ +obj* x_42; obj* x_43; +lean::dec(x_36); +x_42 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__7; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_42, x_32); +x_5 = x_43; +goto block_31; +} +} +else +{ +obj* x_44; obj* x_45; +lean::dec(x_34); +x_44 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__7; +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_44, x_32); +x_5 = x_45; +goto block_31; +} +block_31: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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, 0); +lean::inc(x_7); +x_8 = lean::array_get_size(x_7); +lean::dec(x_7); +x_9 = lean::cnstr_get(x_5, 1); lean::inc(x_9); -x_10 = lean::array_get_size(x_9); +x_10 = l_Lean_Parser_termParserAttribute; +x_11 = lean::mk_nat_obj(0u); +x_12 = l_Lean_Parser_ParserAttribute_runParser(x_10, x_11, x_1, x_5); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) +{ +obj* x_14; obj* x_15; obj* x_16; obj* x_17; lean::dec(x_9); -x_11 = lean::cnstr_get(x_7, 1); -lean::inc(x_11); -x_12 = l_Lean_Parser_termParserAttribute; -x_13 = lean::mk_nat_obj(0u); -x_14 = l_Lean_Parser_ParserAttribute_runParser(x_12, x_13, x_1, x_7); -x_15 = lean::cnstr_get(x_14, 3); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -lean::dec(x_11); -x_16 = l_Lean_nullKind; -x_17 = l_Lean_Parser_ParserState_mkNode(x_14, x_16, x_10); -x_18 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_4); -return x_19; +x_14 = l_Lean_nullKind; +x_15 = l_Lean_Parser_ParserState_mkNode(x_12, x_14, x_8); +x_16 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__2; +x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_4); +return x_17; } else { -obj* x_20; uint8 x_21; -lean::dec(x_15); -x_20 = lean::cnstr_get(x_14, 1); -lean::inc(x_20); -x_21 = lean::nat_dec_eq(x_20, x_11); -lean::dec(x_20); -if (x_21 == 0) +obj* x_18; uint8 x_19; +lean::dec(x_13); +x_18 = lean::cnstr_get(x_12, 1); +lean::inc(x_18); +x_19 = lean::nat_dec_eq(x_18, x_9); +lean::dec(x_18); +if (x_19 == 0) { -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_11); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_14, x_22, x_10); -x_24 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_4); -return x_25; +obj* x_20; obj* x_21; obj* x_22; obj* x_23; +lean::dec(x_9); +x_20 = l_Lean_nullKind; +x_21 = l_Lean_Parser_ParserState_mkNode(x_12, x_20, x_8); +x_22 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_4); +return x_23; } else { -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = l_Lean_Parser_ParserState_restore(x_14, x_10, x_11); -x_27 = l_Lean_nullKind; -x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_10); +obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; +x_24 = l_Lean_Parser_ParserState_restore(x_12, x_8, x_9); +x_25 = l_Lean_nullKind; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_8); +x_27 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__2; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); +return x_28; +} +} +} +else +{ +obj* x_29; obj* x_30; +lean::dec(x_6); +lean::dec(x_1); x_29 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_4); +x_30 = l_Lean_Parser_ParserState_mkNode(x_5, x_29, x_4); return x_30; } } } -else -{ -obj* x_31; obj* x_32; -lean::dec(x_8); -lean::dec(x_1); -x_31 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_7, x_31, x_4); -return x_32; -} -} } obj* l_Lean_Parser_Term_structInstSource___elambda__1(obj* x_1) { _start: @@ -7473,10 +9663,10 @@ lean::dec(x_1); return x_2; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 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_32; obj* x_33; +obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_44; obj* x_45; x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_9 = lean::array_get_size(x_8); @@ -7484,50 +9674,50 @@ lean::dec(x_8); x_10 = lean::cnstr_get(x_7, 1); lean::inc(x_10); lean::inc(x_6); -x_32 = l_Lean_Parser_Term_structInstField___elambda__1___rarg(x_6, x_7); -x_33 = lean::cnstr_get(x_32, 3); -lean::inc(x_33); -if (lean::obj_tag(x_33) == 0) +x_44 = l_Lean_Parser_Term_structInstField___elambda__1___rarg(x_6, x_7); +x_45 = lean::cnstr_get(x_44, 3); +lean::inc(x_45); +if (lean::obj_tag(x_45) == 0) { -x_11 = x_32; -goto block_31; +x_11 = x_44; +goto block_43; } else { -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_32, 1); -lean::inc(x_35); -x_36 = lean::nat_dec_eq(x_35, x_10); -lean::dec(x_35); -if (x_36 == 0) +obj* x_46; obj* x_47; uint8 x_48; +x_46 = lean::cnstr_get(x_45, 0); +lean::inc(x_46); +lean::dec(x_45); +x_47 = lean::cnstr_get(x_44, 1); +lean::inc(x_47); +x_48 = lean::nat_dec_eq(x_47, x_10); +lean::dec(x_47); +if (x_48 == 0) { -lean::dec(x_34); -x_11 = x_32; -goto block_31; +lean::dec(x_46); +x_11 = x_44; +goto block_43; } else { -obj* x_37; obj* x_38; obj* x_39; +obj* x_49; obj* x_50; obj* x_51; lean::inc(x_10); -x_37 = l_Lean_Parser_ParserState_restore(x_32, x_9, x_10); +x_49 = l_Lean_Parser_ParserState_restore(x_44, x_9, x_10); lean::inc(x_6); -x_38 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg(x_6, x_37); -x_39 = l_Lean_Parser_mergeOrElseErrors(x_38, x_34, x_10); -x_11 = x_39; -goto block_31; +x_50 = l_Lean_Parser_Term_structInstSource___elambda__1___rarg(x_6, x_49); +x_51 = l_Lean_Parser_mergeOrElseErrors(x_50, x_46, x_10); +x_11 = x_51; +goto block_43; } } -block_31: +block_43: { obj* x_12; x_12 = lean::cnstr_get(x_11, 3); 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; +obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_23; obj* x_24; lean::dec(x_10); lean::dec(x_9); x_13 = lean::cnstr_get(x_11, 0); @@ -7536,19 +9726,74 @@ x_14 = lean::array_get_size(x_13); lean::dec(x_13); x_15 = lean::cnstr_get(x_11, 1); lean::inc(x_15); -x_16 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_17 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; lean::inc(x_6); -x_18 = l_Lean_Parser_symbolFnAux(x_16, x_17, x_6, x_11); -x_19 = lean::cnstr_get(x_18, 3); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) +x_23 = l_Lean_Parser_tokenFn(x_6, x_11); +x_24 = lean::cnstr_get(x_23, 3); +lean::inc(x_24); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_25; obj* x_26; +x_25 = lean::cnstr_get(x_23, 0); +lean::inc(x_25); +x_26 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_25); +lean::dec(x_25); +if (lean::obj_tag(x_26) == 2) +{ +obj* x_27; obj* x_28; uint8 x_29; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +lean::dec(x_26); +x_28 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_29 = lean::string_dec_eq(x_27, x_28); +lean::dec(x_27); +if (x_29 == 0) +{ +obj* x_30; obj* x_31; +x_30 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); +x_16 = x_31; +goto block_22; +} +else +{ +x_16 = x_23; +goto block_22; +} +} +else +{ +obj* x_32; obj* x_33; +lean::dec(x_26); +x_32 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); +x_16 = x_33; +goto block_22; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_24); +x_34 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +lean::inc(x_15); +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); +x_16 = x_35; +goto block_22; +} +block_22: +{ +obj* x_17; +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { lean::dec(x_15); lean::dec(x_14); { uint8 _tmp_3 = x_2; -obj* _tmp_6 = x_18; +obj* _tmp_6 = x_16; x_4 = _tmp_3; x_7 = _tmp_6; } @@ -7556,14 +9801,15 @@ goto _start; } else { -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_19); +obj* x_19; obj* x_20; obj* x_21; +lean::dec(x_17); lean::dec(x_6); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_14, x_15); +x_19 = l_Lean_Parser_ParserState_restore(x_16, x_14, x_15); lean::dec(x_14); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; +x_20 = l_Lean_nullKind; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_3); +return x_21; +} } } else @@ -7572,23 +9818,23 @@ lean::dec(x_12); lean::dec(x_6); if (x_4 == 0) { -obj* x_24; obj* x_25; obj* x_26; obj* x_27; +obj* x_36; obj* x_37; obj* x_38; obj* x_39; lean::dec(x_10); lean::dec(x_9); -x_24 = lean::box(0); -x_25 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_24); -x_26 = l_Lean_nullKind; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_3); -return x_27; +x_36 = lean::box(0); +x_37 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_36); +x_38 = l_Lean_nullKind; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_3); +return x_39; } else { -obj* x_28; obj* x_29; obj* x_30; -x_28 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +obj* x_40; obj* x_41; obj* x_42; +x_40 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); lean::dec(x_9); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_3); -return x_30; +x_41 = l_Lean_nullKind; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_3); +return x_42; } } } @@ -7603,7 +9849,7 @@ lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); x_8 = 1; -x_9 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +x_9 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); return x_9; } } @@ -7663,8 +9909,8 @@ obj* _init_l_Lean_Parser_Term_structInst___elambda__1___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_structInst___elambda__1___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -7683,9 +9929,11 @@ obj* _init_l_Lean_Parser_Term_structInst___elambda__1___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_structInst___elambda__1___closed__6; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_structInst___elambda__1___closed__8; +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; } } @@ -7693,307 +9941,382 @@ obj* _init_l_Lean_Parser_Term_structInst___elambda__1___closed__10() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_structInst___elambda__1___closed__9; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_structInst___elambda__1___closed__11() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_structInst___elambda__1___closed__10; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_structInst___elambda__1___closed__12() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_structInst___elambda__1___closed__11; +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* l_Lean_Parser_Term_structInst___elambda__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_4; obj* x_5; obj* x_6; obj* x_39; obj* x_93; obj* x_94; obj* x_95; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_structInst___elambda__1___closed__8; +x_93 = lean::cnstr_get(x_3, 1); +lean::inc(x_93); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_94 = l_Lean_Parser_tokenFn(x_2, x_3); +x_95 = lean::cnstr_get(x_94, 3); +lean::inc(x_95); +if (lean::obj_tag(x_95) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_67; obj* x_68; -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::array_get_size(x_10); -lean::dec(x_10); +obj* x_96; obj* x_97; +x_96 = lean::cnstr_get(x_94, 0); +lean::inc(x_96); +x_97 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_96); +lean::dec(x_96); +if (lean::obj_tag(x_97) == 2) +{ +obj* x_98; obj* x_99; uint8 x_100; +x_98 = lean::cnstr_get(x_97, 1); +lean::inc(x_98); +lean::dec(x_97); +x_99 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; +x_100 = lean::string_dec_eq(x_98, x_99); +lean::dec(x_98); +if (x_100 == 0) +{ +obj* x_101; obj* x_102; +x_101 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_102 = l_Lean_Parser_ParserState_mkErrorsAt(x_94, x_101, x_93); +x_39 = x_102; +goto block_92; +} +else +{ +lean::dec(x_93); +x_39 = x_94; +goto block_92; +} +} +else +{ +obj* x_103; obj* x_104; +lean::dec(x_97); +x_103 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_104 = l_Lean_Parser_ParserState_mkErrorsAt(x_94, x_103, x_93); +x_39 = x_104; +goto block_92; +} +} +else +{ +obj* x_105; obj* x_106; +lean::dec(x_95); +x_105 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_106 = l_Lean_Parser_ParserState_mkErrorsAt(x_94, x_105, x_93); +x_39 = x_106; +goto block_92; +} +block_38: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +uint8 x_8; uint8 x_9; obj* x_10; obj* x_11; +x_8 = 0; +x_9 = 1; lean::inc(x_2); -x_67 = l_Lean_Parser_identFn___rarg(x_2, x_8); -x_68 = lean::cnstr_get(x_67, 3); -lean::inc(x_68); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_69 = l_Lean_Parser_Term_structInst___elambda__1___closed__6; -x_70 = l_Lean_Parser_Term_structInst___elambda__1___closed__10; -lean::inc(x_2); -x_71 = l_Lean_Parser_symbolFnAux(x_69, x_70, x_2, x_67); -x_72 = lean::cnstr_get(x_71, 3); -lean::inc(x_72); -if (lean::obj_tag(x_72) == 0) -{ -x_13 = x_71; -goto block_66; -} -else -{ -uint8 x_73; -x_73 = !lean::is_exclusive(x_71); -if (x_73 == 0) -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_74 = lean::cnstr_get(x_71, 0); -x_75 = lean::cnstr_get(x_71, 3); -lean::dec(x_75); -x_76 = lean::cnstr_get(x_71, 1); -lean::dec(x_76); -x_77 = l_Array_shrink___main___rarg(x_74, x_12); +x_10 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_structInst___elambda__1___spec__1(x_8, x_9, x_1, x_2, x_6); +x_11 = lean::cnstr_get(x_10, 3); lean::inc(x_11); -lean::cnstr_set(x_71, 1, x_11); -lean::cnstr_set(x_71, 0, x_77); -x_13 = x_71; -goto block_66; -} -else +if (lean::obj_tag(x_11) == 0) { -obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_78 = lean::cnstr_get(x_71, 0); -x_79 = lean::cnstr_get(x_71, 2); -lean::inc(x_79); -lean::inc(x_78); -lean::dec(x_71); -x_80 = l_Array_shrink___main___rarg(x_78, x_12); -lean::inc(x_11); -x_81 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_11); -lean::cnstr_set(x_81, 2, x_79); -lean::cnstr_set(x_81, 3, x_72); -x_13 = x_81; -goto block_66; -} -} -} -else -{ -obj* x_82; -lean::dec(x_68); -x_82 = lean::cnstr_get(x_67, 3); -lean::inc(x_82); -if (lean::obj_tag(x_82) == 0) -{ -x_13 = x_67; -goto block_66; -} -else -{ -uint8 x_83; -x_83 = !lean::is_exclusive(x_67); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; -x_84 = lean::cnstr_get(x_67, 0); -x_85 = lean::cnstr_get(x_67, 3); -lean::dec(x_85); -x_86 = lean::cnstr_get(x_67, 1); -lean::dec(x_86); -x_87 = l_Array_shrink___main___rarg(x_84, x_12); -lean::inc(x_11); -lean::cnstr_set(x_67, 1, x_11); -lean::cnstr_set(x_67, 0, x_87); -x_13 = x_67; -goto block_66; -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_88 = lean::cnstr_get(x_67, 0); -x_89 = lean::cnstr_get(x_67, 2); -lean::inc(x_89); -lean::inc(x_88); -lean::dec(x_67); -x_90 = l_Array_shrink___main___rarg(x_88, x_12); -lean::inc(x_11); -x_91 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_11); -lean::cnstr_set(x_91, 2, x_89); -lean::cnstr_set(x_91, 3, x_82); -x_13 = x_91; -goto block_66; -} -} -} -block_66: -{ -obj* x_14; +obj* x_12; obj* x_13; obj* x_14; +x_12 = lean::cnstr_get(x_10, 1); +lean::inc(x_12); +x_13 = l_Lean_Parser_tokenFn(x_2, x_10); x_14 = lean::cnstr_get(x_13, 3); lean::inc(x_14); if (lean::obj_tag(x_14) == 0) { -obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_11); -x_15 = l_Lean_nullKind; -x_16 = l_Lean_Parser_ParserState_mkNode(x_13, x_15, x_12); -x_17 = lean::cnstr_get(x_16, 3); +obj* x_15; obj* x_16; +x_15 = lean::cnstr_get(x_13, 0); +lean::inc(x_15); +x_16 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_15); +lean::dec(x_15); +if (lean::obj_tag(x_16) == 2) +{ +obj* x_17; obj* x_18; uint8 x_19; +x_17 = lean::cnstr_get(x_16, 1); lean::inc(x_17); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; uint8 x_19; obj* x_20; obj* x_21; -x_18 = 0; -x_19 = 1; -lean::inc(x_2); -x_20 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_structInst___elambda__1___spec__1(x_18, x_19, x_1, x_2, x_16); -x_21 = lean::cnstr_get(x_20, 3); -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 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_23 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_24 = l_Lean_Parser_symbolFnAux(x_22, x_23, x_2, x_20); -x_25 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_5); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -lean::dec(x_21); -lean::dec(x_2); -x_27 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_20, x_27, x_5); -return x_28; -} -} -else -{ -obj* x_29; obj* x_30; +lean::dec(x_16); +x_18 = l_Lean_Parser_Term_id___elambda__1___closed__8; +x_19 = lean::string_dec_eq(x_17, x_18); lean::dec(x_17); -lean::dec(x_2); -x_29 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_16, x_29, x_5); -return x_30; +if (x_19 == 0) +{ +obj* x_20; obj* x_21; obj* x_22; obj* x_23; +x_20 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12); +x_22 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +return x_23; +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_12); +x_24 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_13, x_24, x_5); +return x_25; } } else { -obj* x_31; uint8 x_32; +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_16); +x_26 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_26, x_12); +x_28 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; obj* x_32; obj* x_33; lean::dec(x_14); -x_31 = lean::cnstr_get(x_13, 1); -lean::inc(x_31); -x_32 = lean::nat_dec_eq(x_31, x_11); -lean::dec(x_31); -if (x_32 == 0) +x_30 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_30, x_12); +x_32 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +return x_33; +} +} +else { -obj* x_33; obj* x_34; obj* x_35; +obj* x_34; obj* x_35; lean::dec(x_11); -x_33 = l_Lean_nullKind; -x_34 = l_Lean_Parser_ParserState_mkNode(x_13, x_33, x_12); -x_35 = lean::cnstr_get(x_34, 3); -lean::inc(x_35); -if (lean::obj_tag(x_35) == 0) +lean::dec(x_2); +x_34 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_10, x_34, x_5); +return x_35; +} +} +else { -uint8 x_36; uint8 x_37; obj* x_38; obj* x_39; -x_36 = 0; -x_37 = 1; +obj* x_36; obj* x_37; +lean::dec(x_7); +lean::dec(x_2); +x_36 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); +return x_37; +} +} +block_92: +{ +obj* x_40; +x_40 = lean::cnstr_get(x_39, 3); +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_59; obj* x_60; +x_41 = lean::cnstr_get(x_39, 0); +lean::inc(x_41); +x_42 = lean::cnstr_get(x_39, 1); +lean::inc(x_42); +x_43 = lean::array_get_size(x_41); +lean::dec(x_41); lean::inc(x_2); -x_38 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_structInst___elambda__1___spec__1(x_36, x_37, x_1, x_2, x_34); -x_39 = lean::cnstr_get(x_38, 3); -lean::inc(x_39); -if (lean::obj_tag(x_39) == 0) +x_59 = l_Lean_Parser_identFn___rarg(x_2, x_39); +x_60 = lean::cnstr_get(x_59, 3); +lean::inc(x_60); +if (lean::obj_tag(x_60) == 0) { -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_40 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_41 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_42 = l_Lean_Parser_symbolFnAux(x_40, x_41, x_2, x_38); -x_43 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_5); -return x_44; -} -else -{ -obj* x_45; obj* x_46; -lean::dec(x_39); -lean::dec(x_2); -x_45 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_46 = l_Lean_Parser_ParserState_mkNode(x_38, x_45, x_5); -return x_46; -} -} -else -{ -obj* x_47; obj* x_48; -lean::dec(x_35); -lean::dec(x_2); -x_47 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_48 = l_Lean_Parser_ParserState_mkNode(x_34, x_47, x_5); -return x_48; -} -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_49 = l_Lean_Parser_ParserState_restore(x_13, x_12, x_11); -x_50 = l_Lean_nullKind; -x_51 = l_Lean_Parser_ParserState_mkNode(x_49, x_50, x_12); -x_52 = lean::cnstr_get(x_51, 3); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) -{ -uint8 x_53; uint8 x_54; obj* x_55; obj* x_56; -x_53 = 0; -x_54 = 1; +obj* x_61; obj* x_62; obj* x_63; +x_61 = lean::cnstr_get(x_59, 1); +lean::inc(x_61); lean::inc(x_2); -x_55 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_structInst___elambda__1___spec__1(x_53, x_54, x_1, x_2, x_51); -x_56 = lean::cnstr_get(x_55, 3); -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 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_58 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_59 = l_Lean_Parser_symbolFnAux(x_57, x_58, x_2, x_55); -x_60 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_61 = l_Lean_Parser_ParserState_mkNode(x_59, x_60, x_5); -return x_61; -} -else -{ -obj* x_62; obj* x_63; -lean::dec(x_56); -lean::dec(x_2); -x_62 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_63 = l_Lean_Parser_ParserState_mkNode(x_55, x_62, x_5); -return x_63; -} -} -else +x_62 = l_Lean_Parser_tokenFn(x_2, x_59); +x_63 = lean::cnstr_get(x_62, 3); +lean::inc(x_63); +if (lean::obj_tag(x_63) == 0) { obj* x_64; obj* x_65; -lean::dec(x_52); -lean::dec(x_2); -x_64 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_65 = l_Lean_Parser_ParserState_mkNode(x_51, x_64, x_5); -return x_65; +x_64 = lean::cnstr_get(x_62, 0); +lean::inc(x_64); +x_65 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_64); +lean::dec(x_64); +if (lean::obj_tag(x_65) == 2) +{ +obj* x_66; obj* x_67; uint8 x_68; +x_66 = lean::cnstr_get(x_65, 1); +lean::inc(x_66); +lean::dec(x_65); +x_67 = l_Lean_Parser_Term_structInst___elambda__1___closed__6; +x_68 = lean::string_dec_eq(x_66, x_67); +lean::dec(x_66); +if (x_68 == 0) +{ +obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; +x_69 = l_Lean_Parser_Term_structInst___elambda__1___closed__9; +x_70 = l_Lean_Parser_ParserState_mkErrorsAt(x_62, x_69, x_61); +x_71 = lean::cnstr_get(x_70, 0); +lean::inc(x_71); +x_72 = lean::cnstr_get(x_70, 2); +lean::inc(x_72); +x_73 = lean::cnstr_get(x_70, 3); +lean::inc(x_73); +x_44 = x_70; +x_45 = x_71; +x_46 = x_72; +x_47 = x_73; +goto block_58; } +else +{ +obj* x_74; obj* x_75; obj* x_76; +lean::dec(x_61); +x_74 = lean::cnstr_get(x_62, 0); +lean::inc(x_74); +x_75 = lean::cnstr_get(x_62, 2); +lean::inc(x_75); +x_76 = lean::cnstr_get(x_62, 3); +lean::inc(x_76); +x_44 = x_62; +x_45 = x_74; +x_46 = x_75; +x_47 = x_76; +goto block_58; +} +} +else +{ +obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; +lean::dec(x_65); +x_77 = l_Lean_Parser_Term_structInst___elambda__1___closed__9; +x_78 = l_Lean_Parser_ParserState_mkErrorsAt(x_62, x_77, x_61); +x_79 = lean::cnstr_get(x_78, 0); +lean::inc(x_79); +x_80 = lean::cnstr_get(x_78, 2); +lean::inc(x_80); +x_81 = lean::cnstr_get(x_78, 3); +lean::inc(x_81); +x_44 = x_78; +x_45 = x_79; +x_46 = x_80; +x_47 = x_81; +goto block_58; +} +} +else +{ +obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; +lean::dec(x_63); +x_82 = l_Lean_Parser_Term_structInst___elambda__1___closed__9; +x_83 = l_Lean_Parser_ParserState_mkErrorsAt(x_62, x_82, x_61); +x_84 = lean::cnstr_get(x_83, 0); +lean::inc(x_84); +x_85 = lean::cnstr_get(x_83, 2); +lean::inc(x_85); +x_86 = lean::cnstr_get(x_83, 3); +lean::inc(x_86); +x_44 = x_83; +x_45 = x_84; +x_46 = x_85; +x_47 = x_86; +goto block_58; +} +} +else +{ +obj* x_87; obj* x_88; obj* x_89; +lean::dec(x_60); +x_87 = lean::cnstr_get(x_59, 0); +lean::inc(x_87); +x_88 = lean::cnstr_get(x_59, 2); +lean::inc(x_88); +x_89 = lean::cnstr_get(x_59, 3); +lean::inc(x_89); +x_44 = x_59; +x_45 = x_87; +x_46 = x_88; +x_47 = x_89; +goto block_58; +} +block_58: +{ +if (lean::obj_tag(x_47) == 0) +{ +obj* x_48; obj* x_49; +lean::dec(x_46); +lean::dec(x_45); +lean::dec(x_42); +x_48 = l_Lean_nullKind; +x_49 = l_Lean_Parser_ParserState_mkNode(x_44, x_48, x_43); +x_6 = x_49; +goto block_38; +} +else +{ +obj* x_50; obj* x_51; uint8 x_52; +lean::dec(x_44); +x_50 = l_Array_shrink___main___rarg(x_45, x_43); +lean::inc(x_42); +x_51 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_51, 0, x_50); +lean::cnstr_set(x_51, 1, x_42); +lean::cnstr_set(x_51, 2, x_46); +lean::cnstr_set(x_51, 3, x_47); +x_52 = lean::nat_dec_eq(x_42, x_42); +if (x_52 == 0) +{ +obj* x_53; obj* x_54; +lean::dec(x_42); +x_53 = l_Lean_nullKind; +x_54 = l_Lean_Parser_ParserState_mkNode(x_51, x_53, x_43); +x_6 = x_54; +goto block_38; +} +else +{ +obj* x_55; obj* x_56; obj* x_57; +x_55 = l_Lean_Parser_ParserState_restore(x_51, x_43, x_42); +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_55, x_56, x_43); +x_6 = x_57; +goto block_38; } } } } else { -obj* x_92; obj* x_93; -lean::dec(x_9); +obj* x_90; obj* x_91; +lean::dec(x_40); lean::dec(x_2); -x_92 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; -x_93 = l_Lean_Parser_ParserState_mkNode(x_8, x_92, x_5); -return x_93; +x_90 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; +x_91 = l_Lean_Parser_ParserState_mkNode(x_39, x_90, x_5); +return x_91; +} } } } @@ -8135,7 +10458,7 @@ x_1 = l_Lean_Parser_Term_structInst___closed__12; return x_1; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2___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; uint8 x_9; uint8 x_10; obj* x_11; @@ -8145,7 +10468,7 @@ x_9 = lean::unbox(x_2); lean::dec(x_2); x_10 = lean::unbox(x_4); lean::dec(x_4); -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); lean::dec(x_5); return x_11; } @@ -8217,35 +10540,91 @@ return x_3; obj* l_Lean_Parser_Term_typeSpec___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_typeSpec___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_typeSpec___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_typeSpec___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_typeSpec___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -8437,7 +10816,7 @@ obj* _init_l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -8453,110 +10832,288 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_subtype___elambda__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_3; obj* x_4; obj* x_5; obj* x_38; obj* x_65; obj* x_66; obj* x_67; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; -x_6 = l_Lean_Parser_Term_structInst___elambda__1___closed__8; +x_65 = lean::cnstr_get(x_2, 1); +lean::inc(x_65); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_66 = l_Lean_Parser_tokenFn(x_1, x_2); +x_67 = lean::cnstr_get(x_66, 3); +lean::inc(x_67); +if (lean::obj_tag(x_67) == 0) { -obj* x_9; obj* x_10; +obj* x_68; obj* x_69; +x_68 = lean::cnstr_get(x_66, 0); +lean::inc(x_68); +x_69 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_68); +lean::dec(x_68); +if (lean::obj_tag(x_69) == 2) +{ +obj* x_70; obj* x_71; uint8 x_72; +x_70 = lean::cnstr_get(x_69, 1); +lean::inc(x_70); +lean::dec(x_69); +x_71 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; +x_72 = lean::string_dec_eq(x_70, x_71); +lean::dec(x_70); +if (x_72 == 0) +{ +obj* x_73; obj* x_74; +x_73 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_74 = l_Lean_Parser_ParserState_mkErrorsAt(x_66, x_73, x_65); +x_38 = x_74; +goto block_64; +} +else +{ +lean::dec(x_65); +x_38 = x_66; +goto block_64; +} +} +else +{ +obj* x_75; obj* x_76; +lean::dec(x_69); +x_75 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_76 = l_Lean_Parser_ParserState_mkErrorsAt(x_66, x_75, x_65); +x_38 = x_76; +goto block_64; +} +} +else +{ +obj* x_77; obj* x_78; +lean::dec(x_67); +x_77 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_78 = l_Lean_Parser_ParserState_mkErrorsAt(x_66, x_77, x_65); +x_38 = x_78; +goto block_64; +} +block_37: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; obj* x_10; +x_7 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); lean::inc(x_1); -x_9 = l_Lean_Parser_identFn___rarg(x_1, x_7); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); x_10 = lean::cnstr_get(x_9, 3); lean::inc(x_10); if (lean::obj_tag(x_10) == 0) { -obj* x_11; obj* x_12; -lean::inc(x_1); -x_11 = l_Lean_Parser_Term_optType___elambda__1___rarg(x_1, x_9); -x_12 = lean::cnstr_get(x_11, 3); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) +obj* x_11; obj* x_12; obj* x_13; +x_11 = lean::cnstr_get(x_9, 1); +lean::inc(x_11); +x_12 = l_Lean_Parser_tokenFn(x_1, x_9); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) { -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__4; -x_14 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__6; -lean::inc(x_1); -x_15 = l_Lean_Parser_symbolFnAux(x_13, x_14, x_1, x_11); -x_16 = lean::cnstr_get(x_15, 3); +obj* x_14; obj* x_15; +x_14 = lean::cnstr_get(x_12, 0); +lean::inc(x_14); +x_15 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_14); +lean::dec(x_14); +if (lean::obj_tag(x_15) == 2) +{ +obj* x_16; obj* x_17; uint8 x_18; +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; -x_17 = l_Lean_Parser_termParserAttribute; -x_18 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_19 = l_Lean_Parser_ParserAttribute_runParser(x_17, x_18, x_1, x_15); -x_20 = lean::cnstr_get(x_19, 3); -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; -x_21 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_22 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_23 = l_Lean_Parser_symbolFnAux(x_21, x_22, x_1, x_19); -x_24 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_4); -return x_25; -} -else -{ -obj* x_26; obj* x_27; -lean::dec(x_20); -lean::dec(x_1); -x_26 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; -x_27 = l_Lean_Parser_ParserState_mkNode(x_19, x_26, x_4); -return x_27; -} -} -else -{ -obj* x_28; obj* x_29; +lean::dec(x_15); +x_17 = l_Lean_Parser_Term_id___elambda__1___closed__8; +x_18 = lean::string_dec_eq(x_16, x_17); lean::dec(x_16); -lean::dec(x_1); -x_28 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; -x_29 = l_Lean_Parser_ParserState_mkNode(x_15, x_28, x_4); -return x_29; +if (x_18 == 0) +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +x_19 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_19, x_11); +x_21 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_11); +x_23 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_12, x_23, x_4); +return x_24; } } else { -obj* x_30; obj* x_31; -lean::dec(x_12); -lean::dec(x_1); -x_30 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; -x_31 = l_Lean_Parser_ParserState_mkNode(x_11, x_30, x_4); -return x_31; +obj* x_25; obj* x_26; obj* x_27; obj* x_28; +lean::dec(x_15); +x_25 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_25, x_11); +x_27 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); +return x_28; } } else { -obj* x_32; obj* x_33; +obj* x_29; obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_13); +x_29 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_29, x_11); +x_31 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_4); +return x_32; +} +} +else +{ +obj* x_33; obj* x_34; lean::dec(x_10); lean::dec(x_1); -x_32 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; -x_33 = l_Lean_Parser_ParserState_mkNode(x_9, x_32, x_4); -return x_33; +x_33 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_34 = l_Lean_Parser_ParserState_mkNode(x_9, x_33, x_4); +return x_34; } } else { -obj* x_34; obj* x_35; -lean::dec(x_8); +obj* x_35; obj* x_36; +lean::dec(x_6); lean::dec(x_1); -x_34 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; -x_35 = l_Lean_Parser_ParserState_mkNode(x_7, x_34, x_4); -return x_35; +x_35 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_36 = l_Lean_Parser_ParserState_mkNode(x_5, x_35, x_4); +return x_36; +} +} +block_64: +{ +obj* x_39; +x_39 = lean::cnstr_get(x_38, 3); +lean::inc(x_39); +if (lean::obj_tag(x_39) == 0) +{ +obj* x_40; obj* x_41; +lean::inc(x_1); +x_40 = l_Lean_Parser_identFn___rarg(x_1, x_38); +x_41 = lean::cnstr_get(x_40, 3); +lean::inc(x_41); +if (lean::obj_tag(x_41) == 0) +{ +obj* x_42; obj* x_43; +lean::inc(x_1); +x_42 = l_Lean_Parser_Term_optType___elambda__1___rarg(x_1, x_40); +x_43 = lean::cnstr_get(x_42, 3); +lean::inc(x_43); +if (lean::obj_tag(x_43) == 0) +{ +obj* x_44; obj* x_45; obj* x_46; +x_44 = lean::cnstr_get(x_42, 1); +lean::inc(x_44); +lean::inc(x_1); +x_45 = l_Lean_Parser_tokenFn(x_1, x_42); +x_46 = lean::cnstr_get(x_45, 3); +lean::inc(x_46); +if (lean::obj_tag(x_46) == 0) +{ +obj* x_47; obj* x_48; +x_47 = lean::cnstr_get(x_45, 0); +lean::inc(x_47); +x_48 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_47); +lean::dec(x_47); +if (lean::obj_tag(x_48) == 2) +{ +obj* x_49; obj* x_50; uint8 x_51; +x_49 = lean::cnstr_get(x_48, 1); +lean::inc(x_49); +lean::dec(x_48); +x_50 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__4; +x_51 = lean::string_dec_eq(x_49, x_50); +lean::dec(x_49); +if (x_51 == 0) +{ +obj* x_52; obj* x_53; +x_52 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__7; +x_53 = l_Lean_Parser_ParserState_mkErrorsAt(x_45, x_52, x_44); +x_5 = x_53; +goto block_37; +} +else +{ +lean::dec(x_44); +x_5 = x_45; +goto block_37; +} +} +else +{ +obj* x_54; obj* x_55; +lean::dec(x_48); +x_54 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__7; +x_55 = l_Lean_Parser_ParserState_mkErrorsAt(x_45, x_54, x_44); +x_5 = x_55; +goto block_37; +} +} +else +{ +obj* x_56; obj* x_57; +lean::dec(x_46); +x_56 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__7; +x_57 = l_Lean_Parser_ParserState_mkErrorsAt(x_45, x_56, x_44); +x_5 = x_57; +goto block_37; +} +} +else +{ +obj* x_58; obj* x_59; +lean::dec(x_43); +lean::dec(x_1); +x_58 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_59 = l_Lean_Parser_ParserState_mkNode(x_42, x_58, x_4); +return x_59; +} +} +else +{ +obj* x_60; obj* x_61; +lean::dec(x_41); +lean::dec(x_1); +x_60 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_61 = l_Lean_Parser_ParserState_mkNode(x_40, x_60, x_4); +return x_61; +} +} +else +{ +obj* x_62; obj* x_63; +lean::dec(x_39); +lean::dec(x_1); +x_62 = l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__2; +x_63 = l_Lean_Parser_ParserState_mkNode(x_38, x_62, x_4); +return x_63; +} } } } @@ -8697,7 +11254,7 @@ x_5 = l_Lean_Parser_addBuiltinLeadingParser(x_2, x_3, x_4, x_1); return x_5; } } -obj* _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1() { +obj* _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1() { _start: { obj* x_1; obj* x_2; @@ -8706,27 +11263,39 @@ x_2 = l_String_trim(x_1); return x_2; } } -obj* _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2() { +obj* _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } -obj* _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3() { +obj* _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2; +x_1 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__4() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2(uint8 x_1, uint8 x_2, obj* x_3, uint8 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; @@ -8744,7 +11313,7 @@ x_14 = lean::cnstr_get(x_13, 3); 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; +obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_25; obj* x_26; lean::dec(x_10); lean::dec(x_9); x_15 = lean::cnstr_get(x_13, 0); @@ -8753,19 +11322,74 @@ x_16 = lean::array_get_size(x_15); lean::dec(x_15); x_17 = lean::cnstr_get(x_13, 1); lean::inc(x_17); -x_18 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1; -x_19 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3; lean::inc(x_6); -x_20 = l_Lean_Parser_symbolFnAux(x_18, x_19, x_6, x_13); -x_21 = lean::cnstr_get(x_20, 3); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) +x_25 = l_Lean_Parser_tokenFn(x_6, x_13); +x_26 = lean::cnstr_get(x_25, 3); +lean::inc(x_26); +if (lean::obj_tag(x_26) == 0) +{ +obj* x_27; obj* x_28; +x_27 = lean::cnstr_get(x_25, 0); +lean::inc(x_27); +x_28 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_27); +lean::dec(x_27); +if (lean::obj_tag(x_28) == 2) +{ +obj* x_29; obj* x_30; uint8 x_31; +x_29 = lean::cnstr_get(x_28, 1); +lean::inc(x_29); +lean::dec(x_28); +x_30 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1; +x_31 = lean::string_dec_eq(x_29, x_30); +lean::dec(x_29); +if (x_31 == 0) +{ +obj* x_32; obj* x_33; +x_32 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); +x_18 = x_33; +goto block_24; +} +else +{ +x_18 = x_25; +goto block_24; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_28); +x_34 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); +x_18 = x_35; +goto block_24; +} +} +else +{ +obj* x_36; obj* x_37; +lean::dec(x_26); +x_36 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__4; +lean::inc(x_17); +x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); +x_18 = x_37; +goto block_24; +} +block_24: +{ +obj* x_19; +x_19 = lean::cnstr_get(x_18, 3); +lean::inc(x_19); +if (lean::obj_tag(x_19) == 0) { lean::dec(x_17); lean::dec(x_16); { uint8 _tmp_3 = x_2; -obj* _tmp_6 = x_20; +obj* _tmp_6 = x_18; x_4 = _tmp_3; x_7 = _tmp_6; } @@ -8773,14 +11397,15 @@ goto _start; } else { -obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_21); +obj* x_21; obj* x_22; obj* x_23; +lean::dec(x_19); lean::dec(x_6); -x_23 = l_Lean_Parser_ParserState_restore(x_20, x_16, x_17); +x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); lean::dec(x_16); -x_24 = l_Lean_nullKind; -x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_3); -return x_25; +x_22 = l_Lean_nullKind; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); +return x_23; +} } } else @@ -8789,23 +11414,23 @@ lean::dec(x_14); lean::dec(x_6); if (x_4 == 0) { -obj* x_26; obj* x_27; obj* x_28; obj* x_29; +obj* x_38; obj* x_39; obj* x_40; obj* x_41; lean::dec(x_10); lean::dec(x_9); -x_26 = lean::box(0); -x_27 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_26); -x_28 = l_Lean_nullKind; -x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_3); -return x_29; +x_38 = lean::box(0); +x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); +x_40 = l_Lean_nullKind; +x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); +return x_41; } else { -obj* x_30; obj* x_31; obj* x_32; -x_30 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); +obj* x_42; obj* x_43; obj* x_44; +x_42 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); lean::dec(x_9); -x_31 = l_Lean_nullKind; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_3); -return x_32; +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); +return x_44; } } } @@ -8819,7 +11444,7 @@ lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); x_8 = 1; -x_9 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +x_9 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); return x_9; } } @@ -8863,8 +11488,8 @@ obj* _init_l_Lean_Parser_Term_list___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_list___elambda__1___closed__3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_list___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -8883,9 +11508,11 @@ obj* _init_l_Lean_Parser_Term_list___elambda__1___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_list___elambda__1___closed__6; +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; } } @@ -8893,63 +11520,195 @@ obj* _init_l_Lean_Parser_Term_list___elambda__1___closed__8() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_list___elambda__1___closed__3; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_list___elambda__1___closed__9() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_list___elambda__1___closed__8; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_list___elambda__1___closed__10() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_list___elambda__1___closed__9; +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* l_Lean_Parser_Term_list___elambda__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_4; obj* x_5; obj* x_6; obj* x_39; obj* x_40; obj* x_41; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_list___elambda__1___closed__3; -x_7 = l_Lean_Parser_Term_list___elambda__1___closed__6; +x_39 = lean::cnstr_get(x_3, 1); +lean::inc(x_39); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_40 = l_Lean_Parser_tokenFn(x_2, x_3); +x_41 = lean::cnstr_get(x_40, 3); +lean::inc(x_41); +if (lean::obj_tag(x_41) == 0) { -uint8 x_10; uint8 x_11; obj* x_12; obj* x_13; -x_10 = 0; -x_11 = 1; -lean::inc(x_2); -x_12 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_list___elambda__1___spec__1(x_10, x_11, x_1, x_2, x_8); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_42; obj* x_43; +x_42 = lean::cnstr_get(x_40, 0); +lean::inc(x_42); +x_43 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_42); +lean::dec(x_42); +if (lean::obj_tag(x_43) == 2) { -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_15 = l_Lean_Parser_Term_list___elambda__1___closed__8; -x_16 = l_Lean_Parser_symbolFnAux(x_14, x_15, x_2, x_12); -x_17 = l_Lean_Parser_Term_list___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_16, x_17, x_5); -return x_18; +obj* x_44; obj* x_45; uint8 x_46; +x_44 = lean::cnstr_get(x_43, 1); +lean::inc(x_44); +lean::dec(x_43); +x_45 = l_Lean_Parser_Term_list___elambda__1___closed__3; +x_46 = lean::string_dec_eq(x_44, x_45); +lean::dec(x_44); +if (x_46 == 0) +{ +obj* x_47; obj* x_48; +x_47 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_47, x_39); +x_6 = x_48; +goto block_38; } else { -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_2); -x_19 = l_Lean_Parser_Term_list___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_12, x_19, x_5); -return x_20; +lean::dec(x_39); +x_6 = x_40; +goto block_38; } } else { -obj* x_21; obj* x_22; -lean::dec(x_9); +obj* x_49; obj* x_50; +lean::dec(x_43); +x_49 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_49, x_39); +x_6 = x_50; +goto block_38; +} +} +else +{ +obj* x_51; obj* x_52; +lean::dec(x_41); +x_51 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_52 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_51, x_39); +x_6 = x_52; +goto block_38; +} +block_38: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +uint8 x_8; uint8 x_9; obj* x_10; obj* x_11; +x_8 = 0; +x_9 = 1; +lean::inc(x_2); +x_10 = l_Lean_Parser_sepByFn___main___at_Lean_Parser_Term_list___elambda__1___spec__1(x_8, x_9, x_1, x_2, x_6); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +obj* x_12; obj* x_13; obj* x_14; +x_12 = lean::cnstr_get(x_10, 1); +lean::inc(x_12); +x_13 = l_Lean_Parser_tokenFn(x_2, x_10); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +if (lean::obj_tag(x_14) == 0) +{ +obj* x_15; obj* x_16; +x_15 = lean::cnstr_get(x_13, 0); +lean::inc(x_15); +x_16 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_15); +lean::dec(x_15); +if (lean::obj_tag(x_16) == 2) +{ +obj* x_17; obj* x_18; uint8 x_19; +x_17 = lean::cnstr_get(x_16, 1); +lean::inc(x_17); +lean::dec(x_16); +x_18 = l_Lean_Parser_Term_list___elambda__1___closed__4; +x_19 = lean::string_dec_eq(x_17, x_18); +lean::dec(x_17); +if (x_19 == 0) +{ +obj* x_20; obj* x_21; obj* x_22; obj* x_23; +x_20 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12); +x_22 = l_Lean_Parser_Term_list___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +return x_23; +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_12); +x_24 = l_Lean_Parser_Term_list___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_13, x_24, x_5); +return x_25; +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_16); +x_26 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_26, x_12); +x_28 = l_Lean_Parser_Term_list___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; obj* x_32; obj* x_33; +lean::dec(x_14); +x_30 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_30, x_12); +x_32 = l_Lean_Parser_Term_list___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +return x_33; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_11); lean::dec(x_2); -x_21 = l_Lean_Parser_Term_list___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_8, x_21, x_5); -return x_22; +x_34 = l_Lean_Parser_Term_list___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_10, x_34, x_5); +return x_35; +} +} +else +{ +obj* x_36; obj* x_37; +lean::dec(x_7); +lean::dec(x_2); +x_36 = l_Lean_Parser_Term_list___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); +return x_37; +} } } } @@ -8976,7 +11735,7 @@ _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = lean::box(0); -x_2 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1; +x_2 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1; x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); return x_3; } @@ -9058,7 +11817,7 @@ x_1 = l_Lean_Parser_Term_list___closed__9; return x_1; } } -obj* l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___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* l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___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; uint8 x_9; uint8 x_10; obj* x_11; @@ -9068,7 +11827,7 @@ x_9 = lean::unbox(x_2); lean::dec(x_2); x_10 = lean::unbox(x_4); lean::dec(x_4); -x_11 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_11 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); lean::dec(x_5); return x_11; } @@ -9158,7 +11917,7 @@ obj* _init_l_Lean_Parser_Term_explicit___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_explicit___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -9174,36 +11933,104 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_explicit___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_explicit___elambda__1___closed__6; +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* l_Lean_Parser_Term_explicit___elambda__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_4; obj* x_5; obj* x_6; obj* x_14; obj* x_15; obj* x_16; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_explicit___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_explicit___elambda__1___closed__6; +x_14 = lean::cnstr_get(x_3, 1); +lean::inc(x_14); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_15 = l_Lean_Parser_tokenFn(x_2, x_3); +x_16 = lean::cnstr_get(x_15, 3); +lean::inc(x_16); +if (lean::obj_tag(x_16) == 0) { -obj* x_10; obj* x_11; obj* x_12; -x_10 = l_Lean_Parser_Term_id___elambda__1(x_1, x_2, x_8); -x_11 = l_Lean_Parser_Term_explicit___elambda__1___closed__2; -x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_5); -return x_12; +obj* x_17; obj* x_18; +x_17 = lean::cnstr_get(x_15, 0); +lean::inc(x_17); +x_18 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_17); +lean::dec(x_17); +if (lean::obj_tag(x_18) == 2) +{ +obj* x_19; obj* x_20; uint8 x_21; +x_19 = lean::cnstr_get(x_18, 1); +lean::inc(x_19); +lean::dec(x_18); +x_20 = l_Lean_Parser_Term_explicit___elambda__1___closed__4; +x_21 = lean::string_dec_eq(x_19, x_20); +lean::dec(x_19); +if (x_21 == 0) +{ +obj* x_22; obj* x_23; +x_22 = l_Lean_Parser_Term_explicit___elambda__1___closed__7; +x_23 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_22, x_14); +x_6 = x_23; +goto block_13; } else { -obj* x_13; obj* x_14; -lean::dec(x_9); +lean::dec(x_14); +x_6 = x_15; +goto block_13; +} +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_18); +x_24 = l_Lean_Parser_Term_explicit___elambda__1___closed__7; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_24, x_14); +x_6 = x_25; +goto block_13; +} +} +else +{ +obj* x_26; obj* x_27; +lean::dec(x_16); +x_26 = l_Lean_Parser_Term_explicit___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_26, x_14); +x_6 = x_27; +goto block_13; +} +block_13: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; obj* x_10; +x_8 = l_Lean_Parser_Term_id___elambda__1(x_1, x_2, x_6); +x_9 = l_Lean_Parser_Term_explicit___elambda__1___closed__2; +x_10 = l_Lean_Parser_ParserState_mkNode(x_8, x_9, x_5); +return x_10; +} +else +{ +obj* x_11; obj* x_12; +lean::dec(x_7); lean::dec(x_2); -x_13 = l_Lean_Parser_Term_explicit___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_8, x_13, x_5); -return x_14; +x_11 = l_Lean_Parser_Term_explicit___elambda__1___closed__2; +x_12 = l_Lean_Parser_ParserState_mkNode(x_6, x_11, x_5); +return x_12; +} } } } @@ -9325,7 +12152,7 @@ obj* _init_l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -9341,57 +12168,179 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_inaccessible___elambda__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_3; obj* x_4; obj* x_5; obj* x_38; obj* x_39; obj* x_40; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__6; +x_38 = lean::cnstr_get(x_2, 1); +lean::inc(x_38); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_39 = l_Lean_Parser_tokenFn(x_1, x_2); +x_40 = lean::cnstr_get(x_39, 3); +lean::inc(x_40); +if (lean::obj_tag(x_40) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = lean::cnstr_get(x_11, 3); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) +obj* x_41; obj* x_42; +x_41 = lean::cnstr_get(x_39, 0); +lean::inc(x_41); +x_42 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_41); +lean::dec(x_41); +if (lean::obj_tag(x_42) == 2) { -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_14 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_15 = l_Lean_Parser_symbolFnAux(x_13, x_14, x_1, x_11); -x_16 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; -x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_4); -return x_17; +obj* x_43; obj* x_44; uint8 x_45; +x_43 = lean::cnstr_get(x_42, 1); +lean::inc(x_43); +lean::dec(x_42); +x_44 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__4; +x_45 = lean::string_dec_eq(x_43, x_44); +lean::dec(x_43); +if (x_45 == 0) +{ +obj* x_46; obj* x_47; +x_46 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__7; +x_47 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_46, x_38); +x_5 = x_47; +goto block_37; } else { -obj* x_18; obj* x_19; -lean::dec(x_12); -lean::dec(x_1); -x_18 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_11, x_18, x_4); -return x_19; +lean::dec(x_38); +x_5 = x_39; +goto block_37; } } else { -obj* x_20; obj* x_21; -lean::dec(x_8); +obj* x_48; obj* x_49; +lean::dec(x_42); +x_48 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__7; +x_49 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_48, x_38); +x_5 = x_49; +goto block_37; +} +} +else +{ +obj* x_50; obj* x_51; +lean::dec(x_40); +x_50 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__7; +x_51 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_50, x_38); +x_5 = x_51; +goto block_37; +} +block_37: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; obj* x_10; +x_7 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +lean::inc(x_1); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = lean::cnstr_get(x_9, 3); +lean::inc(x_10); +if (lean::obj_tag(x_10) == 0) +{ +obj* x_11; obj* x_12; obj* x_13; +x_11 = lean::cnstr_get(x_9, 1); +lean::inc(x_11); +x_12 = l_Lean_Parser_tokenFn(x_1, x_9); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) +{ +obj* x_14; obj* x_15; +x_14 = lean::cnstr_get(x_12, 0); +lean::inc(x_14); +x_15 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_14); +lean::dec(x_14); +if (lean::obj_tag(x_15) == 2) +{ +obj* x_16; obj* x_17; uint8 x_18; +x_16 = lean::cnstr_get(x_15, 1); +lean::inc(x_16); +lean::dec(x_15); +x_17 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_18 = lean::string_dec_eq(x_16, x_17); +lean::dec(x_16); +if (x_18 == 0) +{ +obj* x_19; obj* x_20; obj* x_21; obj* x_22; +x_19 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_19, x_11); +x_21 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_11); +x_23 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_12, x_23, x_4); +return x_24; +} +} +else +{ +obj* x_25; obj* x_26; obj* x_27; obj* x_28; +lean::dec(x_15); +x_25 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_25, x_11); +x_27 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); +return x_28; +} +} +else +{ +obj* x_29; obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_13); +x_29 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_29, x_11); +x_31 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_4); +return x_32; +} +} +else +{ +obj* x_33; obj* x_34; +lean::dec(x_10); lean::dec(x_1); -x_20 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; -x_21 = l_Lean_Parser_ParserState_mkNode(x_7, x_20, x_4); -return x_21; +x_33 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; +x_34 = l_Lean_Parser_ParserState_mkNode(x_9, x_33, x_4); +return x_34; +} +} +else +{ +obj* x_35; obj* x_36; +lean::dec(x_6); +lean::dec(x_1); +x_35 = l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__2; +x_36 = l_Lean_Parser_ParserState_mkNode(x_5, x_35, x_4); +return x_36; +} } } } @@ -9593,85 +12542,141 @@ return x_2; obj* l_Lean_Parser_Term_binderType___elambda__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_3; obj* x_4; obj* x_5; obj* x_6; obj* x_29; obj* x_30; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); x_5 = lean::cnstr_get(x_2, 1); lean::inc(x_5); -x_6 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; -x_7 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6; lean::inc(x_1); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_1, x_2); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_29 = l_Lean_Parser_tokenFn(x_1, x_2); +x_30 = lean::cnstr_get(x_29, 3); +lean::inc(x_30); +if (lean::obj_tag(x_30) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = l_Lean_Parser_termParserAttribute; -x_11 = lean::mk_nat_obj(0u); -x_12 = l_Lean_Parser_ParserAttribute_runParser(x_10, x_11, x_1, x_8); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_31; obj* x_32; +x_31 = lean::cnstr_get(x_29, 0); +lean::inc(x_31); +x_32 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_31); +lean::dec(x_31); +if (lean::obj_tag(x_32) == 2) { -obj* x_14; obj* x_15; +obj* x_33; obj* x_34; uint8 x_35; +x_33 = lean::cnstr_get(x_32, 1); +lean::inc(x_33); +lean::dec(x_32); +x_34 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; +x_35 = lean::string_dec_eq(x_33, x_34); +lean::dec(x_33); +if (x_35 == 0) +{ +obj* x_36; obj* x_37; +x_36 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +lean::inc(x_5); +x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_36, x_5); +x_6 = x_37; +goto block_28; +} +else +{ +x_6 = x_29; +goto block_28; +} +} +else +{ +obj* x_38; obj* x_39; +lean::dec(x_32); +x_38 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +lean::inc(x_5); +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_38, x_5); +x_6 = x_39; +goto block_28; +} +} +else +{ +obj* x_40; obj* x_41; +lean::dec(x_30); +x_40 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +lean::inc(x_5); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_40, x_5); +x_6 = x_41; +goto block_28; +} +block_28: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; obj* x_10; obj* x_11; +x_8 = l_Lean_Parser_termParserAttribute; +x_9 = lean::mk_nat_obj(0u); +x_10 = l_Lean_Parser_ParserAttribute_runParser(x_8, x_9, x_1, x_6); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +obj* x_12; obj* x_13; lean::dec(x_5); -x_14 = l_Lean_nullKind; -x_15 = l_Lean_Parser_ParserState_mkNode(x_12, x_14, x_4); -return x_15; +x_12 = l_Lean_nullKind; +x_13 = l_Lean_Parser_ParserState_mkNode(x_10, x_12, x_4); +return x_13; } else { -obj* x_16; uint8 x_17; -lean::dec(x_13); -x_16 = lean::cnstr_get(x_12, 1); -lean::inc(x_16); -x_17 = lean::nat_dec_eq(x_16, x_5); -lean::dec(x_16); -if (x_17 == 0) +obj* x_14; uint8 x_15; +lean::dec(x_11); +x_14 = lean::cnstr_get(x_10, 1); +lean::inc(x_14); +x_15 = lean::nat_dec_eq(x_14, x_5); +lean::dec(x_14); +if (x_15 == 0) { -obj* x_18; obj* x_19; +obj* x_16; obj* x_17; lean::dec(x_5); -x_18 = l_Lean_nullKind; -x_19 = l_Lean_Parser_ParserState_mkNode(x_12, x_18, x_4); -return x_19; +x_16 = l_Lean_nullKind; +x_17 = l_Lean_Parser_ParserState_mkNode(x_10, x_16, x_4); +return x_17; } else { -obj* x_20; obj* x_21; obj* x_22; -x_20 = l_Lean_Parser_ParserState_restore(x_12, x_4, x_5); -x_21 = l_Lean_nullKind; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); -return x_22; +obj* x_18; obj* x_19; obj* x_20; +x_18 = l_Lean_Parser_ParserState_restore(x_10, x_4, x_5); +x_19 = l_Lean_nullKind; +x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_4); +return x_20; } } } else { -obj* x_23; uint8 x_24; -lean::dec(x_9); +obj* x_21; uint8 x_22; +lean::dec(x_7); lean::dec(x_1); -x_23 = lean::cnstr_get(x_8, 1); -lean::inc(x_23); -x_24 = lean::nat_dec_eq(x_23, x_5); -lean::dec(x_23); -if (x_24 == 0) +x_21 = lean::cnstr_get(x_6, 1); +lean::inc(x_21); +x_22 = lean::nat_dec_eq(x_21, x_5); +lean::dec(x_21); +if (x_22 == 0) { -obj* x_25; obj* x_26; +obj* x_23; obj* x_24; lean::dec(x_5); -x_25 = l_Lean_nullKind; -x_26 = l_Lean_Parser_ParserState_mkNode(x_8, x_25, x_4); -return x_26; +x_23 = l_Lean_nullKind; +x_24 = l_Lean_Parser_ParserState_mkNode(x_6, x_23, x_4); +return x_24; } else { -obj* x_27; obj* x_28; obj* x_29; -x_27 = l_Lean_Parser_ParserState_restore(x_8, x_4, x_5); -x_28 = l_Lean_nullKind; -x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_4); -return x_29; +obj* x_25; obj* x_26; obj* x_27; +x_25 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); +x_26 = l_Lean_nullKind; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_4); +return x_27; +} } } } @@ -9687,26 +12692,107 @@ return x_2; obj* l_Lean_Parser_Term_binderType___elambda__2___rarg(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_typeAscription___elambda__1___rarg___closed__4; -x_4 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6; +obj* x_3; obj* x_4; obj* x_5; +x_3 = lean::cnstr_get(x_2, 1); +lean::inc(x_3); lean::inc(x_1); -x_5 = l_Lean_Parser_symbolFnAux(x_3, x_4, x_1, x_2); -x_6 = lean::cnstr_get(x_5, 3); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) +x_4 = l_Lean_Parser_tokenFn(x_1, x_2); +x_5 = lean::cnstr_get(x_4, 3); +lean::inc(x_5); +if (lean::obj_tag(x_5) == 0) { -obj* x_7; obj* x_8; obj* x_9; -x_7 = l_Lean_Parser_termParserAttribute; -x_8 = lean::mk_nat_obj(0u); -x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); -return x_9; +obj* x_6; obj* x_7; +x_6 = lean::cnstr_get(x_4, 0); +lean::inc(x_6); +x_7 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_6); +lean::dec(x_6); +if (lean::obj_tag(x_7) == 2) +{ +obj* x_8; obj* x_9; uint8 x_10; +x_8 = lean::cnstr_get(x_7, 1); +lean::inc(x_8); +lean::dec(x_7); +x_9 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__4; +x_10 = lean::string_dec_eq(x_8, x_9); +lean::dec(x_8); +if (x_10 == 0) +{ +obj* x_11; obj* x_12; obj* x_13; +x_11 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_12 = l_Lean_Parser_ParserState_mkErrorsAt(x_4, x_11, x_3); +x_13 = lean::cnstr_get(x_12, 3); +lean::inc(x_13); +if (lean::obj_tag(x_13) == 0) +{ +obj* x_14; obj* x_15; obj* x_16; +x_14 = l_Lean_Parser_termParserAttribute; +x_15 = lean::mk_nat_obj(0u); +x_16 = l_Lean_Parser_ParserAttribute_runParser(x_14, x_15, x_1, x_12); +return x_16; } else { -lean::dec(x_6); +lean::dec(x_13); lean::dec(x_1); -return x_5; +return x_12; +} +} +else +{ +obj* x_17; obj* x_18; obj* x_19; +lean::dec(x_3); +x_17 = l_Lean_Parser_termParserAttribute; +x_18 = lean::mk_nat_obj(0u); +x_19 = l_Lean_Parser_ParserAttribute_runParser(x_17, x_18, x_1, x_4); +return x_19; +} +} +else +{ +obj* x_20; obj* x_21; obj* x_22; +lean::dec(x_7); +x_20 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_4, x_20, x_3); +x_22 = lean::cnstr_get(x_21, 3); +lean::inc(x_22); +if (lean::obj_tag(x_22) == 0) +{ +obj* x_23; obj* x_24; obj* x_25; +x_23 = l_Lean_Parser_termParserAttribute; +x_24 = lean::mk_nat_obj(0u); +x_25 = l_Lean_Parser_ParserAttribute_runParser(x_23, x_24, x_1, x_21); +return x_25; +} +else +{ +lean::dec(x_22); +lean::dec(x_1); +return x_21; +} +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; +lean::dec(x_5); +x_26 = l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_4, x_26, x_3); +x_28 = lean::cnstr_get(x_27, 3); +lean::inc(x_28); +if (lean::obj_tag(x_28) == 0) +{ +obj* x_29; obj* x_30; obj* x_31; +x_29 = l_Lean_Parser_termParserAttribute; +x_30 = lean::mk_nat_obj(0u); +x_31 = l_Lean_Parser_ParserAttribute_runParser(x_29, x_30, x_1, x_27); +return x_31; +} +else +{ +lean::dec(x_28); +lean::dec(x_1); +return x_27; +} } } } @@ -9833,35 +12919,91 @@ return x_3; obj* l_Lean_Parser_Term_binderDefault___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_binderDefault___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_binderDefault___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_binderDefault___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_binderDefault___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -9931,35 +13073,91 @@ return x_3; obj* l_Lean_Parser_Term_binderTactic___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_structInst___elambda__1___closed__6; -x_6 = l_Lean_Parser_Term_structInst___elambda__1___closed__10; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_binderTactic___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_structInst___elambda__1___closed__6; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_structInst___elambda__1___closed__9; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_structInst___elambda__1___closed__9; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_structInst___elambda__1___closed__9; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_binderTactic___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_binderTactic___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_binderTactic___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -10340,71 +13538,181 @@ return x_3; obj* l_Lean_Parser_Term_instBinder___elambda__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_3; obj* x_4; obj* x_5; obj* x_42; obj* x_43; obj* x_44; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_list___elambda__1___closed__3; -x_6 = l_Lean_Parser_Term_list___elambda__1___closed__6; +x_42 = lean::cnstr_get(x_2, 1); +lean::inc(x_42); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); +x_43 = l_Lean_Parser_tokenFn(x_1, x_2); +x_44 = lean::cnstr_get(x_43, 3); +lean::inc(x_44); +if (lean::obj_tag(x_44) == 0) +{ +obj* x_45; obj* x_46; +x_45 = lean::cnstr_get(x_43, 0); +lean::inc(x_45); +x_46 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_45); +lean::dec(x_45); +if (lean::obj_tag(x_46) == 2) +{ +obj* x_47; obj* x_48; uint8 x_49; +x_47 = lean::cnstr_get(x_46, 1); +lean::inc(x_47); +lean::dec(x_46); +x_48 = l_Lean_Parser_Term_list___elambda__1___closed__3; +x_49 = lean::string_dec_eq(x_47, x_48); +lean::dec(x_47); +if (x_49 == 0) +{ +obj* x_50; obj* x_51; +x_50 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_51 = l_Lean_Parser_ParserState_mkErrorsAt(x_43, x_50, x_42); +x_5 = x_51; +goto block_41; +} +else +{ +lean::dec(x_42); +x_5 = x_43; +goto block_41; +} +} +else +{ +obj* x_52; obj* x_53; +lean::dec(x_46); +x_52 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_53 = l_Lean_Parser_ParserState_mkErrorsAt(x_43, x_52, x_42); +x_5 = x_53; +goto block_41; +} +} +else +{ +obj* x_54; obj* x_55; +lean::dec(x_44); +x_54 = l_Lean_Parser_Term_list___elambda__1___closed__10; +x_55 = l_Lean_Parser_ParserState_mkErrorsAt(x_43, x_54, x_42); +x_5 = x_55; +goto block_41; +} +block_41: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; +lean::inc(x_1); +x_7 = l_Lean_Parser_Term_optIdent___elambda__1___rarg(x_1, x_5); x_8 = lean::cnstr_get(x_7, 3); lean::inc(x_8); if (lean::obj_tag(x_8) == 0) { -obj* x_9; obj* x_10; +obj* x_9; obj* x_10; obj* x_11; obj* x_12; +x_9 = l_Lean_Parser_termParserAttribute; +x_10 = lean::mk_nat_obj(0u); lean::inc(x_1); -x_9 = l_Lean_Parser_Term_optIdent___elambda__1___rarg(x_1, x_7); -x_10 = lean::cnstr_get(x_9, 3); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) +x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) { -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = l_Lean_Parser_termParserAttribute; -x_12 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_13 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_1, x_9); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) +obj* x_13; obj* x_14; obj* x_15; +x_13 = lean::cnstr_get(x_11, 1); +lean::inc(x_13); +x_14 = l_Lean_Parser_tokenFn(x_1, x_11); +x_15 = lean::cnstr_get(x_14, 3); +lean::inc(x_15); +if (lean::obj_tag(x_15) == 0) { -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_16 = l_Lean_Parser_Term_list___elambda__1___closed__8; -x_17 = l_Lean_Parser_symbolFnAux(x_15, x_16, x_1, x_13); -x_18 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_4); -return x_19; +obj* x_16; obj* x_17; +x_16 = lean::cnstr_get(x_14, 0); +lean::inc(x_16); +x_17 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_16); +lean::dec(x_16); +if (lean::obj_tag(x_17) == 2) +{ +obj* x_18; obj* x_19; uint8 x_20; +x_18 = lean::cnstr_get(x_17, 1); +lean::inc(x_18); +lean::dec(x_17); +x_19 = l_Lean_Parser_Term_list___elambda__1___closed__4; +x_20 = lean::string_dec_eq(x_18, x_19); +lean::dec(x_18); +if (x_20 == 0) +{ +obj* x_21; obj* x_22; obj* x_23; obj* x_24; +x_21 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_22 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_21, x_13); +x_23 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_4); +return x_24; } else { -obj* x_20; obj* x_21; -lean::dec(x_14); +obj* x_25; obj* x_26; +lean::dec(x_13); +x_25 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_14, x_25, x_4); +return x_26; +} +} +else +{ +obj* x_27; obj* x_28; obj* x_29; obj* x_30; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_27, x_13); +x_29 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_4); +return x_30; +} +} +else +{ +obj* x_31; obj* x_32; obj* x_33; obj* x_34; +lean::dec(x_15); +x_31 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_31, x_13); +x_33 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; +x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_4); +return x_34; +} +} +else +{ +obj* x_35; obj* x_36; +lean::dec(x_12); lean::dec(x_1); -x_20 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; -x_21 = l_Lean_Parser_ParserState_mkNode(x_13, x_20, x_4); -return x_21; +x_35 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; +x_36 = l_Lean_Parser_ParserState_mkNode(x_11, x_35, x_4); +return x_36; } } else { -obj* x_22; obj* x_23; -lean::dec(x_10); -lean::dec(x_1); -x_22 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_9, x_22, x_4); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; +obj* x_37; obj* x_38; lean::dec(x_8); lean::dec(x_1); -x_24 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; -x_25 = l_Lean_Parser_ParserState_mkNode(x_7, x_24, x_4); -return x_25; +x_37 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; +x_38 = l_Lean_Parser_ParserState_mkNode(x_7, x_37, x_4); +return x_38; +} +} +else +{ +obj* x_39; obj* x_40; +lean::dec(x_6); +lean::dec(x_1); +x_39 = l_Lean_Parser_Term_instBinder___elambda__1___rarg___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_5, x_39, x_4); +return x_40; +} } } } @@ -10671,7 +13979,7 @@ obj* _init_l_Lean_Parser_Term_depArrow___elambda__1___closed__8() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_depArrow___elambda__1___closed__5; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -10682,7 +13990,7 @@ _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = l_Lean_Parser_Term_depArrow___elambda__1___closed__8; -x_2 = l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; +x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -10691,7 +13999,7 @@ obj* _init_l_Lean_Parser_Term_depArrow___elambda__1___closed__10() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_depArrow___elambda__1___closed__9; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_depArrow___elambda__1___closed__7; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -10711,9 +14019,11 @@ obj* _init_l_Lean_Parser_Term_depArrow___elambda__1___closed__12() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__1; -x_2 = l_Lean_Parser_Term_depArrow___elambda__1___closed__5; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_depArrow___elambda__1___closed__11; +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; } } @@ -10721,7 +14031,29 @@ obj* _init_l_Lean_Parser_Term_depArrow___elambda__1___closed__13() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_depArrow___elambda__1___closed__12; +x_1 = l_Lean_Parser_Term_depArrow___elambda__1___closed__9; +x_2 = l_Lean_Parser_Term_depArrow___elambda__1___closed__12; +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_Term_depArrow___elambda__1___closed__14() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__1; +x_2 = l_Lean_Parser_Term_depArrow___elambda__1___closed__5; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_depArrow___elambda__1___closed__15() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_depArrow___elambda__1___closed__14; x_2 = l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__2; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -10749,8 +14081,8 @@ 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_Term_depArrow___elambda__1___closed__5; x_11 = l_Lean_Parser_Term_depArrow___elambda__1___closed__7; x_12 = lean::mk_nat_obj(25u); -x_13 = l_Lean_Parser_Term_depArrow___elambda__1___closed__11; -x_14 = l_Lean_Parser_Term_depArrow___elambda__1___closed__13; +x_13 = l_Lean_Parser_Term_depArrow___elambda__1___closed__13; +x_14 = l_Lean_Parser_Term_depArrow___elambda__1___closed__15; lean::inc(x_2); x_15 = l_Lean_Parser_unicodeSymbolCheckPrecFnAux(x_10, x_11, x_12, x_13, x_14, x_1, x_2, x_8); lean::dec(x_1); @@ -10912,7 +14244,7 @@ else obj* x_13; obj* x_14; lean::dec(x_3); x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkError(x_8, x_13); +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); return x_14; } } @@ -11089,7 +14421,7 @@ obj* x_15; obj* x_16; lean::dec(x_3); lean::dec(x_2); x_15 = l_Lean_Parser_manyAux___main___closed__1; -x_16 = l_Lean_Parser_ParserState_mkError(x_10, x_15); +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); return x_16; } } @@ -11145,7 +14477,7 @@ obj* x_28; obj* x_29; lean::dec(x_3); lean::dec(x_2); x_28 = l_Lean_Parser_manyAux___main___closed__1; -x_29 = l_Lean_Parser_ParserState_mkError(x_23, x_28); +x_29 = l_Lean_Parser_ParserState_mkUnexpectedError(x_23, x_28); return x_29; } } @@ -11211,7 +14543,7 @@ obj* _init_l_Lean_Parser_Term_forall___elambda__1___closed__6() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_forall___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -11247,10 +14579,22 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_forall___elambda__1___closed__10() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_forall___elambda__1___closed__9; +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* l_Lean_Parser_Term_forall___elambda__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; obj* x_12; +obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; x_4 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___spec__1___closed__1; x_5 = lean::cnstr_get(x_4, 1); lean::inc(x_5); @@ -11258,179 +14602,244 @@ x_6 = lean::cnstr_get(x_3, 0); lean::inc(x_6); x_7 = lean::array_get_size(x_6); lean::dec(x_6); -x_8 = l_Lean_Parser_Term_forall___elambda__1___closed__4; -x_9 = l_Lean_Parser_Term_forall___elambda__1___closed__5; -x_10 = l_Lean_Parser_Term_forall___elambda__1___closed__9; +x_56 = l_Lean_Parser_Term_forall___elambda__1___closed__4; +x_57 = l_Lean_Parser_Term_forall___elambda__1___closed__5; +x_58 = l_Lean_Parser_Term_forall___elambda__1___closed__10; lean::inc(x_2); -x_11 = l_Lean_Parser_unicodeSymbolFnAux(x_8, x_9, x_10, x_2, x_3); +x_59 = l_Lean_Parser_unicodeSymbolFnAux(x_56, x_57, x_58, x_2, x_3); +x_60 = lean::cnstr_get(x_59, 3); +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_59, 0); +lean::inc(x_61); +x_62 = lean::array_get_size(x_61); +lean::dec(x_61); +x_63 = lean::cnstr_get(x_59, 1); +lean::inc(x_63); +lean::inc(x_2); +x_64 = l_Lean_Parser_Term_simpleBinder___elambda__1(x_1, x_2, x_59); +x_65 = lean::cnstr_get(x_64, 3); +lean::inc(x_65); +if (lean::obj_tag(x_65) == 0) +{ +uint8 x_66; obj* x_67; obj* x_68; obj* x_69; +lean::dec(x_63); +lean::dec(x_5); +x_66 = 0; +lean::inc(x_2); +x_67 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___spec__1(x_66, x_1, x_2, x_64); +x_68 = l_Lean_nullKind; +x_69 = l_Lean_Parser_ParserState_mkNode(x_67, x_68, x_62); +x_8 = x_69; +goto block_55; +} +else +{ +obj* x_70; obj* x_71; uint8 x_72; +x_70 = lean::cnstr_get(x_65, 0); +lean::inc(x_70); +lean::dec(x_65); +x_71 = lean::cnstr_get(x_64, 1); +lean::inc(x_71); +x_72 = lean::nat_dec_eq(x_71, x_63); +lean::dec(x_71); +if (x_72 == 0) +{ +obj* x_73; obj* x_74; +lean::dec(x_70); +lean::dec(x_63); +lean::dec(x_5); +lean::dec(x_1); +x_73 = l_Lean_nullKind; +x_74 = l_Lean_Parser_ParserState_mkNode(x_64, x_73, x_62); +x_8 = x_74; +goto block_55; +} +else +{ +obj* x_75; obj* x_76; obj* x_77; obj* x_78; +lean::inc(x_63); +x_75 = l_Lean_Parser_ParserState_restore(x_64, x_62, x_63); +lean::inc(x_2); +lean::inc(x_1); +x_76 = lean::apply_3(x_5, x_1, x_2, x_75); +x_77 = l_Lean_Parser_mergeOrElseErrors(x_76, x_70, x_63); +lean::dec(x_63); +x_78 = lean::cnstr_get(x_77, 3); +lean::inc(x_78); +if (lean::obj_tag(x_78) == 0) +{ +uint8 x_79; obj* x_80; obj* x_81; obj* x_82; +x_79 = 0; +lean::inc(x_2); +x_80 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___spec__1(x_79, x_1, x_2, x_77); +x_81 = l_Lean_nullKind; +x_82 = l_Lean_Parser_ParserState_mkNode(x_80, x_81, x_62); +x_8 = x_82; +goto block_55; +} +else +{ +obj* x_83; obj* x_84; +lean::dec(x_78); +lean::dec(x_1); +x_83 = l_Lean_nullKind; +x_84 = l_Lean_Parser_ParserState_mkNode(x_77, x_83, x_62); +x_8 = x_84; +goto block_55; +} +} +} +} +else +{ +obj* x_85; obj* x_86; +lean::dec(x_60); +lean::dec(x_5); +lean::dec(x_2); +lean::dec(x_1); +x_85 = l_Lean_Parser_Term_forall___elambda__1___closed__2; +x_86 = l_Lean_Parser_ParserState_mkNode(x_59, x_85, x_7); +return x_86; +} +block_55: +{ +obj* x_9; +x_9 = lean::cnstr_get(x_8, 3); +lean::inc(x_9); +if (lean::obj_tag(x_9) == 0) +{ +obj* x_10; obj* x_11; obj* x_12; +x_10 = lean::cnstr_get(x_8, 1); +lean::inc(x_10); +lean::inc(x_2); +x_11 = l_Lean_Parser_tokenFn(x_2, x_8); x_12 = lean::cnstr_get(x_11, 3); lean::inc(x_12); if (lean::obj_tag(x_12) == 0) { -obj* x_13; obj* x_14; obj* x_15; obj* x_52; obj* x_53; obj* x_54; +obj* x_13; obj* x_14; x_13 = lean::cnstr_get(x_11, 0); lean::inc(x_13); -x_14 = lean::array_get_size(x_13); +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_13); lean::dec(x_13); -x_52 = lean::cnstr_get(x_11, 1); -lean::inc(x_52); -lean::inc(x_2); -x_53 = l_Lean_Parser_Term_simpleBinder___elambda__1(x_1, x_2, x_11); -x_54 = lean::cnstr_get(x_53, 3); -lean::inc(x_54); -if (lean::obj_tag(x_54) == 0) +if (lean::obj_tag(x_14) == 2) { -lean::dec(x_52); -lean::dec(x_5); -x_15 = x_53; -goto block_51; +obj* x_15; obj* x_16; uint8 x_17; +x_15 = lean::cnstr_get(x_14, 1); +lean::inc(x_15); +lean::dec(x_14); +x_16 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; +x_17 = lean::string_dec_eq(x_15, x_16); +lean::dec(x_15); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; obj* x_20; +x_18 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_18, x_10); +x_20 = lean::cnstr_get(x_19, 3); +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; +x_21 = l_Lean_Parser_termParserAttribute; +x_22 = lean::mk_nat_obj(0u); +x_23 = l_Lean_Parser_ParserAttribute_runParser(x_21, x_22, x_2, x_19); +x_24 = l_Lean_Parser_Term_forall___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_7); +return x_25; } else { -obj* x_55; obj* x_56; uint8 x_57; -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -lean::dec(x_54); -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -x_57 = lean::nat_dec_eq(x_56, x_52); -lean::dec(x_56); -if (x_57 == 0) -{ -lean::dec(x_55); -lean::dec(x_52); -lean::dec(x_5); -x_15 = x_53; -goto block_51; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; -lean::inc(x_52); -x_58 = l_Lean_Parser_ParserState_restore(x_53, x_14, x_52); -lean::inc(x_2); -lean::inc(x_1); -x_59 = lean::apply_3(x_5, x_1, x_2, x_58); -x_60 = l_Lean_Parser_mergeOrElseErrors(x_59, x_55, x_52); -lean::dec(x_52); -x_15 = x_60; -goto block_51; -} -} -block_51: -{ -obj* x_16; -x_16 = lean::cnstr_get(x_15, 3); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = 0; -lean::inc(x_2); -x_18 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___spec__1(x_17, x_1, x_2, x_15); -x_19 = l_Lean_nullKind; -x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_14); -x_21 = lean::cnstr_get(x_20, 3); -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 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_23 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; -lean::inc(x_2); -x_24 = l_Lean_Parser_symbolFnAux(x_22, x_23, x_2, x_20); -x_25 = lean::cnstr_get(x_24, 3); -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; -x_26 = l_Lean_Parser_termParserAttribute; -x_27 = lean::mk_nat_obj(0u); -x_28 = l_Lean_Parser_ParserAttribute_runParser(x_26, x_27, x_2, x_24); -x_29 = l_Lean_Parser_Term_forall___elambda__1___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_7); -return x_30; -} -else -{ -obj* x_31; obj* x_32; -lean::dec(x_25); +obj* x_26; obj* x_27; +lean::dec(x_20); lean::dec(x_2); +x_26 = l_Lean_Parser_Term_forall___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_19, x_26, x_7); +return x_27; +} +} +else +{ +obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_10); +x_28 = l_Lean_Parser_termParserAttribute; +x_29 = lean::mk_nat_obj(0u); +x_30 = l_Lean_Parser_ParserAttribute_runParser(x_28, x_29, x_2, x_11); x_31 = l_Lean_Parser_Term_forall___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_24, x_31, x_7); +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_7); return x_32; } } else { -obj* x_33; obj* x_34; -lean::dec(x_21); +obj* x_33; obj* x_34; obj* x_35; +lean::dec(x_14); +x_33 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +x_34 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_33, x_10); +x_35 = lean::cnstr_get(x_34, 3); +lean::inc(x_35); +if (lean::obj_tag(x_35) == 0) +{ +obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; +x_36 = l_Lean_Parser_termParserAttribute; +x_37 = lean::mk_nat_obj(0u); +x_38 = l_Lean_Parser_ParserAttribute_runParser(x_36, x_37, x_2, x_34); +x_39 = l_Lean_Parser_Term_forall___elambda__1___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_7); +return x_40; +} +else +{ +obj* x_41; obj* x_42; +lean::dec(x_35); lean::dec(x_2); -x_33 = l_Lean_Parser_Term_forall___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_20, x_33, x_7); -return x_34; +x_41 = l_Lean_Parser_Term_forall___elambda__1___closed__2; +x_42 = l_Lean_Parser_ParserState_mkNode(x_34, x_41, x_7); +return x_42; +} } } else { -obj* x_35; obj* x_36; obj* x_37; -lean::dec(x_16); -lean::dec(x_1); -x_35 = l_Lean_nullKind; -x_36 = l_Lean_Parser_ParserState_mkNode(x_15, x_35, x_14); -x_37 = lean::cnstr_get(x_36, 3); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) +obj* x_43; obj* x_44; obj* x_45; +lean::dec(x_12); +x_43 = l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4; +x_44 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_43, x_10); +x_45 = lean::cnstr_get(x_44, 3); +lean::inc(x_45); +if (lean::obj_tag(x_45) == 0) { -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1; -x_39 = l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3; -lean::inc(x_2); -x_40 = l_Lean_Parser_symbolFnAux(x_38, x_39, x_2, x_36); -x_41 = lean::cnstr_get(x_40, 3); -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; -x_42 = l_Lean_Parser_termParserAttribute; -x_43 = lean::mk_nat_obj(0u); -x_44 = l_Lean_Parser_ParserAttribute_runParser(x_42, x_43, x_2, x_40); -x_45 = l_Lean_Parser_Term_forall___elambda__1___closed__2; -x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_7); -return x_46; -} -else -{ -obj* x_47; obj* x_48; -lean::dec(x_41); -lean::dec(x_2); -x_47 = l_Lean_Parser_Term_forall___elambda__1___closed__2; -x_48 = l_Lean_Parser_ParserState_mkNode(x_40, x_47, x_7); -return x_48; -} -} -else -{ -obj* x_49; obj* x_50; -lean::dec(x_37); -lean::dec(x_2); +obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; +x_46 = l_Lean_Parser_termParserAttribute; +x_47 = lean::mk_nat_obj(0u); +x_48 = l_Lean_Parser_ParserAttribute_runParser(x_46, x_47, x_2, x_44); x_49 = l_Lean_Parser_Term_forall___elambda__1___closed__2; -x_50 = l_Lean_Parser_ParserState_mkNode(x_36, x_49, x_7); +x_50 = l_Lean_Parser_ParserState_mkNode(x_48, x_49, x_7); return x_50; } +else +{ +obj* x_51; obj* x_52; +lean::dec(x_45); +lean::dec(x_2); +x_51 = l_Lean_Parser_Term_forall___elambda__1___closed__2; +x_52 = l_Lean_Parser_ParserState_mkNode(x_44, x_51, x_7); +return x_52; } } } else { -obj* x_61; obj* x_62; -lean::dec(x_12); -lean::dec(x_5); +obj* x_53; obj* x_54; +lean::dec(x_9); lean::dec(x_2); -lean::dec(x_1); -x_61 = l_Lean_Parser_Term_forall___elambda__1___closed__2; -x_62 = l_Lean_Parser_ParserState_mkNode(x_11, x_61, x_7); -return x_62; +x_53 = l_Lean_Parser_Term_forall___elambda__1___closed__2; +x_54 = l_Lean_Parser_ParserState_mkNode(x_8, x_53, x_7); +return x_54; +} } } } @@ -11603,8 +15012,8 @@ obj* _init_l_Lean_Parser_Term_matchAlt___elambda__1___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -11623,9 +15032,11 @@ obj* _init_l_Lean_Parser_Term_matchAlt___elambda__1___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__6; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__8; +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; } } @@ -11633,82 +15044,253 @@ obj* _init_l_Lean_Parser_Term_matchAlt___elambda__1___closed__10() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__9; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_matchAlt___elambda__1___closed__11() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__10; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_matchAlt___elambda__1___closed__12() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__11; +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* l_Lean_Parser_Term_matchAlt___elambda__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_4; obj* x_5; obj* x_6; obj* x_60; obj* x_61; obj* x_62; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__8; +x_60 = lean::cnstr_get(x_3, 1); +lean::inc(x_60); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_61 = l_Lean_Parser_tokenFn(x_2, x_3); +x_62 = lean::cnstr_get(x_61, 3); +lean::inc(x_62); +if (lean::obj_tag(x_62) == 0) { -uint8 x_10; uint8 x_11; obj* x_12; obj* x_13; -x_10 = 0; -x_11 = 0; -lean::inc(x_2); -x_12 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_10, x_11, x_1, x_2, x_8); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +obj* x_63; obj* x_64; +x_63 = lean::cnstr_get(x_61, 0); +lean::inc(x_63); +x_64 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_63); +lean::dec(x_63); +if (lean::obj_tag(x_64) == 2) { -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__6; -x_15 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__10; +obj* x_65; obj* x_66; uint8 x_67; +x_65 = lean::cnstr_get(x_64, 1); +lean::inc(x_65); +lean::dec(x_64); +x_66 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; +x_67 = lean::string_dec_eq(x_65, x_66); +lean::dec(x_65); +if (x_67 == 0) +{ +obj* x_68; obj* x_69; +x_68 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_69 = l_Lean_Parser_ParserState_mkErrorsAt(x_61, x_68, x_60); +x_6 = x_69; +goto block_59; +} +else +{ +lean::dec(x_60); +x_6 = x_61; +goto block_59; +} +} +else +{ +obj* x_70; obj* x_71; +lean::dec(x_64); +x_70 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_71 = l_Lean_Parser_ParserState_mkErrorsAt(x_61, x_70, x_60); +x_6 = x_71; +goto block_59; +} +} +else +{ +obj* x_72; obj* x_73; +lean::dec(x_62); +x_72 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_73 = l_Lean_Parser_ParserState_mkErrorsAt(x_61, x_72, x_60); +x_6 = x_73; +goto block_59; +} +block_59: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +uint8 x_8; uint8 x_9; obj* x_10; obj* x_11; +x_8 = 0; +x_9 = 0; lean::inc(x_2); -x_16 = l_Lean_Parser_symbolFnAux(x_14, x_15, x_2, x_12); -x_17 = lean::cnstr_get(x_16, 3); +x_10 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_8, x_9, x_1, x_2, x_6); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +obj* x_12; obj* x_13; obj* x_14; +x_12 = lean::cnstr_get(x_10, 1); +lean::inc(x_12); +lean::inc(x_2); +x_13 = l_Lean_Parser_tokenFn(x_2, x_10); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +if (lean::obj_tag(x_14) == 0) +{ +obj* x_15; obj* x_16; +x_15 = lean::cnstr_get(x_13, 0); +lean::inc(x_15); +x_16 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_15); +lean::dec(x_15); +if (lean::obj_tag(x_16) == 2) +{ +obj* x_17; obj* x_18; uint8 x_19; +x_17 = lean::cnstr_get(x_16, 1); 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; -x_18 = l_Lean_Parser_termParserAttribute; -x_19 = lean::mk_nat_obj(0u); -x_20 = l_Lean_Parser_ParserAttribute_runParser(x_18, x_19, x_2, x_16); -x_21 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); -return x_22; -} -else -{ -obj* x_23; obj* x_24; +lean::dec(x_16); +x_18 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__6; +x_19 = lean::string_dec_eq(x_17, x_18); lean::dec(x_17); +if (x_19 == 0) +{ +obj* x_20; obj* x_21; obj* x_22; +x_20 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__9; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12); +x_22 = lean::cnstr_get(x_21, 3); +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 = l_Lean_Parser_termParserAttribute; +x_24 = lean::mk_nat_obj(0u); +x_25 = l_Lean_Parser_ParserAttribute_runParser(x_23, x_24, x_2, x_21); +x_26 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_5); +return x_27; +} +else +{ +obj* x_28; obj* x_29; +lean::dec(x_22); lean::dec(x_2); -x_23 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_16, x_23, x_5); -return x_24; +x_28 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_21, x_28, x_5); +return x_29; } } else { -obj* x_25; obj* x_26; -lean::dec(x_13); -lean::dec(x_2); -x_25 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_12, x_25, x_5); -return x_26; +obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; +lean::dec(x_12); +x_30 = l_Lean_Parser_termParserAttribute; +x_31 = lean::mk_nat_obj(0u); +x_32 = l_Lean_Parser_ParserAttribute_runParser(x_30, x_31, x_2, x_13); +x_33 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_5); +return x_34; } } else { -obj* x_27; obj* x_28; -lean::dec(x_9); +obj* x_35; obj* x_36; obj* x_37; +lean::dec(x_16); +x_35 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__9; +x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_35, x_12); +x_37 = lean::cnstr_get(x_36, 3); +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 = l_Lean_Parser_termParserAttribute; +x_39 = lean::mk_nat_obj(0u); +x_40 = l_Lean_Parser_ParserAttribute_runParser(x_38, x_39, x_2, x_36); +x_41 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_5); +return x_42; +} +else +{ +obj* x_43; obj* x_44; +lean::dec(x_37); lean::dec(x_2); -x_27 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_8, x_27, x_5); -return x_28; +x_43 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_44 = l_Lean_Parser_ParserState_mkNode(x_36, x_43, x_5); +return x_44; +} +} +} +else +{ +obj* x_45; obj* x_46; obj* x_47; +lean::dec(x_14); +x_45 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__9; +x_46 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_45, x_12); +x_47 = lean::cnstr_get(x_46, 3); +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 = l_Lean_Parser_termParserAttribute; +x_49 = lean::mk_nat_obj(0u); +x_50 = l_Lean_Parser_ParserAttribute_runParser(x_48, x_49, x_2, x_46); +x_51 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_52 = l_Lean_Parser_ParserState_mkNode(x_50, x_51, x_5); +return x_52; +} +else +{ +obj* x_53; obj* x_54; +lean::dec(x_47); +lean::dec(x_2); +x_53 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_54 = l_Lean_Parser_ParserState_mkNode(x_46, x_53, x_5); +return x_54; +} +} +} +else +{ +obj* x_55; obj* x_56; +lean::dec(x_11); +lean::dec(x_2); +x_55 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_56 = l_Lean_Parser_ParserState_mkNode(x_10, x_55, x_5); +return x_56; +} +} +else +{ +obj* x_57; obj* x_58; +lean::dec(x_7); +lean::dec(x_2); +x_57 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_58 = l_Lean_Parser_ParserState_mkNode(x_6, x_57, x_5); +return x_58; +} } } } @@ -11882,7 +15464,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -11974,7 +15556,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -12056,8 +15638,8 @@ obj* _init_l_Lean_Parser_Term_match___elambda__1___closed__7() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_match___elambda__1___closed__4; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_match___elambda__1___closed__6; x_3 = lean::string_append(x_1, x_2); return x_3; } @@ -12076,9 +15658,11 @@ obj* _init_l_Lean_Parser_Term_match___elambda__1___closed__9() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; -x_2 = l_Lean_Parser_Term_match___elambda__1___closed__6; -x_3 = lean::string_append(x_1, x_2); +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_match___elambda__1___closed__8; +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; } } @@ -12086,193 +15670,329 @@ obj* _init_l_Lean_Parser_Term_match___elambda__1___closed__10() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_match___elambda__1___closed__9; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_match___elambda__1___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_match___elambda__1___closed__11() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_match___elambda__1___closed__10; x_2 = l_Char_HasRepr___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_match___elambda__1___closed__12() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_match___elambda__1___closed__11; +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* l_Lean_Parser_Term_match___elambda__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_4; obj* x_5; obj* x_6; obj* x_50; obj* x_79; obj* x_80; obj* x_81; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_match___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_match___elambda__1___closed__8; +x_79 = lean::cnstr_get(x_3, 1); +lean::inc(x_79); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); +x_80 = l_Lean_Parser_tokenFn(x_2, x_3); +x_81 = lean::cnstr_get(x_80, 3); +lean::inc(x_81); +if (lean::obj_tag(x_81) == 0) +{ +obj* x_82; obj* x_83; +x_82 = lean::cnstr_get(x_80, 0); +lean::inc(x_82); +x_83 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_82); +lean::dec(x_82); +if (lean::obj_tag(x_83) == 2) +{ +obj* x_84; obj* x_85; uint8 x_86; +x_84 = lean::cnstr_get(x_83, 1); +lean::inc(x_84); +lean::dec(x_83); +x_85 = l_Lean_Parser_Term_match___elambda__1___closed__4; +x_86 = lean::string_dec_eq(x_84, x_85); +lean::dec(x_84); +if (x_86 == 0) +{ +obj* x_87; obj* x_88; +x_87 = l_Lean_Parser_Term_match___elambda__1___closed__12; +x_88 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_87, x_79); +x_50 = x_88; +goto block_78; +} +else +{ +lean::dec(x_79); +x_50 = x_80; +goto block_78; +} +} +else +{ +obj* x_89; obj* x_90; +lean::dec(x_83); +x_89 = l_Lean_Parser_Term_match___elambda__1___closed__12; +x_90 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_89, x_79); +x_50 = x_90; +goto block_78; +} +} +else +{ +obj* x_91; obj* x_92; +lean::dec(x_81); +x_91 = l_Lean_Parser_Term_match___elambda__1___closed__12; +x_92 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_91, x_79); +x_50 = x_92; +goto block_78; +} +block_49: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +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; uint8 x_15; +x_8 = lean::cnstr_get(x_2, 0); +lean::inc(x_8); +x_9 = lean::cnstr_get(x_8, 2); lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; uint8 x_11; obj* x_12; obj* x_13; -x_10 = 0; -x_11 = 0; -lean::inc(x_2); -x_12 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_10, x_11, x_1, x_2, x_8); -x_13 = lean::cnstr_get(x_12, 3); +lean::dec(x_8); +x_10 = lean::cnstr_get(x_6, 1); +lean::inc(x_10); +x_11 = l_Lean_FileMap_toPosition___main(x_9, x_10); +lean::dec(x_10); +lean::dec(x_9); +x_12 = lean::cnstr_get(x_11, 1); +lean::inc(x_12); +lean::dec(x_11); +x_13 = lean::cnstr_get(x_6, 0); lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +x_14 = lean::array_get_size(x_13); +lean::dec(x_13); +x_15 = lean::nat_dec_le(x_12, x_12); +if (x_15 == 0) { -obj* x_14; obj* x_15; +obj* x_16; obj* x_17; obj* x_18; +x_16 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spec__1___closed__1; +x_17 = l_Lean_Parser_ParserState_mkError(x_6, x_16); +x_18 = lean::cnstr_get(x_17, 3); +lean::inc(x_18); +if (lean::obj_tag(x_18) == 0) +{ +obj* x_19; obj* x_20; lean::inc(x_2); -x_14 = l_Lean_Parser_Term_optType___elambda__1___rarg(x_2, x_12); -x_15 = lean::cnstr_get(x_14, 3); -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 = l_Lean_Parser_Term_match___elambda__1___closed__6; -x_17 = l_Lean_Parser_Term_match___elambda__1___closed__10; -lean::inc(x_2); -x_18 = l_Lean_Parser_symbolFnAux(x_16, x_17, x_2, x_14); -x_19 = lean::cnstr_get(x_18, 3); -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; uint8 x_27; -x_20 = lean::cnstr_get(x_2, 0); +x_19 = l_Lean_Parser_Term_matchAlt___elambda__1(x_1, x_2, x_17); +x_20 = lean::cnstr_get(x_19, 3); lean::inc(x_20); -x_21 = lean::cnstr_get(x_20, 2); -lean::inc(x_21); +if (lean::obj_tag(x_20) == 0) +{ +uint8 x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; +x_21 = 0; +x_22 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spec__1(x_12, x_21, x_1, x_2, x_19); +lean::dec(x_12); +x_23 = l_Lean_nullKind; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_14); +x_25 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_5); +return x_26; +} +else +{ +obj* x_27; obj* x_28; obj* x_29; obj* x_30; lean::dec(x_20); -x_22 = lean::cnstr_get(x_18, 1); -lean::inc(x_22); -x_23 = l_Lean_FileMap_toPosition___main(x_21, x_22); -lean::dec(x_22); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -x_25 = lean::cnstr_get(x_18, 0); -lean::inc(x_25); -x_26 = lean::array_get_size(x_25); -lean::dec(x_25); -x_27 = lean::nat_dec_le(x_24, x_24); -if (x_27 == 0) +lean::dec(x_12); +lean::dec(x_2); +x_27 = l_Lean_nullKind; +x_28 = l_Lean_Parser_ParserState_mkNode(x_19, x_27, x_14); +x_29 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_5); +return x_30; +} +} +else { -obj* x_28; obj* x_29; obj* x_30; -x_28 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spec__1___closed__1; -x_29 = l_Lean_Parser_ParserState_mkError(x_18, x_28); -x_30 = lean::cnstr_get(x_29, 3); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) +obj* x_31; obj* x_32; obj* x_33; obj* x_34; +lean::dec(x_18); +lean::dec(x_12); +lean::dec(x_2); +x_31 = l_Lean_nullKind; +x_32 = l_Lean_Parser_ParserState_mkNode(x_17, x_31, x_14); +x_33 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_5); +return x_34; +} +} +else { -obj* x_31; obj* x_32; +obj* x_35; obj* x_36; lean::inc(x_2); -x_31 = l_Lean_Parser_Term_matchAlt___elambda__1(x_1, x_2, x_29); -x_32 = lean::cnstr_get(x_31, 3); -lean::inc(x_32); -if (lean::obj_tag(x_32) == 0) +x_35 = l_Lean_Parser_Term_matchAlt___elambda__1(x_1, x_2, x_6); +x_36 = lean::cnstr_get(x_35, 3); +lean::inc(x_36); +if (lean::obj_tag(x_36) == 0) { -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_33 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spec__1(x_24, x_10, x_1, x_2, x_31); -lean::dec(x_24); -x_34 = l_Lean_nullKind; -x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_26); -x_36 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_5); -return x_37; +uint8 x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; +x_37 = 0; +x_38 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spec__2(x_12, x_37, x_1, x_2, x_35); +lean::dec(x_12); +x_39 = l_Lean_nullKind; +x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_14); +x_41 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_5); +return x_42; } else { -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -lean::dec(x_32); -lean::dec(x_24); +obj* x_43; obj* x_44; obj* x_45; obj* x_46; +lean::dec(x_36); +lean::dec(x_12); lean::dec(x_2); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_31, x_38, x_26); -x_40 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_5); -return x_41; +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_35, x_43, x_14); +x_45 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_5); +return x_46; +} } } else { -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -lean::dec(x_30); -lean::dec(x_24); +obj* x_47; obj* x_48; +lean::dec(x_7); lean::dec(x_2); -x_42 = l_Lean_nullKind; -x_43 = l_Lean_Parser_ParserState_mkNode(x_29, x_42, x_26); -x_44 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_5); -return x_45; +x_47 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_48 = l_Lean_Parser_ParserState_mkNode(x_6, x_47, x_5); +return x_48; } } -else +block_78: { -obj* x_46; obj* x_47; +obj* x_51; +x_51 = lean::cnstr_get(x_50, 3); +lean::inc(x_51); +if (lean::obj_tag(x_51) == 0) +{ +uint8 x_52; uint8 x_53; obj* x_54; obj* x_55; +x_52 = 0; +x_53 = 0; lean::inc(x_2); -x_46 = l_Lean_Parser_Term_matchAlt___elambda__1(x_1, x_2, x_18); -x_47 = lean::cnstr_get(x_46, 3); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) +x_54 = l_Lean_Parser_sepBy1Fn___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_52, x_53, x_1, x_2, x_50); +x_55 = lean::cnstr_get(x_54, 3); +lean::inc(x_55); +if (lean::obj_tag(x_55) == 0) { -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_48 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spec__2(x_24, x_10, x_1, x_2, x_46); -lean::dec(x_24); -x_49 = l_Lean_nullKind; -x_50 = l_Lean_Parser_ParserState_mkNode(x_48, x_49, x_26); -x_51 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_52 = l_Lean_Parser_ParserState_mkNode(x_50, x_51, x_5); -return x_52; -} -else +obj* x_56; obj* x_57; +lean::inc(x_2); +x_56 = l_Lean_Parser_Term_optType___elambda__1___rarg(x_2, x_54); +x_57 = lean::cnstr_get(x_56, 3); +lean::inc(x_57); +if (lean::obj_tag(x_57) == 0) { -obj* x_53; obj* x_54; obj* x_55; obj* x_56; -lean::dec(x_47); -lean::dec(x_24); -lean::dec(x_2); -x_53 = l_Lean_nullKind; -x_54 = l_Lean_Parser_ParserState_mkNode(x_46, x_53, x_26); -x_55 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_56 = l_Lean_Parser_ParserState_mkNode(x_54, x_55, x_5); -return x_56; -} -} -} -else -{ -obj* x_57; obj* x_58; -lean::dec(x_19); -lean::dec(x_2); -x_57 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_58 = l_Lean_Parser_ParserState_mkNode(x_18, x_57, x_5); -return x_58; -} -} -else -{ -obj* x_59; obj* x_60; -lean::dec(x_15); -lean::dec(x_2); -x_59 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_60 = l_Lean_Parser_ParserState_mkNode(x_14, x_59, x_5); -return x_60; -} -} -else +obj* x_58; obj* x_59; obj* x_60; +x_58 = lean::cnstr_get(x_56, 1); +lean::inc(x_58); +lean::inc(x_2); +x_59 = l_Lean_Parser_tokenFn(x_2, x_56); +x_60 = lean::cnstr_get(x_59, 3); +lean::inc(x_60); +if (lean::obj_tag(x_60) == 0) { obj* x_61; obj* x_62; -lean::dec(x_13); -lean::dec(x_2); -x_61 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_62 = l_Lean_Parser_ParserState_mkNode(x_12, x_61, x_5); -return x_62; +x_61 = lean::cnstr_get(x_59, 0); +lean::inc(x_61); +x_62 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_61); +lean::dec(x_61); +if (lean::obj_tag(x_62) == 2) +{ +obj* x_63; obj* x_64; uint8 x_65; +x_63 = lean::cnstr_get(x_62, 1); +lean::inc(x_63); +lean::dec(x_62); +x_64 = l_Lean_Parser_Term_match___elambda__1___closed__6; +x_65 = lean::string_dec_eq(x_63, x_64); +lean::dec(x_63); +if (x_65 == 0) +{ +obj* x_66; obj* x_67; +x_66 = l_Lean_Parser_Term_match___elambda__1___closed__9; +x_67 = l_Lean_Parser_ParserState_mkErrorsAt(x_59, x_66, x_58); +x_6 = x_67; +goto block_49; +} +else +{ +lean::dec(x_58); +x_6 = x_59; +goto block_49; } } else { -obj* x_63; obj* x_64; -lean::dec(x_9); +obj* x_68; obj* x_69; +lean::dec(x_62); +x_68 = l_Lean_Parser_Term_match___elambda__1___closed__9; +x_69 = l_Lean_Parser_ParserState_mkErrorsAt(x_59, x_68, x_58); +x_6 = x_69; +goto block_49; +} +} +else +{ +obj* x_70; obj* x_71; +lean::dec(x_60); +x_70 = l_Lean_Parser_Term_match___elambda__1___closed__9; +x_71 = l_Lean_Parser_ParserState_mkErrorsAt(x_59, x_70, x_58); +x_6 = x_71; +goto block_49; +} +} +else +{ +obj* x_72; obj* x_73; +lean::dec(x_57); lean::dec(x_2); -x_63 = l_Lean_Parser_Term_match___elambda__1___closed__2; -x_64 = l_Lean_Parser_ParserState_mkNode(x_8, x_63, x_5); -return x_64; +x_72 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_73 = l_Lean_Parser_ParserState_mkNode(x_56, x_72, x_5); +return x_73; +} +} +else +{ +obj* x_74; obj* x_75; +lean::dec(x_55); +lean::dec(x_2); +x_74 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_75 = l_Lean_Parser_ParserState_mkNode(x_54, x_74, x_5); +return x_75; +} +} +else +{ +obj* x_76; obj* x_77; +lean::dec(x_51); +lean::dec(x_2); +x_76 = l_Lean_Parser_Term_match___elambda__1___closed__2; +x_77 = l_Lean_Parser_ParserState_mkNode(x_50, x_76, x_5); +return x_77; +} } } } @@ -12342,7 +16062,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -12434,7 +16154,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -12678,7 +16398,7 @@ obj* _init_l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -12694,38 +16414,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_nomatch___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -12853,7 +16641,7 @@ obj* _init_l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -12869,38 +16657,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_parser_x21___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -13028,7 +16884,7 @@ obj* _init_l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -13044,38 +16900,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_tparser_x21___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(0u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -13160,7 +17084,494 @@ obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_2 = l_Lean_Parser_builtinTermParsingTable; x_3 = l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__2; x_4 = l_Lean_Parser_Term_tparser_x21; -x_5 = l_Lean_Parser_addBuiltinTrailingParser(x_2, x_3, x_4, x_1); +x_5 = l_Lean_Parser_addBuiltinLeadingParser(x_2, x_3, x_4, x_1); +return x_5; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("borrowed"); +return x_1; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_id___elambda__1___closed__2; +x_2 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__3() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("@&"); +return x_1; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__4() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__3; +x_2 = l_String_trim(x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__5() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_appPrec; +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___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__4; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__6; +x_2 = l_Char_HasRepr___closed__1; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__8() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__7; +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* l_Lean_Parser_Term_borrowed___elambda__1___rarg(obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; +x_3 = lean::cnstr_get(x_2, 0); +lean::inc(x_3); +x_4 = lean::array_get_size(x_3); +lean::dec(x_3); +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); +lean::inc(x_1); +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) +{ +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__8; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; +} +else +{ +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__8; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__8; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__5; +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); +lean::dec(x_1); +x_12 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} +} +} +} +obj* l_Lean_Parser_Term_borrowed___elambda__1(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_borrowed___elambda__1___rarg), 2, 0); +return x_2; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___closed__1() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__4; +x_2 = l_Lean_Parser_Level_paren___closed__1; +x_3 = l_Lean_Parser_symbolInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_borrowed___closed__1; +x_2 = l_Lean_Parser_Parser_inhabited___closed__1; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___closed__3() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_Parser_Term_borrowed___closed__2; +x_2 = l_Lean_Parser_nodeInfo(x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___closed__4() { +_start: +{ +obj* x_1; +x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_borrowed___elambda__1___boxed), 1, 0); +return x_1; +} +} +obj* _init_l_Lean_Parser_Term_borrowed___closed__5() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_borrowed___closed__3; +x_2 = l_Lean_Parser_Term_borrowed___closed__4; +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_borrowed() { +_start: +{ +obj* x_1; +x_1 = l_Lean_Parser_Term_borrowed___closed__5; +return x_1; +} +} +obj* l_Lean_Parser_Term_borrowed___elambda__1___boxed(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = l_Lean_Parser_Term_borrowed___elambda__1(x_1); +lean::dec(x_1); +return x_2; +} +} +obj* l___regBuiltinParser_Lean_Parser_Term_borrowed(obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_4; obj* x_5; +x_2 = l_Lean_Parser_builtinTermParsingTable; +x_3 = l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__2; +x_4 = l_Lean_Parser_Term_borrowed; +x_5 = l_Lean_Parser_addBuiltinLeadingParser(x_2, x_3, x_4, x_1); +return x_5; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("quotedName"); +return x_1; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_id___elambda__1___closed__2; +x_2 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__3() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_formatDataValue___main___closed__1; +x_2 = l_String_trim(x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__4() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__3; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__5() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__4; +x_2 = l_Char_HasRepr___closed__1; +x_3 = lean::string_append(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Term_quotedName___elambda__1___rarg(obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; obj* x_4; obj* x_5; obj* x_13; obj* x_14; obj* x_15; +x_3 = lean::cnstr_get(x_2, 0); +lean::inc(x_3); +x_4 = lean::array_get_size(x_3); +lean::dec(x_3); +x_13 = lean::cnstr_get(x_2, 1); +lean::inc(x_13); +lean::inc(x_1); +x_14 = l_Lean_Parser_tokenFn(x_1, x_2); +x_15 = lean::cnstr_get(x_14, 3); +lean::inc(x_15); +if (lean::obj_tag(x_15) == 0) +{ +obj* x_16; obj* x_17; +x_16 = lean::cnstr_get(x_14, 0); +lean::inc(x_16); +x_17 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_16); +lean::dec(x_16); +if (lean::obj_tag(x_17) == 2) +{ +obj* x_18; obj* x_19; uint8 x_20; +x_18 = lean::cnstr_get(x_17, 1); +lean::inc(x_18); +lean::dec(x_17); +x_19 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__3; +x_20 = lean::string_dec_eq(x_18, x_19); +lean::dec(x_18); +if (x_20 == 0) +{ +obj* x_21; obj* x_22; +x_21 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__6; +x_22 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_21, x_13); +x_5 = x_22; +goto block_12; +} +else +{ +lean::dec(x_13); +x_5 = x_14; +goto block_12; +} +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_17); +x_23 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_23, x_13); +x_5 = x_24; +goto block_12; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_15); +x_25 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__6; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_14, x_25, x_13); +x_5 = x_26; +goto block_12; +} +block_12: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +lean::inc(x_6); +if (lean::obj_tag(x_6) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; +x_7 = l_Lean_Parser_rawIdentFn(x_1, x_5); +lean::dec(x_1); +x_8 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__2; +x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_4); +return x_9; +} +else +{ +obj* x_10; obj* x_11; +lean::dec(x_6); +lean::dec(x_1); +x_10 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_5, x_10, x_4); +return x_11; +} +} +} +} +obj* l_Lean_Parser_Term_quotedName___elambda__1(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_quotedName___elambda__1___rarg), 2, 0); +return x_2; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___closed__1() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__3; +x_2 = l_Lean_Parser_Level_paren___closed__1; +x_3 = l_Lean_Parser_symbolInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_quotedName___closed__1; +x_2 = l_Lean_Parser_Parser_inhabited___closed__1; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___closed__3() { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_Lean_Parser_Term_quotedName___closed__2; +x_2 = l_Lean_Parser_nodeInfo(x_1); +return x_2; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___closed__4() { +_start: +{ +obj* x_1; +x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_quotedName___elambda__1___boxed), 1, 0); +return x_1; +} +} +obj* _init_l_Lean_Parser_Term_quotedName___closed__5() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_Lean_Parser_Term_quotedName___closed__3; +x_2 = l_Lean_Parser_Term_quotedName___closed__4; +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_quotedName() { +_start: +{ +obj* x_1; +x_1 = l_Lean_Parser_Term_quotedName___closed__5; +return x_1; +} +} +obj* l_Lean_Parser_Term_quotedName___elambda__1___boxed(obj* x_1) { +_start: +{ +obj* x_2; +x_2 = l_Lean_Parser_Term_quotedName___elambda__1(x_1); +lean::dec(x_1); +return x_2; +} +} +obj* l___regBuiltinParser_Lean_Parser_Term_quotedName(obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_4; obj* x_5; +x_2 = l_Lean_Parser_builtinTermParsingTable; +x_3 = l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__2; +x_4 = l_Lean_Parser_Term_quotedName; +x_5 = l_Lean_Parser_addBuiltinLeadingParser(x_2, x_3, x_4, x_1); return x_5; } } @@ -13328,7 +17739,7 @@ return x_3; obj* l_Lean_Parser_Term_letIdDecl___elambda__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_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_21; obj* x_22; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::cnstr_get(x_3, 1); @@ -13336,124 +17747,151 @@ lean::inc(x_5); x_6 = lean::array_get_size(x_4); lean::dec(x_4); lean::inc(x_2); -x_7 = l_Lean_Parser_Term_letIdLhs___elambda__1(x_1, x_2, x_3); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_21 = l_Lean_Parser_Term_letIdLhs___elambda__1(x_1, x_2, x_3); +x_22 = lean::cnstr_get(x_21, 3); +lean::inc(x_22); +if (lean::obj_tag(x_22) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_10 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +obj* x_23; obj* x_24; obj* x_25; +x_23 = lean::cnstr_get(x_21, 1); +lean::inc(x_23); lean::inc(x_2); -x_11 = l_Lean_Parser_symbolFnAux(x_9, x_10, x_2, x_7); -x_12 = lean::cnstr_get(x_11, 3); -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; -lean::dec(x_5); -x_13 = l_Lean_Parser_termParserAttribute; -x_14 = lean::mk_nat_obj(0u); -x_15 = l_Lean_Parser_ParserAttribute_runParser(x_13, x_14, x_2, x_11); -x_16 = l_Lean_Parser_Term_letIdDecl___elambda__1___closed__2; -x_17 = l_Lean_Parser_ParserState_mkNode(x_15, x_16, x_6); -return x_17; -} -else -{ -uint8 x_18; -lean::dec(x_2); -x_18 = !lean::is_exclusive(x_11); -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_11, 0); -x_20 = lean::cnstr_get(x_11, 3); -lean::dec(x_20); -x_21 = lean::cnstr_get(x_11, 1); -lean::dec(x_21); -x_22 = l_Array_shrink___main___rarg(x_19, x_6); -lean::cnstr_set(x_11, 1, x_5); -lean::cnstr_set(x_11, 0, x_22); -x_23 = l_Lean_Parser_Term_letIdDecl___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_11, x_23, x_6); -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_11, 0); -x_26 = lean::cnstr_get(x_11, 2); -lean::inc(x_26); +x_24 = l_Lean_Parser_tokenFn(x_2, x_21); +x_25 = lean::cnstr_get(x_24, 3); lean::inc(x_25); -lean::dec(x_11); -x_27 = l_Array_shrink___main___rarg(x_25, x_6); -x_28 = lean::alloc_cnstr(0, 4, 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_28, 3, x_12); -x_29 = l_Lean_Parser_Term_letIdDecl___elambda__1___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_6); -return x_30; +if (lean::obj_tag(x_25) == 0) +{ +obj* x_26; obj* x_27; +x_26 = lean::cnstr_get(x_24, 0); +lean::inc(x_26); +x_27 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_26); +lean::dec(x_26); +if (lean::obj_tag(x_27) == 2) +{ +obj* x_28; obj* x_29; uint8 x_30; +x_28 = lean::cnstr_get(x_27, 1); +lean::inc(x_28); +lean::dec(x_27); +x_29 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_30 = lean::string_dec_eq(x_28, x_29); +lean::dec(x_28); +if (x_30 == 0) +{ +obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; +x_31 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_31, x_23); +x_33 = lean::cnstr_get(x_32, 0); +lean::inc(x_33); +x_34 = lean::cnstr_get(x_32, 2); +lean::inc(x_34); +x_35 = lean::cnstr_get(x_32, 3); +lean::inc(x_35); +x_7 = x_32; +x_8 = x_33; +x_9 = x_34; +x_10 = x_35; +goto block_20; } +else +{ +obj* x_36; obj* x_37; obj* x_38; +lean::dec(x_23); +x_36 = lean::cnstr_get(x_24, 0); +lean::inc(x_36); +x_37 = lean::cnstr_get(x_24, 2); +lean::inc(x_37); +x_38 = lean::cnstr_get(x_24, 3); +lean::inc(x_38); +x_7 = x_24; +x_8 = x_36; +x_9 = x_37; +x_10 = x_38; +goto block_20; } } else { -obj* x_31; +obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; +lean::dec(x_27); +x_39 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_39, x_23); +x_41 = lean::cnstr_get(x_40, 0); +lean::inc(x_41); +x_42 = lean::cnstr_get(x_40, 2); +lean::inc(x_42); +x_43 = lean::cnstr_get(x_40, 3); +lean::inc(x_43); +x_7 = x_40; +x_8 = x_41; +x_9 = x_42; +x_10 = x_43; +goto block_20; +} +} +else +{ +obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; +lean::dec(x_25); +x_44 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_44, x_23); +x_46 = lean::cnstr_get(x_45, 0); +lean::inc(x_46); +x_47 = lean::cnstr_get(x_45, 2); +lean::inc(x_47); +x_48 = lean::cnstr_get(x_45, 3); +lean::inc(x_48); +x_7 = x_45; +x_8 = x_46; +x_9 = x_47; +x_10 = x_48; +goto block_20; +} +} +else +{ +obj* x_49; obj* x_50; obj* x_51; +lean::dec(x_22); +x_49 = lean::cnstr_get(x_21, 0); +lean::inc(x_49); +x_50 = lean::cnstr_get(x_21, 2); +lean::inc(x_50); +x_51 = lean::cnstr_get(x_21, 3); +lean::inc(x_51); +x_7 = x_21; +x_8 = x_49; +x_9 = x_50; +x_10 = x_51; +goto block_20; +} +block_20: +{ +if (lean::obj_tag(x_10) == 0) +{ +obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; +lean::dec(x_9); lean::dec(x_8); -x_31 = lean::cnstr_get(x_7, 3); -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; lean::dec(x_5); -x_32 = l_Lean_Parser_termParserAttribute; -x_33 = lean::mk_nat_obj(0u); -x_34 = l_Lean_Parser_ParserAttribute_runParser(x_32, x_33, x_2, x_7); -x_35 = l_Lean_Parser_Term_letIdDecl___elambda__1___closed__2; -x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_6); -return x_36; +x_11 = l_Lean_Parser_termParserAttribute; +x_12 = lean::mk_nat_obj(0u); +x_13 = l_Lean_Parser_ParserAttribute_runParser(x_11, x_12, x_2, x_7); +x_14 = l_Lean_Parser_Term_letIdDecl___elambda__1___closed__2; +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_6); +return x_15; } else { -uint8 x_37; -lean::dec(x_2); -x_37 = !lean::is_exclusive(x_7); -if (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_7, 0); -x_39 = lean::cnstr_get(x_7, 3); -lean::dec(x_39); -x_40 = lean::cnstr_get(x_7, 1); -lean::dec(x_40); -x_41 = l_Array_shrink___main___rarg(x_38, x_6); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 0, x_41); -x_42 = l_Lean_Parser_Term_letIdDecl___elambda__1___closed__2; -x_43 = l_Lean_Parser_ParserState_mkNode(x_7, x_42, x_6); -return x_43; -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_44 = lean::cnstr_get(x_7, 0); -x_45 = lean::cnstr_get(x_7, 2); -lean::inc(x_45); -lean::inc(x_44); +obj* x_16; obj* x_17; obj* x_18; obj* x_19; lean::dec(x_7); -x_46 = l_Array_shrink___main___rarg(x_44, x_6); -x_47 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_5); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_31); -x_48 = l_Lean_Parser_Term_letIdDecl___elambda__1___closed__2; -x_49 = l_Lean_Parser_ParserState_mkNode(x_47, x_48, x_6); -return x_49; -} +lean::dec(x_2); +x_16 = l_Array_shrink___main___rarg(x_8, x_6); +x_17 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_17, 0, x_16); +lean::cnstr_set(x_17, 1, x_5); +lean::cnstr_set(x_17, 2, x_9); +lean::cnstr_set(x_17, 3, x_10); +x_18 = l_Lean_Parser_Term_letIdDecl___elambda__1___closed__2; +x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_6); +return x_19; } } } @@ -13538,135 +17976,254 @@ return x_3; obj* l_Lean_Parser_Term_equation___elambda__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_4; obj* x_5; obj* x_6; obj* x_54; obj* x_71; obj* x_72; obj* x_73; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__8; +x_71 = lean::cnstr_get(x_3, 1); +lean::inc(x_71); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_72 = l_Lean_Parser_tokenFn(x_2, x_3); +x_73 = lean::cnstr_get(x_72, 3); +lean::inc(x_73); +if (lean::obj_tag(x_73) == 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_8, 0); -lean::inc(x_10); -x_11 = lean::array_get_size(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_termParserAttribute; -x_13 = l_Lean_Parser_appPrec; -lean::inc(x_2); -x_14 = l_Lean_Parser_ParserAttribute_runParser(x_12, x_13, x_2, x_8); -x_15 = lean::cnstr_get(x_14, 3); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) +obj* x_74; obj* x_75; +x_74 = lean::cnstr_get(x_72, 0); +lean::inc(x_74); +x_75 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_74); +lean::dec(x_74); +if (lean::obj_tag(x_75) == 2) { -uint8 x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = 0; -lean::inc(x_2); -x_17 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_fun___elambda__1___spec__1(x_16, x_1, x_2, x_14); -x_18 = l_Lean_nullKind; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_11); -x_20 = lean::cnstr_get(x_19, 3); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) +obj* x_76; obj* x_77; uint8 x_78; +x_76 = lean::cnstr_get(x_75, 1); +lean::inc(x_76); +lean::dec(x_75); +x_77 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; +x_78 = lean::string_dec_eq(x_76, x_77); +lean::dec(x_76); +if (x_78 == 0) { -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_22 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; -lean::inc(x_2); -x_23 = l_Lean_Parser_symbolFnAux(x_21, x_22, x_2, x_19); -x_24 = lean::cnstr_get(x_23, 3); -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::mk_nat_obj(0u); -x_26 = l_Lean_Parser_ParserAttribute_runParser(x_12, x_25, x_2, x_23); -x_27 = l_Lean_Parser_Term_equation___elambda__1___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_5); -return x_28; +obj* x_79; obj* x_80; +x_79 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_80 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_79, x_71); +x_54 = x_80; +goto block_70; } else { -obj* x_29; obj* x_30; -lean::dec(x_24); +lean::dec(x_71); +x_54 = x_72; +goto block_70; +} +} +else +{ +obj* x_81; obj* x_82; +lean::dec(x_75); +x_81 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_82 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_81, x_71); +x_54 = x_82; +goto block_70; +} +} +else +{ +obj* x_83; obj* x_84; +lean::dec(x_73); +x_83 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +x_84 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_83, x_71); +x_54 = x_84; +goto block_70; +} +block_53: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +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, 1); +lean::inc(x_8); +lean::inc(x_2); +x_9 = l_Lean_Parser_tokenFn(x_2, x_6); +x_10 = lean::cnstr_get(x_9, 3); +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); +x_12 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_11); +lean::dec(x_11); +if (lean::obj_tag(x_12) == 2) +{ +obj* x_13; obj* x_14; uint8 x_15; +x_13 = lean::cnstr_get(x_12, 1); +lean::inc(x_13); +lean::dec(x_12); +x_14 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_15 = lean::string_dec_eq(x_13, x_14); +lean::dec(x_13); +if (x_15 == 0) +{ +obj* x_16; obj* x_17; obj* x_18; +x_16 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_17 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_16, x_8); +x_18 = lean::cnstr_get(x_17, 3); +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 = l_Lean_Parser_termParserAttribute; +x_20 = lean::mk_nat_obj(0u); +x_21 = l_Lean_Parser_ParserAttribute_runParser(x_19, x_20, x_2, x_17); +x_22 = l_Lean_Parser_Term_equation___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +return x_23; +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_18); lean::dec(x_2); +x_24 = l_Lean_Parser_Term_equation___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_17, x_24, x_5); +return x_25; +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +lean::dec(x_8); +x_26 = l_Lean_Parser_termParserAttribute; +x_27 = lean::mk_nat_obj(0u); +x_28 = l_Lean_Parser_ParserAttribute_runParser(x_26, x_27, x_2, x_9); x_29 = l_Lean_Parser_Term_equation___elambda__1___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_23, x_29, x_5); +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_5); return x_30; } } else { -obj* x_31; obj* x_32; -lean::dec(x_20); +obj* x_31; obj* x_32; obj* x_33; +lean::dec(x_12); +x_31 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_31, x_8); +x_33 = lean::cnstr_get(x_32, 3); +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; +x_34 = l_Lean_Parser_termParserAttribute; +x_35 = lean::mk_nat_obj(0u); +x_36 = l_Lean_Parser_ParserAttribute_runParser(x_34, x_35, x_2, x_32); +x_37 = l_Lean_Parser_Term_equation___elambda__1___closed__2; +x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_5); +return x_38; +} +else +{ +obj* x_39; obj* x_40; +lean::dec(x_33); lean::dec(x_2); -x_31 = l_Lean_Parser_Term_equation___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_19, x_31, x_5); -return x_32; +x_39 = l_Lean_Parser_Term_equation___elambda__1___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_32, x_39, x_5); +return x_40; +} } } else { -obj* x_33; obj* x_34; obj* x_35; -lean::dec(x_15); -x_33 = l_Lean_nullKind; -x_34 = l_Lean_Parser_ParserState_mkNode(x_14, x_33, x_11); -x_35 = lean::cnstr_get(x_34, 3); -lean::inc(x_35); -if (lean::obj_tag(x_35) == 0) +obj* x_41; obj* x_42; obj* x_43; +lean::dec(x_10); +x_41 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_42 = l_Lean_Parser_ParserState_mkErrorsAt(x_9, x_41, x_8); +x_43 = lean::cnstr_get(x_42, 3); +lean::inc(x_43); +if (lean::obj_tag(x_43) == 0) { -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_37 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; +x_44 = l_Lean_Parser_termParserAttribute; +x_45 = lean::mk_nat_obj(0u); +x_46 = l_Lean_Parser_ParserAttribute_runParser(x_44, x_45, x_2, x_42); +x_47 = l_Lean_Parser_Term_equation___elambda__1___closed__2; +x_48 = l_Lean_Parser_ParserState_mkNode(x_46, x_47, x_5); +return x_48; +} +else +{ +obj* x_49; obj* x_50; +lean::dec(x_43); +lean::dec(x_2); +x_49 = l_Lean_Parser_Term_equation___elambda__1___closed__2; +x_50 = l_Lean_Parser_ParserState_mkNode(x_42, x_49, x_5); +return x_50; +} +} +} +else +{ +obj* x_51; obj* x_52; +lean::dec(x_7); +lean::dec(x_2); +x_51 = l_Lean_Parser_Term_equation___elambda__1___closed__2; +x_52 = l_Lean_Parser_ParserState_mkNode(x_6, x_51, x_5); +return x_52; +} +} +block_70: +{ +obj* x_55; +x_55 = lean::cnstr_get(x_54, 3); +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_54, 0); +lean::inc(x_56); +x_57 = lean::array_get_size(x_56); +lean::dec(x_56); +x_58 = l_Lean_Parser_termParserAttribute; +x_59 = l_Lean_Parser_appPrec; lean::inc(x_2); -x_38 = l_Lean_Parser_symbolFnAux(x_36, x_37, x_2, x_34); -x_39 = lean::cnstr_get(x_38, 3); -lean::inc(x_39); -if (lean::obj_tag(x_39) == 0) +x_60 = l_Lean_Parser_ParserAttribute_runParser(x_58, x_59, x_2, x_54); +x_61 = lean::cnstr_get(x_60, 3); +lean::inc(x_61); +if (lean::obj_tag(x_61) == 0) { -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_40 = lean::mk_nat_obj(0u); -x_41 = l_Lean_Parser_ParserAttribute_runParser(x_12, x_40, x_2, x_38); -x_42 = l_Lean_Parser_Term_equation___elambda__1___closed__2; -x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_5); -return x_43; +uint8 x_62; obj* x_63; obj* x_64; obj* x_65; +x_62 = 0; +lean::inc(x_2); +x_63 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_fun___elambda__1___spec__1(x_62, x_1, x_2, x_60); +x_64 = l_Lean_nullKind; +x_65 = l_Lean_Parser_ParserState_mkNode(x_63, x_64, x_57); +x_6 = x_65; +goto block_53; } else { -obj* x_44; obj* x_45; -lean::dec(x_39); -lean::dec(x_2); -x_44 = l_Lean_Parser_Term_equation___elambda__1___closed__2; -x_45 = l_Lean_Parser_ParserState_mkNode(x_38, x_44, x_5); -return x_45; +obj* x_66; obj* x_67; +lean::dec(x_61); +x_66 = l_Lean_nullKind; +x_67 = l_Lean_Parser_ParserState_mkNode(x_60, x_66, x_57); +x_6 = x_67; +goto block_53; } } else { -obj* x_46; obj* x_47; -lean::dec(x_35); +obj* x_68; obj* x_69; +lean::dec(x_55); lean::dec(x_2); -x_46 = l_Lean_Parser_Term_equation___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_34, x_46, x_5); -return x_47; +x_68 = l_Lean_Parser_Term_equation___elambda__1___closed__2; +x_69 = l_Lean_Parser_ParserState_mkNode(x_54, x_68, x_5); +return x_69; } } } -else -{ -obj* x_48; obj* x_49; -lean::dec(x_9); -lean::dec(x_2); -x_48 = l_Lean_Parser_Term_equation___elambda__1___closed__2; -x_49 = l_Lean_Parser_ParserState_mkNode(x_8, x_48, x_5); -return x_49; -} -} } obj* _init_l_Lean_Parser_Term_equation___closed__1() { _start: @@ -13818,7 +18375,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -13910,7 +18467,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -13957,7 +18514,7 @@ return x_3; obj* l_Lean_Parser_Term_letEqns___elambda__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_51; obj* x_52; +obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_51; obj* x_63; obj* x_64; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::cnstr_get(x_3, 1); @@ -13966,174 +18523,131 @@ x_6 = lean::array_get_size(x_4); lean::dec(x_4); lean::inc(x_2); lean::inc(x_1); -x_51 = l_Lean_Parser_Term_letIdLhs___elambda__1(x_1, x_2, x_3); -x_52 = lean::cnstr_get(x_51, 3); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) +x_63 = l_Lean_Parser_Term_letIdLhs___elambda__1(x_1, x_2, x_3); +x_64 = lean::cnstr_get(x_63, 3); +lean::inc(x_64); +if (lean::obj_tag(x_64) == 0) { -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_51, 0); -lean::inc(x_53); -x_54 = lean::array_get_size(x_53); -lean::dec(x_53); -x_55 = lean::cnstr_get(x_51, 1); -lean::inc(x_55); -x_56 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; -x_57 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__8; -lean::inc(x_2); -x_58 = l_Lean_Parser_symbolFnAux(x_56, x_57, x_2, x_51); -x_59 = lean::cnstr_get(x_58, 3); -lean::inc(x_59); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; obj* x_61; -x_60 = l_Lean_Parser_ParserState_restore(x_58, x_54, x_55); -lean::dec(x_54); -x_61 = lean::cnstr_get(x_60, 3); -lean::inc(x_61); -if (lean::obj_tag(x_61) == 0) -{ -lean::dec(x_5); -x_7 = x_60; -goto block_50; -} -else -{ -uint8 x_62; -x_62 = !lean::is_exclusive(x_60); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_63 = lean::cnstr_get(x_60, 0); -x_64 = lean::cnstr_get(x_60, 3); -lean::dec(x_64); -x_65 = lean::cnstr_get(x_60, 1); +obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; +x_65 = lean::cnstr_get(x_63, 0); +lean::inc(x_65); +x_66 = lean::array_get_size(x_65); lean::dec(x_65); -x_66 = l_Array_shrink___main___rarg(x_63, x_6); -lean::cnstr_set(x_60, 1, x_5); -lean::cnstr_set(x_60, 0, x_66); -x_7 = x_60; -goto block_50; -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_67 = lean::cnstr_get(x_60, 0); -x_68 = lean::cnstr_get(x_60, 2); -lean::inc(x_68); +x_67 = lean::cnstr_get(x_63, 1); lean::inc(x_67); -lean::dec(x_60); -x_69 = l_Array_shrink___main___rarg(x_67, x_6); -x_70 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_5); -lean::cnstr_set(x_70, 2, x_68); -lean::cnstr_set(x_70, 3, x_61); -x_7 = x_70; -goto block_50; -} -} -} -else +lean::inc(x_2); +x_68 = l_Lean_Parser_tokenFn(x_2, x_63); +x_69 = lean::cnstr_get(x_68, 3); +lean::inc(x_69); +if (lean::obj_tag(x_69) == 0) { -obj* x_71; -lean::dec(x_59); -lean::dec(x_55); -lean::dec(x_54); -x_71 = lean::cnstr_get(x_58, 3); -lean::inc(x_71); -if (lean::obj_tag(x_71) == 0) +obj* x_70; obj* x_71; +x_70 = lean::cnstr_get(x_68, 0); +lean::inc(x_70); +x_71 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_70); +lean::dec(x_70); +if (lean::obj_tag(x_71) == 2) { -lean::dec(x_5); -x_7 = x_58; -goto block_50; -} -else +obj* x_72; obj* x_73; uint8 x_74; +x_72 = lean::cnstr_get(x_71, 1); +lean::inc(x_72); +lean::dec(x_71); +x_73 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; +x_74 = lean::string_dec_eq(x_72, x_73); +lean::dec(x_72); +if (x_74 == 0) { -uint8 x_72; -x_72 = !lean::is_exclusive(x_58); -if (x_72 == 0) -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_73 = lean::cnstr_get(x_58, 0); -x_74 = lean::cnstr_get(x_58, 3); -lean::dec(x_74); -x_75 = lean::cnstr_get(x_58, 1); -lean::dec(x_75); -x_76 = l_Array_shrink___main___rarg(x_73, x_6); -lean::cnstr_set(x_58, 1, x_5); -lean::cnstr_set(x_58, 0, x_76); -x_7 = x_58; -goto block_50; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_77 = lean::cnstr_get(x_58, 0); -x_78 = lean::cnstr_get(x_58, 2); -lean::inc(x_78); +obj* x_75; obj* x_76; obj* x_77; +x_75 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +lean::inc(x_67); +x_76 = l_Lean_Parser_ParserState_mkErrorsAt(x_68, x_75, x_67); +x_77 = lean::cnstr_get(x_76, 3); lean::inc(x_77); -lean::dec(x_58); -x_79 = l_Array_shrink___main___rarg(x_77, x_6); -x_80 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_5); -lean::cnstr_set(x_80, 2, x_78); -lean::cnstr_set(x_80, 3, x_71); -x_7 = x_80; -goto block_50; +if (lean::obj_tag(x_77) == 0) +{ +obj* x_78; +x_78 = l_Lean_Parser_ParserState_restore(x_76, x_66, x_67); +lean::dec(x_66); +x_51 = x_78; +goto block_62; } +else +{ +lean::dec(x_77); +lean::dec(x_67); +lean::dec(x_66); +x_51 = x_76; +goto block_62; +} +} +else +{ +obj* x_79; +x_79 = l_Lean_Parser_ParserState_restore(x_68, x_66, x_67); +lean::dec(x_66); +x_51 = x_79; +goto block_62; +} +} +else +{ +obj* x_80; obj* x_81; obj* x_82; +lean::dec(x_71); +x_80 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +lean::inc(x_67); +x_81 = l_Lean_Parser_ParserState_mkErrorsAt(x_68, x_80, x_67); +x_82 = lean::cnstr_get(x_81, 3); +lean::inc(x_82); +if (lean::obj_tag(x_82) == 0) +{ +obj* x_83; +x_83 = l_Lean_Parser_ParserState_restore(x_81, x_66, x_67); +lean::dec(x_66); +x_51 = x_83; +goto block_62; +} +else +{ +lean::dec(x_82); +lean::dec(x_67); +lean::dec(x_66); +x_51 = x_81; +goto block_62; } } } else { -obj* x_81; -lean::dec(x_52); -x_81 = lean::cnstr_get(x_51, 3); -lean::inc(x_81); -if (lean::obj_tag(x_81) == 0) +obj* x_84; obj* x_85; obj* x_86; +lean::dec(x_69); +x_84 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +lean::inc(x_67); +x_85 = l_Lean_Parser_ParserState_mkErrorsAt(x_68, x_84, x_67); +x_86 = lean::cnstr_get(x_85, 3); +lean::inc(x_86); +if (lean::obj_tag(x_86) == 0) { -lean::dec(x_5); -x_7 = x_51; -goto block_50; +obj* x_87; +x_87 = l_Lean_Parser_ParserState_restore(x_85, x_66, x_67); +lean::dec(x_66); +x_51 = x_87; +goto block_62; } else { -uint8 x_82; -x_82 = !lean::is_exclusive(x_51); -if (x_82 == 0) -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_51, 0); -x_84 = lean::cnstr_get(x_51, 3); -lean::dec(x_84); -x_85 = lean::cnstr_get(x_51, 1); -lean::dec(x_85); -x_86 = l_Array_shrink___main___rarg(x_83, x_6); -lean::cnstr_set(x_51, 1, x_5); -lean::cnstr_set(x_51, 0, x_86); -x_7 = x_51; -goto block_50; +lean::dec(x_86); +lean::dec(x_67); +lean::dec(x_66); +x_51 = x_85; +goto block_62; +} +} } else { -obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_87 = lean::cnstr_get(x_51, 0); -x_88 = lean::cnstr_get(x_51, 2); -lean::inc(x_88); -lean::inc(x_87); -lean::dec(x_51); -x_89 = l_Array_shrink___main___rarg(x_87, x_6); -x_90 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_5); -lean::cnstr_set(x_90, 2, x_88); -lean::cnstr_set(x_90, 3, x_81); -x_7 = x_90; -goto block_50; -} -} +lean::dec(x_64); +x_51 = x_63; +goto block_62; } block_50: { @@ -14262,6 +18776,54 @@ x_49 = l_Lean_Parser_ParserState_mkNode(x_7, x_48, x_6); return x_49; } } +block_62: +{ +obj* x_52; +x_52 = lean::cnstr_get(x_51, 3); +lean::inc(x_52); +if (lean::obj_tag(x_52) == 0) +{ +lean::dec(x_5); +x_7 = x_51; +goto block_50; +} +else +{ +uint8 x_53; +x_53 = !lean::is_exclusive(x_51); +if (x_53 == 0) +{ +obj* x_54; obj* x_55; obj* x_56; obj* x_57; +x_54 = lean::cnstr_get(x_51, 0); +x_55 = lean::cnstr_get(x_51, 3); +lean::dec(x_55); +x_56 = lean::cnstr_get(x_51, 1); +lean::dec(x_56); +x_57 = l_Array_shrink___main___rarg(x_54, x_6); +lean::cnstr_set(x_51, 1, x_5); +lean::cnstr_set(x_51, 0, x_57); +x_7 = x_51; +goto block_50; +} +else +{ +obj* x_58; obj* x_59; obj* x_60; obj* x_61; +x_58 = lean::cnstr_get(x_51, 0); +x_59 = lean::cnstr_get(x_51, 2); +lean::inc(x_59); +lean::inc(x_58); +lean::dec(x_51); +x_60 = l_Array_shrink___main___rarg(x_58, x_6); +x_61 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_61, 0, x_60); +lean::cnstr_set(x_61, 1, x_5); +lean::cnstr_set(x_61, 2, x_59); +lean::cnstr_set(x_61, 3, x_52); +x_7 = x_61; +goto block_50; +} +} +} } } obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___spec__1(obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5) { @@ -14330,7 +18892,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -14422,7 +18984,7 @@ else obj* x_16; obj* x_17; lean::dec(x_4); x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkError(x_11, x_16); +x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); return x_17; } } @@ -14601,39 +19163,126 @@ x_8 = lean::cnstr_get(x_7, 3); lean::inc(x_8); if (lean::obj_tag(x_8) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_10 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; +obj* x_9; obj* x_10; obj* x_11; +x_9 = lean::cnstr_get(x_7, 1); +lean::inc(x_9); lean::inc(x_1); -x_11 = l_Lean_Parser_symbolFnAux(x_9, x_10, x_1, x_7); -x_12 = lean::cnstr_get(x_11, 3); +x_10 = l_Lean_Parser_tokenFn(x_1, x_7); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +obj* x_12; obj* x_13; +x_12 = lean::cnstr_get(x_10, 0); lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = l_Lean_Parser_ParserAttribute_runParser(x_5, x_6, x_1, x_11); -x_14 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_4); -return x_15; -} -else -{ -obj* x_16; obj* x_17; +x_13 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_12); lean::dec(x_12); +if (lean::obj_tag(x_13) == 2) +{ +obj* x_14; obj* x_15; uint8 x_16; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +lean::dec(x_13); +x_15 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_16 = lean::string_dec_eq(x_14, x_15); +lean::dec(x_14); +if (x_16 == 0) +{ +obj* x_17; obj* x_18; obj* x_19; +x_17 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_18 = l_Lean_Parser_ParserState_mkErrorsAt(x_10, x_17, x_9); +x_19 = lean::cnstr_get(x_18, 3); +lean::inc(x_19); +if (lean::obj_tag(x_19) == 0) +{ +obj* x_20; obj* x_21; obj* x_22; +x_20 = l_Lean_Parser_ParserAttribute_runParser(x_5, x_6, x_1, x_18); +x_21 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); +return x_22; +} +else +{ +obj* x_23; obj* x_24; +lean::dec(x_19); lean::dec(x_1); -x_16 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; -x_17 = l_Lean_Parser_ParserState_mkNode(x_11, x_16, x_4); -return x_17; +x_23 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_18, x_23, x_4); +return x_24; } } else { -obj* x_18; obj* x_19; +obj* x_25; obj* x_26; obj* x_27; +lean::dec(x_9); +x_25 = l_Lean_Parser_ParserAttribute_runParser(x_5, x_6, x_1, x_10); +x_26 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_4); +return x_27; +} +} +else +{ +obj* x_28; obj* x_29; obj* x_30; +lean::dec(x_13); +x_28 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_10, x_28, x_9); +x_30 = lean::cnstr_get(x_29, 3); +lean::inc(x_30); +if (lean::obj_tag(x_30) == 0) +{ +obj* x_31; obj* x_32; obj* x_33; +x_31 = l_Lean_Parser_ParserAttribute_runParser(x_5, x_6, x_1, x_29); +x_32 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_4); +return x_33; +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_30); +lean::dec(x_1); +x_34 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_29, x_34, x_4); +return x_35; +} +} +} +else +{ +obj* x_36; obj* x_37; obj* x_38; +lean::dec(x_11); +x_36 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_10, x_36, x_9); +x_38 = lean::cnstr_get(x_37, 3); +lean::inc(x_38); +if (lean::obj_tag(x_38) == 0) +{ +obj* x_39; obj* x_40; obj* x_41; +x_39 = l_Lean_Parser_ParserAttribute_runParser(x_5, x_6, x_1, x_37); +x_40 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; +x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_4); +return x_41; +} +else +{ +obj* x_42; obj* x_43; +lean::dec(x_38); +lean::dec(x_1); +x_42 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; +x_43 = l_Lean_Parser_ParserState_mkNode(x_37, x_42, x_4); +return x_43; +} +} +} +else +{ +obj* x_44; obj* x_45; lean::dec(x_8); lean::dec(x_1); -x_18 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; -x_19 = l_Lean_Parser_ParserState_mkNode(x_7, x_18, x_4); -return x_19; +x_44 = l_Lean_Parser_Term_letPatDecl___elambda__1___rarg___closed__2; +x_45 = l_Lean_Parser_ParserState_mkNode(x_7, x_44, x_4); +return x_45; } } } @@ -14935,7 +19584,7 @@ obj* _init_l_Lean_Parser_Term_let___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_let___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -14951,75 +19600,236 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_let___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_let___elambda__1___closed__6; +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* l_Lean_Parser_Term_let___elambda__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_4; obj* x_5; obj* x_6; obj* x_58; obj* x_59; obj* x_60; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_let___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_let___elambda__1___closed__6; +x_58 = lean::cnstr_get(x_3, 1); +lean::inc(x_58); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_59 = l_Lean_Parser_tokenFn(x_2, x_3); +x_60 = lean::cnstr_get(x_59, 3); +lean::inc(x_60); +if (lean::obj_tag(x_60) == 0) +{ +obj* x_61; obj* x_62; +x_61 = lean::cnstr_get(x_59, 0); +lean::inc(x_61); +x_62 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_61); +lean::dec(x_61); +if (lean::obj_tag(x_62) == 2) +{ +obj* x_63; obj* x_64; uint8 x_65; +x_63 = lean::cnstr_get(x_62, 1); +lean::inc(x_63); +lean::dec(x_62); +x_64 = l_Lean_Parser_Term_let___elambda__1___closed__4; +x_65 = lean::string_dec_eq(x_63, x_64); +lean::dec(x_63); +if (x_65 == 0) +{ +obj* x_66; obj* x_67; +x_66 = l_Lean_Parser_Term_let___elambda__1___closed__7; +x_67 = l_Lean_Parser_ParserState_mkErrorsAt(x_59, x_66, x_58); +x_6 = x_67; +goto block_57; +} +else +{ +lean::dec(x_58); +x_6 = x_59; +goto block_57; +} +} +else +{ +obj* x_68; obj* x_69; +lean::dec(x_62); +x_68 = l_Lean_Parser_Term_let___elambda__1___closed__7; +x_69 = l_Lean_Parser_ParserState_mkErrorsAt(x_59, x_68, x_58); +x_6 = x_69; +goto block_57; +} +} +else +{ +obj* x_70; obj* x_71; +lean::dec(x_60); +x_70 = l_Lean_Parser_Term_let___elambda__1___closed__7; +x_71 = l_Lean_Parser_ParserState_mkErrorsAt(x_59, x_70, x_58); +x_6 = x_71; +goto block_57; +} +block_57: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Term_letDecl___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; +obj* x_10; obj* x_11; obj* x_12; +x_10 = lean::cnstr_get(x_8, 1); +lean::inc(x_10); lean::inc(x_2); -x_10 = l_Lean_Parser_Term_letDecl___elambda__1(x_1, x_2, x_8); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +x_11 = l_Lean_Parser_tokenFn(x_2, x_8); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) { -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__5; -x_13 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; -lean::inc(x_2); -x_14 = l_Lean_Parser_symbolFnAux(x_12, x_13, x_2, x_10); -x_15 = lean::cnstr_get(x_14, 3); +obj* x_13; obj* x_14; +x_13 = lean::cnstr_get(x_11, 0); +lean::inc(x_13); +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_13); +lean::dec(x_13); +if (lean::obj_tag(x_14) == 2) +{ +obj* x_15; obj* x_16; uint8 x_17; +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; obj* x_20; -x_16 = l_Lean_Parser_termParserAttribute; -x_17 = lean::mk_nat_obj(0u); -x_18 = l_Lean_Parser_ParserAttribute_runParser(x_16, x_17, x_2, x_14); -x_19 = l_Lean_Parser_Term_let___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_5); -return x_20; -} -else -{ -obj* x_21; obj* x_22; +lean::dec(x_14); +x_16 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__6; +x_17 = lean::string_dec_eq(x_15, x_16); lean::dec(x_15); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; obj* x_20; +x_18 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_18, x_10); +x_20 = lean::cnstr_get(x_19, 3); +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; +x_21 = l_Lean_Parser_termParserAttribute; +x_22 = lean::mk_nat_obj(0u); +x_23 = l_Lean_Parser_ParserAttribute_runParser(x_21, x_22, x_2, x_19); +x_24 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_5); +return x_25; +} +else +{ +obj* x_26; obj* x_27; +lean::dec(x_20); lean::dec(x_2); -x_21 = l_Lean_Parser_Term_let___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_14, x_21, x_5); -return x_22; +x_26 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_19, x_26, x_5); +return x_27; } } else { -obj* x_23; obj* x_24; -lean::dec(x_11); -lean::dec(x_2); -x_23 = l_Lean_Parser_Term_let___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_10, x_23, x_5); -return x_24; +obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; +lean::dec(x_10); +x_28 = l_Lean_Parser_termParserAttribute; +x_29 = lean::mk_nat_obj(0u); +x_30 = l_Lean_Parser_ParserAttribute_runParser(x_28, x_29, x_2, x_11); +x_31 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_5); +return x_32; } } else { -obj* x_25; obj* x_26; +obj* x_33; obj* x_34; obj* x_35; +lean::dec(x_14); +x_33 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_34 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_33, x_10); +x_35 = lean::cnstr_get(x_34, 3); +lean::inc(x_35); +if (lean::obj_tag(x_35) == 0) +{ +obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; +x_36 = l_Lean_Parser_termParserAttribute; +x_37 = lean::mk_nat_obj(0u); +x_38 = l_Lean_Parser_ParserAttribute_runParser(x_36, x_37, x_2, x_34); +x_39 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_5); +return x_40; +} +else +{ +obj* x_41; obj* x_42; +lean::dec(x_35); +lean::dec(x_2); +x_41 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_42 = l_Lean_Parser_ParserState_mkNode(x_34, x_41, x_5); +return x_42; +} +} +} +else +{ +obj* x_43; obj* x_44; obj* x_45; +lean::dec(x_12); +x_43 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_44 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_43, x_10); +x_45 = lean::cnstr_get(x_44, 3); +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 = l_Lean_Parser_termParserAttribute; +x_47 = lean::mk_nat_obj(0u); +x_48 = l_Lean_Parser_ParserAttribute_runParser(x_46, x_47, x_2, x_44); +x_49 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_50 = l_Lean_Parser_ParserState_mkNode(x_48, x_49, x_5); +return x_50; +} +else +{ +obj* x_51; obj* x_52; +lean::dec(x_45); +lean::dec(x_2); +x_51 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_52 = l_Lean_Parser_ParserState_mkNode(x_44, x_51, x_5); +return x_52; +} +} +} +else +{ +obj* x_53; obj* x_54; lean::dec(x_9); lean::dec(x_2); +x_53 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_54 = l_Lean_Parser_ParserState_mkNode(x_8, x_53, x_5); +return x_54; +} +} +else +{ +obj* x_55; obj* x_56; +lean::dec(x_7); +lean::dec(x_2); lean::dec(x_1); -x_25 = l_Lean_Parser_Term_let___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_8, x_25, x_5); -return x_26; +x_55 = l_Lean_Parser_Term_let___elambda__1___closed__2; +x_56 = l_Lean_Parser_ParserState_mkNode(x_6, x_55, x_5); +return x_56; +} } } } @@ -15151,7 +19961,7 @@ obj* _init_l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__2; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -15187,13 +19997,25 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__9() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__8; +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* l_Lean_Parser_Term_leftArrow___elambda__1___rarg(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_leftArrow___elambda__1___rarg___closed__2; x_4 = l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__4; -x_5 = l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__8; +x_5 = l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__9; x_6 = l_Lean_Parser_unicodeSymbolFnAux(x_3, x_4, x_5, x_1, x_2); return x_6; } @@ -15275,34 +20097,90 @@ return x_3; obj* l_Lean_Parser_Term_doLet___elambda__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_4; obj* x_5; obj* x_6; obj* x_14; obj* x_15; obj* x_16; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_let___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_let___elambda__1___closed__6; +x_14 = lean::cnstr_get(x_3, 1); +lean::inc(x_14); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_15 = l_Lean_Parser_tokenFn(x_2, x_3); +x_16 = lean::cnstr_get(x_15, 3); +lean::inc(x_16); +if (lean::obj_tag(x_16) == 0) { -obj* x_10; obj* x_11; obj* x_12; -x_10 = l_Lean_Parser_Term_letDecl___elambda__1(x_1, x_2, x_8); -x_11 = l_Lean_Parser_Term_doLet___elambda__1___closed__2; -x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_5); -return x_12; +obj* x_17; obj* x_18; +x_17 = lean::cnstr_get(x_15, 0); +lean::inc(x_17); +x_18 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_17); +lean::dec(x_17); +if (lean::obj_tag(x_18) == 2) +{ +obj* x_19; obj* x_20; uint8 x_21; +x_19 = lean::cnstr_get(x_18, 1); +lean::inc(x_19); +lean::dec(x_18); +x_20 = l_Lean_Parser_Term_let___elambda__1___closed__4; +x_21 = lean::string_dec_eq(x_19, x_20); +lean::dec(x_19); +if (x_21 == 0) +{ +obj* x_22; obj* x_23; +x_22 = l_Lean_Parser_Term_let___elambda__1___closed__7; +x_23 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_22, x_14); +x_6 = x_23; +goto block_13; } else { -obj* x_13; obj* x_14; -lean::dec(x_9); +lean::dec(x_14); +x_6 = x_15; +goto block_13; +} +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_18); +x_24 = l_Lean_Parser_Term_let___elambda__1___closed__7; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_24, x_14); +x_6 = x_25; +goto block_13; +} +} +else +{ +obj* x_26; obj* x_27; +lean::dec(x_16); +x_26 = l_Lean_Parser_Term_let___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_15, x_26, x_14); +x_6 = x_27; +goto block_13; +} +block_13: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; obj* x_10; +x_8 = l_Lean_Parser_Term_letDecl___elambda__1(x_1, x_2, x_6); +x_9 = l_Lean_Parser_Term_doLet___elambda__1___closed__2; +x_10 = l_Lean_Parser_ParserState_mkNode(x_8, x_9, x_5); +return x_10; +} +else +{ +obj* x_11; obj* x_12; +lean::dec(x_7); lean::dec(x_2); lean::dec(x_1); -x_13 = l_Lean_Parser_Term_doLet___elambda__1___closed__2; -x_14 = l_Lean_Parser_ParserState_mkNode(x_8, x_13, x_5); -return x_14; +x_11 = l_Lean_Parser_Term_doLet___elambda__1___closed__2; +x_12 = l_Lean_Parser_ParserState_mkNode(x_6, x_11, x_5); +return x_12; +} } } } @@ -15678,119 +20556,119 @@ return x_3; obj* l_Lean_Parser_Term_doPat___elambda__1___rarg(obj* x_1, obj* x_2) { _start: { -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_52; obj* x_53; obj* x_54; obj* x_55; +obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_64; obj* x_65; obj* x_66; obj* x_67; 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::array_get_size(x_3); lean::dec(x_3); -x_52 = l_Lean_Parser_termParserAttribute; -x_53 = lean::mk_nat_obj(0u); +x_64 = l_Lean_Parser_termParserAttribute; +x_65 = lean::mk_nat_obj(0u); lean::inc(x_1); -x_54 = l_Lean_Parser_ParserAttribute_runParser(x_52, x_53, x_1, x_2); -x_55 = lean::cnstr_get(x_54, 3); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; -lean::inc(x_1); -x_56 = l_Lean_Parser_Term_leftArrow___elambda__1___rarg(x_1, x_54); -x_57 = lean::cnstr_get(x_56, 3); -lean::inc(x_57); -if (lean::obj_tag(x_57) == 0) -{ -lean::dec(x_4); -x_6 = x_56; -goto block_51; -} -else -{ -uint8 x_58; -x_58 = !lean::is_exclusive(x_56); -if (x_58 == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_59 = lean::cnstr_get(x_56, 0); -x_60 = lean::cnstr_get(x_56, 3); -lean::dec(x_60); -x_61 = lean::cnstr_get(x_56, 1); -lean::dec(x_61); -x_62 = l_Array_shrink___main___rarg(x_59, x_5); -lean::cnstr_set(x_56, 1, x_4); -lean::cnstr_set(x_56, 0, x_62); -x_6 = x_56; -goto block_51; -} -else -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_63 = lean::cnstr_get(x_56, 0); -x_64 = lean::cnstr_get(x_56, 2); -lean::inc(x_64); -lean::inc(x_63); -lean::dec(x_56); -x_65 = l_Array_shrink___main___rarg(x_63, x_5); -x_66 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_4); -lean::cnstr_set(x_66, 2, x_64); -lean::cnstr_set(x_66, 3, x_57); -x_6 = x_66; -goto block_51; -} -} -} -else -{ -obj* x_67; -lean::dec(x_55); -x_67 = lean::cnstr_get(x_54, 3); +x_66 = l_Lean_Parser_ParserAttribute_runParser(x_64, x_65, x_1, x_2); +x_67 = lean::cnstr_get(x_66, 3); lean::inc(x_67); if (lean::obj_tag(x_67) == 0) { +obj* x_68; obj* x_69; +lean::inc(x_1); +x_68 = l_Lean_Parser_Term_leftArrow___elambda__1___rarg(x_1, x_66); +x_69 = lean::cnstr_get(x_68, 3); +lean::inc(x_69); +if (lean::obj_tag(x_69) == 0) +{ lean::dec(x_4); -x_6 = x_54; -goto block_51; +x_6 = x_68; +goto block_63; } else { -uint8 x_68; -x_68 = !lean::is_exclusive(x_54); -if (x_68 == 0) +uint8 x_70; +x_70 = !lean::is_exclusive(x_68); +if (x_70 == 0) { -obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_69 = lean::cnstr_get(x_54, 0); -x_70 = lean::cnstr_get(x_54, 3); -lean::dec(x_70); -x_71 = lean::cnstr_get(x_54, 1); -lean::dec(x_71); -x_72 = l_Array_shrink___main___rarg(x_69, x_5); -lean::cnstr_set(x_54, 1, x_4); -lean::cnstr_set(x_54, 0, x_72); -x_6 = x_54; -goto block_51; +obj* x_71; obj* x_72; obj* x_73; obj* x_74; +x_71 = lean::cnstr_get(x_68, 0); +x_72 = lean::cnstr_get(x_68, 3); +lean::dec(x_72); +x_73 = lean::cnstr_get(x_68, 1); +lean::dec(x_73); +x_74 = l_Array_shrink___main___rarg(x_71, x_5); +lean::cnstr_set(x_68, 1, x_4); +lean::cnstr_set(x_68, 0, x_74); +x_6 = x_68; +goto block_63; } else { -obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_73 = lean::cnstr_get(x_54, 0); -x_74 = lean::cnstr_get(x_54, 2); -lean::inc(x_74); -lean::inc(x_73); -lean::dec(x_54); -x_75 = l_Array_shrink___main___rarg(x_73, x_5); -x_76 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_4); -lean::cnstr_set(x_76, 2, x_74); -lean::cnstr_set(x_76, 3, x_67); -x_6 = x_76; -goto block_51; +obj* x_75; obj* x_76; obj* x_77; obj* x_78; +x_75 = lean::cnstr_get(x_68, 0); +x_76 = lean::cnstr_get(x_68, 2); +lean::inc(x_76); +lean::inc(x_75); +lean::dec(x_68); +x_77 = l_Array_shrink___main___rarg(x_75, x_5); +x_78 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_78, 0, x_77); +lean::cnstr_set(x_78, 1, x_4); +lean::cnstr_set(x_78, 2, x_76); +lean::cnstr_set(x_78, 3, x_69); +x_6 = x_78; +goto block_63; } } } -block_51: +else +{ +obj* x_79; +lean::dec(x_67); +x_79 = lean::cnstr_get(x_66, 3); +lean::inc(x_79); +if (lean::obj_tag(x_79) == 0) +{ +lean::dec(x_4); +x_6 = x_66; +goto block_63; +} +else +{ +uint8 x_80; +x_80 = !lean::is_exclusive(x_66); +if (x_80 == 0) +{ +obj* x_81; obj* x_82; obj* x_83; obj* x_84; +x_81 = lean::cnstr_get(x_66, 0); +x_82 = lean::cnstr_get(x_66, 3); +lean::dec(x_82); +x_83 = lean::cnstr_get(x_66, 1); +lean::dec(x_83); +x_84 = l_Array_shrink___main___rarg(x_81, x_5); +lean::cnstr_set(x_66, 1, x_4); +lean::cnstr_set(x_66, 0, x_84); +x_6 = x_66; +goto block_63; +} +else +{ +obj* x_85; obj* x_86; obj* x_87; obj* x_88; +x_85 = lean::cnstr_get(x_66, 0); +x_86 = lean::cnstr_get(x_66, 2); +lean::inc(x_86); +lean::inc(x_85); +lean::dec(x_66); +x_87 = l_Array_shrink___main___rarg(x_85, x_5); +x_88 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_4); +lean::cnstr_set(x_88, 2, x_86); +lean::cnstr_set(x_88, 3, x_79); +x_6 = x_88; +goto block_63; +} +} +} +block_63: { obj* x_7; x_7 = lean::cnstr_get(x_6, 3); @@ -15806,114 +20684,170 @@ x_11 = lean::cnstr_get(x_10, 3); 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; +obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_46; obj* x_47; x_12 = lean::cnstr_get(x_10, 0); lean::inc(x_12); x_13 = lean::array_get_size(x_12); lean::dec(x_12); x_14 = lean::cnstr_get(x_10, 1); lean::inc(x_14); -x_15 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; -x_16 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__8; lean::inc(x_1); -x_17 = l_Lean_Parser_symbolFnAux(x_15, x_16, x_1, x_10); +x_46 = l_Lean_Parser_tokenFn(x_1, x_10); +x_47 = lean::cnstr_get(x_46, 3); +lean::inc(x_47); +if (lean::obj_tag(x_47) == 0) +{ +obj* x_48; obj* x_49; +x_48 = lean::cnstr_get(x_46, 0); +lean::inc(x_48); +x_49 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_48); +lean::dec(x_48); +if (lean::obj_tag(x_49) == 2) +{ +obj* x_50; obj* x_51; uint8 x_52; +x_50 = lean::cnstr_get(x_49, 1); +lean::inc(x_50); +lean::dec(x_49); +x_51 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__4; +x_52 = lean::string_dec_eq(x_50, x_51); +lean::dec(x_50); +if (x_52 == 0) +{ +obj* x_53; obj* x_54; +x_53 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +lean::inc(x_14); +x_54 = l_Lean_Parser_ParserState_mkErrorsAt(x_46, x_53, x_14); +x_15 = x_54; +goto block_45; +} +else +{ +x_15 = x_46; +goto block_45; +} +} +else +{ +obj* x_55; obj* x_56; +lean::dec(x_49); +x_55 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +lean::inc(x_14); +x_56 = l_Lean_Parser_ParserState_mkErrorsAt(x_46, x_55, x_14); +x_15 = x_56; +goto block_45; +} +} +else +{ +obj* x_57; obj* x_58; +lean::dec(x_47); +x_57 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__12; +lean::inc(x_14); +x_58 = l_Lean_Parser_ParserState_mkErrorsAt(x_46, x_57, x_14); +x_15 = x_58; +goto block_45; +} +block_45: +{ +obj* x_16; +x_16 = lean::cnstr_get(x_15, 3); +lean::inc(x_16); +if (lean::obj_tag(x_16) == 0) +{ +obj* x_17; obj* x_18; +x_17 = l_Lean_Parser_ParserAttribute_runParser(x_8, x_9, x_1, x_15); x_18 = lean::cnstr_get(x_17, 3); lean::inc(x_18); if (lean::obj_tag(x_18) == 0) { -obj* x_19; obj* x_20; -x_19 = l_Lean_Parser_ParserAttribute_runParser(x_8, x_9, x_1, x_17); -x_20 = lean::cnstr_get(x_19, 3); -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_19; obj* x_20; obj* x_21; obj* x_22; lean::dec(x_14); -x_21 = l_Lean_nullKind; -x_22 = l_Lean_Parser_ParserState_mkNode(x_19, x_21, x_13); -x_23 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_5); -return x_24; +x_19 = l_Lean_nullKind; +x_20 = l_Lean_Parser_ParserState_mkNode(x_17, x_19, x_13); +x_21 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_5); +return x_22; } else { -obj* x_25; uint8 x_26; -lean::dec(x_20); -x_25 = lean::cnstr_get(x_19, 1); -lean::inc(x_25); -x_26 = lean::nat_dec_eq(x_25, x_14); -lean::dec(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_14); -x_27 = l_Lean_nullKind; -x_28 = l_Lean_Parser_ParserState_mkNode(x_19, x_27, x_13); -x_29 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_5); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = l_Lean_Parser_ParserState_restore(x_19, x_13, x_14); -x_32 = l_Lean_nullKind; -x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_13); -x_34 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; -x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_5); -return x_35; -} -} -} -else -{ -obj* x_36; uint8 x_37; +obj* x_23; uint8 x_24; lean::dec(x_18); -lean::dec(x_1); -x_36 = lean::cnstr_get(x_17, 1); -lean::inc(x_36); -x_37 = lean::nat_dec_eq(x_36, x_14); -lean::dec(x_36); -if (x_37 == 0) +x_23 = lean::cnstr_get(x_17, 1); +lean::inc(x_23); +x_24 = lean::nat_dec_eq(x_23, x_14); +lean::dec(x_23); +if (x_24 == 0) { -obj* x_38; obj* x_39; obj* x_40; obj* x_41; +obj* x_25; obj* x_26; obj* x_27; obj* x_28; lean::dec(x_14); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_17, x_38, x_13); -x_40 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_5); -return x_41; +x_25 = l_Lean_nullKind; +x_26 = l_Lean_Parser_ParserState_mkNode(x_17, x_25, x_13); +x_27 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_5); +return x_28; } else { -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_42 = l_Lean_Parser_ParserState_restore(x_17, x_13, x_14); -x_43 = l_Lean_nullKind; -x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_13); -x_45 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; -x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_5); -return x_46; +obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; +x_29 = l_Lean_Parser_ParserState_restore(x_17, x_13, x_14); +x_30 = l_Lean_nullKind; +x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_13); +x_32 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +return x_33; } } } else { -obj* x_47; obj* x_48; +obj* x_34; uint8 x_35; +lean::dec(x_16); +lean::dec(x_1); +x_34 = lean::cnstr_get(x_15, 1); +lean::inc(x_34); +x_35 = lean::nat_dec_eq(x_34, x_14); +lean::dec(x_34); +if (x_35 == 0) +{ +obj* x_36; obj* x_37; obj* x_38; obj* x_39; +lean::dec(x_14); +x_36 = l_Lean_nullKind; +x_37 = l_Lean_Parser_ParserState_mkNode(x_15, x_36, x_13); +x_38 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_5); +return x_39; +} +else +{ +obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +x_40 = l_Lean_Parser_ParserState_restore(x_15, x_13, x_14); +x_41 = l_Lean_nullKind; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_13); +x_43 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_5); +return x_44; +} +} +} +} +else +{ +obj* x_59; obj* x_60; lean::dec(x_11); lean::dec(x_1); -x_47 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; -x_48 = l_Lean_Parser_ParserState_mkNode(x_10, x_47, x_5); -return x_48; +x_59 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; +x_60 = l_Lean_Parser_ParserState_mkNode(x_10, x_59, x_5); +return x_60; } } else { -obj* x_49; obj* x_50; +obj* x_61; obj* x_62; lean::dec(x_7); lean::dec(x_1); -x_49 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; -x_50 = l_Lean_Parser_ParserState_mkNode(x_6, x_49, x_5); -return x_50; +x_61 = l_Lean_Parser_Term_doPat___elambda__1___rarg___closed__2; +x_62 = l_Lean_Parser_ParserState_mkNode(x_6, x_61, x_5); +return x_62; } } } @@ -16327,7 +21261,7 @@ return x_1; obj* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(uint8 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_5; obj* x_6; obj* x_7; obj* x_8; obj* x_17; obj* x_18; x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_6 = lean::array_get_size(x_5); @@ -16336,62 +21270,114 @@ x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); lean::inc(x_3); lean::inc(x_2); -x_8 = l_Lean_Parser_Term_doElem___elambda__1(x_2, x_3, x_4); +x_17 = l_Lean_Parser_Term_doElem___elambda__1(x_2, x_3, x_4); +x_18 = lean::cnstr_get(x_17, 3); +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_17, 1); +lean::inc(x_19); +lean::inc(x_3); +x_20 = l_Lean_Parser_tokenFn(x_3, x_17); +x_21 = lean::cnstr_get(x_20, 3); +lean::inc(x_21); +if (lean::obj_tag(x_21) == 0) +{ +obj* x_22; obj* x_23; +x_22 = lean::cnstr_get(x_20, 0); +lean::inc(x_22); +x_23 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_22); +lean::dec(x_22); +if (lean::obj_tag(x_23) == 2) +{ +obj* x_24; obj* x_25; uint8 x_26; +x_24 = lean::cnstr_get(x_23, 1); +lean::inc(x_24); +lean::dec(x_23); +x_25 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__6; +x_26 = lean::string_dec_eq(x_24, x_25); +lean::dec(x_24); +if (x_26 == 0) +{ +obj* x_27; obj* x_28; +x_27 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_27, x_19); +x_8 = x_28; +goto block_16; +} +else +{ +lean::dec(x_19); +x_8 = x_20; +goto block_16; +} +} +else +{ +obj* x_29; obj* x_30; +lean::dec(x_23); +x_29 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_29, x_19); +x_8 = x_30; +goto block_16; +} +} +else +{ +obj* x_31; obj* x_32; +lean::dec(x_21); +x_31 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; +x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_31, x_19); +x_8 = x_32; +goto block_16; +} +} +else +{ +lean::dec(x_18); +x_8 = x_17; +goto block_16; +} +block_16: +{ +obj* x_9; x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__5; -x_11 = l_Lean_Parser_Term_have___elambda__1___rarg___closed__9; -lean::inc(x_3); -x_12 = l_Lean_Parser_symbolFnAux(x_10, x_11, x_3, x_8); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; uint8 x_15; +obj* x_10; uint8 x_11; lean::dec(x_6); -x_14 = lean::cnstr_get(x_12, 1); -lean::inc(x_14); -x_15 = lean::nat_dec_eq(x_7, x_14); -lean::dec(x_14); +x_10 = lean::cnstr_get(x_8, 1); +lean::inc(x_10); +x_11 = lean::nat_dec_eq(x_7, x_10); +lean::dec(x_10); lean::dec(x_7); -if (x_15 == 0) +if (x_11 == 0) { -x_4 = x_12; +x_4 = x_8; goto _start; } else { -obj* x_17; obj* x_18; +obj* x_13; obj* x_14; lean::dec(x_3); lean::dec(x_2); -x_17 = l_Lean_Parser_manyAux___main___closed__1; -x_18 = l_Lean_Parser_ParserState_mkError(x_12, x_17); -return x_18; +x_13 = l_Lean_Parser_manyAux___main___closed__1; +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); +return x_14; } } else { -obj* x_19; -lean::dec(x_13); -lean::dec(x_3); -lean::dec(x_2); -x_19 = l_Lean_Parser_ParserState_restore(x_12, x_6, x_7); -lean::dec(x_6); -return x_19; -} -} -else -{ -obj* x_20; +obj* x_15; lean::dec(x_9); lean::dec(x_3); lean::dec(x_2); -x_20 = l_Lean_Parser_ParserState_restore(x_8, x_6, x_7); +x_15 = l_Lean_Parser_ParserState_restore(x_8, x_6, x_7); lean::dec(x_6); -return x_20; +return x_15; +} } } } @@ -16549,53 +21535,163 @@ return x_3; obj* l_Lean_Parser_Term_bracketedDoSeq___elambda__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_4; obj* x_5; obj* x_6; obj* x_37; obj* x_38; obj* x_39; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_structInst___elambda__1___closed__8; +x_37 = lean::cnstr_get(x_3, 1); +lean::inc(x_37); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); +x_38 = l_Lean_Parser_tokenFn(x_2, x_3); +x_39 = lean::cnstr_get(x_38, 3); +lean::inc(x_39); +if (lean::obj_tag(x_39) == 0) +{ +obj* x_40; obj* x_41; +x_40 = lean::cnstr_get(x_38, 0); +lean::inc(x_40); +x_41 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_40); +lean::dec(x_40); +if (lean::obj_tag(x_41) == 2) +{ +obj* x_42; obj* x_43; uint8 x_44; +x_42 = lean::cnstr_get(x_41, 1); +lean::inc(x_42); +lean::dec(x_41); +x_43 = l_Lean_Parser_Term_structInst___elambda__1___closed__4; +x_44 = lean::string_dec_eq(x_42, x_43); +lean::dec(x_42); +if (x_44 == 0) +{ +obj* x_45; obj* x_46; +x_45 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_46 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_45, x_37); +x_6 = x_46; +goto block_36; +} +else +{ +lean::dec(x_37); +x_6 = x_38; +goto block_36; +} +} +else +{ +obj* x_47; obj* x_48; +lean::dec(x_41); +x_47 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_47, x_37); +x_6 = x_48; +goto block_36; +} +} +else +{ +obj* x_49; obj* x_50; +lean::dec(x_39); +x_49 = l_Lean_Parser_Term_structInst___elambda__1___closed__12; +x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_49, x_37); +x_6 = x_50; +goto block_36; +} +block_36: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; +lean::inc(x_2); +x_8 = l_Lean_Parser_Term_doSeq___elambda__1(x_1, x_2, x_6); x_9 = lean::cnstr_get(x_8, 3); lean::inc(x_9); if (lean::obj_tag(x_9) == 0) { -obj* x_10; obj* x_11; -lean::inc(x_2); -x_10 = l_Lean_Parser_Term_doSeq___elambda__1(x_1, x_2, x_8); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) +obj* x_10; obj* x_11; obj* x_12; +x_10 = lean::cnstr_get(x_8, 1); +lean::inc(x_10); +x_11 = l_Lean_Parser_tokenFn(x_2, x_8); +x_12 = lean::cnstr_get(x_11, 3); +lean::inc(x_12); +if (lean::obj_tag(x_12) == 0) { -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = l_Lean_Parser_Term_id___elambda__1___closed__8; -x_13 = l_Lean_Parser_Term_id___elambda__1___closed__12; -x_14 = l_Lean_Parser_symbolFnAux(x_12, x_13, x_2, x_10); -x_15 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_14, x_15, x_5); -return x_16; +obj* x_13; obj* x_14; +x_13 = lean::cnstr_get(x_11, 0); +lean::inc(x_13); +x_14 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_13); +lean::dec(x_13); +if (lean::obj_tag(x_14) == 2) +{ +obj* x_15; obj* x_16; uint8 x_17; +x_15 = lean::cnstr_get(x_14, 1); +lean::inc(x_15); +lean::dec(x_14); +x_16 = l_Lean_Parser_Term_id___elambda__1___closed__8; +x_17 = lean::string_dec_eq(x_15, x_16); +lean::dec(x_15); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; obj* x_20; obj* x_21; +x_18 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_18, x_10); +x_20 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_5); +return x_21; } else { -obj* x_17; obj* x_18; -lean::dec(x_11); -lean::dec(x_2); -x_17 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_10, x_17, x_5); -return x_18; +obj* x_22; obj* x_23; +lean::dec(x_10); +x_22 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_11, x_22, x_5); +return x_23; } } else { -obj* x_19; obj* x_20; +obj* x_24; obj* x_25; obj* x_26; obj* x_27; +lean::dec(x_14); +x_24 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_24, x_10); +x_26 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; +x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_5); +return x_27; +} +} +else +{ +obj* x_28; obj* x_29; obj* x_30; obj* x_31; +lean::dec(x_12); +x_28 = l_Lean_Parser_Term_id___elambda__1___closed__11; +x_29 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_28, x_10); +x_30 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; +x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_5); +return x_31; +} +} +else +{ +obj* x_32; obj* x_33; lean::dec(x_9); lean::dec(x_2); +x_32 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_8, x_32, x_5); +return x_33; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_7); +lean::dec(x_2); lean::dec(x_1); -x_19 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_8, x_19, x_5); -return x_20; +x_34 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_6, x_34, x_5); +return x_35; +} } } } @@ -16697,7 +21793,7 @@ obj* _init_l_Lean_Parser_Term_do___elambda__1___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_do___elambda__1___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -16713,91 +21809,159 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_do___elambda__1___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_do___elambda__1___closed__6; +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* l_Lean_Parser_Term_do___elambda__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_4; obj* x_5; obj* x_6; obj* x_28; obj* x_29; obj* x_30; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); -x_6 = l_Lean_Parser_Term_do___elambda__1___closed__4; -x_7 = l_Lean_Parser_Term_do___elambda__1___closed__6; +x_28 = lean::cnstr_get(x_3, 1); +lean::inc(x_28); lean::inc(x_2); -x_8 = l_Lean_Parser_symbolFnAux(x_6, x_7, x_2, x_3); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) +x_29 = l_Lean_Parser_tokenFn(x_2, x_3); +x_30 = lean::cnstr_get(x_29, 3); +lean::inc(x_30); +if (lean::obj_tag(x_30) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_8, 0); +obj* x_31; obj* x_32; +x_31 = lean::cnstr_get(x_29, 0); +lean::inc(x_31); +x_32 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_31); +lean::dec(x_31); +if (lean::obj_tag(x_32) == 2) +{ +obj* x_33; obj* x_34; uint8 x_35; +x_33 = lean::cnstr_get(x_32, 1); +lean::inc(x_33); +lean::dec(x_32); +x_34 = l_Lean_Parser_Term_do___elambda__1___closed__4; +x_35 = lean::string_dec_eq(x_33, x_34); +lean::dec(x_33); +if (x_35 == 0) +{ +obj* x_36; obj* x_37; +x_36 = l_Lean_Parser_Term_do___elambda__1___closed__7; +x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_36, x_28); +x_6 = x_37; +goto block_27; +} +else +{ +lean::dec(x_28); +x_6 = x_29; +goto block_27; +} +} +else +{ +obj* x_38; obj* x_39; +lean::dec(x_32); +x_38 = l_Lean_Parser_Term_do___elambda__1___closed__7; +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_38, x_28); +x_6 = x_39; +goto block_27; +} +} +else +{ +obj* x_40; obj* x_41; +lean::dec(x_30); +x_40 = l_Lean_Parser_Term_do___elambda__1___closed__7; +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_40, x_28); +x_6 = x_41; +goto block_27; +} +block_27: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +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; +x_8 = lean::cnstr_get(x_6, 0); +lean::inc(x_8); +x_9 = lean::array_get_size(x_8); +lean::dec(x_8); +x_10 = lean::cnstr_get(x_6, 1); lean::inc(x_10); -x_11 = lean::array_get_size(x_10); -lean::dec(x_10); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); lean::inc(x_2); lean::inc(x_1); -x_13 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1(x_1, x_2, x_8); -x_14 = lean::cnstr_get(x_13, 3); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -lean::dec(x_12); -lean::dec(x_11); -lean::dec(x_2); -lean::dec(x_1); -x_15 = l_Lean_Parser_Term_do___elambda__1___closed__2; -x_16 = l_Lean_Parser_ParserState_mkNode(x_13, x_15, x_5); -return x_16; -} -else -{ -obj* x_17; obj* x_18; uint8 x_19; -x_17 = lean::cnstr_get(x_14, 0); -lean::inc(x_17); -lean::dec(x_14); -x_18 = lean::cnstr_get(x_13, 1); -lean::inc(x_18); -x_19 = lean::nat_dec_eq(x_18, x_12); -lean::dec(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; -lean::dec(x_17); -lean::dec(x_12); -lean::dec(x_11); -lean::dec(x_2); -lean::dec(x_1); -x_20 = l_Lean_Parser_Term_do___elambda__1___closed__2; -x_21 = l_Lean_Parser_ParserState_mkNode(x_13, x_20, x_5); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; +x_11 = l_Lean_Parser_Term_bracketedDoSeq___elambda__1(x_1, x_2, x_6); +x_12 = lean::cnstr_get(x_11, 3); lean::inc(x_12); -x_22 = l_Lean_Parser_ParserState_restore(x_13, x_11, x_12); -lean::dec(x_11); -x_23 = l_Lean_Parser_Term_doSeq___elambda__1(x_1, x_2, x_22); -x_24 = l_Lean_Parser_mergeOrElseErrors(x_23, x_17, x_12); -lean::dec(x_12); -x_25 = l_Lean_Parser_Term_do___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_5); -return x_26; -} -} -} -else +if (lean::obj_tag(x_12) == 0) { -obj* x_27; obj* x_28; +obj* x_13; obj* x_14; +lean::dec(x_10); lean::dec(x_9); lean::dec(x_2); lean::dec(x_1); -x_27 = l_Lean_Parser_Term_do___elambda__1___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_8, x_27, x_5); -return x_28; +x_13 = l_Lean_Parser_Term_do___elambda__1___closed__2; +x_14 = l_Lean_Parser_ParserState_mkNode(x_11, x_13, x_5); +return x_14; +} +else +{ +obj* x_15; obj* x_16; uint8 x_17; +x_15 = lean::cnstr_get(x_12, 0); +lean::inc(x_15); +lean::dec(x_12); +x_16 = lean::cnstr_get(x_11, 1); +lean::inc(x_16); +x_17 = lean::nat_dec_eq(x_16, x_10); +lean::dec(x_16); +if (x_17 == 0) +{ +obj* x_18; obj* x_19; +lean::dec(x_15); +lean::dec(x_10); +lean::dec(x_9); +lean::dec(x_2); +lean::dec(x_1); +x_18 = l_Lean_Parser_Term_do___elambda__1___closed__2; +x_19 = l_Lean_Parser_ParserState_mkNode(x_11, x_18, x_5); +return x_19; +} +else +{ +obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; +lean::inc(x_10); +x_20 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +lean::dec(x_9); +x_21 = l_Lean_Parser_Term_doSeq___elambda__1(x_1, x_2, x_20); +x_22 = l_Lean_Parser_mergeOrElseErrors(x_21, x_15, x_10); +lean::dec(x_10); +x_23 = l_Lean_Parser_Term_do___elambda__1___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_5); +return x_24; +} +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_7); +lean::dec(x_2); +lean::dec(x_1); +x_25 = l_Lean_Parser_Term_do___elambda__1___closed__2; +x_26 = l_Lean_Parser_ParserState_mkNode(x_6, x_25, x_5); +return x_26; +} } } } @@ -16922,7 +22086,7 @@ obj* _init_l_Lean_Parser_Term_not___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -16938,38 +22102,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_not___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_not___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(40u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(40u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_not___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -17107,7 +22339,7 @@ obj* _init_l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__5() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__4; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -17123,38 +22355,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__7() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__6; +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* l_Lean_Parser_Term_bnot___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__4; -x_6 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__6; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(40u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__4; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__7; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__7; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__7; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(40u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -17274,7 +22574,7 @@ obj* _init_l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -17290,38 +22590,106 @@ x_3 = lean::string_append(x_1, x_2); return x_3; } } +obj* _init_l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__6() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__5; +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* l_Lean_Parser_Term_uminus___elambda__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_3; obj* x_4; obj* x_5; obj* x_15; obj* x_16; obj* x_17; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_4 = lean::array_get_size(x_3); lean::dec(x_3); -x_5 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__3; -x_6 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__5; +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); lean::inc(x_1); -x_7 = l_Lean_Parser_symbolFnAux(x_5, x_6, x_1, x_2); -x_8 = lean::cnstr_get(x_7, 3); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) +x_16 = l_Lean_Parser_tokenFn(x_1, x_2); +x_17 = lean::cnstr_get(x_16, 3); +lean::inc(x_17); +if (lean::obj_tag(x_17) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_termParserAttribute; -x_10 = lean::mk_nat_obj(100u); -x_11 = l_Lean_Parser_ParserAttribute_runParser(x_9, x_10, x_1, x_7); -x_12 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__2; -x_13 = l_Lean_Parser_ParserState_mkNode(x_11, x_12, x_4); -return x_13; +obj* x_18; obj* x_19; +x_18 = lean::cnstr_get(x_16, 0); +lean::inc(x_18); +x_19 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_18); +lean::dec(x_18); +if (lean::obj_tag(x_19) == 2) +{ +obj* x_20; obj* x_21; uint8 x_22; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +lean::dec(x_19); +x_21 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__3; +x_22 = lean::string_dec_eq(x_20, x_21); +lean::dec(x_20); +if (x_22 == 0) +{ +obj* x_23; obj* x_24; +x_23 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__6; +x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); +x_5 = x_24; +goto block_14; } else { -obj* x_14; obj* x_15; -lean::dec(x_8); +lean::dec(x_15); +x_5 = x_16; +goto block_14; +} +} +else +{ +obj* x_25; obj* x_26; +lean::dec(x_19); +x_25 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__6; +x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_25, x_15); +x_5 = x_26; +goto block_14; +} +} +else +{ +obj* x_27; obj* x_28; +lean::dec(x_17); +x_27 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__6; +x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_27, x_15); +x_5 = x_28; +goto block_14; +} +block_14: +{ +obj* x_6; +x_6 = lean::cnstr_get(x_5, 3); +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 = l_Lean_Parser_termParserAttribute; +x_8 = lean::mk_nat_obj(100u); +x_9 = l_Lean_Parser_ParserAttribute_runParser(x_7, x_8, x_1, x_5); +x_10 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__2; +x_11 = l_Lean_Parser_ParserState_mkNode(x_9, x_10, x_4); +return x_11; +} +else +{ +obj* x_12; obj* x_13; +lean::dec(x_6); lean::dec(x_1); -x_14 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__2; -x_15 = l_Lean_Parser_ParserState_mkNode(x_7, x_14, x_4); -return x_15; +x_12 = l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__2; +x_13 = l_Lean_Parser_ParserState_mkNode(x_5, x_12, x_4); +return x_13; +} } } } @@ -17431,126 +22799,332 @@ return x_3; obj* l_Lean_Parser_Term_namedArgument___elambda__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_26; obj* x_27; obj* x_28; obj* x_29; +obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_46; obj* x_83; obj* x_84; 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::array_get_size(x_3); lean::dec(x_3); -x_26 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; -x_27 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__8; lean::inc(x_1); -x_28 = l_Lean_Parser_symbolFnAux(x_26, x_27, x_1, x_2); -x_29 = lean::cnstr_get(x_28, 3); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) +x_83 = l_Lean_Parser_tokenFn(x_1, x_2); +x_84 = lean::cnstr_get(x_83, 3); +lean::inc(x_84); +if (lean::obj_tag(x_84) == 0) { -obj* x_30; obj* x_31; -lean::inc(x_1); -x_30 = l_Lean_Parser_identFn___rarg(x_1, x_28); -x_31 = lean::cnstr_get(x_30, 3); -lean::inc(x_31); -if (lean::obj_tag(x_31) == 0) +obj* x_85; obj* x_86; +x_85 = lean::cnstr_get(x_83, 0); +lean::inc(x_85); +x_86 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_85); +lean::dec(x_85); +if (lean::obj_tag(x_86) == 2) { -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_32 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; -x_33 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5; -lean::inc(x_1); -x_34 = l_Lean_Parser_symbolFnAux(x_32, x_33, x_1, x_30); -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 2); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_34, 3); -lean::inc(x_37); -x_6 = x_34; -x_7 = x_35; -x_8 = x_36; -x_9 = x_37; -goto block_25; +obj* x_87; obj* x_88; uint8 x_89; +x_87 = lean::cnstr_get(x_86, 1); +lean::inc(x_87); +lean::dec(x_86); +x_88 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__5; +x_89 = lean::string_dec_eq(x_87, x_88); +lean::dec(x_87); +if (x_89 == 0) +{ +obj* x_90; obj* x_91; +x_90 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_4); +x_91 = l_Lean_Parser_ParserState_mkErrorsAt(x_83, x_90, x_4); +x_46 = x_91; +goto block_82; } else { -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_31); -x_38 = lean::cnstr_get(x_30, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_30, 2); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_30, 3); -lean::inc(x_40); -x_6 = x_30; -x_7 = x_38; -x_8 = x_39; -x_9 = x_40; -goto block_25; +x_46 = x_83; +goto block_82; } } else { -obj* x_41; obj* x_42; obj* x_43; -lean::dec(x_29); -x_41 = lean::cnstr_get(x_28, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_28, 2); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_28, 3); -lean::inc(x_43); -x_6 = x_28; -x_7 = x_41; -x_8 = x_42; -x_9 = x_43; -goto block_25; +obj* x_92; obj* x_93; +lean::dec(x_86); +x_92 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_4); +x_93 = l_Lean_Parser_ParserState_mkErrorsAt(x_83, x_92, x_4); +x_46 = x_93; +goto block_82; } -block_25: +} +else { -if (lean::obj_tag(x_9) == 0) +obj* x_94; obj* x_95; +lean::dec(x_84); +x_94 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; +lean::inc(x_4); +x_95 = l_Lean_Parser_ParserState_mkErrorsAt(x_83, x_94, x_4); +x_46 = x_95; +goto block_82; +} +block_38: { -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -lean::dec(x_8); +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); +if (lean::obj_tag(x_7) == 0) +{ +obj* x_8; obj* x_9; obj* x_10; obj* x_11; +x_8 = l_Lean_Parser_termParserAttribute; +x_9 = lean::mk_nat_obj(0u); +lean::inc(x_1); +x_10 = l_Lean_Parser_ParserAttribute_runParser(x_8, x_9, x_1, x_6); +x_11 = lean::cnstr_get(x_10, 3); +lean::inc(x_11); +if (lean::obj_tag(x_11) == 0) +{ +obj* x_12; obj* x_13; obj* x_14; +x_12 = lean::cnstr_get(x_10, 1); +lean::inc(x_12); +x_13 = l_Lean_Parser_tokenFn(x_1, x_10); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +if (lean::obj_tag(x_14) == 0) +{ +obj* x_15; obj* x_16; +x_15 = lean::cnstr_get(x_13, 0); +lean::inc(x_15); +x_16 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_15); +lean::dec(x_15); +if (lean::obj_tag(x_16) == 2) +{ +obj* x_17; obj* x_18; uint8 x_19; +x_17 = lean::cnstr_get(x_16, 1); +lean::inc(x_17); +lean::dec(x_16); +x_18 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; +x_19 = lean::string_dec_eq(x_17, x_18); +lean::dec(x_17); +if (x_19 == 0) +{ +obj* x_20; obj* x_21; obj* x_22; obj* x_23; +x_20 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12); +x_22 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +return x_23; +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_12); +x_24 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_13, x_24, x_5); +return x_25; +} +} +else +{ +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_16); +x_26 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_26, x_12); +x_28 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; obj* x_32; obj* x_33; +lean::dec(x_14); +x_30 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__9; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_30, x_12); +x_32 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +return x_33; +} +} +else +{ +obj* x_34; obj* x_35; +lean::dec(x_11); +lean::dec(x_1); +x_34 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_10, x_34, x_5); +return x_35; +} +} +else +{ +obj* x_36; obj* x_37; lean::dec(x_7); +lean::dec(x_1); +x_36 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); +return x_37; +} +} +block_45: +{ +if (lean::obj_tag(x_42) == 0) +{ +lean::dec(x_41); +lean::dec(x_40); lean::dec(x_4); -x_10 = l_Lean_Parser_termParserAttribute; -x_11 = lean::mk_nat_obj(0u); +x_6 = x_39; +goto block_38; +} +else +{ +obj* x_43; obj* x_44; +lean::dec(x_39); +x_43 = l_Array_shrink___main___rarg(x_40, x_5); +x_44 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_4); +lean::cnstr_set(x_44, 2, x_41); +lean::cnstr_set(x_44, 3, x_42); +x_6 = x_44; +goto block_38; +} +} +block_82: +{ +obj* x_47; +x_47 = lean::cnstr_get(x_46, 3); +lean::inc(x_47); +if (lean::obj_tag(x_47) == 0) +{ +obj* x_48; obj* x_49; lean::inc(x_1); -x_12 = l_Lean_Parser_ParserAttribute_runParser(x_10, x_11, x_1, x_6); -x_13 = lean::cnstr_get(x_12, 3); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) +x_48 = l_Lean_Parser_identFn___rarg(x_1, x_46); +x_49 = lean::cnstr_get(x_48, 3); +lean::inc(x_49); +if (lean::obj_tag(x_49) == 0) { -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__6; -x_15 = l_Lean_Parser_Level_paren___elambda__1___rarg___closed__10; -x_16 = l_Lean_Parser_symbolFnAux(x_14, x_15, x_1, x_12); -x_17 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; -x_18 = l_Lean_Parser_ParserState_mkNode(x_16, x_17, x_5); -return x_18; +obj* x_50; obj* x_51; obj* x_52; +x_50 = lean::cnstr_get(x_48, 1); +lean::inc(x_50); +lean::inc(x_1); +x_51 = l_Lean_Parser_tokenFn(x_1, x_48); +x_52 = lean::cnstr_get(x_51, 3); +lean::inc(x_52); +if (lean::obj_tag(x_52) == 0) +{ +obj* x_53; obj* x_54; +x_53 = lean::cnstr_get(x_51, 0); +lean::inc(x_53); +x_54 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_53); +lean::dec(x_53); +if (lean::obj_tag(x_54) == 2) +{ +obj* x_55; obj* x_56; uint8 x_57; +x_55 = lean::cnstr_get(x_54, 1); +lean::inc(x_55); +lean::dec(x_54); +x_56 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__3; +x_57 = lean::string_dec_eq(x_55, x_56); +lean::dec(x_55); +if (x_57 == 0) +{ +obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; +x_58 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_59 = l_Lean_Parser_ParserState_mkErrorsAt(x_51, x_58, x_50); +x_60 = lean::cnstr_get(x_59, 0); +lean::inc(x_60); +x_61 = lean::cnstr_get(x_59, 2); +lean::inc(x_61); +x_62 = lean::cnstr_get(x_59, 3); +lean::inc(x_62); +x_39 = x_59; +x_40 = x_60; +x_41 = x_61; +x_42 = x_62; +goto block_45; } else { -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_1); -x_19 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_12, x_19, x_5); -return x_20; +obj* x_63; obj* x_64; obj* x_65; +lean::dec(x_50); +x_63 = lean::cnstr_get(x_51, 0); +lean::inc(x_63); +x_64 = lean::cnstr_get(x_51, 2); +lean::inc(x_64); +x_65 = lean::cnstr_get(x_51, 3); +lean::inc(x_65); +x_39 = x_51; +x_40 = x_63; +x_41 = x_64; +x_42 = x_65; +goto block_45; } } else { -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -lean::dec(x_6); -lean::dec(x_1); -x_21 = l_Array_shrink___main___rarg(x_7, x_5); -x_22 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_4); -lean::cnstr_set(x_22, 2, x_8); -lean::cnstr_set(x_22, 3, x_9); -x_23 = l_Lean_Parser_Term_namedArgument___elambda__1___rarg___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_5); -return x_24; +obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; +lean::dec(x_54); +x_66 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_67 = l_Lean_Parser_ParserState_mkErrorsAt(x_51, x_66, x_50); +x_68 = lean::cnstr_get(x_67, 0); +lean::inc(x_68); +x_69 = lean::cnstr_get(x_67, 2); +lean::inc(x_69); +x_70 = lean::cnstr_get(x_67, 3); +lean::inc(x_70); +x_39 = x_67; +x_40 = x_68; +x_41 = x_69; +x_42 = x_70; +goto block_45; +} +} +else +{ +obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; +lean::dec(x_52); +x_71 = l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6; +x_72 = l_Lean_Parser_ParserState_mkErrorsAt(x_51, x_71, x_50); +x_73 = lean::cnstr_get(x_72, 0); +lean::inc(x_73); +x_74 = lean::cnstr_get(x_72, 2); +lean::inc(x_74); +x_75 = lean::cnstr_get(x_72, 3); +lean::inc(x_75); +x_39 = x_72; +x_40 = x_73; +x_41 = x_74; +x_42 = x_75; +goto block_45; +} +} +else +{ +obj* x_76; obj* x_77; obj* x_78; +lean::dec(x_49); +x_76 = lean::cnstr_get(x_48, 0); +lean::inc(x_76); +x_77 = lean::cnstr_get(x_48, 2); +lean::inc(x_77); +x_78 = lean::cnstr_get(x_48, 3); +lean::inc(x_78); +x_39 = x_48; +x_40 = x_76; +x_41 = x_77; +x_42 = x_78; +goto block_45; +} +} +else +{ +obj* x_79; obj* x_80; obj* x_81; +lean::dec(x_47); +x_79 = lean::cnstr_get(x_46, 0); +lean::inc(x_79); +x_80 = lean::cnstr_get(x_46, 2); +lean::inc(x_80); +x_81 = lean::cnstr_get(x_46, 3); +lean::inc(x_81); +x_39 = x_46; +x_40 = x_79; +x_41 = x_80; +x_42 = x_81; +goto block_45; } } } @@ -17828,7 +23402,7 @@ if (x_7 == 0) { obj* x_8; obj* x_9; x_8 = l_Lean_Parser_checkLeadingFn___closed__1; -x_9 = l_Lean_Parser_ParserState_mkError(x_3, x_8); +x_9 = l_Lean_Parser_ParserState_mkUnexpectedError(x_3, x_8); return x_9; } else @@ -18031,7 +23605,7 @@ obj* _init_l_Lean_Parser_Term_proj___elambda__1___closed__4() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_chFn___rarg___closed__1; +x_1 = l_Char_HasRepr___closed__1; x_2 = l_Lean_Parser_Term_proj___elambda__1___closed__3; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -18457,7 +24031,7 @@ obj* _init_l_Lean_Parser_Term_array___elambda__1___closed__3() { _start: { obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Term_list___elambda__1___closed__5; +x_1 = l_Lean_Parser_Term_list___elambda__1___closed__8; x_2 = l_Lean_Parser_symbolNoWsFn___closed__1; x_3 = lean::string_append(x_1, x_2); return x_3; @@ -18466,125 +24040,148 @@ return x_3; obj* l_Lean_Parser_Term_array___elambda__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_4; obj* x_5; obj* x_6; obj* x_39; obj* x_40; x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_5 = lean::array_get_size(x_4); lean::dec(x_4); lean::inc(x_1); lean::inc(x_3); -x_6 = l_Lean_Parser_ParserState_pushSyntax(x_3, x_1); -x_7 = lean::cnstr_get(x_3, 3); -lean::inc(x_7); +x_39 = l_Lean_Parser_ParserState_pushSyntax(x_3, x_1); +x_40 = lean::cnstr_get(x_3, 3); +lean::inc(x_40); lean::dec(x_3); +if (lean::obj_tag(x_40) == 0) +{ +uint8 x_41; +x_41 = l_Lean_Parser_checkTailNoWs(x_1); +lean::dec(x_1); +if (x_41 == 0) +{ +obj* x_42; obj* x_43; +x_42 = l_Lean_Parser_Term_array___elambda__1___closed__3; +x_43 = l_Lean_Parser_ParserState_mkError(x_39, x_42); +x_6 = x_43; +goto block_38; +} +else +{ +obj* x_44; obj* x_45; obj* x_46; obj* x_47; +x_44 = l_Lean_Parser_Term_list___elambda__1___closed__3; +x_45 = l_Lean_Parser_Term_array___elambda__1___closed__3; +x_46 = lean::mk_nat_obj(0u); +x_47 = l_Lean_Parser_strAux___main(x_44, x_45, x_46, x_2, x_39); +x_6 = x_47; +goto block_38; +} +} +else +{ +obj* x_48; obj* x_49; +lean::dec(x_40); +lean::dec(x_2); +lean::dec(x_1); +x_48 = l_Lean_Parser_Term_array___elambda__1___closed__2; +x_49 = l_Lean_Parser_ParserState_mkNode(x_39, x_48, x_5); +return x_49; +} +block_38: +{ +obj* x_7; +x_7 = lean::cnstr_get(x_6, 3); +lean::inc(x_7); if (lean::obj_tag(x_7) == 0) { -uint8 x_8; -x_8 = l_Lean_Parser_checkTailNoWs(x_1); -lean::dec(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = l_Lean_Parser_Term_array___elambda__1___closed__3; -x_10 = l_Lean_Parser_ParserState_mkError(x_6, x_9); +obj* x_8; obj* x_9; obj* x_10; obj* x_11; +x_8 = l_Lean_Parser_termParserAttribute; +x_9 = lean::mk_nat_obj(0u); +lean::inc(x_2); +x_10 = l_Lean_Parser_ParserAttribute_runParser(x_8, x_9, x_2, x_6); x_11 = lean::cnstr_get(x_10, 3); 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 = l_Lean_Parser_termParserAttribute; -x_13 = lean::mk_nat_obj(0u); -lean::inc(x_2); -x_14 = l_Lean_Parser_ParserAttribute_runParser(x_12, x_13, x_2, x_10); -x_15 = lean::cnstr_get(x_14, 3); +obj* x_12; obj* x_13; obj* x_14; +x_12 = lean::cnstr_get(x_10, 1); +lean::inc(x_12); +x_13 = l_Lean_Parser_tokenFn(x_2, x_10); +x_14 = lean::cnstr_get(x_13, 3); +lean::inc(x_14); +if (lean::obj_tag(x_14) == 0) +{ +obj* x_15; obj* x_16; +x_15 = lean::cnstr_get(x_13, 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; -x_16 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_17 = l_Lean_Parser_Term_list___elambda__1___closed__8; -x_18 = l_Lean_Parser_symbolFnAux(x_16, x_17, x_2, x_14); -x_19 = l_Lean_Parser_Term_array___elambda__1___closed__2; -x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_5); -return x_20; -} -else -{ -obj* x_21; obj* x_22; +x_16 = l_Array_back___at___private_init_lean_parser_parser_6__updateCache___spec__1(x_15); lean::dec(x_15); -lean::dec(x_2); -x_21 = l_Lean_Parser_Term_array___elambda__1___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_14, x_21, x_5); -return x_22; +if (lean::obj_tag(x_16) == 2) +{ +obj* x_17; obj* x_18; uint8 x_19; +x_17 = lean::cnstr_get(x_16, 1); +lean::inc(x_17); +lean::dec(x_16); +x_18 = l_Lean_Parser_Term_list___elambda__1___closed__4; +x_19 = lean::string_dec_eq(x_17, x_18); +lean::dec(x_17); +if (x_19 == 0) +{ +obj* x_20; obj* x_21; obj* x_22; obj* x_23; +x_20 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12); +x_22 = l_Lean_Parser_Term_array___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +return x_23; +} +else +{ +obj* x_24; obj* x_25; +lean::dec(x_12); +x_24 = l_Lean_Parser_Term_array___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_13, x_24, x_5); +return x_25; } } else { -obj* x_23; obj* x_24; +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_16); +x_26 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_26, x_12); +x_28 = l_Lean_Parser_Term_array___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; +} +} +else +{ +obj* x_30; obj* x_31; obj* x_32; obj* x_33; +lean::dec(x_14); +x_30 = l_Lean_Parser_Term_list___elambda__1___closed__7; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_30, x_12); +x_32 = l_Lean_Parser_Term_array___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +return x_33; +} +} +else +{ +obj* x_34; obj* x_35; lean::dec(x_11); lean::dec(x_2); -x_23 = l_Lean_Parser_Term_array___elambda__1___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_10, x_23, x_5); -return x_24; +x_34 = l_Lean_Parser_Term_array___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_10, x_34, x_5); +return x_35; } } else { -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_Term_list___elambda__1___closed__3; -x_26 = l_Lean_Parser_Term_array___elambda__1___closed__3; -x_27 = lean::mk_nat_obj(0u); -x_28 = l_Lean_Parser_strAux___main(x_25, x_26, x_27, x_2, x_6); -x_29 = lean::cnstr_get(x_28, 3); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; -x_30 = l_Lean_Parser_termParserAttribute; -lean::inc(x_2); -x_31 = l_Lean_Parser_ParserAttribute_runParser(x_30, x_27, x_2, x_28); -x_32 = lean::cnstr_get(x_31, 3); -lean::inc(x_32); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_33 = l_Lean_Parser_Term_list___elambda__1___closed__4; -x_34 = l_Lean_Parser_Term_list___elambda__1___closed__8; -x_35 = l_Lean_Parser_symbolFnAux(x_33, x_34, x_2, x_31); -x_36 = l_Lean_Parser_Term_array___elambda__1___closed__2; -x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_5); -return x_37; -} -else -{ -obj* x_38; obj* x_39; -lean::dec(x_32); -lean::dec(x_2); -x_38 = l_Lean_Parser_Term_array___elambda__1___closed__2; -x_39 = l_Lean_Parser_ParserState_mkNode(x_31, x_38, x_5); -return x_39; -} -} -else -{ -obj* x_40; obj* x_41; -lean::dec(x_29); -lean::dec(x_2); -x_40 = l_Lean_Parser_Term_array___elambda__1___closed__2; -x_41 = l_Lean_Parser_ParserState_mkNode(x_28, x_40, x_5); -return x_41; -} -} -} -else -{ -obj* x_42; obj* x_43; +obj* x_36; obj* x_37; lean::dec(x_7); lean::dec(x_2); -lean::dec(x_1); -x_42 = l_Lean_Parser_Term_array___elambda__1___closed__2; -x_43 = l_Lean_Parser_ParserState_mkNode(x_6, x_42, x_5); -return x_43; +x_36 = l_Lean_Parser_Term_array___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); +return x_37; +} } } } @@ -22681,12 +28278,14 @@ REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_na REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "infixR"), 2, l_Lean_Parser_Term_infixR___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "unicodeInfixL"), 3, l_Lean_Parser_Term_unicodeInfixL___boxed); REGISTER_LEAN_FUNCTION(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "infixL"), 2, l_Lean_Parser_Term_infixL___boxed); -l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1 = _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1); -l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2 = _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2(); -lean::mark_persistent(l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2); -l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3 = _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3(); -lean::mark_persistent(l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3); +l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1 = _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1(); +lean::mark_persistent(l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__1); +l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2 = _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2(); +lean::mark_persistent(l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__2); +l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3 = _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3(); +lean::mark_persistent(l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__3); +l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4 = _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4(); +lean::mark_persistent(l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_id___elambda__1___spec__2___closed__4); l_Lean_Parser_Term_id___elambda__1___closed__1 = _init_l_Lean_Parser_Term_id___elambda__1___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_id___elambda__1___closed__1); l_Lean_Parser_Term_id___elambda__1___closed__2 = _init_l_Lean_Parser_Term_id___elambda__1___closed__2(); @@ -22711,6 +28310,10 @@ l_Lean_Parser_Term_id___elambda__1___closed__11 = _init_l_Lean_Parser_Term_id___ lean::mark_persistent(l_Lean_Parser_Term_id___elambda__1___closed__11); l_Lean_Parser_Term_id___elambda__1___closed__12 = _init_l_Lean_Parser_Term_id___elambda__1___closed__12(); lean::mark_persistent(l_Lean_Parser_Term_id___elambda__1___closed__12); +l_Lean_Parser_Term_id___elambda__1___closed__13 = _init_l_Lean_Parser_Term_id___elambda__1___closed__13(); +lean::mark_persistent(l_Lean_Parser_Term_id___elambda__1___closed__13); +l_Lean_Parser_Term_id___elambda__1___closed__14 = _init_l_Lean_Parser_Term_id___elambda__1___closed__14(); +lean::mark_persistent(l_Lean_Parser_Term_id___elambda__1___closed__14); l_Lean_Parser_Term_id___closed__1 = _init_l_Lean_Parser_Term_id___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_id___closed__1); l_Lean_Parser_Term_id___closed__2 = _init_l_Lean_Parser_Term_id___closed__2(); @@ -22762,6 +28365,19 @@ l___regBuiltinParser_Lean_Parser_Term_str___closed__2 = _init_l___regBuiltinPars lean::mark_persistent(l___regBuiltinParser_Lean_Parser_Term_str___closed__2); w = l___regBuiltinParser_Lean_Parser_Term_str(w); if (io_result_is_error(w)) return w; +l_Lean_Parser_Term_char___closed__1 = _init_l_Lean_Parser_Term_char___closed__1(); +lean::mark_persistent(l_Lean_Parser_Term_char___closed__1); +l_Lean_Parser_Term_char___closed__2 = _init_l_Lean_Parser_Term_char___closed__2(); +lean::mark_persistent(l_Lean_Parser_Term_char___closed__2); +l_Lean_Parser_Term_char = _init_l_Lean_Parser_Term_char(); +lean::mark_persistent(l_Lean_Parser_Term_char); +lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "char"), l_Lean_Parser_Term_char); +l___regBuiltinParser_Lean_Parser_Term_char___closed__1 = _init_l___regBuiltinParser_Lean_Parser_Term_char___closed__1(); +lean::mark_persistent(l___regBuiltinParser_Lean_Parser_Term_char___closed__1); +l___regBuiltinParser_Lean_Parser_Term_char___closed__2 = _init_l___regBuiltinParser_Lean_Parser_Term_char___closed__2(); +lean::mark_persistent(l___regBuiltinParser_Lean_Parser_Term_char___closed__2); +w = l___regBuiltinParser_Lean_Parser_Term_char(w); +if (io_result_is_error(w)) return w; l_Lean_Parser_Term_type___elambda__1___rarg___closed__1 = _init_l_Lean_Parser_Term_type___elambda__1___rarg___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_type___elambda__1___rarg___closed__1); l_Lean_Parser_Term_type___elambda__1___rarg___closed__2 = _init_l_Lean_Parser_Term_type___elambda__1___rarg___closed__2(); @@ -22774,6 +28390,8 @@ l_Lean_Parser_Term_type___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Te lean::mark_persistent(l_Lean_Parser_Term_type___elambda__1___rarg___closed__5); l_Lean_Parser_Term_type___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_type___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_type___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_type___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_type___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_type___elambda__1___rarg___closed__7); l_Lean_Parser_Term_type___closed__1 = _init_l_Lean_Parser_Term_type___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_type___closed__1); l_Lean_Parser_Term_type___closed__2 = _init_l_Lean_Parser_Term_type___closed__2(); @@ -22799,6 +28417,8 @@ l_Lean_Parser_Term_sort___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Te lean::mark_persistent(l_Lean_Parser_Term_sort___elambda__1___rarg___closed__5); l_Lean_Parser_Term_sort___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_sort___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_sort___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_sort___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_sort___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_sort___elambda__1___rarg___closed__7); l_Lean_Parser_Term_sort___closed__1 = _init_l_Lean_Parser_Term_sort___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_sort___closed__1); l_Lean_Parser_Term_sort___closed__2 = _init_l_Lean_Parser_Term_sort___closed__2(); @@ -22824,6 +28444,8 @@ l_Lean_Parser_Term_prop___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Te lean::mark_persistent(l_Lean_Parser_Term_prop___elambda__1___rarg___closed__5); l_Lean_Parser_Term_prop___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_prop___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_prop___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_prop___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_prop___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_prop___elambda__1___rarg___closed__7); l_Lean_Parser_Term_prop___closed__1 = _init_l_Lean_Parser_Term_prop___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_prop___closed__1); l_Lean_Parser_Term_prop___closed__2 = _init_l_Lean_Parser_Term_prop___closed__2(); @@ -22862,6 +28484,8 @@ l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__4 = _init_l_Lean_Parser_T lean::mark_persistent(l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__4); l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__5); +l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Term_sorry___elambda__1___rarg___closed__6); l_Lean_Parser_Term_sorry___closed__1 = _init_l_Lean_Parser_Term_sorry___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_sorry___closed__1); l_Lean_Parser_Term_sorry___closed__2 = _init_l_Lean_Parser_Term_sorry___closed__2(); @@ -22887,6 +28511,8 @@ l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Te lean::mark_persistent(l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__5); l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__7); l_Lean_Parser_Term_cdot___closed__1 = _init_l_Lean_Parser_Term_cdot___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_cdot___closed__1); l_Lean_Parser_Term_cdot___closed__2 = _init_l_Lean_Parser_Term_cdot___closed__2(); @@ -22912,6 +28538,8 @@ l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_ lean::mark_persistent(l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__5); l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_emptyC___elambda__1___rarg___closed__7); l_Lean_Parser_Term_emptyC___closed__1 = _init_l_Lean_Parser_Term_emptyC___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_emptyC___closed__1); l_Lean_Parser_Term_emptyC___closed__2 = _init_l_Lean_Parser_Term_emptyC___closed__2(); @@ -22937,6 +28565,8 @@ l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__5 = _init_l_Lean lean::mark_persistent(l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__5); l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_typeAscription___elambda__1___rarg___closed__7); l_Lean_Parser_Term_typeAscription___closed__1 = _init_l_Lean_Parser_Term_typeAscription___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_typeAscription___closed__1); l_Lean_Parser_Term_typeAscription___closed__2 = _init_l_Lean_Parser_Term_typeAscription___closed__2(); @@ -23015,6 +28645,10 @@ l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__7 = _init_l_Lean_Parser_ lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__7); l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__8 = _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__8(); lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__8); +l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__9 = _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__9(); +lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__9); +l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__10 = _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__10(); +lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__10); l_Lean_Parser_Term_anonymousCtor___closed__1 = _init_l_Lean_Parser_Term_anonymousCtor___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor___closed__1); l_Lean_Parser_Term_anonymousCtor___closed__2 = _init_l_Lean_Parser_Term_anonymousCtor___closed__2(); @@ -23029,6 +28663,8 @@ l_Lean_Parser_Term_anonymousCtor___closed__6 = _init_l_Lean_Parser_Term_anonymou lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor___closed__6); l_Lean_Parser_Term_anonymousCtor___closed__7 = _init_l_Lean_Parser_Term_anonymousCtor___closed__7(); lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor___closed__7); +l_Lean_Parser_Term_anonymousCtor___closed__8 = _init_l_Lean_Parser_Term_anonymousCtor___closed__8(); +lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor___closed__8); l_Lean_Parser_Term_anonymousCtor = _init_l_Lean_Parser_Term_anonymousCtor(); lean::mark_persistent(l_Lean_Parser_Term_anonymousCtor); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "anonymousCtor"), l_Lean_Parser_Term_anonymousCtor); @@ -23073,6 +28709,12 @@ l_Lean_Parser_Term_if___elambda__1___rarg___closed__13 = _init_l_Lean_Parser_Ter lean::mark_persistent(l_Lean_Parser_Term_if___elambda__1___rarg___closed__13); l_Lean_Parser_Term_if___elambda__1___rarg___closed__14 = _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__14(); lean::mark_persistent(l_Lean_Parser_Term_if___elambda__1___rarg___closed__14); +l_Lean_Parser_Term_if___elambda__1___rarg___closed__15 = _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__15(); +lean::mark_persistent(l_Lean_Parser_Term_if___elambda__1___rarg___closed__15); +l_Lean_Parser_Term_if___elambda__1___rarg___closed__16 = _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__16(); +lean::mark_persistent(l_Lean_Parser_Term_if___elambda__1___rarg___closed__16); +l_Lean_Parser_Term_if___elambda__1___rarg___closed__17 = _init_l_Lean_Parser_Term_if___elambda__1___rarg___closed__17(); +lean::mark_persistent(l_Lean_Parser_Term_if___elambda__1___rarg___closed__17); l_Lean_Parser_Term_if___closed__1 = _init_l_Lean_Parser_Term_if___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_if___closed__1); l_Lean_Parser_Term_if___closed__2 = _init_l_Lean_Parser_Term_if___closed__2(); @@ -23114,6 +28756,8 @@ l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__5 = _init_l_Lean_Parse lean::mark_persistent(l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__5); l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_fromTerm___elambda__1___rarg___closed__7); l_Lean_Parser_Term_fromTerm___closed__1 = _init_l_Lean_Parser_Term_fromTerm___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_fromTerm___closed__1); l_Lean_Parser_Term_fromTerm___closed__2 = _init_l_Lean_Parser_Term_fromTerm___closed__2(); @@ -23137,6 +28781,8 @@ l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__4 = _init_l_Lean_Par lean::mark_persistent(l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__4); l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__5); +l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Term_haveAssign___elambda__1___rarg___closed__6); l_Lean_Parser_Term_haveAssign___closed__1 = _init_l_Lean_Parser_Term_haveAssign___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_haveAssign___closed__1); l_Lean_Parser_Term_haveAssign___closed__2 = _init_l_Lean_Parser_Term_haveAssign___closed__2(); @@ -23168,6 +28814,12 @@ l_Lean_Parser_Term_have___elambda__1___rarg___closed__8 = _init_l_Lean_Parser_Te lean::mark_persistent(l_Lean_Parser_Term_have___elambda__1___rarg___closed__8); l_Lean_Parser_Term_have___elambda__1___rarg___closed__9 = _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__9(); lean::mark_persistent(l_Lean_Parser_Term_have___elambda__1___rarg___closed__9); +l_Lean_Parser_Term_have___elambda__1___rarg___closed__10 = _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__10(); +lean::mark_persistent(l_Lean_Parser_Term_have___elambda__1___rarg___closed__10); +l_Lean_Parser_Term_have___elambda__1___rarg___closed__11 = _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__11(); +lean::mark_persistent(l_Lean_Parser_Term_have___elambda__1___rarg___closed__11); +l_Lean_Parser_Term_have___elambda__1___rarg___closed__12 = _init_l_Lean_Parser_Term_have___elambda__1___rarg___closed__12(); +lean::mark_persistent(l_Lean_Parser_Term_have___elambda__1___rarg___closed__12); l_Lean_Parser_Term_have___closed__1 = _init_l_Lean_Parser_Term_have___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_have___closed__1); l_Lean_Parser_Term_have___closed__2 = _init_l_Lean_Parser_Term_have___closed__2(); @@ -23207,6 +28859,8 @@ l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__5 = _init_l_Lean_Parse lean::mark_persistent(l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__5); l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7); l_Lean_Parser_Term_suffices___closed__1 = _init_l_Lean_Parser_Term_suffices___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_suffices___closed__1); l_Lean_Parser_Term_suffices___closed__2 = _init_l_Lean_Parser_Term_suffices___closed__2(); @@ -23240,6 +28894,8 @@ l_Lean_Parser_Term_show___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Te lean::mark_persistent(l_Lean_Parser_Term_show___elambda__1___rarg___closed__5); l_Lean_Parser_Term_show___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_show___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_show___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_show___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_show___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_show___elambda__1___rarg___closed__7); l_Lean_Parser_Term_show___closed__1 = _init_l_Lean_Parser_Term_show___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_show___closed__1); l_Lean_Parser_Term_show___closed__2 = _init_l_Lean_Parser_Term_show___closed__2(); @@ -23291,6 +28947,10 @@ l_Lean_Parser_Term_fun___elambda__1___closed__16 = _init_l_Lean_Parser_Term_fun_ lean::mark_persistent(l_Lean_Parser_Term_fun___elambda__1___closed__16); l_Lean_Parser_Term_fun___elambda__1___closed__17 = _init_l_Lean_Parser_Term_fun___elambda__1___closed__17(); lean::mark_persistent(l_Lean_Parser_Term_fun___elambda__1___closed__17); +l_Lean_Parser_Term_fun___elambda__1___closed__18 = _init_l_Lean_Parser_Term_fun___elambda__1___closed__18(); +lean::mark_persistent(l_Lean_Parser_Term_fun___elambda__1___closed__18); +l_Lean_Parser_Term_fun___elambda__1___closed__19 = _init_l_Lean_Parser_Term_fun___elambda__1___closed__19(); +lean::mark_persistent(l_Lean_Parser_Term_fun___elambda__1___closed__19); l_Lean_Parser_Term_fun___closed__1 = _init_l_Lean_Parser_Term_fun___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_fun___closed__1); l_Lean_Parser_Term_fun___closed__2 = _init_l_Lean_Parser_Term_fun___closed__2(); @@ -23339,6 +28999,8 @@ l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__5 = _init_l_Le lean::mark_persistent(l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__5); l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_structInstSource___elambda__1___rarg___closed__7); l_Lean_Parser_Term_structInstSource___closed__1 = _init_l_Lean_Parser_Term_structInstSource___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_structInstSource___closed__1); l_Lean_Parser_Term_structInstSource___closed__2 = _init_l_Lean_Parser_Term_structInstSource___closed__2(); @@ -23374,6 +29036,10 @@ l_Lean_Parser_Term_structInst___elambda__1___closed__9 = _init_l_Lean_Parser_Ter lean::mark_persistent(l_Lean_Parser_Term_structInst___elambda__1___closed__9); l_Lean_Parser_Term_structInst___elambda__1___closed__10 = _init_l_Lean_Parser_Term_structInst___elambda__1___closed__10(); lean::mark_persistent(l_Lean_Parser_Term_structInst___elambda__1___closed__10); +l_Lean_Parser_Term_structInst___elambda__1___closed__11 = _init_l_Lean_Parser_Term_structInst___elambda__1___closed__11(); +lean::mark_persistent(l_Lean_Parser_Term_structInst___elambda__1___closed__11); +l_Lean_Parser_Term_structInst___elambda__1___closed__12 = _init_l_Lean_Parser_Term_structInst___elambda__1___closed__12(); +lean::mark_persistent(l_Lean_Parser_Term_structInst___elambda__1___closed__12); l_Lean_Parser_Term_structInst___closed__1 = _init_l_Lean_Parser_Term_structInst___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_structInst___closed__1); l_Lean_Parser_Term_structInst___closed__2 = _init_l_Lean_Parser_Term_structInst___closed__2(); @@ -23435,6 +29101,8 @@ l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__5 = _init_l_Lean_Parser lean::mark_persistent(l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__5); l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_subtype___elambda__1___rarg___closed__7); l_Lean_Parser_Term_subtype___closed__1 = _init_l_Lean_Parser_Term_subtype___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_subtype___closed__1); l_Lean_Parser_Term_subtype___closed__2 = _init_l_Lean_Parser_Term_subtype___closed__2(); @@ -23460,12 +29128,14 @@ lean::mark_persistent(l_Lean_Parser_Term_subtype); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "subtype"), l_Lean_Parser_Term_subtype); w = l___regBuiltinParser_Lean_Parser_Term_subtype(w); if (io_result_is_error(w)) return w; -l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1 = _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1); -l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2 = _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2(); -lean::mark_persistent(l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2); -l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3 = _init_l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3(); -lean::mark_persistent(l___private_init_lean_parser_parser_1__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3); +l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1 = _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1(); +lean::mark_persistent(l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__1); +l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2 = _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2(); +lean::mark_persistent(l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__2); +l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3 = _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3(); +lean::mark_persistent(l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__3); +l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__4 = _init_l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__4(); +lean::mark_persistent(l___private_init_lean_parser_parser_2__sepByFnAux___main___at_Lean_Parser_Term_list___elambda__1___spec__2___closed__4); l_Lean_Parser_Term_list___elambda__1___closed__1 = _init_l_Lean_Parser_Term_list___elambda__1___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_list___elambda__1___closed__1); l_Lean_Parser_Term_list___elambda__1___closed__2 = _init_l_Lean_Parser_Term_list___elambda__1___closed__2(); @@ -23482,6 +29152,10 @@ l_Lean_Parser_Term_list___elambda__1___closed__7 = _init_l_Lean_Parser_Term_list lean::mark_persistent(l_Lean_Parser_Term_list___elambda__1___closed__7); l_Lean_Parser_Term_list___elambda__1___closed__8 = _init_l_Lean_Parser_Term_list___elambda__1___closed__8(); lean::mark_persistent(l_Lean_Parser_Term_list___elambda__1___closed__8); +l_Lean_Parser_Term_list___elambda__1___closed__9 = _init_l_Lean_Parser_Term_list___elambda__1___closed__9(); +lean::mark_persistent(l_Lean_Parser_Term_list___elambda__1___closed__9); +l_Lean_Parser_Term_list___elambda__1___closed__10 = _init_l_Lean_Parser_Term_list___elambda__1___closed__10(); +lean::mark_persistent(l_Lean_Parser_Term_list___elambda__1___closed__10); l_Lean_Parser_Term_list___closed__1 = _init_l_Lean_Parser_Term_list___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_list___closed__1); l_Lean_Parser_Term_list___closed__2 = _init_l_Lean_Parser_Term_list___closed__2(); @@ -23517,6 +29191,8 @@ l_Lean_Parser_Term_explicit___elambda__1___closed__5 = _init_l_Lean_Parser_Term_ lean::mark_persistent(l_Lean_Parser_Term_explicit___elambda__1___closed__5); l_Lean_Parser_Term_explicit___elambda__1___closed__6 = _init_l_Lean_Parser_Term_explicit___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_explicit___elambda__1___closed__6); +l_Lean_Parser_Term_explicit___elambda__1___closed__7 = _init_l_Lean_Parser_Term_explicit___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_explicit___elambda__1___closed__7); l_Lean_Parser_Term_explicit___closed__1 = _init_l_Lean_Parser_Term_explicit___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_explicit___closed__1); l_Lean_Parser_Term_explicit___closed__2 = _init_l_Lean_Parser_Term_explicit___closed__2(); @@ -23544,6 +29220,8 @@ l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__5 = _init_l_Lean_P lean::mark_persistent(l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__5); l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_inaccessible___elambda__1___rarg___closed__7); l_Lean_Parser_Term_inaccessible___closed__1 = _init_l_Lean_Parser_Term_inaccessible___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_inaccessible___closed__1); l_Lean_Parser_Term_inaccessible___closed__2 = _init_l_Lean_Parser_Term_inaccessible___closed__2(); @@ -23687,6 +29365,10 @@ l_Lean_Parser_Term_depArrow___elambda__1___closed__12 = _init_l_Lean_Parser_Term lean::mark_persistent(l_Lean_Parser_Term_depArrow___elambda__1___closed__12); l_Lean_Parser_Term_depArrow___elambda__1___closed__13 = _init_l_Lean_Parser_Term_depArrow___elambda__1___closed__13(); lean::mark_persistent(l_Lean_Parser_Term_depArrow___elambda__1___closed__13); +l_Lean_Parser_Term_depArrow___elambda__1___closed__14 = _init_l_Lean_Parser_Term_depArrow___elambda__1___closed__14(); +lean::mark_persistent(l_Lean_Parser_Term_depArrow___elambda__1___closed__14); +l_Lean_Parser_Term_depArrow___elambda__1___closed__15 = _init_l_Lean_Parser_Term_depArrow___elambda__1___closed__15(); +lean::mark_persistent(l_Lean_Parser_Term_depArrow___elambda__1___closed__15); l_Lean_Parser_Term_depArrow___closed__1 = _init_l_Lean_Parser_Term_depArrow___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_depArrow___closed__1); l_Lean_Parser_Term_depArrow___closed__2 = _init_l_Lean_Parser_Term_depArrow___closed__2(); @@ -23739,6 +29421,8 @@ l_Lean_Parser_Term_forall___elambda__1___closed__8 = _init_l_Lean_Parser_Term_fo lean::mark_persistent(l_Lean_Parser_Term_forall___elambda__1___closed__8); l_Lean_Parser_Term_forall___elambda__1___closed__9 = _init_l_Lean_Parser_Term_forall___elambda__1___closed__9(); lean::mark_persistent(l_Lean_Parser_Term_forall___elambda__1___closed__9); +l_Lean_Parser_Term_forall___elambda__1___closed__10 = _init_l_Lean_Parser_Term_forall___elambda__1___closed__10(); +lean::mark_persistent(l_Lean_Parser_Term_forall___elambda__1___closed__10); l_Lean_Parser_Term_forall___closed__1 = _init_l_Lean_Parser_Term_forall___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_forall___closed__1); l_Lean_Parser_Term_forall___closed__2 = _init_l_Lean_Parser_Term_forall___closed__2(); @@ -23780,6 +29464,10 @@ l_Lean_Parser_Term_matchAlt___elambda__1___closed__9 = _init_l_Lean_Parser_Term_ lean::mark_persistent(l_Lean_Parser_Term_matchAlt___elambda__1___closed__9); l_Lean_Parser_Term_matchAlt___elambda__1___closed__10 = _init_l_Lean_Parser_Term_matchAlt___elambda__1___closed__10(); lean::mark_persistent(l_Lean_Parser_Term_matchAlt___elambda__1___closed__10); +l_Lean_Parser_Term_matchAlt___elambda__1___closed__11 = _init_l_Lean_Parser_Term_matchAlt___elambda__1___closed__11(); +lean::mark_persistent(l_Lean_Parser_Term_matchAlt___elambda__1___closed__11); +l_Lean_Parser_Term_matchAlt___elambda__1___closed__12 = _init_l_Lean_Parser_Term_matchAlt___elambda__1___closed__12(); +lean::mark_persistent(l_Lean_Parser_Term_matchAlt___elambda__1___closed__12); l_Lean_Parser_Term_matchAlt___closed__1 = _init_l_Lean_Parser_Term_matchAlt___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_matchAlt___closed__1); l_Lean_Parser_Term_matchAlt___closed__2 = _init_l_Lean_Parser_Term_matchAlt___closed__2(); @@ -23821,6 +29509,10 @@ l_Lean_Parser_Term_match___elambda__1___closed__9 = _init_l_Lean_Parser_Term_mat lean::mark_persistent(l_Lean_Parser_Term_match___elambda__1___closed__9); l_Lean_Parser_Term_match___elambda__1___closed__10 = _init_l_Lean_Parser_Term_match___elambda__1___closed__10(); lean::mark_persistent(l_Lean_Parser_Term_match___elambda__1___closed__10); +l_Lean_Parser_Term_match___elambda__1___closed__11 = _init_l_Lean_Parser_Term_match___elambda__1___closed__11(); +lean::mark_persistent(l_Lean_Parser_Term_match___elambda__1___closed__11); +l_Lean_Parser_Term_match___elambda__1___closed__12 = _init_l_Lean_Parser_Term_match___elambda__1___closed__12(); +lean::mark_persistent(l_Lean_Parser_Term_match___elambda__1___closed__12); l_Lean_Parser_Term_match___closed__1 = _init_l_Lean_Parser_Term_match___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_match___closed__1); l_Lean_Parser_Term_match___closed__2 = _init_l_Lean_Parser_Term_match___closed__2(); @@ -23858,6 +29550,8 @@ l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__5 = _init_l_Lean_Parser lean::mark_persistent(l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__5); l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_nomatch___elambda__1___rarg___closed__7); l_Lean_Parser_Term_nomatch___closed__1 = _init_l_Lean_Parser_Term_nomatch___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_nomatch___closed__1); l_Lean_Parser_Term_nomatch___closed__2 = _init_l_Lean_Parser_Term_nomatch___closed__2(); @@ -23885,6 +29579,8 @@ l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__5 = _init_l_Lean_Par lean::mark_persistent(l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__5); l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7); l_Lean_Parser_Term_parser_x21___closed__1 = _init_l_Lean_Parser_Term_parser_x21___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_parser_x21___closed__1); l_Lean_Parser_Term_parser_x21___closed__2 = _init_l_Lean_Parser_Term_parser_x21___closed__2(); @@ -23912,6 +29608,8 @@ l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__5 = _init_l_Lean_Pa lean::mark_persistent(l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__5); l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_tparser_x21___elambda__1___rarg___closed__7); l_Lean_Parser_Term_tparser_x21___closed__1 = _init_l_Lean_Parser_Term_tparser_x21___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_tparser_x21___closed__1); l_Lean_Parser_Term_tparser_x21___closed__2 = _init_l_Lean_Parser_Term_tparser_x21___closed__2(); @@ -23927,6 +29625,64 @@ lean::mark_persistent(l_Lean_Parser_Term_tparser_x21); lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "tparser!"), l_Lean_Parser_Term_tparser_x21); w = l___regBuiltinParser_Lean_Parser_Term_tparser_x21(w); if (io_result_is_error(w)) return w; +l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__1 = _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__1(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__1); +l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__2 = _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__2(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__2); +l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__3 = _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__3(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__3); +l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__4 = _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__4(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__4); +l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__5(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__5); +l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__7); +l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__8 = _init_l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__8(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__8); +l_Lean_Parser_Term_borrowed___closed__1 = _init_l_Lean_Parser_Term_borrowed___closed__1(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___closed__1); +l_Lean_Parser_Term_borrowed___closed__2 = _init_l_Lean_Parser_Term_borrowed___closed__2(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___closed__2); +l_Lean_Parser_Term_borrowed___closed__3 = _init_l_Lean_Parser_Term_borrowed___closed__3(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___closed__3); +l_Lean_Parser_Term_borrowed___closed__4 = _init_l_Lean_Parser_Term_borrowed___closed__4(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___closed__4); +l_Lean_Parser_Term_borrowed___closed__5 = _init_l_Lean_Parser_Term_borrowed___closed__5(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed___closed__5); +l_Lean_Parser_Term_borrowed = _init_l_Lean_Parser_Term_borrowed(); +lean::mark_persistent(l_Lean_Parser_Term_borrowed); +lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "borrowed"), l_Lean_Parser_Term_borrowed); +w = l___regBuiltinParser_Lean_Parser_Term_borrowed(w); +if (io_result_is_error(w)) return w; +l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__1 = _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__1(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__1); +l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__2 = _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__2(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__2); +l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__3 = _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__3(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__3); +l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__4 = _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__4(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__4); +l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__5(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__5); +l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_quotedName___closed__1 = _init_l_Lean_Parser_Term_quotedName___closed__1(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___closed__1); +l_Lean_Parser_Term_quotedName___closed__2 = _init_l_Lean_Parser_Term_quotedName___closed__2(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___closed__2); +l_Lean_Parser_Term_quotedName___closed__3 = _init_l_Lean_Parser_Term_quotedName___closed__3(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___closed__3); +l_Lean_Parser_Term_quotedName___closed__4 = _init_l_Lean_Parser_Term_quotedName___closed__4(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___closed__4); +l_Lean_Parser_Term_quotedName___closed__5 = _init_l_Lean_Parser_Term_quotedName___closed__5(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName___closed__5); +l_Lean_Parser_Term_quotedName = _init_l_Lean_Parser_Term_quotedName(); +lean::mark_persistent(l_Lean_Parser_Term_quotedName); +lean::register_constant(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name(lean::mk_const_name("Lean"), "Parser"), "Term"), "quotedName"), l_Lean_Parser_Term_quotedName); +w = l___regBuiltinParser_Lean_Parser_Term_quotedName(w); +if (io_result_is_error(w)) return w; l_Lean_Parser_Term_letIdLhs___elambda__1___closed__1 = _init_l_Lean_Parser_Term_letIdLhs___elambda__1___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_letIdLhs___elambda__1___closed__1); l_Lean_Parser_Term_letIdLhs___closed__1 = _init_l_Lean_Parser_Term_letIdLhs___closed__1(); @@ -24037,6 +29793,8 @@ l_Lean_Parser_Term_let___elambda__1___closed__5 = _init_l_Lean_Parser_Term_let__ lean::mark_persistent(l_Lean_Parser_Term_let___elambda__1___closed__5); l_Lean_Parser_Term_let___elambda__1___closed__6 = _init_l_Lean_Parser_Term_let___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_let___elambda__1___closed__6); +l_Lean_Parser_Term_let___elambda__1___closed__7 = _init_l_Lean_Parser_Term_let___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_let___elambda__1___closed__7); l_Lean_Parser_Term_let___closed__1 = _init_l_Lean_Parser_Term_let___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_let___closed__1); l_Lean_Parser_Term_let___closed__2 = _init_l_Lean_Parser_Term_let___closed__2(); @@ -24072,6 +29830,8 @@ l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__7 = _init_l_Lean_Pars lean::mark_persistent(l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__7); l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__8 = _init_l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__8(); lean::mark_persistent(l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__8); +l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__9 = _init_l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__9(); +lean::mark_persistent(l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__9); l_Lean_Parser_Term_leftArrow___closed__1 = _init_l_Lean_Parser_Term_leftArrow___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_leftArrow___closed__1); l_Lean_Parser_Term_leftArrow___closed__2 = _init_l_Lean_Parser_Term_leftArrow___closed__2(); @@ -24212,6 +29972,8 @@ l_Lean_Parser_Term_do___elambda__1___closed__5 = _init_l_Lean_Parser_Term_do___e lean::mark_persistent(l_Lean_Parser_Term_do___elambda__1___closed__5); l_Lean_Parser_Term_do___elambda__1___closed__6 = _init_l_Lean_Parser_Term_do___elambda__1___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_do___elambda__1___closed__6); +l_Lean_Parser_Term_do___elambda__1___closed__7 = _init_l_Lean_Parser_Term_do___elambda__1___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_do___elambda__1___closed__7); l_Lean_Parser_Term_do___closed__1 = _init_l_Lean_Parser_Term_do___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_do___closed__1); l_Lean_Parser_Term_do___closed__2 = _init_l_Lean_Parser_Term_do___closed__2(); @@ -24241,6 +30003,8 @@ l_Lean_Parser_Term_not___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Ter lean::mark_persistent(l_Lean_Parser_Term_not___elambda__1___rarg___closed__5); l_Lean_Parser_Term_not___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_not___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_not___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_not___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_not___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_not___elambda__1___rarg___closed__7); l_Lean_Parser_Term_not___closed__1 = _init_l_Lean_Parser_Term_not___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_not___closed__1); l_Lean_Parser_Term_not___closed__2 = _init_l_Lean_Parser_Term_not___closed__2(); @@ -24270,6 +30034,8 @@ l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Te lean::mark_persistent(l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__5); l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__6(); lean::mark_persistent(l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__6); +l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__7(); +lean::mark_persistent(l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__7); l_Lean_Parser_Term_bnot___closed__1 = _init_l_Lean_Parser_Term_bnot___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_bnot___closed__1); l_Lean_Parser_Term_bnot___closed__2 = _init_l_Lean_Parser_Term_bnot___closed__2(); @@ -24295,6 +30061,8 @@ l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__4 = _init_l_Lean_Parser_ lean::mark_persistent(l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__4); l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__5(); lean::mark_persistent(l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__5); +l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__6(); +lean::mark_persistent(l_Lean_Parser_Term_uminus___elambda__1___rarg___closed__6); l_Lean_Parser_Term_uminus___closed__1 = _init_l_Lean_Parser_Term_uminus___closed__1(); lean::mark_persistent(l_Lean_Parser_Term_uminus___closed__1); l_Lean_Parser_Term_uminus___closed__2 = _init_l_Lean_Parser_Term_uminus___closed__2(); diff --git a/src/stage0/init/lean/syntax.cpp b/src/stage0/init/lean/syntax.cpp index 4b902febae..6621588c3b 100644 --- a/src/stage0/init/lean/syntax.cpp +++ b/src/stage0/init/lean/syntax.cpp @@ -68,6 +68,7 @@ obj* l_Lean_Syntax_isMissing___main___boxed(obj*); obj* l_Lean_Syntax_reprint___boxed(obj*); obj* l___private_init_lean_syntax_8__decodeNatLitVal(obj*); obj* l_Lean_Syntax_formatStx___main___closed__2; +obj* l_Lean_charLitKind___closed__2; obj* l_Lean_Syntax_isFieldIdx___boxed(obj*); obj* l_Lean_Syntax_HasToString; obj* l_Lean_Syntax_formatStx___main___closed__4; @@ -135,6 +136,7 @@ namespace lean { obj* nat_add(obj*, obj*); } extern obj* l_Lean_Format_paren___closed__3; +obj* l_Lean_charLitKind___closed__1; obj* l_Lean_nullKind; obj* l_Lean_choiceKind; namespace lean { @@ -240,6 +242,7 @@ obj* l_Lean_withArgs(obj*); obj* l___private_init_lean_syntax_6__decodeHexLitAux___boxed(obj*, obj*, obj*); obj* l_Array_ummapAux___main___at_Lean_Syntax_replace___spec__2(obj*, obj*, obj*); obj* l_Lean_Syntax_isIdent___boxed(obj*); +obj* l_Lean_charLitKind; obj* l_Lean_Syntax_getHeadInfo___main___boxed(obj*); obj* l_Lean_SourceInfo_updateTrailing___main(obj*, obj*); obj* l_Lean_fieldIdxKind; @@ -364,6 +367,32 @@ x_1 = l_Lean_strLitKind___closed__2; return x_1; } } +obj* _init_l_Lean_charLitKind___closed__1() { +_start: +{ +obj* x_1; +x_1 = lean::mk_string("charLit"); +return x_1; +} +} +obj* _init_l_Lean_charLitKind___closed__2() { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = lean::box(0); +x_2 = l_Lean_charLitKind___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +obj* _init_l_Lean_charLitKind() { +_start: +{ +obj* x_1; +x_1 = l_Lean_charLitKind___closed__2; +return x_1; +} +} obj* _init_l_Lean_numLitKind___closed__1() { _start: { @@ -3972,6 +4001,13 @@ lean::mark_persistent(l_Lean_strLitKind___closed__2); l_Lean_strLitKind = _init_l_Lean_strLitKind(); lean::mark_persistent(l_Lean_strLitKind); lean::register_constant(lean::mk_const_name(lean::mk_const_name("Lean"), "strLitKind"), l_Lean_strLitKind); +l_Lean_charLitKind___closed__1 = _init_l_Lean_charLitKind___closed__1(); +lean::mark_persistent(l_Lean_charLitKind___closed__1); +l_Lean_charLitKind___closed__2 = _init_l_Lean_charLitKind___closed__2(); +lean::mark_persistent(l_Lean_charLitKind___closed__2); +l_Lean_charLitKind = _init_l_Lean_charLitKind(); +lean::mark_persistent(l_Lean_charLitKind); +lean::register_constant(lean::mk_const_name(lean::mk_const_name("Lean"), "charLitKind"), l_Lean_charLitKind); l_Lean_numLitKind___closed__1 = _init_l_Lean_numLitKind___closed__1(); lean::mark_persistent(l_Lean_numLitKind___closed__1); l_Lean_numLitKind___closed__2 = _init_l_Lean_numLitKind___closed__2();