diff --git a/stage0/src/Lean/Parser/Basic.lean b/stage0/src/Lean/Parser/Basic.lean index 6538907c8d..36bf3688c8 100644 --- a/stage0/src/Lean/Parser/Basic.lean +++ b/stage0/src/Lean/Parser/Basic.lean @@ -1420,8 +1420,11 @@ fun c s => @[inline] def eoi : Parser := { fn := eoiFn } -@[inline] def many1Indent (p : Parser) (errorMsg : String) : Parser := -withPosition $ many1 (checkColGe errorMsg >> p) +@[inline] def many1Indent (p : Parser) : Parser := +withPosition $ many1 (checkColGe "irrelevant" >> p) + +@[inline] def manyIndent (p : Parser) : Parser := +withPosition $ many (checkColGe "irrelevant" >> p) open Std (RBMap RBMap.empty) diff --git a/stage0/src/Lean/Parser/Do.lean b/stage0/src/Lean/Parser/Do.lean index 5877c2fb64..ef58f21c37 100644 --- a/stage0/src/Lean/Parser/Do.lean +++ b/stage0/src/Lean/Parser/Do.lean @@ -21,25 +21,7 @@ namespace Term def leftArrow : Parser := unicodeSymbol " ← " " <- " @[builtinTermParser] def liftMethod := parser!:0 leftArrow >> termParser -def doSeqIndent := -withPosition $ many1 $ - checkColGe "do-elements must be indented" - /- - We considered using `withPosition doElemParser` here instead of just `doElemParser` to make sure - the applications must be indented with respect to the current do-element. - Example: - ``` - def foo : IO Nat := do - IO.println "hello"; - List.forM xs - (fun x => IO.println x) - ``` - The argument `(fun x => IO.println x)` is considered part of the application since it is - indented with respect to the first action. - -/ - >> doElemParser - >> optional "; " - +def doSeqIndent := many1Indent $ doElemParser >> optional "; " def doSeqBracketed := parser! "{" >> sepBy1 doElemParser "; " true >> "}" def doSeq := doSeqBracketed <|> doSeqIndent diff --git a/stage0/src/Lean/Parser/Tactic.lean b/stage0/src/Lean/Parser/Tactic.lean index e1a44fc336..31af443f0b 100644 --- a/stage0/src/Lean/Parser/Tactic.lean +++ b/stage0/src/Lean/Parser/Tactic.lean @@ -25,11 +25,11 @@ fun c s => def ident' : Parser := ident <|> underscore -@[builtinTacticParser] def «intro» := parser! nonReservedSymbol "intro " >> notFollowedBy "|" >> many (termParser maxPrec) -@[builtinTacticParser] def «intros» := parser! nonReservedSymbol "intros " >> many ident' -@[builtinTacticParser] def «revert» := parser! nonReservedSymbol "revert " >> many1 ident -@[builtinTacticParser] def «clear» := parser! nonReservedSymbol "clear " >> many1 ident -@[builtinTacticParser] def «subst» := parser! nonReservedSymbol "subst " >> many1 ident +@[builtinTacticParser] def «intro» := parser! nonReservedSymbol "intro " >> notFollowedBy "|" >> manyIndent (termParser maxPrec) +@[builtinTacticParser] def «intros» := parser! nonReservedSymbol "intros " >> manyIndent ident' +@[builtinTacticParser] def «revert» := parser! nonReservedSymbol "revert " >> many1Indent ident +@[builtinTacticParser] def «clear» := parser! nonReservedSymbol "clear " >> many1Indent ident +@[builtinTacticParser] def «subst» := parser! nonReservedSymbol "subst " >> many1Indent ident @[builtinTacticParser] def «assumption» := parser! nonReservedSymbol "assumption" @[builtinTacticParser] def «apply» := parser! nonReservedSymbol "apply " >> termParser @[builtinTacticParser] def «exact» := parser! nonReservedSymbol "exact " >> termParser diff --git a/stage0/src/Lean/Parser/Term.lean b/stage0/src/Lean/Parser/Term.lean index 87897608f0..591535e769 100644 --- a/stage0/src/Lean/Parser/Term.lean +++ b/stage0/src/Lean/Parser/Term.lean @@ -22,8 +22,7 @@ categoryParser `tactic rbp namespace Tactic def tacticSeq1Indented : Parser := -parser! withPosition $ - sepBy1 tacticParser (try ("; " >> checkColGe "tatic must be indented")) +parser! many1Indent $ tacticParser >> optional "; " def tacticSeqBracketed : Parser := parser! "{" >> sepBy tacticParser "; " true >> "}" def tacticSeq := diff --git a/stage0/stdlib/Lean/Elab/Binders.c b/stage0/stdlib/Lean/Elab/Binders.c index de7caec3e9..2e51a27e9e 100644 --- a/stage0/stdlib/Lean/Elab/Binders.c +++ b/stage0/stdlib/Lean/Elab/Binders.c @@ -14688,7 +14688,7 @@ lean_object* _init_l___private_Lean_Elab_Binders_16__expandMatchAltsIntoMatchAux _start: { lean_object* x_1; -x_1 = lean_mk_string("seq"); +x_1 = lean_mk_string("seq1"); return x_1; } } diff --git a/stage0/stdlib/Lean/Elab/BuiltinNotation.c b/stage0/stdlib/Lean/Elab/BuiltinNotation.c index fa033a2c7b..703624459c 100644 --- a/stage0/stdlib/Lean/Elab/BuiltinNotation.c +++ b/stage0/stdlib/Lean/Elab/BuiltinNotation.c @@ -229,7 +229,6 @@ lean_object* l_Lean_Elab_Term_expandUnreachable___rarg___closed__7; lean_object* l___regBuiltin_Lean_Elab_Term_expandHave(lean_object*); lean_object* l___regBuiltin_Lean_Elab_Term_expandAnd___closed__1; lean_object* l___regBuiltin_Lean_Elab_Term_elabPanic(lean_object*); -extern lean_object* l___private_Lean_Elab_Binders_16__expandMatchAltsIntoMatchAux___main___closed__6; lean_object* l___regBuiltin_Lean_Elab_Term_expandGT___closed__3; lean_object* l___regBuiltin_Lean_Elab_Term_expandLE(lean_object*); lean_object* l___regBuiltin_Lean_Elab_Term_expandBEq___closed__1; @@ -253,6 +252,7 @@ lean_object* l_Lean_Elab_Term_elabAnonymousCtor(lean_object*, lean_object*, lean lean_object* l_Lean_Elab_Term_elabTParserMacro___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_expandIff___boxed(lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_expandseq___closed__4; lean_object* l_Lean_Elab_Term_elabNativeRefl___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_expandEmptyC___closed__3; lean_object* l_Lean_Elab_Term_expandShow___closed__7; @@ -9402,9 +9402,17 @@ return x_3; lean_object* _init_l_Lean_Elab_Term_expandseq___closed__3() { _start: { +lean_object* x_1; +x_1 = lean_mk_string("seq"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_expandseq___closed__4() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Elab_Term_expandseq___closed__2; -x_2 = l___private_Lean_Elab_Binders_16__expandMatchAltsIntoMatchAux___main___closed__6; +x_2 = l_Lean_Elab_Term_expandseq___closed__3; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -9413,7 +9421,7 @@ lean_object* l_Lean_Elab_Term_expandseq(lean_object* x_1, lean_object* x_2, lean _start: { lean_object* x_4; lean_object* x_5; -x_4 = l_Lean_Elab_Term_expandseq___closed__3; +x_4 = l_Lean_Elab_Term_expandseq___closed__4; x_5 = l_Lean_Elab_Term_expandInfixOp(x_4, x_1, x_2, x_3); return x_5; } @@ -9433,7 +9441,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_mkAppStx___closed__6; -x_2 = l___private_Lean_Elab_Binders_16__expandMatchAltsIntoMatchAux___main___closed__6; +x_2 = l_Lean_Elab_Term_expandseq___closed__3; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -12457,6 +12465,8 @@ l_Lean_Elab_Term_expandseq___closed__2 = _init_l_Lean_Elab_Term_expandseq___clos lean_mark_persistent(l_Lean_Elab_Term_expandseq___closed__2); l_Lean_Elab_Term_expandseq___closed__3 = _init_l_Lean_Elab_Term_expandseq___closed__3(); lean_mark_persistent(l_Lean_Elab_Term_expandseq___closed__3); +l_Lean_Elab_Term_expandseq___closed__4 = _init_l_Lean_Elab_Term_expandseq___closed__4(); +lean_mark_persistent(l_Lean_Elab_Term_expandseq___closed__4); l___regBuiltin_Lean_Elab_Term_expandseq___closed__1 = _init_l___regBuiltin_Lean_Elab_Term_expandseq___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_Elab_Term_expandseq___closed__1); l___regBuiltin_Lean_Elab_Term_expandseq___closed__2 = _init_l___regBuiltin_Lean_Elab_Term_expandseq___closed__2(); diff --git a/stage0/stdlib/Lean/Elab/Tactic/Basic.c b/stage0/stdlib/Lean/Elab/Tactic/Basic.c index e4eeb50cb2..9b7fcfd83b 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Basic.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Basic.c @@ -286,7 +286,6 @@ lean_object* l_Lean_Meta_revert(lean_object*, lean_object*, uint8_t, lean_object lean_object* l_Lean_Elab_Tactic_evalChoice___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_liftMetaMAtMain___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern size_t l_Std_PersistentHashMap_insertAux___main___rarg___closed__2; -lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__2; lean_object* l_Lean_Elab_Term_getCurrMacroScope(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalParen___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalSeq1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -319,7 +318,6 @@ lean_object* l_Std_HashMapImp_find_x3f___at_Lean_Elab_Tactic_evalTactic___main__ lean_object* l_Lean_throwErrorAt___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Term_Lean_Ref; lean_object* l_Lean_Elab_Tactic_evalFailIfSuccess___closed__2; -lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__3; lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Tactic_evalTactic___main___spec__8___rarg(lean_object*); lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__1; lean_object* l_List_findM_x3f___main___at___private_Lean_Elab_Tactic_Basic_6__findTag_x3f___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -7757,24 +7755,6 @@ lean_object* _init_l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__1() { _start: { lean_object* x_1; -x_1 = lean_mk_string("seq1"); -return x_1; -} -} -lean_object* _init_l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___regBuiltin_Lean_Elab_Term_Quotation_elabTacticQuot___closed__1; -x_2 = l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__3() { -_start: -{ -lean_object* x_1; x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalSeq1___boxed), 10, 0); return x_1; } @@ -7784,8 +7764,8 @@ _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_2 = l_Lean_Elab_Tactic_tacticElabAttribute; -x_3 = l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__2; -x_4 = l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__3; +x_3 = l___private_Lean_Elab_Binders_16__expandMatchAltsIntoMatchAux___main___closed__7; +x_4 = l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__1; x_5 = l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(x_2, x_3, x_4, x_1); return x_5; } @@ -15156,10 +15136,6 @@ l_Lean_Elab_Tactic_focus___rarg___closed__1 = _init_l_Lean_Elab_Tactic_focus___r lean_mark_persistent(l_Lean_Elab_Tactic_focus___rarg___closed__1); l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__1 = _init_l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__1); -l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__2 = _init_l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__2(); -lean_mark_persistent(l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__2); -l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__3 = _init_l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__3(); -lean_mark_persistent(l___regBuiltin_Lean_Elab_Tactic_evalSeq1___closed__3); res = l___regBuiltin_Lean_Elab_Tactic_evalSeq1(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); diff --git a/stage0/stdlib/Lean/Parser/Basic.c b/stage0/stdlib/Lean/Parser/Basic.c index ecace62fab..25bf305166 100644 --- a/stage0/stdlib/Lean/Parser/Basic.c +++ b/stage0/stdlib/Lean/Parser/Basic.c @@ -148,7 +148,7 @@ lean_object* l_List_append___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_nameLitNoAntiquot___closed__1; lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_foldArgsM___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepByM___spec__1(lean_object*, lean_object*); -lean_object* l_Lean_Parser_many1Indent___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_many1Indent___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_antiquotNestedExpr___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern uint32_t l_Lean_idEndEscape; @@ -425,6 +425,7 @@ lean_object* l_Lean_Parser_strLitFn(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__12; lean_object* l_Lean_Parser_charLit___closed__3; size_t l_Lean_Name_hash(lean_object*); +lean_object* l_Lean_Parser_manyIndent(lean_object*); lean_object* l_Lean_Parser_antiquotNestedExpr___closed__7; lean_object* l_Lean_Parser_nameLit___closed__1; lean_object* l_Lean_Parser_antiquotExpr___closed__1; @@ -462,6 +463,7 @@ lean_object* lean_name_mk_string(lean_object*, lean_object*); extern lean_object* l_Lean_choiceKind; extern lean_object* l_List_repr___rarg___closed__2; extern lean_object* l_Lean_charLitKind; +lean_object* l_Lean_Parser_manyIndent___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_errorFn(lean_object*, lean_object*, lean_object*); extern lean_object* l_List_reprAux___main___rarg___closed__1; lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_hexNumberFn___spec__3___boxed(lean_object*, lean_object*); @@ -591,6 +593,7 @@ lean_object* l_Lean_Parser_sepBy1(lean_object*, lean_object*, uint8_t); lean_object* l_Lean_Parser_sepBy1Fn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_dollarSymbol___elambda__1___closed__5; lean_object* l_Lean_Parser_noFirstTokenInfo___elambda__1(lean_object*, lean_object*); +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_manyIndent___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ident___elambda__1___closed__1; lean_object* l_Lean_Parser_checkColGeFn(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_charLitFnAux___boxed(lean_object*, lean_object*, lean_object*); @@ -658,9 +661,9 @@ lean_object* l___private_Lean_Parser_Basic_6__nameLitAux___closed__1; lean_object* l_Lean_Parser_antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_mkAntiquot___closed__22; lean_object* l_Lean_Syntax_getArgs(lean_object*); -lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getKind(lean_object*); -lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_chFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3(lean_object*); lean_object* l_Lean_Parser_numLitNoAntiquot; @@ -694,7 +697,7 @@ lean_object* l___private_Lean_Parser_Basic_9__pickNonNone(lean_object*); lean_object* l_Lean_Parser_hashOrelse___closed__1; lean_object* l_Std_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolInfo___elambda__2___boxed(lean_object*); -lean_object* l_Lean_Parser_many1Indent(lean_object*, lean_object*); +lean_object* l_Lean_Parser_many1Indent(lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_whitespace___main___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParser___elambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolNoWsInfo___closed__1; @@ -710,6 +713,7 @@ lean_object* l_Lean_Parser_dollarSymbol___elambda__1(lean_object*, lean_object*) lean_object* l_Lean_Parser_unicodeSymbolFn___closed__1; lean_object* l_Lean_Parser_takeWhileFn___at_Lean_Parser_hexNumberFn___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Std_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; lean_object* l_Std_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5(lean_object*); lean_object* l_Lean_Parser_checkNoWsBefore___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_noFirstTokenInfo___elambda__2(lean_object*, lean_object*); @@ -13794,372 +13798,374 @@ x_1 = l_Lean_Parser_eoi___closed__2; return x_1; } } -lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1() { _start: { -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_25; -x_5 = lean_ctor_get(x_1, 1); +lean_object* x_1; +x_1 = lean_mk_string("irrelevant"); +return x_1; +} +} +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_24; +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +x_5 = lean_ctor_get(x_3, 0); lean_inc(x_5); -x_6 = lean_ctor_get(x_4, 0); -lean_inc(x_6); -x_7 = lean_array_get_size(x_6); -lean_dec(x_6); -x_8 = lean_ctor_get(x_4, 1); -lean_inc(x_8); -x_25 = lean_ctor_get(x_3, 4); -lean_inc(x_25); -if (lean_obj_tag(x_25) == 0) -{ -x_9 = x_4; -goto block_24; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; -x_26 = lean_ctor_get(x_25, 0); -lean_inc(x_26); -lean_dec(x_25); -x_27 = lean_ctor_get(x_3, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_27, 2); -lean_inc(x_28); -lean_dec(x_27); -lean_inc(x_8); -x_29 = l_Lean_FileMap_toPosition(x_28, x_8); -lean_dec(x_28); -x_30 = lean_ctor_get(x_26, 1); -lean_inc(x_30); -lean_dec(x_26); -x_31 = lean_ctor_get(x_29, 1); -lean_inc(x_31); -lean_dec(x_29); -x_32 = lean_nat_dec_le(x_30, x_31); -lean_dec(x_31); -lean_dec(x_30); -if (x_32 == 0) -{ -lean_object* x_33; -lean_inc(x_2); -x_33 = l_Lean_Parser_ParserState_mkError(x_4, x_2); -x_9 = x_33; -goto block_24; -} -else -{ -x_9 = x_4; -goto block_24; -} -} -block_24: -{ -lean_object* x_10; -x_10 = lean_ctor_get(x_9, 3); -lean_inc(x_10); -if (lean_obj_tag(x_10) == 0) -{ -lean_object* x_11; lean_object* x_12; -lean_inc(x_3); -x_11 = lean_apply_2(x_5, x_3, x_9); -x_12 = lean_ctor_get(x_11, 3); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) -{ -lean_object* x_13; uint8_t x_14; -lean_dec(x_7); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -x_14 = lean_nat_dec_eq(x_8, x_13); -lean_dec(x_13); -lean_dec(x_8); -if (x_14 == 0) -{ -x_4 = x_11; -goto _start; -} -else -{ -lean_object* x_16; lean_object* x_17; -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); -return x_17; -} -} -else -{ -lean_object* x_18; uint8_t x_19; -lean_dec(x_12); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_18 = lean_ctor_get(x_11, 1); -lean_inc(x_18); -x_19 = lean_nat_dec_eq(x_8, x_18); -lean_dec(x_18); -if (x_19 == 0) -{ -lean_dec(x_8); -lean_dec(x_7); -return x_11; -} -else -{ -lean_object* x_20; -x_20 = l_Lean_Parser_ParserState_restore(x_11, x_7, x_8); -lean_dec(x_7); -return x_20; -} -} -} -else -{ -lean_object* x_21; uint8_t x_22; -lean_dec(x_10); +x_6 = lean_array_get_size(x_5); lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_21 = lean_ctor_get(x_9, 1); -lean_inc(x_21); -x_22 = lean_nat_dec_eq(x_8, x_21); -lean_dec(x_21); -if (x_22 == 0) +x_7 = lean_ctor_get(x_3, 1); +lean_inc(x_7); +x_24 = lean_ctor_get(x_2, 4); +lean_inc(x_24); +if (lean_obj_tag(x_24) == 0) { -lean_dec(x_8); -lean_dec(x_7); -return x_9; +x_8 = x_3; +goto block_23; } else { -lean_object* x_23; -x_23 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); -lean_dec(x_7); -return x_23; -} -} -} -} -} -lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_25; -x_5 = lean_ctor_get(x_1, 1); -lean_inc(x_5); -x_6 = lean_ctor_get(x_4, 0); -lean_inc(x_6); -x_7 = lean_array_get_size(x_6); -lean_dec(x_6); -x_8 = lean_ctor_get(x_4, 1); -lean_inc(x_8); -x_25 = lean_ctor_get(x_3, 4); +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_25 = lean_ctor_get(x_24, 0); lean_inc(x_25); -if (lean_obj_tag(x_25) == 0) -{ -x_9 = x_4; -goto block_24; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; -x_26 = lean_ctor_get(x_25, 0); +lean_dec(x_24); +x_26 = lean_ctor_get(x_2, 0); lean_inc(x_26); -lean_dec(x_25); -x_27 = lean_ctor_get(x_3, 0); +x_27 = lean_ctor_get(x_26, 2); lean_inc(x_27); -x_28 = lean_ctor_get(x_27, 2); -lean_inc(x_28); -lean_dec(x_27); -lean_inc(x_8); -x_29 = l_Lean_FileMap_toPosition(x_28, x_8); -lean_dec(x_28); -x_30 = lean_ctor_get(x_26, 1); -lean_inc(x_30); lean_dec(x_26); -x_31 = lean_ctor_get(x_29, 1); -lean_inc(x_31); -lean_dec(x_29); -x_32 = lean_nat_dec_le(x_30, x_31); -lean_dec(x_31); +lean_inc(x_7); +x_28 = l_Lean_FileMap_toPosition(x_27, x_7); +lean_dec(x_27); +x_29 = lean_ctor_get(x_25, 1); +lean_inc(x_29); +lean_dec(x_25); +x_30 = lean_ctor_get(x_28, 1); +lean_inc(x_30); +lean_dec(x_28); +x_31 = lean_nat_dec_le(x_29, x_30); lean_dec(x_30); -if (x_32 == 0) +lean_dec(x_29); +if (x_31 == 0) { -lean_object* x_33; -lean_inc(x_2); -x_33 = l_Lean_Parser_ParserState_mkError(x_4, x_2); -x_9 = x_33; -goto block_24; +lean_object* x_32; lean_object* x_33; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_33 = l_Lean_Parser_ParserState_mkError(x_3, x_32); +x_8 = x_33; +goto block_23; } else { -x_9 = x_4; -goto block_24; +x_8 = x_3; +goto block_23; } } -block_24: +block_23: { -lean_object* x_10; -x_10 = lean_ctor_get(x_9, 3); -lean_inc(x_10); -if (lean_obj_tag(x_10) == 0) -{ -lean_object* x_11; lean_object* x_12; -lean_inc(x_3); -x_11 = lean_apply_2(x_5, x_3, x_9); -x_12 = lean_ctor_get(x_11, 3); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) -{ -lean_object* x_13; uint8_t x_14; -lean_dec(x_7); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -x_14 = lean_nat_dec_eq(x_8, x_13); -lean_dec(x_13); -lean_dec(x_8); -if (x_14 == 0) -{ -x_4 = x_11; -goto _start; -} -else -{ -lean_object* x_16; lean_object* x_17; -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_16 = l_Lean_Parser_manyAux___main___closed__1; -x_17 = l_Lean_Parser_ParserState_mkUnexpectedError(x_11, x_16); -return x_17; -} -} -else -{ -lean_object* x_18; uint8_t x_19; -lean_dec(x_12); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_18 = lean_ctor_get(x_11, 1); -lean_inc(x_18); -x_19 = lean_nat_dec_eq(x_8, x_18); -lean_dec(x_18); -if (x_19 == 0) -{ -lean_dec(x_8); -lean_dec(x_7); -return x_11; -} -else -{ -lean_object* x_20; -x_20 = l_Lean_Parser_ParserState_restore(x_11, x_7, x_8); -lean_dec(x_7); -return x_20; -} -} -} -else -{ -lean_object* x_21; uint8_t x_22; -lean_dec(x_10); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_21 = lean_ctor_get(x_9, 1); -lean_inc(x_21); -x_22 = lean_nat_dec_eq(x_8, x_21); -lean_dec(x_21); -if (x_22 == 0) -{ -lean_dec(x_8); -lean_dec(x_7); -return x_9; -} -else -{ -lean_object* x_23; -x_23 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); -lean_dec(x_7); -return x_23; -} -} -} -} -} -lean_object* l_Lean_Parser_many1Indent___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -uint8_t x_6; -x_6 = !lean_is_exclusive(x_4); -if (x_6 == 0) -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; -x_7 = lean_ctor_get(x_4, 0); -x_8 = lean_ctor_get(x_4, 4); -lean_dec(x_8); -x_9 = lean_ctor_get(x_7, 2); +lean_object* x_9; +x_9 = lean_ctor_get(x_8, 3); lean_inc(x_9); -x_10 = lean_ctor_get(x_5, 1); -lean_inc(x_10); -x_11 = l_Lean_FileMap_toPosition(x_9, x_10); -lean_dec(x_9); -lean_inc(x_11); -x_12 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_12, 0, x_11); -lean_ctor_set(x_4, 4, x_12); -x_13 = lean_ctor_get(x_5, 0); -lean_inc(x_13); -x_14 = lean_array_get_size(x_13); -lean_dec(x_13); -x_15 = lean_ctor_get(x_11, 1); -lean_inc(x_15); -lean_dec(x_11); -x_16 = lean_nat_dec_le(x_15, x_15); -lean_dec(x_15); -if (x_16 == 0) +if (lean_obj_tag(x_9) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; +lean_object* x_10; lean_object* x_11; +lean_inc(x_2); +x_10 = lean_apply_2(x_4, x_2, x_8); +x_11 = lean_ctor_get(x_10, 3); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; uint8_t x_13; +lean_dec(x_6); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_7, x_12); +lean_dec(x_12); +lean_dec(x_7); +if (x_13 == 0) +{ +x_3 = x_10; +goto _start; +} +else +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_2); +lean_dec(x_1); +x_15 = l_Lean_Parser_manyAux___main___closed__1; +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); +return x_16; +} +} +else +{ +lean_object* x_17; uint8_t x_18; +lean_dec(x_11); +lean_dec(x_2); +lean_dec(x_1); +x_17 = lean_ctor_get(x_10, 1); +lean_inc(x_17); +x_18 = lean_nat_dec_eq(x_7, x_17); +lean_dec(x_17); +if (x_18 == 0) +{ +lean_dec(x_7); +lean_dec(x_6); +return x_10; +} +else +{ +lean_object* x_19; +x_19 = l_Lean_Parser_ParserState_restore(x_10, x_6, x_7); +lean_dec(x_6); +return x_19; +} +} +} +else +{ +lean_object* x_20; uint8_t x_21; +lean_dec(x_9); lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_20 = lean_ctor_get(x_8, 1); +lean_inc(x_20); +x_21 = lean_nat_dec_eq(x_7, x_20); +lean_dec(x_20); +if (x_21 == 0) +{ +lean_dec(x_7); +lean_dec(x_6); +return x_8; +} +else +{ +lean_object* x_22; +x_22 = l_Lean_Parser_ParserState_restore(x_8, x_6, x_7); +lean_dec(x_6); +return x_22; +} +} +} +} +} +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_24; +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +x_6 = lean_array_get_size(x_5); +lean_dec(x_5); +x_7 = lean_ctor_get(x_3, 1); +lean_inc(x_7); +x_24 = lean_ctor_get(x_2, 4); +lean_inc(x_24); +if (lean_obj_tag(x_24) == 0) +{ +x_8 = x_3; +goto block_23; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +lean_dec(x_24); +x_26 = lean_ctor_get(x_2, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_26, 2); +lean_inc(x_27); +lean_dec(x_26); +lean_inc(x_7); +x_28 = l_Lean_FileMap_toPosition(x_27, x_7); +lean_dec(x_27); +x_29 = lean_ctor_get(x_25, 1); +lean_inc(x_29); +lean_dec(x_25); +x_30 = lean_ctor_get(x_28, 1); +lean_inc(x_30); +lean_dec(x_28); +x_31 = lean_nat_dec_le(x_29, x_30); +lean_dec(x_30); +lean_dec(x_29); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_33 = l_Lean_Parser_ParserState_mkError(x_3, x_32); +x_8 = x_33; +goto block_23; +} +else +{ +x_8 = x_3; +goto block_23; +} +} +block_23: +{ +lean_object* x_9; +x_9 = lean_ctor_get(x_8, 3); +lean_inc(x_9); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; +lean_inc(x_2); +x_10 = lean_apply_2(x_4, x_2, x_8); +x_11 = lean_ctor_get(x_10, 3); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; uint8_t x_13; +lean_dec(x_6); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_7, x_12); +lean_dec(x_12); +lean_dec(x_7); +if (x_13 == 0) +{ +x_3 = x_10; +goto _start; +} +else +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_2); +lean_dec(x_1); +x_15 = l_Lean_Parser_manyAux___main___closed__1; +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); +return x_16; +} +} +else +{ +lean_object* x_17; uint8_t x_18; +lean_dec(x_11); +lean_dec(x_2); +lean_dec(x_1); +x_17 = lean_ctor_get(x_10, 1); +lean_inc(x_17); +x_18 = lean_nat_dec_eq(x_7, x_17); +lean_dec(x_17); +if (x_18 == 0) +{ +lean_dec(x_7); +lean_dec(x_6); +return x_10; +} +else +{ +lean_object* x_19; +x_19 = l_Lean_Parser_ParserState_restore(x_10, x_6, x_7); +lean_dec(x_6); +return x_19; +} +} +} +else +{ +lean_object* x_20; uint8_t x_21; +lean_dec(x_9); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_20 = lean_ctor_get(x_8, 1); +lean_inc(x_20); +x_21 = lean_nat_dec_eq(x_7, x_20); +lean_dec(x_20); +if (x_21 == 0) +{ +lean_dec(x_7); +lean_dec(x_6); +return x_8; +} +else +{ +lean_object* x_22; +x_22 = l_Lean_Parser_ParserState_restore(x_8, x_6, x_7); +lean_dec(x_6); +return x_22; +} +} +} +} +} +lean_object* l_Lean_Parser_many1Indent___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_3); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; +x_6 = lean_ctor_get(x_3, 0); +x_7 = lean_ctor_get(x_3, 4); +lean_dec(x_7); +x_8 = lean_ctor_get(x_6, 2); +lean_inc(x_8); +x_9 = lean_ctor_get(x_4, 1); +lean_inc(x_9); +x_10 = l_Lean_FileMap_toPosition(x_8, x_9); +lean_dec(x_8); +lean_inc(x_10); +x_11 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_3, 4, x_11); +x_12 = lean_ctor_get(x_4, 0); +lean_inc(x_12); +x_13 = lean_array_get_size(x_12); +lean_dec(x_12); +x_14 = lean_ctor_get(x_10, 1); +lean_inc(x_14); +lean_dec(x_10); +x_15 = lean_nat_dec_le(x_14, x_14); +lean_dec(x_14); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_dec(x_3); lean_dec(x_2); -x_17 = l_Lean_Parser_ParserState_mkError(x_5, x_1); +lean_dec(x_1); +x_16 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_17 = l_Lean_Parser_ParserState_mkError(x_4, x_16); x_18 = l_Lean_nullKind; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_14); +x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_13); return x_19; } else { lean_object* x_20; -x_20 = lean_ctor_get(x_5, 3); +x_20 = lean_ctor_get(x_4, 3); lean_inc(x_20); if (lean_obj_tag(x_20) == 0) { lean_object* x_21; lean_object* x_22; -lean_inc(x_4); -x_21 = lean_apply_2(x_2, x_4, x_5); +lean_inc(x_3); +x_21 = lean_apply_2(x_1, x_3, x_4); x_22 = lean_ctor_get(x_21, 3); lean_inc(x_22); if (lean_obj_tag(x_22) == 0) { lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(x_3, x_1, x_4, x_21); +x_23 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(x_2, x_3, x_21); x_24 = l_Lean_nullKind; -x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_14); +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_13); return x_25; } else { lean_object* x_26; lean_object* x_27; lean_dec(x_22); -lean_dec(x_4); lean_dec(x_3); -lean_dec(x_1); +lean_dec(x_2); x_26 = l_Lean_nullKind; -x_27 = l_Lean_Parser_ParserState_mkNode(x_21, x_26, x_14); +x_27 = l_Lean_Parser_ParserState_mkNode(x_21, x_26, x_13); return x_27; } } @@ -14167,12 +14173,11 @@ else { lean_object* x_28; lean_object* x_29; lean_dec(x_20); -lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_28 = l_Lean_nullKind; -x_29 = l_Lean_Parser_ParserState_mkNode(x_5, x_28, x_14); +x_29 = l_Lean_Parser_ParserState_mkNode(x_4, x_28, x_13); return x_29; } } @@ -14180,19 +14185,19 @@ return x_29; else { lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; uint8_t x_43; -x_30 = lean_ctor_get(x_4, 0); -x_31 = lean_ctor_get(x_4, 1); -x_32 = lean_ctor_get(x_4, 2); -x_33 = lean_ctor_get(x_4, 3); -x_34 = lean_ctor_get_uint8(x_4, sizeof(void*)*5); +x_30 = lean_ctor_get(x_3, 0); +x_31 = lean_ctor_get(x_3, 1); +x_32 = lean_ctor_get(x_3, 2); +x_33 = lean_ctor_get(x_3, 3); +x_34 = lean_ctor_get_uint8(x_3, sizeof(void*)*5); lean_inc(x_33); lean_inc(x_32); lean_inc(x_31); lean_inc(x_30); -lean_dec(x_4); +lean_dec(x_3); x_35 = lean_ctor_get(x_30, 2); lean_inc(x_35); -x_36 = lean_ctor_get(x_5, 1); +x_36 = lean_ctor_get(x_4, 1); lean_inc(x_36); x_37 = l_Lean_FileMap_toPosition(x_35, x_36); lean_dec(x_35); @@ -14206,7 +14211,7 @@ lean_ctor_set(x_39, 2, x_32); lean_ctor_set(x_39, 3, x_33); lean_ctor_set(x_39, 4, x_38); lean_ctor_set_uint8(x_39, sizeof(void*)*5, x_34); -x_40 = lean_ctor_get(x_5, 0); +x_40 = lean_ctor_get(x_4, 0); lean_inc(x_40); x_41 = lean_array_get_size(x_40); lean_dec(x_40); @@ -14217,82 +14222,310 @@ x_43 = lean_nat_dec_le(x_42, x_42); lean_dec(x_42); if (x_43 == 0) { -lean_object* x_44; lean_object* x_45; lean_object* x_46; +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_dec(x_39); -lean_dec(x_3); lean_dec(x_2); -x_44 = l_Lean_Parser_ParserState_mkError(x_5, x_1); -x_45 = l_Lean_nullKind; -x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_41); -return x_46; +lean_dec(x_1); +x_44 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_45 = l_Lean_Parser_ParserState_mkError(x_4, x_44); +x_46 = l_Lean_nullKind; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_41); +return x_47; } else { -lean_object* x_47; -x_47 = lean_ctor_get(x_5, 3); -lean_inc(x_47); -if (lean_obj_tag(x_47) == 0) +lean_object* x_48; +x_48 = lean_ctor_get(x_4, 3); +lean_inc(x_48); +if (lean_obj_tag(x_48) == 0) { -lean_object* x_48; lean_object* x_49; +lean_object* x_49; lean_object* x_50; lean_inc(x_39); -x_48 = lean_apply_2(x_2, x_39, x_5); -x_49 = lean_ctor_get(x_48, 3); -lean_inc(x_49); -if (lean_obj_tag(x_49) == 0) +x_49 = lean_apply_2(x_1, x_39, x_4); +x_50 = lean_ctor_get(x_49, 3); +lean_inc(x_50); +if (lean_obj_tag(x_50) == 0) { -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(x_3, x_1, x_39, x_48); -x_51 = l_Lean_nullKind; -x_52 = l_Lean_Parser_ParserState_mkNode(x_50, x_51, x_41); -return x_52; +lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_51 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(x_2, x_39, x_49); +x_52 = l_Lean_nullKind; +x_53 = l_Lean_Parser_ParserState_mkNode(x_51, x_52, x_41); +return x_53; } else { -lean_object* x_53; lean_object* x_54; -lean_dec(x_49); +lean_object* x_54; lean_object* x_55; +lean_dec(x_50); lean_dec(x_39); -lean_dec(x_3); -lean_dec(x_1); -x_53 = l_Lean_nullKind; -x_54 = l_Lean_Parser_ParserState_mkNode(x_48, x_53, x_41); -return x_54; +lean_dec(x_2); +x_54 = l_Lean_nullKind; +x_55 = l_Lean_Parser_ParserState_mkNode(x_49, x_54, x_41); +return x_55; } } else { -lean_object* x_55; lean_object* x_56; -lean_dec(x_47); +lean_object* x_56; lean_object* x_57; +lean_dec(x_48); lean_dec(x_39); -lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_55 = l_Lean_nullKind; -x_56 = l_Lean_Parser_ParserState_mkNode(x_5, x_55, x_41); -return x_56; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_4, x_56, x_41); +return x_57; } } } } } -lean_object* l_Lean_Parser_many1Indent(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_Parser_many1Indent(lean_object* x_1) { _start: { -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_3 = lean_ctor_get(x_1, 0); -lean_inc(x_3); -x_4 = l_Lean_Parser_Parser_inhabited___closed__1; -x_5 = l_Lean_Parser_andthenInfo(x_4, x_3); -x_6 = lean_ctor_get(x_1, 1); -lean_inc(x_6); -x_7 = lean_alloc_closure((void*)(l_Lean_Parser_many1Indent___lambda__1), 5, 3); -lean_closure_set(x_7, 0, x_2); -lean_closure_set(x_7, 1, x_6); -lean_closure_set(x_7, 2, x_1); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_5); -lean_ctor_set(x_8, 1, x_7); +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Parser_inhabited___closed__1; +x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +x_6 = lean_alloc_closure((void*)(l_Lean_Parser_many1Indent___lambda__1), 4, 2); +lean_closure_set(x_6, 0, x_5); +lean_closure_set(x_6, 1, x_1); +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_4); +lean_ctor_set(x_7, 1, x_6); +return x_7; +} +} +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_manyIndent___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_24; +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +x_6 = lean_array_get_size(x_5); +lean_dec(x_5); +x_7 = lean_ctor_get(x_3, 1); +lean_inc(x_7); +x_24 = lean_ctor_get(x_2, 4); +lean_inc(x_24); +if (lean_obj_tag(x_24) == 0) +{ +x_8 = x_3; +goto block_23; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +lean_dec(x_24); +x_26 = lean_ctor_get(x_2, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_26, 2); +lean_inc(x_27); +lean_dec(x_26); +lean_inc(x_7); +x_28 = l_Lean_FileMap_toPosition(x_27, x_7); +lean_dec(x_27); +x_29 = lean_ctor_get(x_25, 1); +lean_inc(x_29); +lean_dec(x_25); +x_30 = lean_ctor_get(x_28, 1); +lean_inc(x_30); +lean_dec(x_28); +x_31 = lean_nat_dec_le(x_29, x_30); +lean_dec(x_30); +lean_dec(x_29); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_33 = l_Lean_Parser_ParserState_mkError(x_3, x_32); +x_8 = x_33; +goto block_23; +} +else +{ +x_8 = x_3; +goto block_23; +} +} +block_23: +{ +lean_object* x_9; +x_9 = lean_ctor_get(x_8, 3); +lean_inc(x_9); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; +lean_inc(x_2); +x_10 = lean_apply_2(x_4, x_2, x_8); +x_11 = lean_ctor_get(x_10, 3); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; uint8_t x_13; +lean_dec(x_6); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_7, x_12); +lean_dec(x_12); +lean_dec(x_7); +if (x_13 == 0) +{ +x_3 = x_10; +goto _start; +} +else +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_2); +lean_dec(x_1); +x_15 = l_Lean_Parser_manyAux___main___closed__1; +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); +return x_16; +} +} +else +{ +lean_object* x_17; uint8_t x_18; +lean_dec(x_11); +lean_dec(x_2); +lean_dec(x_1); +x_17 = lean_ctor_get(x_10, 1); +lean_inc(x_17); +x_18 = lean_nat_dec_eq(x_7, x_17); +lean_dec(x_17); +if (x_18 == 0) +{ +lean_dec(x_7); +lean_dec(x_6); +return x_10; +} +else +{ +lean_object* x_19; +x_19 = l_Lean_Parser_ParserState_restore(x_10, x_6, x_7); +lean_dec(x_6); +return x_19; +} +} +} +else +{ +lean_object* x_20; uint8_t x_21; +lean_dec(x_9); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_20 = lean_ctor_get(x_8, 1); +lean_inc(x_20); +x_21 = lean_nat_dec_eq(x_7, x_20); +lean_dec(x_20); +if (x_21 == 0) +{ +lean_dec(x_7); +lean_dec(x_6); return x_8; } +else +{ +lean_object* x_22; +x_22 = l_Lean_Parser_ParserState_restore(x_8, x_6, x_7); +lean_dec(x_6); +return x_22; +} +} +} +} +} +lean_object* l_Lean_Parser_manyIndent___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_2); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_5 = lean_ctor_get(x_2, 0); +x_6 = lean_ctor_get(x_2, 4); +lean_dec(x_6); +x_7 = lean_ctor_get(x_5, 2); +lean_inc(x_7); +x_8 = lean_ctor_get(x_3, 1); +lean_inc(x_8); +x_9 = l_Lean_FileMap_toPosition(x_7, x_8); +lean_dec(x_7); +x_10 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_2, 4, x_10); +x_11 = lean_ctor_get(x_3, 0); +lean_inc(x_11); +x_12 = lean_array_get_size(x_11); +lean_dec(x_11); +x_13 = l_Lean_Parser_manyAux___main___at_Lean_Parser_manyIndent___spec__1(x_1, x_2, x_3); +x_14 = l_Lean_nullKind; +x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_12); +return x_15; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_16 = lean_ctor_get(x_2, 0); +x_17 = lean_ctor_get(x_2, 1); +x_18 = lean_ctor_get(x_2, 2); +x_19 = lean_ctor_get(x_2, 3); +x_20 = lean_ctor_get_uint8(x_2, sizeof(void*)*5); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_dec(x_2); +x_21 = lean_ctor_get(x_16, 2); +lean_inc(x_21); +x_22 = lean_ctor_get(x_3, 1); +lean_inc(x_22); +x_23 = l_Lean_FileMap_toPosition(x_21, x_22); +lean_dec(x_21); +x_24 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_24, 0, x_23); +x_25 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_25, 0, x_16); +lean_ctor_set(x_25, 1, x_17); +lean_ctor_set(x_25, 2, x_18); +lean_ctor_set(x_25, 3, x_19); +lean_ctor_set(x_25, 4, x_24); +lean_ctor_set_uint8(x_25, sizeof(void*)*5, x_20); +x_26 = lean_ctor_get(x_3, 0); +lean_inc(x_26); +x_27 = lean_array_get_size(x_26); +lean_dec(x_26); +x_28 = l_Lean_Parser_manyAux___main___at_Lean_Parser_manyIndent___spec__1(x_1, x_25, x_3); +x_29 = l_Lean_nullKind; +x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_27); +return x_30; +} +} +} +lean_object* l_Lean_Parser_manyIndent(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Parser_inhabited___closed__1; +x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); +x_5 = l_Lean_Parser_noFirstTokenInfo(x_4); +x_6 = lean_alloc_closure((void*)(l_Lean_Parser_manyIndent___lambda__1), 3, 1); +lean_closure_set(x_6, 0, x_1); +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_5); +lean_ctor_set(x_7, 1, x_6); +return x_7; +} } lean_object* l_Std_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg(lean_object* x_1, lean_object* x_2) { _start: @@ -29029,6 +29262,8 @@ l_Lean_Parser_eoi___closed__2 = _init_l_Lean_Parser_eoi___closed__2(); lean_mark_persistent(l_Lean_Parser_eoi___closed__2); l_Lean_Parser_eoi = _init_l_Lean_Parser_eoi(); lean_mark_persistent(l_Lean_Parser_eoi); +l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1 = _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1(); +lean_mark_persistent(l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1); l_Lean_Parser_PrattParsingTables_inhabited___closed__1 = _init_l_Lean_Parser_PrattParsingTables_inhabited___closed__1(); lean_mark_persistent(l_Lean_Parser_PrattParsingTables_inhabited___closed__1); l_Lean_Parser_PrattParsingTables_inhabited = _init_l_Lean_Parser_PrattParsingTables_inhabited(); diff --git a/stage0/stdlib/Lean/Parser/Command.c b/stage0/stdlib/Lean/Parser/Command.c index 19da56f1e1..bf0506a33b 100644 --- a/stage0/stdlib/Lean/Parser/Command.c +++ b/stage0/stdlib/Lean/Parser/Command.c @@ -803,7 +803,6 @@ lean_object* l_Lean_Parser_Command_commentBody_parenthesizer___rarg(lean_object* lean_object* l___regBuiltin_Lean_Parser_Command_mutual_parenthesizer(lean_object*); lean_object* l_Lean_Parser_Command_structure_parenthesizer___closed__15; lean_object* l_Lean_Parser_Command_exit_parenthesizer___closed__1; -extern lean_object* l_Lean_Parser_Term_structInst_parenthesizer___closed__6; lean_object* l_Lean_Parser_Command_example_parenthesizer___closed__3; lean_object* l_Lean_Parser_Command_classInductive___closed__5; lean_object* l_Lean_Parser_Command_open___closed__2; @@ -1878,6 +1877,7 @@ lean_object* l_Lean_Parser_Command_init__quot___elambda__1___closed__6; lean_object* l___regBuiltinParser_Lean_Parser_Command_mutual(lean_object*); lean_object* l_Lean_Parser_Command_openSimple___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_openOnly___closed__1; +extern lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; lean_object* l_Lean_Parser_Command_openRenamingItem___closed__1; lean_object* l_Lean_Parser_Command_theorem___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_optDeclSig_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -42142,7 +42142,7 @@ lean_object* _init_l_Lean_Parser_Command_attribute_parenthesizer___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; x_2 = l_Lean_Parser_Command_attribute_parenthesizer___closed__4; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); diff --git a/stage0/stdlib/Lean/Parser/Do.c b/stage0/stdlib/Lean/Parser/Do.c index 10e261a322..6abd6d65a5 100644 --- a/stage0/stdlib/Lean/Parser/Do.c +++ b/stage0/stdlib/Lean/Parser/Do.c @@ -23,6 +23,7 @@ lean_object* l_Lean_Parser_Term_doPat___closed__7; lean_object* l_Lean_Parser_Term_liftMethod_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_doSeqBracketed_formatter___closed__2; lean_object* l_Lean_Parser_Term_doIf_parenthesizer___closed__9; +lean_object* l_Lean_Parser_many1Indent_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_have_formatter___closed__2; lean_object* l_Lean_Parser_Term_doPat_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_doElemParser(lean_object*); @@ -78,6 +79,7 @@ lean_object* l___regBuiltin_Lean_Parser_Term_doFor_parenthesizer(lean_object*); lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_doSeqBracketed___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_doFor___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_doExpr___closed__4; +extern lean_object* l_Lean_Parser_many1Indent_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_doMatchAlt_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_liftMethod(lean_object*); extern lean_object* l_Lean_Parser_Term_if_formatter___closed__3; @@ -85,7 +87,6 @@ lean_object* l_Lean_Parser_Term_doExpr_formatter___closed__10; lean_object* l_Lean_Parser_Term_do___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_doMatchAlts___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_doFor_formatter___closed__6; -extern lean_object* l_Lean_Parser_Term_structInst_parenthesizer___closed__7; lean_object* l_Lean_Parser_Term_doMatch; lean_object* l_Lean_Parser_Term_doExpr___elambda__1___closed__19; lean_object* l_Lean_Parser_Term_doIf_formatter___closed__12; @@ -131,6 +132,7 @@ lean_object* l_Lean_Parser_Term_doFor___closed__1; extern lean_object* l_Lean_Parser_darrow; lean_object* l_Lean_Parser_Term_doPat___closed__2; lean_object* l_Lean_Parser_Term_doMatchAlts___closed__4; +extern lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; extern lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_do___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_doMatch___elambda__1(lean_object*, lean_object*); @@ -166,7 +168,6 @@ lean_object* l_Lean_Parser_Term_leftArrow_parenthesizer___boxed(lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_doIf___closed__13; lean_object* l_Lean_Parser_Term_break___elambda__1___closed__2; -extern lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; extern lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__18; lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_doIf___closed__1; @@ -251,7 +252,6 @@ lean_object* l_Lean_Parser_Term_doIf___closed__17; lean_object* l_Lean_Parser_Term_doMatch___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Term_let___closed__1; lean_object* l___regBuiltin_Lean_Parser_Term_doMatch_formatter___closed__1; -lean_object* l_Lean_Parser_Term_doSeqIndent_formatter___closed__2; lean_object* l_Lean_Parser_Term_doExpr_parenthesizer___closed__6; extern lean_object* l_Lean_Parser_Term_structInst_formatter___closed__2; lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_doMatchAlts___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -332,6 +332,7 @@ lean_object* l_Lean_Parser_Term_doFor___elambda__1___closed__13; lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Parser_Term_doHave_formatter___closed__1; lean_object* l_Lean_Parser_Term_doIf_parenthesizer___closed__2; +extern lean_object* l_Lean_Parser_many1Indent_formatter___closed__1; lean_object* l_Lean_Parser_Term_doIf___closed__3; extern lean_object* l_Lean_Parser_Term_funImplicitBinder_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_doMatchAlts_formatter___closed__4; @@ -379,6 +380,7 @@ lean_object* l_Lean_Parser_Term_doIf___closed__14; lean_object* l_Lean_Parser_Term_doMatchAlts___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_doIf_formatter___closed__11; lean_object* l___regBuiltin_Lean_Parser_Term_doLet_formatter___closed__1; +lean_object* l_Lean_Parser_many1Indent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_doPat___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_doSeqBracketed_formatter___closed__4; lean_object* l_Lean_Parser_Term_leftArrow___elambda__1___closed__6; @@ -470,13 +472,13 @@ extern lean_object* l_Lean_Parser_Term_if___closed__2; lean_object* l_Lean_Parser_Term_doSeqBracketed___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_doLetArrow_formatter___closed__5; extern lean_object* l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__3; -lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1___closed__1; lean_object* l_Lean_Parser_Term_doFor_parenthesizer___closed__2; lean_object* l_Lean_Parser_Term_doPat___closed__1; extern lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__2; extern lean_object* l_Lean_Parser_Term_if___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_leftArrow___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_break_parenthesizer___closed__2; +extern lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_object* l_Lean_Parser_Term_doMatch___closed__2; lean_object* l_Lean_Parser_sepBy1Info(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_doExpr_formatter___closed__1; @@ -487,7 +489,6 @@ extern lean_object* l_Lean_Parser_Term_if___elambda__1___closed__19; lean_object* l_Lean_Parser_Term_doSeqBracketed_parenthesizer___closed__6; lean_object* l_Lean_Parser_Term_doExpr___elambda__1___closed__22; lean_object* l_Lean_Parser_Term_leftArrow___elambda__1___closed__9; -lean_object* l_Lean_Parser_Term_doSeqIndent___closed__6; lean_object* l_Lean_Parser_Term_doFor___closed__6; lean_object* l_Lean_Parser_Term_doIf_parenthesizer___closed__16; extern lean_object* l_Lean_Parser_Tactic_tacticSeqBracketed___closed__1; @@ -513,7 +514,6 @@ lean_object* l_Lean_Parser_Term_doSeqIndent; lean_object* l_Lean_Parser_Term_doSeqIndent___elambda__1(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Parser_Term_do_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_liftMethod_parenthesizer___closed__4; -lean_object* l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__2; lean_object* l_Lean_Parser_Term_continue_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_doPat_formatter___closed__4; lean_object* l_Lean_Parser_Term_do___closed__7; @@ -610,12 +610,14 @@ lean_object* l_Lean_Parser_Term_break___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_doFor_formatter___closed__1; lean_object* l_Lean_Parser_Term_doExpr_formatter___closed__9; lean_object* l_Lean_Parser_Term_doSeqBracketed___elambda__1___closed__3; +extern lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; lean_object* l_Lean_Parser_Term_doMatchAlts_parenthesizer___closed__6; lean_object* l_Lean_Parser_Term_doIf_formatter___closed__3; lean_object* l_Lean_Parser_Term_doSeqBracketed_parenthesizer___closed__3; extern lean_object* l_Lean_Parser_Term_matchAlts___closed__2; lean_object* l_Lean_Parser_Term_doPat___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_doIf_parenthesizer___closed__11; +extern lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented___closed__3; lean_object* l_Lean_Parser_Term_doLet___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_doFor___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_doId_formatter___closed__6; @@ -687,14 +689,12 @@ lean_object* l_Lean_Parser_Term_doIf_formatter___closed__15; lean_object* l_Lean_Parser_Term_do_formatter___closed__2; lean_object* l___regBuiltin_Lean_Parser_Term_doMatch_parenthesizer___closed__1; lean_object* l_Lean_Parser_doElemParser_formatter___boxed(lean_object*); -extern lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; extern lean_object* l_Lean_Parser_Term_matchAlt_formatter___closed__1; lean_object* l_Lean_Parser_Term_doPat_formatter___closed__3; extern lean_object* l_Lean_Parser_Term_matchAlts___closed__5; lean_object* l_Lean_Parser_Term_doId___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_break___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Term_doMatch(lean_object*); -lean_object* l_Lean_Parser_Term_doSeqIndent_formatter___closed__3; lean_object* l___regBuiltin_Lean_Parser_Term_continue_formatter(lean_object*); lean_object* l_Lean_Parser_Term_doLet_parenthesizer___closed__1; extern lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented___closed__2; @@ -1511,14 +1511,6 @@ x_5 = l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(x_2, x_3, x_4, x_1); return x_5; } } -lean_object* _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("do-elements must be indented"); -return x_1; -} -} lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1(lean_object* x_1, lean_object* x_2) { _start: { @@ -1562,7 +1554,7 @@ lean_dec(x_57); if (x_59 == 0) { lean_object* x_60; lean_object* x_61; -x_60 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1___closed__1; +x_60 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; x_61 = l_Lean_Parser_ParserState_mkError(x_2, x_60); x_17 = x_61; goto block_51; @@ -1665,13 +1657,13 @@ lean_object* x_42; lean_object* x_43; uint8_t x_44; x_42 = lean_ctor_get(x_41, 1); lean_inc(x_42); lean_dec(x_41); -x_43 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_43 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_44 = lean_string_dec_eq(x_42, x_43); lean_dec(x_42); if (x_44 == 0) { lean_object* x_45; lean_object* x_46; -x_45 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_45 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_25); x_46 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_45, x_25); x_26 = x_46; @@ -1687,7 +1679,7 @@ else { lean_object* x_47; lean_object* x_48; lean_dec(x_41); -x_47 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_47 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_25); x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_47, x_25); x_26 = x_48; @@ -1698,7 +1690,7 @@ else { lean_object* x_49; lean_object* x_50; lean_dec(x_39); -x_49 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_49 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_25); x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_49, x_25); x_26 = x_50; @@ -1770,7 +1762,7 @@ uint8_t x_3; x_3 = !lean_is_exclusive(x_1); if (x_3 == 0) { -lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_20; lean_object* x_55; uint8_t x_56; +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_20; uint8_t x_21; x_4 = lean_ctor_get(x_1, 0); x_5 = lean_ctor_get(x_1, 4); lean_dec(x_5); @@ -1788,23 +1780,159 @@ x_10 = lean_ctor_get(x_2, 0); lean_inc(x_10); x_11 = lean_array_get_size(x_10); lean_dec(x_10); -x_55 = lean_ctor_get(x_8, 1); -lean_inc(x_55); +x_20 = lean_ctor_get(x_8, 1); +lean_inc(x_20); lean_dec(x_8); -x_56 = lean_nat_dec_le(x_55, x_55); -lean_dec(x_55); -if (x_56 == 0) +x_21 = lean_nat_dec_le(x_20, x_20); +lean_dec(x_20); +if (x_21 == 0) { -lean_object* x_57; lean_object* x_58; -x_57 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1___closed__1; -x_58 = l_Lean_Parser_ParserState_mkError(x_2, x_57); -x_20 = x_58; -goto block_54; +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_dec(x_1); +x_22 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_23 = l_Lean_Parser_ParserState_mkError(x_2, x_22); +x_24 = l_Lean_nullKind; +x_25 = l_Lean_Parser_ParserState_mkNode(x_23, x_24, x_11); +return x_25; } else { -x_20 = x_2; -goto block_54; +lean_object* x_26; +x_26 = lean_ctor_get(x_2, 3); +lean_inc(x_26); +if (lean_obj_tag(x_26) == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_27 = l_Lean_Parser_regBuiltinDoElemParserAttr___closed__4; +x_28 = lean_unsigned_to_nat(0u); +lean_inc(x_1); +x_29 = l_Lean_Parser_categoryParser___elambda__1(x_27, x_28, x_1, x_2); +x_30 = lean_ctor_get(x_29, 3); +lean_inc(x_30); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_46; lean_object* x_47; +x_31 = lean_ctor_get(x_29, 0); +lean_inc(x_31); +x_32 = lean_array_get_size(x_31); +lean_dec(x_31); +x_33 = lean_ctor_get(x_29, 1); +lean_inc(x_33); +lean_inc(x_1); +x_46 = l_Lean_Parser_tokenFn(x_1, x_29); +x_47 = lean_ctor_get(x_46, 3); +lean_inc(x_47); +if (lean_obj_tag(x_47) == 0) +{ +lean_object* x_48; lean_object* x_49; +x_48 = lean_ctor_get(x_46, 0); +lean_inc(x_48); +x_49 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_48); +lean_dec(x_48); +if (lean_obj_tag(x_49) == 2) +{ +lean_object* x_50; lean_object* x_51; uint8_t x_52; +x_50 = lean_ctor_get(x_49, 1); +lean_inc(x_50); +lean_dec(x_49); +x_51 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; +x_52 = lean_string_dec_eq(x_50, x_51); +lean_dec(x_50); +if (x_52 == 0) +{ +lean_object* x_53; lean_object* x_54; +x_53 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_33); +x_54 = l_Lean_Parser_ParserState_mkErrorsAt(x_46, x_53, x_33); +x_34 = x_54; +goto block_45; +} +else +{ +x_34 = x_46; +goto block_45; +} +} +else +{ +lean_object* x_55; lean_object* x_56; +lean_dec(x_49); +x_55 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_33); +x_56 = l_Lean_Parser_ParserState_mkErrorsAt(x_46, x_55, x_33); +x_34 = x_56; +goto block_45; +} +} +else +{ +lean_object* x_57; lean_object* x_58; +lean_dec(x_47); +x_57 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_33); +x_58 = l_Lean_Parser_ParserState_mkErrorsAt(x_46, x_57, x_33); +x_34 = x_58; +goto block_45; +} +block_45: +{ +lean_object* x_35; +x_35 = lean_ctor_get(x_34, 3); +lean_inc(x_35); +if (lean_obj_tag(x_35) == 0) +{ +lean_object* x_36; lean_object* x_37; +lean_dec(x_33); +x_36 = l_Lean_nullKind; +x_37 = l_Lean_Parser_ParserState_mkNode(x_34, x_36, x_32); +x_12 = x_37; +goto block_19; +} +else +{ +lean_object* x_38; uint8_t x_39; +lean_dec(x_35); +x_38 = lean_ctor_get(x_34, 1); +lean_inc(x_38); +x_39 = lean_nat_dec_eq(x_38, x_33); +lean_dec(x_38); +if (x_39 == 0) +{ +lean_object* x_40; lean_object* x_41; +lean_dec(x_33); +x_40 = l_Lean_nullKind; +x_41 = l_Lean_Parser_ParserState_mkNode(x_34, x_40, x_32); +x_12 = x_41; +goto block_19; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = l_Lean_Parser_ParserState_restore(x_34, x_32, x_33); +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_32); +x_12 = x_44; +goto block_19; +} +} +} +} +else +{ +lean_dec(x_30); +x_12 = x_29; +goto block_19; +} +} +else +{ +lean_object* x_59; lean_object* x_60; +lean_dec(x_26); +lean_dec(x_1); +x_59 = l_Lean_nullKind; +x_60 = l_Lean_Parser_ParserState_mkNode(x_2, x_59, x_11); +return x_60; +} } block_19: { @@ -1829,351 +1957,215 @@ x_18 = l_Lean_Parser_ParserState_mkNode(x_12, x_17, x_11); return x_18; } } -block_54: -{ -lean_object* x_21; -x_21 = lean_ctor_get(x_20, 3); -lean_inc(x_21); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_22 = l_Lean_Parser_regBuiltinDoElemParserAttr___closed__4; -x_23 = lean_unsigned_to_nat(0u); -lean_inc(x_1); -x_24 = l_Lean_Parser_categoryParser___elambda__1(x_22, x_23, x_1, x_20); -x_25 = lean_ctor_get(x_24, 3); -lean_inc(x_25); -if (lean_obj_tag(x_25) == 0) -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_41; lean_object* x_42; -x_26 = lean_ctor_get(x_24, 0); -lean_inc(x_26); -x_27 = lean_array_get_size(x_26); -lean_dec(x_26); -x_28 = lean_ctor_get(x_24, 1); -lean_inc(x_28); -lean_inc(x_1); -x_41 = l_Lean_Parser_tokenFn(x_1, x_24); -x_42 = lean_ctor_get(x_41, 3); -lean_inc(x_42); -if (lean_obj_tag(x_42) == 0) -{ -lean_object* x_43; lean_object* x_44; -x_43 = lean_ctor_get(x_41, 0); -lean_inc(x_43); -x_44 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_43); -lean_dec(x_43); -if (lean_obj_tag(x_44) == 2) -{ -lean_object* x_45; lean_object* x_46; uint8_t x_47; -x_45 = lean_ctor_get(x_44, 1); -lean_inc(x_45); -lean_dec(x_44); -x_46 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; -x_47 = lean_string_dec_eq(x_45, x_46); -lean_dec(x_45); -if (x_47 == 0) -{ -lean_object* x_48; lean_object* x_49; -x_48 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_28); -x_49 = l_Lean_Parser_ParserState_mkErrorsAt(x_41, x_48, x_28); -x_29 = x_49; -goto block_40; } else { -x_29 = x_41; -goto block_40; -} -} -else -{ -lean_object* x_50; lean_object* x_51; -lean_dec(x_44); -x_50 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_28); -x_51 = l_Lean_Parser_ParserState_mkErrorsAt(x_41, x_50, x_28); -x_29 = x_51; -goto block_40; -} -} -else -{ -lean_object* x_52; lean_object* x_53; -lean_dec(x_42); -x_52 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_28); -x_53 = l_Lean_Parser_ParserState_mkErrorsAt(x_41, x_52, x_28); -x_29 = x_53; -goto block_40; -} -block_40: -{ -lean_object* x_30; -x_30 = lean_ctor_get(x_29, 3); -lean_inc(x_30); -if (lean_obj_tag(x_30) == 0) -{ -lean_object* x_31; lean_object* x_32; -lean_dec(x_28); -x_31 = l_Lean_nullKind; -x_32 = l_Lean_Parser_ParserState_mkNode(x_29, x_31, x_27); -x_12 = x_32; -goto block_19; -} -else -{ -lean_object* x_33; uint8_t x_34; -lean_dec(x_30); -x_33 = lean_ctor_get(x_29, 1); -lean_inc(x_33); -x_34 = lean_nat_dec_eq(x_33, x_28); -lean_dec(x_33); -if (x_34 == 0) -{ -lean_object* x_35; lean_object* x_36; -lean_dec(x_28); -x_35 = l_Lean_nullKind; -x_36 = l_Lean_Parser_ParserState_mkNode(x_29, x_35, x_27); -x_12 = x_36; -goto block_19; -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_37 = l_Lean_Parser_ParserState_restore(x_29, x_27, x_28); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_27); -x_12 = x_39; -goto block_19; -} -} -} -} -else -{ -lean_dec(x_25); -x_12 = x_24; -goto block_19; -} -} -else -{ -lean_dec(x_21); -x_12 = x_20; -goto block_19; -} -} -} -else -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_79; lean_object* x_114; uint8_t x_115; -x_59 = lean_ctor_get(x_1, 0); -x_60 = lean_ctor_get(x_1, 1); -x_61 = lean_ctor_get(x_1, 2); -x_62 = lean_ctor_get(x_1, 3); -x_63 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_81; uint8_t x_82; +x_61 = lean_ctor_get(x_1, 0); +x_62 = lean_ctor_get(x_1, 1); +x_63 = lean_ctor_get(x_1, 2); +x_64 = lean_ctor_get(x_1, 3); +x_65 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_64); +lean_inc(x_63); lean_inc(x_62); lean_inc(x_61); -lean_inc(x_60); -lean_inc(x_59); lean_dec(x_1); -x_64 = lean_ctor_get(x_59, 2); -lean_inc(x_64); -x_65 = lean_ctor_get(x_2, 1); -lean_inc(x_65); -x_66 = l_Lean_FileMap_toPosition(x_64, x_65); -lean_dec(x_64); +x_66 = lean_ctor_get(x_61, 2); lean_inc(x_66); -x_67 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_67, 0, x_66); -x_68 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_68, 0, x_59); -lean_ctor_set(x_68, 1, x_60); -lean_ctor_set(x_68, 2, x_61); -lean_ctor_set(x_68, 3, x_62); -lean_ctor_set(x_68, 4, x_67); -lean_ctor_set_uint8(x_68, sizeof(void*)*5, x_63); -x_69 = lean_ctor_get(x_2, 0); -lean_inc(x_69); -x_70 = lean_array_get_size(x_69); -lean_dec(x_69); -x_114 = lean_ctor_get(x_66, 1); -lean_inc(x_114); +x_67 = lean_ctor_get(x_2, 1); +lean_inc(x_67); +x_68 = l_Lean_FileMap_toPosition(x_66, x_67); lean_dec(x_66); -x_115 = lean_nat_dec_le(x_114, x_114); -lean_dec(x_114); -if (x_115 == 0) -{ -lean_object* x_116; lean_object* x_117; -x_116 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1___closed__1; -x_117 = l_Lean_Parser_ParserState_mkError(x_2, x_116); -x_79 = x_117; -goto block_113; -} -else -{ -x_79 = x_2; -goto block_113; -} -block_78: -{ -lean_object* x_72; -x_72 = lean_ctor_get(x_71, 3); -lean_inc(x_72); -if (lean_obj_tag(x_72) == 0) -{ -lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_73 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1(x_68, x_71); -x_74 = l_Lean_nullKind; -x_75 = l_Lean_Parser_ParserState_mkNode(x_73, x_74, x_70); -return x_75; -} -else -{ -lean_object* x_76; lean_object* x_77; -lean_dec(x_72); +lean_inc(x_68); +x_69 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_69, 0, x_68); +x_70 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_70, 0, x_61); +lean_ctor_set(x_70, 1, x_62); +lean_ctor_set(x_70, 2, x_63); +lean_ctor_set(x_70, 3, x_64); +lean_ctor_set(x_70, 4, x_69); +lean_ctor_set_uint8(x_70, sizeof(void*)*5, x_65); +x_71 = lean_ctor_get(x_2, 0); +lean_inc(x_71); +x_72 = lean_array_get_size(x_71); +lean_dec(x_71); +x_81 = lean_ctor_get(x_68, 1); +lean_inc(x_81); lean_dec(x_68); -x_76 = l_Lean_nullKind; -x_77 = l_Lean_Parser_ParserState_mkNode(x_71, x_76, x_70); -return x_77; -} -} -block_113: +x_82 = lean_nat_dec_le(x_81, x_81); +lean_dec(x_81); +if (x_82 == 0) { -lean_object* x_80; -x_80 = lean_ctor_get(x_79, 3); -lean_inc(x_80); -if (lean_obj_tag(x_80) == 0) -{ -lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; -x_81 = l_Lean_Parser_regBuiltinDoElemParserAttr___closed__4; -x_82 = lean_unsigned_to_nat(0u); -lean_inc(x_68); -x_83 = l_Lean_Parser_categoryParser___elambda__1(x_81, x_82, x_68, x_79); -x_84 = lean_ctor_get(x_83, 3); -lean_inc(x_84); -if (lean_obj_tag(x_84) == 0) -{ -lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_100; lean_object* x_101; -x_85 = lean_ctor_get(x_83, 0); -lean_inc(x_85); -x_86 = lean_array_get_size(x_85); -lean_dec(x_85); -x_87 = lean_ctor_get(x_83, 1); -lean_inc(x_87); -lean_inc(x_68); -x_100 = l_Lean_Parser_tokenFn(x_68, x_83); -x_101 = lean_ctor_get(x_100, 3); -lean_inc(x_101); -if (lean_obj_tag(x_101) == 0) -{ -lean_object* x_102; lean_object* x_103; -x_102 = lean_ctor_get(x_100, 0); -lean_inc(x_102); -x_103 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_102); -lean_dec(x_102); -if (lean_obj_tag(x_103) == 2) -{ -lean_object* x_104; lean_object* x_105; uint8_t x_106; -x_104 = lean_ctor_get(x_103, 1); -lean_inc(x_104); -lean_dec(x_103); -x_105 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; -x_106 = lean_string_dec_eq(x_104, x_105); -lean_dec(x_104); -if (x_106 == 0) -{ -lean_object* x_107; lean_object* x_108; -x_107 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_87); -x_108 = l_Lean_Parser_ParserState_mkErrorsAt(x_100, x_107, x_87); -x_88 = x_108; -goto block_99; +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +lean_dec(x_70); +x_83 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_84 = l_Lean_Parser_ParserState_mkError(x_2, x_83); +x_85 = l_Lean_nullKind; +x_86 = l_Lean_Parser_ParserState_mkNode(x_84, x_85, x_72); +return x_86; } else { -x_88 = x_100; -goto block_99; -} -} -else +lean_object* x_87; +x_87 = lean_ctor_get(x_2, 3); +lean_inc(x_87); +if (lean_obj_tag(x_87) == 0) +{ +lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; +x_88 = l_Lean_Parser_regBuiltinDoElemParserAttr___closed__4; +x_89 = lean_unsigned_to_nat(0u); +lean_inc(x_70); +x_90 = l_Lean_Parser_categoryParser___elambda__1(x_88, x_89, x_70, x_2); +x_91 = lean_ctor_get(x_90, 3); +lean_inc(x_91); +if (lean_obj_tag(x_91) == 0) +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_107; lean_object* x_108; +x_92 = lean_ctor_get(x_90, 0); +lean_inc(x_92); +x_93 = lean_array_get_size(x_92); +lean_dec(x_92); +x_94 = lean_ctor_get(x_90, 1); +lean_inc(x_94); +lean_inc(x_70); +x_107 = l_Lean_Parser_tokenFn(x_70, x_90); +x_108 = lean_ctor_get(x_107, 3); +lean_inc(x_108); +if (lean_obj_tag(x_108) == 0) { lean_object* x_109; lean_object* x_110; -lean_dec(x_103); -x_109 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_87); -x_110 = l_Lean_Parser_ParserState_mkErrorsAt(x_100, x_109, x_87); -x_88 = x_110; -goto block_99; +x_109 = lean_ctor_get(x_107, 0); +lean_inc(x_109); +x_110 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_109); +lean_dec(x_109); +if (lean_obj_tag(x_110) == 2) +{ +lean_object* x_111; lean_object* x_112; uint8_t x_113; +x_111 = lean_ctor_get(x_110, 1); +lean_inc(x_111); +lean_dec(x_110); +x_112 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; +x_113 = lean_string_dec_eq(x_111, x_112); +lean_dec(x_111); +if (x_113 == 0) +{ +lean_object* x_114; lean_object* x_115; +x_114 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_94); +x_115 = l_Lean_Parser_ParserState_mkErrorsAt(x_107, x_114, x_94); +x_95 = x_115; +goto block_106; +} +else +{ +x_95 = x_107; +goto block_106; } } else { -lean_object* x_111; lean_object* x_112; -lean_dec(x_101); -x_111 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_87); -x_112 = l_Lean_Parser_ParserState_mkErrorsAt(x_100, x_111, x_87); -x_88 = x_112; -goto block_99; +lean_object* x_116; lean_object* x_117; +lean_dec(x_110); +x_116 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_94); +x_117 = l_Lean_Parser_ParserState_mkErrorsAt(x_107, x_116, x_94); +x_95 = x_117; +goto block_106; } -block_99: -{ -lean_object* x_89; -x_89 = lean_ctor_get(x_88, 3); -lean_inc(x_89); -if (lean_obj_tag(x_89) == 0) -{ -lean_object* x_90; lean_object* x_91; -lean_dec(x_87); -x_90 = l_Lean_nullKind; -x_91 = l_Lean_Parser_ParserState_mkNode(x_88, x_90, x_86); -x_71 = x_91; -goto block_78; } else { -lean_object* x_92; uint8_t x_93; -lean_dec(x_89); -x_92 = lean_ctor_get(x_88, 1); -lean_inc(x_92); -x_93 = lean_nat_dec_eq(x_92, x_87); -lean_dec(x_92); -if (x_93 == 0) -{ -lean_object* x_94; lean_object* x_95; -lean_dec(x_87); -x_94 = l_Lean_nullKind; -x_95 = l_Lean_Parser_ParserState_mkNode(x_88, x_94, x_86); -x_71 = x_95; -goto block_78; +lean_object* x_118; lean_object* x_119; +lean_dec(x_108); +x_118 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_94); +x_119 = l_Lean_Parser_ParserState_mkErrorsAt(x_107, x_118, x_94); +x_95 = x_119; +goto block_106; } -else +block_106: { -lean_object* x_96; lean_object* x_97; lean_object* x_98; -x_96 = l_Lean_Parser_ParserState_restore(x_88, x_86, x_87); +lean_object* x_96; +x_96 = lean_ctor_get(x_95, 3); +lean_inc(x_96); +if (lean_obj_tag(x_96) == 0) +{ +lean_object* x_97; lean_object* x_98; +lean_dec(x_94); x_97 = l_Lean_nullKind; -x_98 = l_Lean_Parser_ParserState_mkNode(x_96, x_97, x_86); -x_71 = x_98; -goto block_78; +x_98 = l_Lean_Parser_ParserState_mkNode(x_95, x_97, x_93); +x_73 = x_98; +goto block_80; +} +else +{ +lean_object* x_99; uint8_t x_100; +lean_dec(x_96); +x_99 = lean_ctor_get(x_95, 1); +lean_inc(x_99); +x_100 = lean_nat_dec_eq(x_99, x_94); +lean_dec(x_99); +if (x_100 == 0) +{ +lean_object* x_101; lean_object* x_102; +lean_dec(x_94); +x_101 = l_Lean_nullKind; +x_102 = l_Lean_Parser_ParserState_mkNode(x_95, x_101, x_93); +x_73 = x_102; +goto block_80; +} +else +{ +lean_object* x_103; lean_object* x_104; lean_object* x_105; +x_103 = l_Lean_Parser_ParserState_restore(x_95, x_93, x_94); +x_104 = l_Lean_nullKind; +x_105 = l_Lean_Parser_ParserState_mkNode(x_103, x_104, x_93); +x_73 = x_105; +goto block_80; } } } } else { -lean_dec(x_84); -x_71 = x_83; -goto block_78; +lean_dec(x_91); +x_73 = x_90; +goto block_80; } } else { -lean_dec(x_80); -x_71 = x_79; -goto block_78; +lean_object* x_120; lean_object* x_121; +lean_dec(x_87); +lean_dec(x_70); +x_120 = l_Lean_nullKind; +x_121 = l_Lean_Parser_ParserState_mkNode(x_2, x_120, x_72); +return x_121; +} +} +block_80: +{ +lean_object* x_74; +x_74 = lean_ctor_get(x_73, 3); +lean_inc(x_74); +if (lean_obj_tag(x_74) == 0) +{ +lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_75 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1(x_70, x_73); +x_76 = l_Lean_nullKind; +x_77 = l_Lean_Parser_ParserState_mkNode(x_75, x_76, x_72); +return x_77; +} +else +{ +lean_object* x_78; lean_object* x_79; +lean_dec(x_74); +lean_dec(x_70); +x_78 = l_Lean_nullKind; +x_79 = l_Lean_Parser_ParserState_mkNode(x_73, x_78, x_72); +return x_79; } } } @@ -2192,35 +2184,26 @@ return x_3; lean_object* _init_l_Lean_Parser_Term_doSeqIndent___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__2; -x_2 = l_Lean_Parser_optionaInfo(x_1); -return x_2; +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Lean_Parser_Term_doSeqIndent___closed__1; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__3; +x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); +return x_4; } } lean_object* _init_l_Lean_Parser_Term_doSeqIndent___closed__3() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Term_doSeqIndent___closed__1; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -x_3 = l_Lean_Parser_Term_doSeqIndent___closed__2; -x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); -return x_4; -} -} -lean_object* _init_l_Lean_Parser_Term_doSeqIndent___closed__4() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Parser_inhabited___closed__1; -x_2 = l_Lean_Parser_Term_doSeqIndent___closed__3; +x_2 = l_Lean_Parser_Term_doSeqIndent___closed__2; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Term_doSeqIndent___closed__5() { +lean_object* _init_l_Lean_Parser_Term_doSeqIndent___closed__4() { _start: { lean_object* x_1; @@ -2228,12 +2211,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_doSeqIndent___elambda__1), 2 return x_1; } } -lean_object* _init_l_Lean_Parser_Term_doSeqIndent___closed__6() { +lean_object* _init_l_Lean_Parser_Term_doSeqIndent___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_doSeqIndent___closed__4; -x_2 = l_Lean_Parser_Term_doSeqIndent___closed__5; +x_1 = l_Lean_Parser_Term_doSeqIndent___closed__3; +x_2 = l_Lean_Parser_Term_doSeqIndent___closed__4; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -2244,7 +2227,7 @@ lean_object* _init_l_Lean_Parser_Term_doSeqIndent() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Term_doSeqIndent___closed__6; +x_1 = l_Lean_Parser_Term_doSeqIndent___closed__5; return x_1; } } @@ -2292,13 +2275,13 @@ lean_object* x_27; lean_object* x_28; uint8_t x_29; x_27 = lean_ctor_get(x_26, 1); lean_inc(x_27); lean_dec(x_26); -x_28 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_28 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_29 = lean_string_dec_eq(x_27, x_28); lean_dec(x_27); if (x_29 == 0) { lean_object* x_30; lean_object* x_31; -x_30 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_30 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); x_16 = x_31; @@ -2314,7 +2297,7 @@ else { lean_object* x_32; lean_object* x_33; lean_dec(x_26); -x_32 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); x_16 = x_33; @@ -2325,7 +2308,7 @@ else { lean_object* x_34; lean_object* x_35; lean_dec(x_24); -x_34 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_34 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); x_16 = x_35; @@ -5948,7 +5931,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__1; -x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__7; +x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -9688,31 +9671,9 @@ return x_8; lean_object* _init_l_Lean_Parser_Term_doSeqIndent_formatter___closed__1() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__3; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_optional_formatter), 6, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Parser_Term_doSeqIndent_formatter___closed__2() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_doSeqBracketed_formatter___closed__2; -x_2 = l_Lean_Parser_Term_doSeqIndent_formatter___closed__1; -x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_doSeqIndent_formatter___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2; -x_2 = l_Lean_Parser_Term_doSeqIndent_formatter___closed__2; +x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -9723,8 +9684,8 @@ lean_object* l_Lean_Parser_Term_doSeqIndent_formatter(lean_object* x_1, lean_obj _start: { lean_object* x_6; lean_object* x_7; -x_6 = l_Lean_Parser_Term_doSeqIndent_formatter___closed__3; -x_7 = l_Lean_PrettyPrinter_Formatter_many_formatter(x_6, x_1, x_2, x_3, x_4, x_5); +x_6 = l_Lean_Parser_Term_doSeqIndent_formatter___closed__1; +x_7 = l_Lean_Parser_many1Indent_formatter(x_6, x_1, x_2, x_3, x_4, x_5); return x_7; } } @@ -9849,7 +9810,7 @@ lean_object* _init_l_Lean_Parser_Term_doIf_formatter___closed__9() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2; +x_1 = l_Lean_Parser_many1Indent_formatter___closed__1; x_2 = l_Lean_Parser_Term_doIf_formatter___closed__8; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -9883,7 +9844,7 @@ lean_object* _init_l_Lean_Parser_Term_doIf_formatter___closed__12() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2; +x_1 = l_Lean_Parser_many1Indent_formatter___closed__1; x_2 = l_Lean_Parser_Term_doIf_formatter___closed__11; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -10111,19 +10072,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_doSeqBracketed_parenthesizer___closed__2; -x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; -x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; -x_2 = l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__1; +x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -10134,8 +10083,8 @@ lean_object* l_Lean_Parser_Term_doSeqIndent_parenthesizer(lean_object* x_1, lean _start: { lean_object* x_6; lean_object* x_7; -x_6 = l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__2; -x_7 = l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer(x_6, x_1, x_2, x_3, x_4, x_5); +x_6 = l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__1; +x_7 = l_Lean_Parser_many1Indent_parenthesizer(x_6, x_1, x_2, x_3, x_4, x_5); return x_7; } } @@ -10226,7 +10175,7 @@ lean_object* _init_l_Lean_Parser_Term_doIf_parenthesizer___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; +x_1 = l_Lean_Parser_many1Indent_parenthesizer___closed__1; x_2 = l_Lean_Parser_Term_doIf_parenthesizer___closed__5; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -10248,7 +10197,7 @@ lean_object* _init_l_Lean_Parser_Term_doIf_parenthesizer___closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; +x_1 = l_Lean_Parser_many1Indent_parenthesizer___closed__1; x_2 = l_Lean_Parser_Term_doIf_parenthesizer___closed__3; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -13903,7 +13852,7 @@ lean_object* _init_l_Lean_Parser_Term_doMatchAlts_parenthesizer___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; x_2 = l_Lean_Parser_Term_doMatchAlts_parenthesizer___closed__3; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -17552,8 +17501,6 @@ lean_mark_persistent(l___regBuiltin_Lean_Parser_Term_liftMethod_parenthesizer___ res = l___regBuiltin_Lean_Parser_Term_liftMethod_parenthesizer(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1___closed__1 = _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1___closed__1(); -lean_mark_persistent(l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_doSeqIndent___elambda__1___spec__1___closed__1); l_Lean_Parser_Term_doSeqIndent___closed__1 = _init_l_Lean_Parser_Term_doSeqIndent___closed__1(); lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent___closed__1); l_Lean_Parser_Term_doSeqIndent___closed__2 = _init_l_Lean_Parser_Term_doSeqIndent___closed__2(); @@ -17564,8 +17511,6 @@ l_Lean_Parser_Term_doSeqIndent___closed__4 = _init_l_Lean_Parser_Term_doSeqInden lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent___closed__4); l_Lean_Parser_Term_doSeqIndent___closed__5 = _init_l_Lean_Parser_Term_doSeqIndent___closed__5(); lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent___closed__5); -l_Lean_Parser_Term_doSeqIndent___closed__6 = _init_l_Lean_Parser_Term_doSeqIndent___closed__6(); -lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent___closed__6); l_Lean_Parser_Term_doSeqIndent = _init_l_Lean_Parser_Term_doSeqIndent(); lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent); l_Lean_Parser_Term_doSeqBracketed___elambda__1___closed__1 = _init_l_Lean_Parser_Term_doSeqBracketed___elambda__1___closed__1(); @@ -17960,10 +17905,6 @@ l_Lean_Parser_Term_doSeqBracketed_formatter___closed__6 = _init_l_Lean_Parser_Te lean_mark_persistent(l_Lean_Parser_Term_doSeqBracketed_formatter___closed__6); l_Lean_Parser_Term_doSeqIndent_formatter___closed__1 = _init_l_Lean_Parser_Term_doSeqIndent_formatter___closed__1(); lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent_formatter___closed__1); -l_Lean_Parser_Term_doSeqIndent_formatter___closed__2 = _init_l_Lean_Parser_Term_doSeqIndent_formatter___closed__2(); -lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent_formatter___closed__2); -l_Lean_Parser_Term_doSeqIndent_formatter___closed__3 = _init_l_Lean_Parser_Term_doSeqIndent_formatter___closed__3(); -lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent_formatter___closed__3); l_Lean_Parser_Term_doSeq_formatter___closed__1 = _init_l_Lean_Parser_Term_doSeq_formatter___closed__1(); lean_mark_persistent(l_Lean_Parser_Term_doSeq_formatter___closed__1); l_Lean_Parser_Term_doSeq_formatter___closed__2 = _init_l_Lean_Parser_Term_doSeq_formatter___closed__2(); @@ -18027,8 +17968,6 @@ l_Lean_Parser_Term_doSeqBracketed_parenthesizer___closed__6 = _init_l_Lean_Parse lean_mark_persistent(l_Lean_Parser_Term_doSeqBracketed_parenthesizer___closed__6); l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__1 = _init_l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__1); -l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__2 = _init_l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__2(); -lean_mark_persistent(l_Lean_Parser_Term_doSeqIndent_parenthesizer___closed__2); l_Lean_Parser_Term_doSeq_parenthesizer___closed__1 = _init_l_Lean_Parser_Term_doSeq_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_Parser_Term_doSeq_parenthesizer___closed__1); l_Lean_Parser_Term_doSeq_parenthesizer___closed__2 = _init_l_Lean_Parser_Term_doSeq_parenthesizer___closed__2(); diff --git a/stage0/stdlib/Lean/Parser/Module.c b/stage0/stdlib/Lean/Parser/Module.c index 3f47365cb8..1886eb60f8 100644 --- a/stage0/stdlib/Lean/Parser/Module.c +++ b/stage0/stdlib/Lean/Parser/Module.c @@ -118,7 +118,6 @@ lean_object* l_Lean_Parser_Module_header___elambda__1___closed__2; lean_object* lean_array_fget(lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Parser_testModuleParser___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Parser_Term_structInst_parenthesizer___closed__6; lean_object* l_Lean_Parser_parseModuleAux___main___closed__2; lean_object* l_Lean_Parser_Module_header___closed__2; lean_object* l_Lean_Parser_Module_import___elambda__1___closed__8; @@ -238,6 +237,7 @@ lean_object* l_Lean_Parser_Module_module_parenthesizer___closed__3; lean_object* l_IO_FS_Handle_readToEndAux___main___at_IO_Process_output___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_header_formatter___closed__3; lean_object* l_Lean_Parser_Module_prelude___elambda__1(lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; lean_object* l_Lean_Parser_Module_import___elambda__1___closed__14; lean_object* l_Lean_Parser_Module_header_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot(lean_object*, lean_object*, uint8_t); @@ -2457,7 +2457,7 @@ lean_object* _init_l_Lean_Parser_Module_import_parenthesizer___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; x_2 = l_Lean_Parser_Level_ident_parenthesizer___closed__1; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); diff --git a/stage0/stdlib/Lean/Parser/Tactic.c b/stage0/stdlib/Lean/Parser/Tactic.c index c236546f23..5b0736dc8b 100644 --- a/stage0/stdlib/Lean/Parser/Tactic.c +++ b/stage0/stdlib/Lean/Parser/Tactic.c @@ -47,6 +47,7 @@ lean_object* l_Lean_Parser_Tactic_let_x21; lean_object* l_Lean_Parser_Tactic_generalize_parenthesizer___closed__10; lean_object* l_Lean_Parser_Tactic_allGoals___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_induction___closed__1; +lean_object* l_Lean_Parser_many1Indent_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_skip_formatter___closed__3; lean_object* l_Lean_Parser_Tactic_intros_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_generalize___closed__8; @@ -156,6 +157,7 @@ lean_object* l_Lean_Parser_Tactic_locationWildcard___closed__1; lean_object* l_Lean_Parser_Tactic_inductionAlt_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_rwRule___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_have_formatter___closed__2; +extern lean_object* l_Lean_Parser_many1Indent_parenthesizer___closed__1; lean_object* l_Lean_Parser_Tactic_changeWith; lean_object* l_Lean_Parser_Tactic_revert___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_majorPremise_parenthesizer___closed__3; @@ -176,6 +178,7 @@ lean_object* l___regBuiltin_Lean_Parser_Tactic_rewriteSeq_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_rewrite___elambda__1___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_generalize___closed__4; +lean_object* l_Lean_Parser_Tactic_revert___closed__8; lean_object* l_Lean_Parser_Tactic_failIfSuccess___closed__1; lean_object* l_Lean_Parser_Tactic_generalizingVars___closed__5; lean_object* l_Lean_Parser_Tactic_subst___elambda__1___closed__1; @@ -298,6 +301,7 @@ lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_match_formatter___closed__1; extern lean_object* l_Lean_Parser_Term_typeAscription___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_traceState___elambda__1___closed__1; +lean_object* l_Lean_Parser_Tactic_inductionAlt_formatter___closed__5; lean_object* l_Lean_Parser_Tactic_injection___closed__4; lean_object* l_Lean_Parser_Tactic_admit___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_inductionAlt_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -412,6 +416,7 @@ lean_object* l_Lean_Parser_Tactic_majorPremise_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_location___closed__5; lean_object* l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_refine_x21_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_withIds___elambda__1___spec__1(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Parser_Tactic_refine_x21_parenthesizer___closed__1; lean_object* l_Lean_Parser_Tactic_intro_formatter___closed__6; lean_object* l_Lean_Parser_Tactic_injection___closed__1; @@ -463,6 +468,7 @@ lean_object* l_Lean_Parser_Tactic_changeWith_parenthesizer___closed__5; lean_object* l_Lean_Parser_Tactic_case___closed__4; lean_object* l___regBuiltin_Lean_Parser_Tactic_generalize_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_majorPremise_formatter___closed__3; +lean_object* l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__3; lean_object* l_Lean_Parser_Tactic_traceState_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_rwRule_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_change_formatter___closed__3; @@ -598,6 +604,7 @@ lean_object* l_Lean_Parser_Tactic_injection_parenthesizer___closed__1; lean_object* l_Lean_Parser_Tactic_location___elambda__1___closed__3; lean_object* l___regBuiltin_Lean_Parser_Tactic_revert_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_injection___elambda__1___closed__5; +lean_object* l_Lean_Parser_Tactic_locationHyp_formatter___closed__3; lean_object* l_Lean_Parser_Tactic_traceState_formatter___closed__3; lean_object* l_Lean_Parser_Tactic_refine___closed__3; lean_object* l_Lean_Parser_Tactic_allGoals_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -610,7 +617,6 @@ lean_object* l_Lean_Parser_Tactic_introMatch___elambda__1___closed__2; lean_object* l___regBuiltin_Lean_Parser_Tactic_exact_parenthesizer(lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Tactic_case(lean_object*); lean_object* l_Lean_Parser_Tactic_ident_x27___closed__2; -extern lean_object* l_Lean_Parser_Term_structInst_parenthesizer___closed__6; lean_object* l___regBuiltin_Lean_Parser_Tactic_change_parenthesizer___closed__1; lean_object* l___regBuiltin_Lean_Parser_Tactic_nestedTactic_parenthesizer(lean_object*); lean_object* l_Lean_Parser_Tactic_apply_formatter___closed__1; @@ -667,6 +673,7 @@ lean_object* l___regBuiltin_Lean_Parser_Tactic_allGoals_parenthesizer(lean_objec lean_object* l_Lean_Parser_Tactic_ident_x27___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_revert(lean_object*); lean_object* l___regBuiltin_Lean_Parser_Tactic_failIfSuccess_formatter___closed__1; +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_locationHyp___elambda__1___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_generalize_parenthesizer___closed__9; lean_object* l_Lean_Parser_Tactic_changeWith___closed__8; lean_object* l_Lean_Parser_Tactic_change___closed__8; @@ -681,6 +688,7 @@ lean_object* l_Array_shrink___main___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_ident_x27___closed__3; lean_object* l_Lean_Parser_Tactic_locationWildcard_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_location___closed__1; +lean_object* l_Lean_Parser_manyIndent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_rewriteSeq; lean_object* l_Lean_Parser_Tactic_rwRule___elambda__1___closed__8; lean_object* l_Lean_Parser_Tactic_generalizingVars_formatter___closed__1; @@ -697,6 +705,7 @@ lean_object* l___regBuiltin_Lean_Parser_Tactic_cases_formatter(lean_object*); lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_case_formatter___closed__2; lean_object* l_Lean_Parser_Tactic_intros___closed__2; +lean_object* l_Lean_Parser_Tactic_inductionAlt___closed__12; lean_object* l_Lean_Parser_Tactic_let_x21___closed__2; lean_object* l_Lean_Parser_Tactic_changeWith_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_matchAlt___closed__1; @@ -741,7 +750,9 @@ lean_object* l_Lean_Parser_Tactic_introMatch___closed__1; lean_object* l_Lean_Parser_Tactic_traceState___closed__4; lean_object* l___regBuiltin_Lean_Parser_Tactic_intro_parenthesizer___closed__1; lean_object* l___regBuiltin_Lean_Parser_Tactic_introMatch_formatter___closed__1; +lean_object* l_Lean_Parser_Tactic_intro___closed__10; lean_object* l_Lean_Parser_Tactic_skip___closed__5; +extern lean_object* l_Lean_Parser_many1Indent_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_rewrite___closed__8; lean_object* l_Lean_Parser_Tactic_withIds___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_apply(lean_object*); @@ -848,6 +859,7 @@ lean_object* l_Lean_Parser_Tactic_exact___closed__3; lean_object* l_Lean_Parser_Tactic_inductionAlts___closed__3; lean_object* l_Lean_Parser_Tactic_paren___closed__5; lean_object* l_Lean_Parser_Tactic_location_parenthesizer___closed__2; +lean_object* l_Lean_Parser_many1Indent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_inductionAlts_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_skip___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_locationWildcard___elambda__1___closed__2; @@ -920,6 +932,7 @@ lean_object* l_Lean_Parser_Tactic_change___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_refine_x21___closed__4; extern lean_object* l_Lean_Parser_Term_have___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__2; +lean_object* l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__5; extern lean_object* l_Lean_Parser_Term_matchAlts_formatter___closed__2; lean_object* l_Lean_Parser_Tactic_rewrite_formatter___closed__5; lean_object* l_Lean_Parser_Tactic_orelse_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1080,6 +1093,7 @@ lean_object* l___regBuiltin_Lean_Parser_Tactic_induction_parenthesizer___closed_ lean_object* l_Lean_Parser_Tactic_location_parenthesizer___closed__1; lean_object* l_Lean_Parser_Tactic_induction___elambda__1___closed__6; lean_object* l___regBuiltin_Lean_Parser_Tactic_refine_formatter(lean_object*); +lean_object* l_Lean_Parser_Tactic_intros___closed__9; lean_object* l_Lean_Parser_Tactic_withIds___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_location___closed__9; lean_object* l_Lean_Parser_Tactic_case_parenthesizer___closed__1; @@ -1309,6 +1323,7 @@ lean_object* l_Lean_Parser_Tactic_done___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_failIfSuccess___elambda__1___closed__3; extern lean_object* l_Lean_Parser_unicodeSymbolFn___closed__1; lean_object* l_Lean_Parser_Tactic_intro___closed__6; +extern lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; lean_object* l_Lean_Parser_Tactic_rewriteSeq_parenthesizer___closed__4; extern lean_object* l_Lean_Parser_Term_structInstArrayRef___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_matchAlts_parenthesizer___closed__3; @@ -1419,6 +1434,7 @@ lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__2; lean_object* l_Lean_Parser_Tactic_let_parenthesizer___closed__2; lean_object* l_Lean_Parser_Tactic_injection; lean_object* l_Lean_Parser_Tactic_induction_formatter___closed__9; +extern lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; lean_object* l_Lean_Parser_Tactic_exact___closed__2; lean_object* l_Lean_Parser_Tactic_suffices___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_rewrite_parenthesizer___closed__7; @@ -1685,6 +1701,7 @@ lean_object* l_Lean_Parser_Tactic_allGoals___elambda__1___closed__4; lean_object* l_Lean_Parser_termParser_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_match___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_let_parenthesizer___closed__1; +lean_object* l_Lean_Parser_manyIndent_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_rewriteSeq_parenthesizer___closed__1; uint8_t lean_string_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_withAlts___closed__3; @@ -1989,63 +2006,140 @@ return x_1; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_24; x_3 = lean_ctor_get(x_2, 0); lean_inc(x_3); x_4 = lean_array_get_size(x_3); lean_dec(x_3); x_5 = lean_ctor_get(x_2, 1); lean_inc(x_5); -x_6 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; -x_7 = l_Lean_Parser_maxPrec; +x_24 = lean_ctor_get(x_1, 4); +lean_inc(x_24); +if (lean_obj_tag(x_24) == 0) +{ +x_6 = x_2; +goto block_23; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +lean_dec(x_24); +x_26 = lean_ctor_get(x_1, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_26, 2); +lean_inc(x_27); +lean_dec(x_26); +lean_inc(x_5); +x_28 = l_Lean_FileMap_toPosition(x_27, x_5); +lean_dec(x_27); +x_29 = lean_ctor_get(x_25, 1); +lean_inc(x_29); +lean_dec(x_25); +x_30 = lean_ctor_get(x_28, 1); +lean_inc(x_30); +lean_dec(x_28); +x_31 = lean_nat_dec_le(x_29, x_30); +lean_dec(x_30); +lean_dec(x_29); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_33 = l_Lean_Parser_ParserState_mkError(x_2, x_32); +x_6 = x_33; +goto block_23; +} +else +{ +x_6 = x_2; +goto block_23; +} +} +block_23: +{ +lean_object* x_7; +x_7 = lean_ctor_get(x_6, 3); +lean_inc(x_7); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; +x_9 = l_Lean_Parser_maxPrec; lean_inc(x_1); -x_8 = l_Lean_Parser_categoryParser___elambda__1(x_6, x_7, x_1, x_2); -x_9 = lean_ctor_get(x_8, 3); -lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) +x_10 = l_Lean_Parser_categoryParser___elambda__1(x_8, x_9, x_1, x_6); +x_11 = lean_ctor_get(x_10, 3); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) { -lean_object* x_10; uint8_t x_11; +lean_object* x_12; uint8_t x_13; lean_dec(x_4); -x_10 = lean_ctor_get(x_8, 1); -lean_inc(x_10); -x_11 = lean_nat_dec_eq(x_5, x_10); -lean_dec(x_10); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_5, x_12); +lean_dec(x_12); lean_dec(x_5); -if (x_11 == 0) +if (x_13 == 0) { -x_2 = x_8; +x_2 = x_10; goto _start; } else { -lean_object* x_13; lean_object* x_14; +lean_object* x_15; lean_object* x_16; lean_dec(x_1); -x_13 = l_Lean_Parser_manyAux___main___closed__1; -x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); -return x_14; +x_15 = l_Lean_Parser_manyAux___main___closed__1; +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); +return x_16; } } else { -lean_object* x_15; uint8_t x_16; -lean_dec(x_9); +lean_object* x_17; uint8_t x_18; +lean_dec(x_11); lean_dec(x_1); -x_15 = lean_ctor_get(x_8, 1); -lean_inc(x_15); -x_16 = lean_nat_dec_eq(x_5, x_15); -lean_dec(x_15); -if (x_16 == 0) +x_17 = lean_ctor_get(x_10, 1); +lean_inc(x_17); +x_18 = lean_nat_dec_eq(x_5, x_17); +lean_dec(x_17); +if (x_18 == 0) { lean_dec(x_5); lean_dec(x_4); -return x_8; +return x_10; } else { -lean_object* x_17; -x_17 = l_Lean_Parser_ParserState_restore(x_8, x_4, x_5); +lean_object* x_19; +x_19 = l_Lean_Parser_ParserState_restore(x_10, x_4, x_5); lean_dec(x_4); -return x_17; +return x_19; +} +} +} +else +{ +lean_object* x_20; uint8_t x_21; +lean_dec(x_7); +lean_dec(x_1); +x_20 = lean_ctor_get(x_6, 1); +lean_inc(x_20); +x_21 = lean_nat_dec_eq(x_5, x_20); +lean_dec(x_20); +if (x_21 == 0) +{ +lean_dec(x_5); +lean_dec(x_4); +return x_6; +} +else +{ +lean_object* x_22; +x_22 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); +lean_dec(x_4); +return x_22; +} } } } @@ -2159,7 +2253,7 @@ x_14 = lean_ctor_get(x_13, 3); lean_inc(x_14); if (lean_obj_tag(x_14) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_34; lean_object* x_35; +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_74; lean_object* x_75; x_15 = lean_ctor_get(x_13, 0); lean_inc(x_15); x_16 = lean_array_get_size(x_15); @@ -2167,62 +2261,62 @@ lean_dec(x_15); x_17 = lean_ctor_get(x_13, 1); lean_inc(x_17); lean_inc(x_1); -x_34 = l_Lean_Parser_tokenFn(x_1, x_13); -x_35 = lean_ctor_get(x_34, 3); -lean_inc(x_35); -if (lean_obj_tag(x_35) == 0) +x_74 = l_Lean_Parser_tokenFn(x_1, x_13); +x_75 = lean_ctor_get(x_74, 3); +lean_inc(x_75); +if (lean_obj_tag(x_75) == 0) { -lean_object* x_36; lean_object* x_37; -x_36 = lean_ctor_get(x_34, 0); -lean_inc(x_36); -x_37 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_36); -lean_dec(x_36); -if (lean_obj_tag(x_37) == 2) +lean_object* x_76; lean_object* x_77; +x_76 = lean_ctor_get(x_74, 0); +lean_inc(x_76); +x_77 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_76); +lean_dec(x_76); +if (lean_obj_tag(x_77) == 2) { -lean_object* x_38; lean_object* x_39; uint8_t x_40; -x_38 = lean_ctor_get(x_37, 1); -lean_inc(x_38); -lean_dec(x_37); -x_39 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__2; -x_40 = lean_string_dec_eq(x_38, x_39); -lean_dec(x_38); -if (x_40 == 0) +lean_object* x_78; lean_object* x_79; uint8_t x_80; +x_78 = lean_ctor_get(x_77, 1); +lean_inc(x_78); +lean_dec(x_77); +x_79 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__2; +x_80 = lean_string_dec_eq(x_78, x_79); +lean_dec(x_78); +if (x_80 == 0) { -lean_object* x_41; lean_object* x_42; -x_41 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; +lean_object* x_81; lean_object* x_82; +x_81 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; lean_inc(x_17); -x_42 = l_Lean_Parser_ParserState_mkErrorsAt(x_34, x_41, x_17); -x_18 = x_42; -goto block_33; +x_82 = l_Lean_Parser_ParserState_mkErrorsAt(x_74, x_81, x_17); +x_18 = x_82; +goto block_73; } else { -x_18 = x_34; -goto block_33; +x_18 = x_74; +goto block_73; } } else { -lean_object* x_43; lean_object* x_44; -lean_dec(x_37); -x_43 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; +lean_object* x_83; lean_object* x_84; +lean_dec(x_77); +x_83 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; lean_inc(x_17); -x_44 = l_Lean_Parser_ParserState_mkErrorsAt(x_34, x_43, x_17); -x_18 = x_44; -goto block_33; +x_84 = l_Lean_Parser_ParserState_mkErrorsAt(x_74, x_83, x_17); +x_18 = x_84; +goto block_73; } } else { -lean_object* x_45; lean_object* x_46; -lean_dec(x_35); -x_45 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; +lean_object* x_85; lean_object* x_86; +lean_dec(x_75); +x_85 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; lean_inc(x_17); -x_46 = l_Lean_Parser_ParserState_mkErrorsAt(x_34, x_45, x_17); -x_18 = x_46; -goto block_33; +x_86 = l_Lean_Parser_ParserState_mkErrorsAt(x_74, x_85, x_17); +x_18 = x_86; +goto block_73; } -block_33: +block_73: { lean_object* x_19; x_19 = lean_ctor_get(x_18, 3); @@ -2241,31 +2335,143 @@ return x_24; } else { -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -lean_dec(x_19); -x_25 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); -lean_dec(x_16); -x_26 = lean_ctor_get(x_25, 0); -lean_inc(x_26); -x_27 = lean_array_get_size(x_26); +uint8_t x_25; +x_25 = !lean_is_exclusive(x_19); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_26 = lean_ctor_get(x_19, 0); lean_dec(x_26); -x_28 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(x_1, x_25); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_27); -x_31 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_10); -return x_32; +lean_inc(x_17); +x_27 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); +lean_dec(x_16); +x_28 = !lean_is_exclusive(x_1); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_29 = lean_ctor_get(x_1, 0); +x_30 = lean_ctor_get(x_1, 4); +lean_dec(x_30); +x_31 = lean_ctor_get(x_29, 2); +lean_inc(x_31); +x_32 = l_Lean_FileMap_toPosition(x_31, x_17); +lean_dec(x_31); +lean_ctor_set(x_19, 0, x_32); +lean_ctor_set(x_1, 4, x_19); +x_33 = lean_ctor_get(x_27, 0); +lean_inc(x_33); +x_34 = lean_array_get_size(x_33); +lean_dec(x_33); +x_35 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(x_1, x_27); +x_36 = l_Lean_nullKind; +x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_34); +x_38 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_10); +return x_39; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_40 = lean_ctor_get(x_1, 0); +x_41 = lean_ctor_get(x_1, 1); +x_42 = lean_ctor_get(x_1, 2); +x_43 = lean_ctor_get(x_1, 3); +x_44 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_43); +lean_inc(x_42); +lean_inc(x_41); +lean_inc(x_40); +lean_dec(x_1); +x_45 = lean_ctor_get(x_40, 2); +lean_inc(x_45); +x_46 = l_Lean_FileMap_toPosition(x_45, x_17); +lean_dec(x_45); +lean_ctor_set(x_19, 0, x_46); +x_47 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_47, 0, x_40); +lean_ctor_set(x_47, 1, x_41); +lean_ctor_set(x_47, 2, x_42); +lean_ctor_set(x_47, 3, x_43); +lean_ctor_set(x_47, 4, x_19); +lean_ctor_set_uint8(x_47, sizeof(void*)*5, x_44); +x_48 = lean_ctor_get(x_27, 0); +lean_inc(x_48); +x_49 = lean_array_get_size(x_48); +lean_dec(x_48); +x_50 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(x_47, x_27); +x_51 = l_Lean_nullKind; +x_52 = l_Lean_Parser_ParserState_mkNode(x_50, x_51, x_49); +x_53 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_54 = l_Lean_Parser_ParserState_mkNode(x_52, x_53, x_10); +return x_54; +} +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +lean_dec(x_19); +lean_inc(x_17); +x_55 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); +lean_dec(x_16); +x_56 = lean_ctor_get(x_1, 0); +lean_inc(x_56); +x_57 = lean_ctor_get(x_1, 1); +lean_inc(x_57); +x_58 = lean_ctor_get(x_1, 2); +lean_inc(x_58); +x_59 = lean_ctor_get(x_1, 3); +lean_inc(x_59); +x_60 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +if (lean_is_exclusive(x_1)) { + lean_ctor_release(x_1, 0); + lean_ctor_release(x_1, 1); + lean_ctor_release(x_1, 2); + lean_ctor_release(x_1, 3); + lean_ctor_release(x_1, 4); + x_61 = x_1; +} else { + lean_dec_ref(x_1); + x_61 = lean_box(0); +} +x_62 = lean_ctor_get(x_56, 2); +lean_inc(x_62); +x_63 = l_Lean_FileMap_toPosition(x_62, x_17); +lean_dec(x_62); +x_64 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_64, 0, x_63); +if (lean_is_scalar(x_61)) { + x_65 = lean_alloc_ctor(0, 5, 1); +} else { + x_65 = x_61; +} +lean_ctor_set(x_65, 0, x_56); +lean_ctor_set(x_65, 1, x_57); +lean_ctor_set(x_65, 2, x_58); +lean_ctor_set(x_65, 3, x_59); +lean_ctor_set(x_65, 4, x_64); +lean_ctor_set_uint8(x_65, sizeof(void*)*5, x_60); +x_66 = lean_ctor_get(x_55, 0); +lean_inc(x_66); +x_67 = lean_array_get_size(x_66); +lean_dec(x_66); +x_68 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(x_65, x_55); +x_69 = l_Lean_nullKind; +x_70 = l_Lean_Parser_ParserState_mkNode(x_68, x_69, x_67); +x_71 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_72 = l_Lean_Parser_ParserState_mkNode(x_70, x_71, x_10); +return x_72; +} } } } else { -lean_object* x_47; lean_object* x_48; +lean_object* x_87; lean_object* x_88; lean_dec(x_14); lean_dec(x_1); -x_47 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; -x_48 = l_Lean_Parser_ParserState_mkNode(x_13, x_47, x_10); -return x_48; +x_87 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_88 = l_Lean_Parser_ParserState_mkNode(x_13, x_87, x_10); +return x_88; } } else @@ -2277,194 +2483,312 @@ return x_7; } else { -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_49 = lean_ctor_get(x_2, 0); -lean_inc(x_49); -x_50 = lean_array_get_size(x_49); -lean_dec(x_49); -x_51 = lean_ctor_get(x_2, 1); -lean_inc(x_51); -lean_inc(x_1); -x_52 = lean_apply_2(x_4, x_1, x_2); -x_53 = lean_ctor_get(x_52, 3); -lean_inc(x_53); -if (lean_obj_tag(x_53) == 0) -{ -lean_dec(x_51); -lean_dec(x_50); -lean_dec(x_1); -return x_52; -} -else -{ -lean_object* x_54; lean_object* x_55; uint8_t x_56; -x_54 = lean_ctor_get(x_53, 0); -lean_inc(x_54); -lean_dec(x_53); -x_55 = lean_ctor_get(x_52, 1); -lean_inc(x_55); -x_56 = lean_nat_dec_eq(x_55, x_51); -lean_dec(x_55); -if (x_56 == 0) -{ -lean_dec(x_54); -lean_dec(x_51); -lean_dec(x_50); -lean_dec(x_1); -return x_52; -} -else -{ -lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -lean_inc(x_51); -x_57 = l_Lean_Parser_ParserState_restore(x_52, x_50, x_51); -lean_dec(x_50); -x_58 = lean_unsigned_to_nat(1024u); -x_59 = l_Lean_Parser_checkPrecFn(x_58, x_1, x_57); -x_60 = lean_ctor_get(x_59, 3); -lean_inc(x_60); -if (lean_obj_tag(x_60) == 0) -{ -lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; -x_61 = lean_ctor_get(x_59, 0); -lean_inc(x_61); -x_62 = lean_array_get_size(x_61); -lean_dec(x_61); -x_63 = l_Lean_Parser_Tactic_intro___elambda__1___closed__6; -x_64 = l_Lean_Parser_Tactic_intro___elambda__1___closed__8; -lean_inc(x_1); -x_65 = l_Lean_Parser_nonReservedSymbolFnAux(x_63, x_64, x_1, x_59); -x_66 = lean_ctor_get(x_65, 3); -lean_inc(x_66); -if (lean_obj_tag(x_66) == 0) -{ -lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_90; lean_object* x_91; -x_67 = lean_ctor_get(x_65, 0); -lean_inc(x_67); -x_68 = lean_array_get_size(x_67); -lean_dec(x_67); -x_69 = lean_ctor_get(x_65, 1); -lean_inc(x_69); -lean_inc(x_1); -x_90 = l_Lean_Parser_tokenFn(x_1, x_65); -x_91 = lean_ctor_get(x_90, 3); +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; +x_89 = lean_ctor_get(x_2, 0); +lean_inc(x_89); +x_90 = lean_array_get_size(x_89); +lean_dec(x_89); +x_91 = lean_ctor_get(x_2, 1); lean_inc(x_91); -if (lean_obj_tag(x_91) == 0) +lean_inc(x_1); +x_92 = lean_apply_2(x_4, x_1, x_2); +x_93 = lean_ctor_get(x_92, 3); +lean_inc(x_93); +if (lean_obj_tag(x_93) == 0) { -lean_object* x_92; lean_object* x_93; -x_92 = lean_ctor_get(x_90, 0); -lean_inc(x_92); -x_93 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_92); -lean_dec(x_92); -if (lean_obj_tag(x_93) == 2) +lean_dec(x_91); +lean_dec(x_90); +lean_dec(x_1); +return x_92; +} +else { lean_object* x_94; lean_object* x_95; uint8_t x_96; -x_94 = lean_ctor_get(x_93, 1); +x_94 = lean_ctor_get(x_93, 0); lean_inc(x_94); lean_dec(x_93); -x_95 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__2; -x_96 = lean_string_dec_eq(x_94, x_95); -lean_dec(x_94); +x_95 = lean_ctor_get(x_92, 1); +lean_inc(x_95); +x_96 = lean_nat_dec_eq(x_95, x_91); +lean_dec(x_95); if (x_96 == 0) { -lean_object* x_97; lean_object* x_98; -x_97 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; -lean_inc(x_69); -x_98 = l_Lean_Parser_ParserState_mkErrorsAt(x_90, x_97, x_69); -x_70 = x_98; -goto block_89; -} -else -{ -x_70 = x_90; -goto block_89; -} -} -else -{ -lean_object* x_99; lean_object* x_100; -lean_dec(x_93); -x_99 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; -lean_inc(x_69); -x_100 = l_Lean_Parser_ParserState_mkErrorsAt(x_90, x_99, x_69); -x_70 = x_100; -goto block_89; -} -} -else -{ -lean_object* x_101; lean_object* x_102; +lean_dec(x_94); lean_dec(x_91); -x_101 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; -lean_inc(x_69); -x_102 = l_Lean_Parser_ParserState_mkErrorsAt(x_90, x_101, x_69); -x_70 = x_102; -goto block_89; -} -block_89: -{ -lean_object* x_71; -x_71 = lean_ctor_get(x_70, 3); -lean_inc(x_71); -if (lean_obj_tag(x_71) == 0) -{ -lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; uint8_t x_77; lean_object* x_78; +lean_dec(x_90); lean_dec(x_1); -x_72 = l_Lean_Parser_ParserState_restore(x_70, x_68, x_69); -lean_dec(x_68); -x_73 = l_Lean_Parser_notFollowedByFn___closed__1; -x_74 = l_Lean_Parser_ParserState_mkError(x_72, x_73); -x_75 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; -x_76 = l_Lean_Parser_ParserState_mkNode(x_74, x_75, x_62); -x_77 = 1; -x_78 = l_Lean_Parser_mergeOrElseErrors(x_76, x_54, x_51, x_77); -lean_dec(x_51); -return x_78; +return x_92; } else { -lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; uint8_t x_87; lean_object* x_88; -lean_dec(x_71); -x_79 = l_Lean_Parser_ParserState_restore(x_70, x_68, x_69); -lean_dec(x_68); -x_80 = lean_ctor_get(x_79, 0); -lean_inc(x_80); -x_81 = lean_array_get_size(x_80); -lean_dec(x_80); -x_82 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(x_1, x_79); -x_83 = l_Lean_nullKind; -x_84 = l_Lean_Parser_ParserState_mkNode(x_82, x_83, x_81); -x_85 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; -x_86 = l_Lean_Parser_ParserState_mkNode(x_84, x_85, x_62); -x_87 = 1; -x_88 = l_Lean_Parser_mergeOrElseErrors(x_86, x_54, x_51, x_87); -lean_dec(x_51); -return x_88; +lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; +lean_inc(x_91); +x_97 = l_Lean_Parser_ParserState_restore(x_92, x_90, x_91); +lean_dec(x_90); +x_98 = lean_unsigned_to_nat(1024u); +x_99 = l_Lean_Parser_checkPrecFn(x_98, x_1, x_97); +x_100 = lean_ctor_get(x_99, 3); +lean_inc(x_100); +if (lean_obj_tag(x_100) == 0) +{ +lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; +x_101 = lean_ctor_get(x_99, 0); +lean_inc(x_101); +x_102 = lean_array_get_size(x_101); +lean_dec(x_101); +x_103 = l_Lean_Parser_Tactic_intro___elambda__1___closed__6; +x_104 = l_Lean_Parser_Tactic_intro___elambda__1___closed__8; +lean_inc(x_1); +x_105 = l_Lean_Parser_nonReservedSymbolFnAux(x_103, x_104, x_1, x_99); +x_106 = lean_ctor_get(x_105, 3); +lean_inc(x_106); +if (lean_obj_tag(x_106) == 0) +{ +lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_174; lean_object* x_175; +x_107 = lean_ctor_get(x_105, 0); +lean_inc(x_107); +x_108 = lean_array_get_size(x_107); +lean_dec(x_107); +x_109 = lean_ctor_get(x_105, 1); +lean_inc(x_109); +lean_inc(x_1); +x_174 = l_Lean_Parser_tokenFn(x_1, x_105); +x_175 = lean_ctor_get(x_174, 3); +lean_inc(x_175); +if (lean_obj_tag(x_175) == 0) +{ +lean_object* x_176; lean_object* x_177; +x_176 = lean_ctor_get(x_174, 0); +lean_inc(x_176); +x_177 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_176); +lean_dec(x_176); +if (lean_obj_tag(x_177) == 2) +{ +lean_object* x_178; lean_object* x_179; uint8_t x_180; +x_178 = lean_ctor_get(x_177, 1); +lean_inc(x_178); +lean_dec(x_177); +x_179 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__2; +x_180 = lean_string_dec_eq(x_178, x_179); +lean_dec(x_178); +if (x_180 == 0) +{ +lean_object* x_181; lean_object* x_182; +x_181 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; +lean_inc(x_109); +x_182 = l_Lean_Parser_ParserState_mkErrorsAt(x_174, x_181, x_109); +x_110 = x_182; +goto block_173; +} +else +{ +x_110 = x_174; +goto block_173; +} +} +else +{ +lean_object* x_183; lean_object* x_184; +lean_dec(x_177); +x_183 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; +lean_inc(x_109); +x_184 = l_Lean_Parser_ParserState_mkErrorsAt(x_174, x_183, x_109); +x_110 = x_184; +goto block_173; +} +} +else +{ +lean_object* x_185; lean_object* x_186; +lean_dec(x_175); +x_185 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__5; +lean_inc(x_109); +x_186 = l_Lean_Parser_ParserState_mkErrorsAt(x_174, x_185, x_109); +x_110 = x_186; +goto block_173; +} +block_173: +{ +lean_object* x_111; +x_111 = lean_ctor_get(x_110, 3); +lean_inc(x_111); +if (lean_obj_tag(x_111) == 0) +{ +lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; uint8_t x_117; lean_object* x_118; +lean_dec(x_1); +x_112 = l_Lean_Parser_ParserState_restore(x_110, x_108, x_109); +lean_dec(x_108); +x_113 = l_Lean_Parser_notFollowedByFn___closed__1; +x_114 = l_Lean_Parser_ParserState_mkError(x_112, x_113); +x_115 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_116 = l_Lean_Parser_ParserState_mkNode(x_114, x_115, x_102); +x_117 = 1; +x_118 = l_Lean_Parser_mergeOrElseErrors(x_116, x_94, x_91, x_117); +lean_dec(x_91); +return x_118; +} +else +{ +uint8_t x_119; +x_119 = !lean_is_exclusive(x_111); +if (x_119 == 0) +{ +lean_object* x_120; lean_object* x_121; uint8_t x_122; +x_120 = lean_ctor_get(x_111, 0); +lean_dec(x_120); +lean_inc(x_109); +x_121 = l_Lean_Parser_ParserState_restore(x_110, x_108, x_109); +lean_dec(x_108); +x_122 = !lean_is_exclusive(x_1); +if (x_122 == 0) +{ +lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; uint8_t x_134; lean_object* x_135; +x_123 = lean_ctor_get(x_1, 0); +x_124 = lean_ctor_get(x_1, 4); +lean_dec(x_124); +x_125 = lean_ctor_get(x_123, 2); +lean_inc(x_125); +x_126 = l_Lean_FileMap_toPosition(x_125, x_109); +lean_dec(x_125); +lean_ctor_set(x_111, 0, x_126); +lean_ctor_set(x_1, 4, x_111); +x_127 = lean_ctor_get(x_121, 0); +lean_inc(x_127); +x_128 = lean_array_get_size(x_127); +lean_dec(x_127); +x_129 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(x_1, x_121); +x_130 = l_Lean_nullKind; +x_131 = l_Lean_Parser_ParserState_mkNode(x_129, x_130, x_128); +x_132 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_133 = l_Lean_Parser_ParserState_mkNode(x_131, x_132, x_102); +x_134 = 1; +x_135 = l_Lean_Parser_mergeOrElseErrors(x_133, x_94, x_91, x_134); +lean_dec(x_91); +return x_135; +} +else +{ +lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; uint8_t x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; uint8_t x_151; lean_object* x_152; +x_136 = lean_ctor_get(x_1, 0); +x_137 = lean_ctor_get(x_1, 1); +x_138 = lean_ctor_get(x_1, 2); +x_139 = lean_ctor_get(x_1, 3); +x_140 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_139); +lean_inc(x_138); +lean_inc(x_137); +lean_inc(x_136); +lean_dec(x_1); +x_141 = lean_ctor_get(x_136, 2); +lean_inc(x_141); +x_142 = l_Lean_FileMap_toPosition(x_141, x_109); +lean_dec(x_141); +lean_ctor_set(x_111, 0, x_142); +x_143 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_143, 0, x_136); +lean_ctor_set(x_143, 1, x_137); +lean_ctor_set(x_143, 2, x_138); +lean_ctor_set(x_143, 3, x_139); +lean_ctor_set(x_143, 4, x_111); +lean_ctor_set_uint8(x_143, sizeof(void*)*5, x_140); +x_144 = lean_ctor_get(x_121, 0); +lean_inc(x_144); +x_145 = lean_array_get_size(x_144); +lean_dec(x_144); +x_146 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(x_143, x_121); +x_147 = l_Lean_nullKind; +x_148 = l_Lean_Parser_ParserState_mkNode(x_146, x_147, x_145); +x_149 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_150 = l_Lean_Parser_ParserState_mkNode(x_148, x_149, x_102); +x_151 = 1; +x_152 = l_Lean_Parser_mergeOrElseErrors(x_150, x_94, x_91, x_151); +lean_dec(x_91); +return x_152; +} +} +else +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; uint8_t x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; uint8_t x_171; lean_object* x_172; +lean_dec(x_111); +lean_inc(x_109); +x_153 = l_Lean_Parser_ParserState_restore(x_110, x_108, x_109); +lean_dec(x_108); +x_154 = lean_ctor_get(x_1, 0); +lean_inc(x_154); +x_155 = lean_ctor_get(x_1, 1); +lean_inc(x_155); +x_156 = lean_ctor_get(x_1, 2); +lean_inc(x_156); +x_157 = lean_ctor_get(x_1, 3); +lean_inc(x_157); +x_158 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +if (lean_is_exclusive(x_1)) { + lean_ctor_release(x_1, 0); + lean_ctor_release(x_1, 1); + lean_ctor_release(x_1, 2); + lean_ctor_release(x_1, 3); + lean_ctor_release(x_1, 4); + x_159 = x_1; +} else { + lean_dec_ref(x_1); + x_159 = lean_box(0); +} +x_160 = lean_ctor_get(x_154, 2); +lean_inc(x_160); +x_161 = l_Lean_FileMap_toPosition(x_160, x_109); +lean_dec(x_160); +x_162 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_162, 0, x_161); +if (lean_is_scalar(x_159)) { + x_163 = lean_alloc_ctor(0, 5, 1); +} else { + x_163 = x_159; +} +lean_ctor_set(x_163, 0, x_154); +lean_ctor_set(x_163, 1, x_155); +lean_ctor_set(x_163, 2, x_156); +lean_ctor_set(x_163, 3, x_157); +lean_ctor_set(x_163, 4, x_162); +lean_ctor_set_uint8(x_163, sizeof(void*)*5, x_158); +x_164 = lean_ctor_get(x_153, 0); +lean_inc(x_164); +x_165 = lean_array_get_size(x_164); +lean_dec(x_164); +x_166 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intro___elambda__1___spec__1(x_163, x_153); +x_167 = l_Lean_nullKind; +x_168 = l_Lean_Parser_ParserState_mkNode(x_166, x_167, x_165); +x_169 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_170 = l_Lean_Parser_ParserState_mkNode(x_168, x_169, x_102); +x_171 = 1; +x_172 = l_Lean_Parser_mergeOrElseErrors(x_170, x_94, x_91, x_171); +lean_dec(x_91); +return x_172; +} } } } else { -lean_object* x_103; lean_object* x_104; uint8_t x_105; lean_object* x_106; -lean_dec(x_66); +lean_object* x_187; lean_object* x_188; uint8_t x_189; lean_object* x_190; +lean_dec(x_106); lean_dec(x_1); -x_103 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; -x_104 = l_Lean_Parser_ParserState_mkNode(x_65, x_103, x_62); -x_105 = 1; -x_106 = l_Lean_Parser_mergeOrElseErrors(x_104, x_54, x_51, x_105); -lean_dec(x_51); -return x_106; +x_187 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_188 = l_Lean_Parser_ParserState_mkNode(x_105, x_187, x_102); +x_189 = 1; +x_190 = l_Lean_Parser_mergeOrElseErrors(x_188, x_94, x_91, x_189); +lean_dec(x_91); +return x_190; } } else { -uint8_t x_107; lean_object* x_108; -lean_dec(x_60); +uint8_t x_191; lean_object* x_192; +lean_dec(x_100); lean_dec(x_1); -x_107 = 1; -x_108 = l_Lean_Parser_mergeOrElseErrors(x_59, x_54, x_51, x_107); -lean_dec(x_51); -return x_108; +x_191 = 1; +x_192 = l_Lean_Parser_mergeOrElseErrors(x_99, x_94, x_91, x_191); +lean_dec(x_91); +return x_192; } } } @@ -2484,29 +2808,29 @@ return x_3; lean_object* _init_l_Lean_Parser_Tactic_intro___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Term_explicit___closed__2; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_noFirstTokenInfo(x_2); -return x_3; +x_3 = l_Lean_Parser_Parser_inhabited___closed__1; +x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); +return x_4; } } lean_object* _init_l_Lean_Parser_Tactic_intro___closed__3() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Parser_inhabited___closed__1; -x_2 = l_Lean_Parser_Tactic_intro___closed__2; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); -return x_3; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Tactic_intro___closed__2; +x_2 = l_Lean_Parser_noFirstTokenInfo(x_1); +return x_2; } } lean_object* _init_l_Lean_Parser_Tactic_intro___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___closed__1; +x_1 = l_Lean_Parser_Parser_inhabited___closed__1; x_2 = l_Lean_Parser_Tactic_intro___closed__3; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -2516,9 +2840,9 @@ lean_object* _init_l_Lean_Parser_Tactic_intro___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_intro___closed__1; x_2 = l_Lean_Parser_Tactic_intro___closed__4; -x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } } @@ -2526,25 +2850,35 @@ lean_object* _init_l_Lean_Parser_Tactic_intro___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_epsilonInfo; +x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_intro___closed__5; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); return x_3; } } lean_object* _init_l_Lean_Parser_Tactic_intro___closed__7() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_epsilonInfo; +x_2 = l_Lean_Parser_Tactic_intro___closed__6; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_intro___closed__8() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Tactic_intro___closed__6; +x_3 = l_Lean_Parser_Tactic_intro___closed__7; x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); return x_4; } } -lean_object* _init_l_Lean_Parser_Tactic_intro___closed__8() { +lean_object* _init_l_Lean_Parser_Tactic_intro___closed__9() { _start: { lean_object* x_1; @@ -2552,12 +2886,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_intro___elambda__1), 2, 0) return x_1; } } -lean_object* _init_l_Lean_Parser_Tactic_intro___closed__9() { +lean_object* _init_l_Lean_Parser_Tactic_intro___closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___closed__7; -x_2 = l_Lean_Parser_Tactic_intro___closed__8; +x_1 = l_Lean_Parser_Tactic_intro___closed__8; +x_2 = l_Lean_Parser_Tactic_intro___closed__9; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -2568,7 +2902,7 @@ lean_object* _init_l_Lean_Parser_Tactic_intro() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Tactic_intro___closed__9; +x_1 = l_Lean_Parser_Tactic_intro___closed__10; return x_1; } } @@ -2585,6 +2919,18 @@ x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); return x_7; } } +lean_object* l_Lean_Parser_manyIndent_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = l_Lean_Parser_many1Indent_formatter___closed__1; +x_8 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); +lean_closure_set(x_8, 0, x_7); +lean_closure_set(x_8, 1, x_1); +x_9 = l_Lean_PrettyPrinter_Formatter_many_formatter(x_8, x_2, x_3, x_4, x_5, x_6); +return x_9; +} +} lean_object* _init_l_Lean_Parser_Tactic_intro_formatter___closed__1() { _start: { @@ -2625,7 +2971,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_many_formatter), 6, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_manyIndent_formatter), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -2697,6 +3043,18 @@ x_5 = l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(x_2, x_3, x_4, x_1); return x_5; } } +lean_object* l_Lean_Parser_manyIndent_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = l_Lean_Parser_many1Indent_parenthesizer___closed__1; +x_8 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); +lean_closure_set(x_8, 0, x_7); +lean_closure_set(x_8, 1, x_1); +x_9 = l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer(x_8, x_2, x_3, x_4, x_5, x_6); +return x_9; +} +} lean_object* _init_l_Lean_Parser_Tactic_intro_parenthesizer___closed__1() { _start: { @@ -2725,7 +3083,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Term_explicit_parenthesizer___closed__2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer), 6, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_manyIndent_parenthesizer), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -2800,50 +3158,126 @@ return x_5; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_22; x_3 = lean_ctor_get(x_2, 0); lean_inc(x_3); x_4 = lean_array_get_size(x_3); lean_dec(x_3); x_5 = lean_ctor_get(x_2, 1); lean_inc(x_5); -lean_inc(x_1); -x_6 = l_Lean_Parser_Tactic_ident_x27___elambda__1(x_1, x_2); +x_22 = lean_ctor_get(x_1, 4); +lean_inc(x_22); +if (lean_obj_tag(x_22) == 0) +{ +x_6 = x_2; +goto block_21; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +lean_dec(x_22); +x_24 = lean_ctor_get(x_1, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_24, 2); +lean_inc(x_25); +lean_dec(x_24); +lean_inc(x_5); +x_26 = l_Lean_FileMap_toPosition(x_25, x_5); +lean_dec(x_25); +x_27 = lean_ctor_get(x_23, 1); +lean_inc(x_27); +lean_dec(x_23); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = lean_nat_dec_le(x_27, x_28); +lean_dec(x_28); +lean_dec(x_27); +if (x_29 == 0) +{ +lean_object* x_30; lean_object* x_31; +x_30 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_31 = l_Lean_Parser_ParserState_mkError(x_2, x_30); +x_6 = x_31; +goto block_21; +} +else +{ +x_6 = x_2; +goto block_21; +} +} +block_21: +{ +lean_object* x_7; x_7 = lean_ctor_get(x_6, 3); lean_inc(x_7); if (lean_obj_tag(x_7) == 0) { -lean_object* x_8; uint8_t x_9; -lean_dec(x_4); -x_8 = lean_ctor_get(x_6, 1); -lean_inc(x_8); -x_9 = lean_nat_dec_eq(x_5, x_8); -lean_dec(x_8); -lean_dec(x_5); -if (x_9 == 0) +lean_object* x_8; lean_object* x_9; +lean_inc(x_1); +x_8 = l_Lean_Parser_Tactic_ident_x27___elambda__1(x_1, x_6); +x_9 = lean_ctor_get(x_8, 3); +lean_inc(x_9); +if (lean_obj_tag(x_9) == 0) { -x_2 = x_6; +lean_object* x_10; uint8_t x_11; +lean_dec(x_4); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +x_11 = lean_nat_dec_eq(x_5, x_10); +lean_dec(x_10); +lean_dec(x_5); +if (x_11 == 0) +{ +x_2 = x_8; goto _start; } else { -lean_object* x_11; lean_object* x_12; +lean_object* x_13; lean_object* x_14; lean_dec(x_1); -x_11 = l_Lean_Parser_manyAux___main___closed__1; -x_12 = l_Lean_Parser_ParserState_mkUnexpectedError(x_6, x_11); -return x_12; +x_13 = l_Lean_Parser_manyAux___main___closed__1; +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); +return x_14; } } else { -lean_object* x_13; uint8_t x_14; +lean_object* x_15; uint8_t x_16; +lean_dec(x_9); +lean_dec(x_1); +x_15 = lean_ctor_get(x_8, 1); +lean_inc(x_15); +x_16 = lean_nat_dec_eq(x_5, x_15); +lean_dec(x_15); +if (x_16 == 0) +{ +lean_dec(x_5); +lean_dec(x_4); +return x_8; +} +else +{ +lean_object* x_17; +x_17 = l_Lean_Parser_ParserState_restore(x_8, x_4, x_5); +lean_dec(x_4); +return x_17; +} +} +} +else +{ +lean_object* x_18; uint8_t x_19; lean_dec(x_7); lean_dec(x_1); -x_13 = lean_ctor_get(x_6, 1); -lean_inc(x_13); -x_14 = lean_nat_dec_eq(x_5, x_13); -lean_dec(x_13); -if (x_14 == 0) +x_18 = lean_ctor_get(x_6, 1); +lean_inc(x_18); +x_19 = lean_nat_dec_eq(x_5, x_18); +lean_dec(x_18); +if (x_19 == 0) { lean_dec(x_5); lean_dec(x_4); @@ -2851,10 +3285,11 @@ return x_6; } else { -lean_object* x_15; -x_15 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); +lean_object* x_20; +x_20 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); lean_dec(x_4); -return x_15; +return x_20; +} } } } @@ -2968,26 +3403,82 @@ x_14 = lean_ctor_get(x_13, 3); lean_inc(x_14); if (lean_obj_tag(x_14) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_15 = lean_ctor_get(x_13, 0); -lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -x_17 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(x_1, x_13); -x_18 = l_Lean_nullKind; -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_16); -x_20 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_10); -return x_21; +uint8_t x_15; +x_15 = !lean_is_exclusive(x_1); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_16 = lean_ctor_get(x_1, 0); +x_17 = lean_ctor_get(x_1, 4); +lean_dec(x_17); +x_18 = lean_ctor_get(x_16, 2); +lean_inc(x_18); +x_19 = lean_ctor_get(x_13, 1); +lean_inc(x_19); +x_20 = l_Lean_FileMap_toPosition(x_18, x_19); +lean_dec(x_18); +x_21 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_1, 4, x_21); +x_22 = lean_ctor_get(x_13, 0); +lean_inc(x_22); +x_23 = lean_array_get_size(x_22); +lean_dec(x_22); +x_24 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(x_1, x_13); +x_25 = l_Lean_nullKind; +x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_23); +x_27 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_10); +return x_28; } else { -lean_object* x_22; lean_object* x_23; +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; uint8_t x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_29 = lean_ctor_get(x_1, 0); +x_30 = lean_ctor_get(x_1, 1); +x_31 = lean_ctor_get(x_1, 2); +x_32 = lean_ctor_get(x_1, 3); +x_33 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_32); +lean_inc(x_31); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_1); +x_34 = lean_ctor_get(x_29, 2); +lean_inc(x_34); +x_35 = lean_ctor_get(x_13, 1); +lean_inc(x_35); +x_36 = l_Lean_FileMap_toPosition(x_34, x_35); +lean_dec(x_34); +x_37 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_37, 0, x_36); +x_38 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_38, 0, x_29); +lean_ctor_set(x_38, 1, x_30); +lean_ctor_set(x_38, 2, x_31); +lean_ctor_set(x_38, 3, x_32); +lean_ctor_set(x_38, 4, x_37); +lean_ctor_set_uint8(x_38, sizeof(void*)*5, x_33); +x_39 = lean_ctor_get(x_13, 0); +lean_inc(x_39); +x_40 = lean_array_get_size(x_39); +lean_dec(x_39); +x_41 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(x_38, x_13); +x_42 = l_Lean_nullKind; +x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_40); +x_44 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_10); +return x_45; +} +} +else +{ +lean_object* x_46; lean_object* x_47; lean_dec(x_14); lean_dec(x_1); -x_22 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_13, x_22, x_10); -return x_23; +x_46 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_47 = l_Lean_Parser_ParserState_mkNode(x_13, x_46, x_10); +return x_47; } } else @@ -2999,104 +3490,289 @@ return x_7; } else { -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_24 = lean_ctor_get(x_2, 0); -lean_inc(x_24); -x_25 = lean_array_get_size(x_24); -lean_dec(x_24); -x_26 = lean_ctor_get(x_2, 1); -lean_inc(x_26); +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_48 = lean_ctor_get(x_2, 0); +lean_inc(x_48); +x_49 = lean_array_get_size(x_48); +lean_dec(x_48); +x_50 = lean_ctor_get(x_2, 1); +lean_inc(x_50); lean_inc(x_1); -x_27 = lean_apply_2(x_4, x_1, x_2); -x_28 = lean_ctor_get(x_27, 3); -lean_inc(x_28); -if (lean_obj_tag(x_28) == 0) +x_51 = lean_apply_2(x_4, x_1, x_2); +x_52 = lean_ctor_get(x_51, 3); +lean_inc(x_52); +if (lean_obj_tag(x_52) == 0) { -lean_dec(x_26); -lean_dec(x_25); +lean_dec(x_50); +lean_dec(x_49); lean_dec(x_1); -return x_27; +return x_51; } else { -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_28, 0); -lean_inc(x_29); -lean_dec(x_28); -x_30 = lean_ctor_get(x_27, 1); -lean_inc(x_30); -x_31 = lean_nat_dec_eq(x_30, x_26); -lean_dec(x_30); -if (x_31 == 0) +uint8_t x_53; +x_53 = !lean_is_exclusive(x_52); +if (x_53 == 0) { -lean_dec(x_29); -lean_dec(x_26); -lean_dec(x_25); +lean_object* x_54; lean_object* x_55; uint8_t x_56; +x_54 = lean_ctor_get(x_52, 0); +x_55 = lean_ctor_get(x_51, 1); +lean_inc(x_55); +x_56 = lean_nat_dec_eq(x_55, x_50); +lean_dec(x_55); +if (x_56 == 0) +{ +lean_free_object(x_52); +lean_dec(x_54); +lean_dec(x_50); +lean_dec(x_49); lean_dec(x_1); -return x_27; +return x_51; } else { -lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -lean_inc(x_26); -x_32 = l_Lean_Parser_ParserState_restore(x_27, x_25, x_26); -lean_dec(x_25); -x_33 = lean_unsigned_to_nat(1024u); -x_34 = l_Lean_Parser_checkPrecFn(x_33, x_1, x_32); -x_35 = lean_ctor_get(x_34, 3); -lean_inc(x_35); -if (lean_obj_tag(x_35) == 0) +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; +lean_inc(x_50); +x_57 = l_Lean_Parser_ParserState_restore(x_51, x_49, x_50); +lean_dec(x_49); +x_58 = lean_unsigned_to_nat(1024u); +x_59 = l_Lean_Parser_checkPrecFn(x_58, x_1, x_57); +x_60 = lean_ctor_get(x_59, 3); +lean_inc(x_60); +if (lean_obj_tag(x_60) == 0) { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_36 = lean_ctor_get(x_34, 0); -lean_inc(x_36); -x_37 = lean_array_get_size(x_36); -lean_dec(x_36); -x_38 = l_Lean_Parser_Tactic_intros___elambda__1___closed__6; -x_39 = l_Lean_Parser_Tactic_intros___elambda__1___closed__8; +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_61 = lean_ctor_get(x_59, 0); +lean_inc(x_61); +x_62 = lean_array_get_size(x_61); +lean_dec(x_61); +x_63 = l_Lean_Parser_Tactic_intros___elambda__1___closed__6; +x_64 = l_Lean_Parser_Tactic_intros___elambda__1___closed__8; lean_inc(x_1); -x_40 = l_Lean_Parser_nonReservedSymbolFnAux(x_38, x_39, x_1, x_34); -x_41 = lean_ctor_get(x_40, 3); -lean_inc(x_41); -if (lean_obj_tag(x_41) == 0) +x_65 = l_Lean_Parser_nonReservedSymbolFnAux(x_63, x_64, x_1, x_59); +x_66 = lean_ctor_get(x_65, 3); +lean_inc(x_66); +if (lean_obj_tag(x_66) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; uint8_t x_49; lean_object* x_50; -x_42 = lean_ctor_get(x_40, 0); -lean_inc(x_42); -x_43 = lean_array_get_size(x_42); -lean_dec(x_42); -x_44 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(x_1, x_40); -x_45 = l_Lean_nullKind; -x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_43); -x_47 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; -x_48 = l_Lean_Parser_ParserState_mkNode(x_46, x_47, x_37); -x_49 = 1; -x_50 = l_Lean_Parser_mergeOrElseErrors(x_48, x_29, x_26, x_49); -lean_dec(x_26); -return x_50; +uint8_t x_67; +x_67 = !lean_is_exclusive(x_1); +if (x_67 == 0) +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; uint8_t x_80; lean_object* x_81; +x_68 = lean_ctor_get(x_1, 0); +x_69 = lean_ctor_get(x_1, 4); +lean_dec(x_69); +x_70 = lean_ctor_get(x_68, 2); +lean_inc(x_70); +x_71 = lean_ctor_get(x_65, 1); +lean_inc(x_71); +x_72 = l_Lean_FileMap_toPosition(x_70, x_71); +lean_dec(x_70); +lean_ctor_set(x_52, 0, x_72); +lean_ctor_set(x_1, 4, x_52); +x_73 = lean_ctor_get(x_65, 0); +lean_inc(x_73); +x_74 = lean_array_get_size(x_73); +lean_dec(x_73); +x_75 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(x_1, x_65); +x_76 = l_Lean_nullKind; +x_77 = l_Lean_Parser_ParserState_mkNode(x_75, x_76, x_74); +x_78 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_79 = l_Lean_Parser_ParserState_mkNode(x_77, x_78, x_62); +x_80 = 1; +x_81 = l_Lean_Parser_mergeOrElseErrors(x_79, x_54, x_50, x_80); +lean_dec(x_50); +return x_81; } else { -lean_object* x_51; lean_object* x_52; uint8_t x_53; lean_object* x_54; -lean_dec(x_41); +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; uint8_t x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; uint8_t x_98; lean_object* x_99; +x_82 = lean_ctor_get(x_1, 0); +x_83 = lean_ctor_get(x_1, 1); +x_84 = lean_ctor_get(x_1, 2); +x_85 = lean_ctor_get(x_1, 3); +x_86 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_85); +lean_inc(x_84); +lean_inc(x_83); +lean_inc(x_82); lean_dec(x_1); -x_51 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; -x_52 = l_Lean_Parser_ParserState_mkNode(x_40, x_51, x_37); -x_53 = 1; -x_54 = l_Lean_Parser_mergeOrElseErrors(x_52, x_29, x_26, x_53); -lean_dec(x_26); -return x_54; +x_87 = lean_ctor_get(x_82, 2); +lean_inc(x_87); +x_88 = lean_ctor_get(x_65, 1); +lean_inc(x_88); +x_89 = l_Lean_FileMap_toPosition(x_87, x_88); +lean_dec(x_87); +lean_ctor_set(x_52, 0, x_89); +x_90 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_90, 0, x_82); +lean_ctor_set(x_90, 1, x_83); +lean_ctor_set(x_90, 2, x_84); +lean_ctor_set(x_90, 3, x_85); +lean_ctor_set(x_90, 4, x_52); +lean_ctor_set_uint8(x_90, sizeof(void*)*5, x_86); +x_91 = lean_ctor_get(x_65, 0); +lean_inc(x_91); +x_92 = lean_array_get_size(x_91); +lean_dec(x_91); +x_93 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(x_90, x_65); +x_94 = l_Lean_nullKind; +x_95 = l_Lean_Parser_ParserState_mkNode(x_93, x_94, x_92); +x_96 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_97 = l_Lean_Parser_ParserState_mkNode(x_95, x_96, x_62); +x_98 = 1; +x_99 = l_Lean_Parser_mergeOrElseErrors(x_97, x_54, x_50, x_98); +lean_dec(x_50); +return x_99; } } else { -uint8_t x_55; lean_object* x_56; -lean_dec(x_35); +lean_object* x_100; lean_object* x_101; uint8_t x_102; lean_object* x_103; +lean_dec(x_66); +lean_free_object(x_52); lean_dec(x_1); -x_55 = 1; -x_56 = l_Lean_Parser_mergeOrElseErrors(x_34, x_29, x_26, x_55); -lean_dec(x_26); -return x_56; +x_100 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_101 = l_Lean_Parser_ParserState_mkNode(x_65, x_100, x_62); +x_102 = 1; +x_103 = l_Lean_Parser_mergeOrElseErrors(x_101, x_54, x_50, x_102); +lean_dec(x_50); +return x_103; +} +} +else +{ +uint8_t x_104; lean_object* x_105; +lean_dec(x_60); +lean_free_object(x_52); +lean_dec(x_1); +x_104 = 1; +x_105 = l_Lean_Parser_mergeOrElseErrors(x_59, x_54, x_50, x_104); +lean_dec(x_50); +return x_105; +} +} +} +else +{ +lean_object* x_106; lean_object* x_107; uint8_t x_108; +x_106 = lean_ctor_get(x_52, 0); +lean_inc(x_106); +lean_dec(x_52); +x_107 = lean_ctor_get(x_51, 1); +lean_inc(x_107); +x_108 = lean_nat_dec_eq(x_107, x_50); +lean_dec(x_107); +if (x_108 == 0) +{ +lean_dec(x_106); +lean_dec(x_50); +lean_dec(x_49); +lean_dec(x_1); +return x_51; +} +else +{ +lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; +lean_inc(x_50); +x_109 = l_Lean_Parser_ParserState_restore(x_51, x_49, x_50); +lean_dec(x_49); +x_110 = lean_unsigned_to_nat(1024u); +x_111 = l_Lean_Parser_checkPrecFn(x_110, x_1, x_109); +x_112 = lean_ctor_get(x_111, 3); +lean_inc(x_112); +if (lean_obj_tag(x_112) == 0) +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_113 = lean_ctor_get(x_111, 0); +lean_inc(x_113); +x_114 = lean_array_get_size(x_113); +lean_dec(x_113); +x_115 = l_Lean_Parser_Tactic_intros___elambda__1___closed__6; +x_116 = l_Lean_Parser_Tactic_intros___elambda__1___closed__8; +lean_inc(x_1); +x_117 = l_Lean_Parser_nonReservedSymbolFnAux(x_115, x_116, x_1, x_111); +x_118 = lean_ctor_get(x_117, 3); +lean_inc(x_118); +if (lean_obj_tag(x_118) == 0) +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; uint8_t x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; uint8_t x_137; lean_object* x_138; +x_119 = lean_ctor_get(x_1, 0); +lean_inc(x_119); +x_120 = lean_ctor_get(x_1, 1); +lean_inc(x_120); +x_121 = lean_ctor_get(x_1, 2); +lean_inc(x_121); +x_122 = lean_ctor_get(x_1, 3); +lean_inc(x_122); +x_123 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +if (lean_is_exclusive(x_1)) { + lean_ctor_release(x_1, 0); + lean_ctor_release(x_1, 1); + lean_ctor_release(x_1, 2); + lean_ctor_release(x_1, 3); + lean_ctor_release(x_1, 4); + x_124 = x_1; +} else { + lean_dec_ref(x_1); + x_124 = lean_box(0); +} +x_125 = lean_ctor_get(x_119, 2); +lean_inc(x_125); +x_126 = lean_ctor_get(x_117, 1); +lean_inc(x_126); +x_127 = l_Lean_FileMap_toPosition(x_125, x_126); +lean_dec(x_125); +x_128 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_128, 0, x_127); +if (lean_is_scalar(x_124)) { + x_129 = lean_alloc_ctor(0, 5, 1); +} else { + x_129 = x_124; +} +lean_ctor_set(x_129, 0, x_119); +lean_ctor_set(x_129, 1, x_120); +lean_ctor_set(x_129, 2, x_121); +lean_ctor_set(x_129, 3, x_122); +lean_ctor_set(x_129, 4, x_128); +lean_ctor_set_uint8(x_129, sizeof(void*)*5, x_123); +x_130 = lean_ctor_get(x_117, 0); +lean_inc(x_130); +x_131 = lean_array_get_size(x_130); +lean_dec(x_130); +x_132 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(x_129, x_117); +x_133 = l_Lean_nullKind; +x_134 = l_Lean_Parser_ParserState_mkNode(x_132, x_133, x_131); +x_135 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_136 = l_Lean_Parser_ParserState_mkNode(x_134, x_135, x_114); +x_137 = 1; +x_138 = l_Lean_Parser_mergeOrElseErrors(x_136, x_106, x_50, x_137); +lean_dec(x_50); +return x_138; +} +else +{ +lean_object* x_139; lean_object* x_140; uint8_t x_141; lean_object* x_142; +lean_dec(x_118); +lean_dec(x_1); +x_139 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_140 = l_Lean_Parser_ParserState_mkNode(x_117, x_139, x_114); +x_141 = 1; +x_142 = l_Lean_Parser_mergeOrElseErrors(x_140, x_106, x_50, x_141); +lean_dec(x_50); +return x_142; +} +} +else +{ +uint8_t x_143; lean_object* x_144; +lean_dec(x_112); +lean_dec(x_1); +x_143 = 1; +x_144 = l_Lean_Parser_mergeOrElseErrors(x_111, x_106, x_50, x_143); +lean_dec(x_50); +return x_144; +} } } } @@ -3116,31 +3792,31 @@ return x_3; lean_object* _init_l_Lean_Parser_Tactic_intros___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_ident_x27; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_noFirstTokenInfo(x_2); -return x_3; +x_3 = l_Lean_Parser_Parser_inhabited___closed__1; +x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); +return x_4; } } lean_object* _init_l_Lean_Parser_Tactic_intros___closed__3() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intros___closed__1; -x_2 = l_Lean_Parser_Tactic_intros___closed__2; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); -return x_3; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Tactic_intros___closed__2; +x_2 = l_Lean_Parser_noFirstTokenInfo(x_1); +return x_2; } } lean_object* _init_l_Lean_Parser_Tactic_intros___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_intros___closed__1; x_2 = l_Lean_Parser_Tactic_intros___closed__3; -x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } } @@ -3148,25 +3824,35 @@ lean_object* _init_l_Lean_Parser_Tactic_intros___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_epsilonInfo; +x_1 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_intros___closed__4; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); return x_3; } } lean_object* _init_l_Lean_Parser_Tactic_intros___closed__6() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_epsilonInfo; +x_2 = l_Lean_Parser_Tactic_intros___closed__5; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_intros___closed__7() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_intros___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Tactic_intros___closed__5; +x_3 = l_Lean_Parser_Tactic_intros___closed__6; x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); return x_4; } } -lean_object* _init_l_Lean_Parser_Tactic_intros___closed__7() { +lean_object* _init_l_Lean_Parser_Tactic_intros___closed__8() { _start: { lean_object* x_1; @@ -3174,12 +3860,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_intros___elambda__1), 2, 0 return x_1; } } -lean_object* _init_l_Lean_Parser_Tactic_intros___closed__8() { +lean_object* _init_l_Lean_Parser_Tactic_intros___closed__9() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intros___closed__6; -x_2 = l_Lean_Parser_Tactic_intros___closed__7; +x_1 = l_Lean_Parser_Tactic_intros___closed__7; +x_2 = l_Lean_Parser_Tactic_intros___closed__8; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -3190,7 +3876,7 @@ lean_object* _init_l_Lean_Parser_Tactic_intros() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Tactic_intros___closed__8; +x_1 = l_Lean_Parser_Tactic_intros___closed__9; return x_1; } } @@ -3263,7 +3949,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Tactic_intros_formatter___closed__3; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_many_formatter), 6, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_manyIndent_formatter), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -3367,7 +4053,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Tactic_intros_parenthesizer___closed__2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer), 6, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_manyIndent_parenthesizer), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -3430,50 +4116,126 @@ return x_5; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_22; x_3 = lean_ctor_get(x_2, 0); lean_inc(x_3); x_4 = lean_array_get_size(x_3); lean_dec(x_3); x_5 = lean_ctor_get(x_2, 1); lean_inc(x_5); -lean_inc(x_1); -x_6 = l_Lean_Parser_ident___elambda__1(x_1, x_2); +x_22 = lean_ctor_get(x_1, 4); +lean_inc(x_22); +if (lean_obj_tag(x_22) == 0) +{ +x_6 = x_2; +goto block_21; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +lean_dec(x_22); +x_24 = lean_ctor_get(x_1, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_24, 2); +lean_inc(x_25); +lean_dec(x_24); +lean_inc(x_5); +x_26 = l_Lean_FileMap_toPosition(x_25, x_5); +lean_dec(x_25); +x_27 = lean_ctor_get(x_23, 1); +lean_inc(x_27); +lean_dec(x_23); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = lean_nat_dec_le(x_27, x_28); +lean_dec(x_28); +lean_dec(x_27); +if (x_29 == 0) +{ +lean_object* x_30; lean_object* x_31; +x_30 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_31 = l_Lean_Parser_ParserState_mkError(x_2, x_30); +x_6 = x_31; +goto block_21; +} +else +{ +x_6 = x_2; +goto block_21; +} +} +block_21: +{ +lean_object* x_7; x_7 = lean_ctor_get(x_6, 3); lean_inc(x_7); if (lean_obj_tag(x_7) == 0) { -lean_object* x_8; uint8_t x_9; -lean_dec(x_4); -x_8 = lean_ctor_get(x_6, 1); -lean_inc(x_8); -x_9 = lean_nat_dec_eq(x_5, x_8); -lean_dec(x_8); -lean_dec(x_5); -if (x_9 == 0) +lean_object* x_8; lean_object* x_9; +lean_inc(x_1); +x_8 = l_Lean_Parser_ident___elambda__1(x_1, x_6); +x_9 = lean_ctor_get(x_8, 3); +lean_inc(x_9); +if (lean_obj_tag(x_9) == 0) { -x_2 = x_6; +lean_object* x_10; uint8_t x_11; +lean_dec(x_4); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +x_11 = lean_nat_dec_eq(x_5, x_10); +lean_dec(x_10); +lean_dec(x_5); +if (x_11 == 0) +{ +x_2 = x_8; goto _start; } else { -lean_object* x_11; lean_object* x_12; +lean_object* x_13; lean_object* x_14; lean_dec(x_1); -x_11 = l_Lean_Parser_manyAux___main___closed__1; -x_12 = l_Lean_Parser_ParserState_mkUnexpectedError(x_6, x_11); -return x_12; +x_13 = l_Lean_Parser_manyAux___main___closed__1; +x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_8, x_13); +return x_14; } } else { -lean_object* x_13; uint8_t x_14; +lean_object* x_15; uint8_t x_16; +lean_dec(x_9); +lean_dec(x_1); +x_15 = lean_ctor_get(x_8, 1); +lean_inc(x_15); +x_16 = lean_nat_dec_eq(x_5, x_15); +lean_dec(x_15); +if (x_16 == 0) +{ +lean_dec(x_5); +lean_dec(x_4); +return x_8; +} +else +{ +lean_object* x_17; +x_17 = l_Lean_Parser_ParserState_restore(x_8, x_4, x_5); +lean_dec(x_4); +return x_17; +} +} +} +else +{ +lean_object* x_18; uint8_t x_19; lean_dec(x_7); lean_dec(x_1); -x_13 = lean_ctor_get(x_6, 1); -lean_inc(x_13); -x_14 = lean_nat_dec_eq(x_5, x_13); -lean_dec(x_13); -if (x_14 == 0) +x_18 = lean_ctor_get(x_6, 1); +lean_inc(x_18); +x_19 = lean_nat_dec_eq(x_5, x_18); +lean_dec(x_18); +if (x_19 == 0) { lean_dec(x_5); lean_dec(x_4); @@ -3481,10 +4243,11 @@ return x_6; } else { -lean_object* x_15; -x_15 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); +lean_object* x_20; +x_20 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); lean_dec(x_4); -return x_15; +return x_20; +} } } } @@ -3598,45 +4361,164 @@ x_14 = lean_ctor_get(x_13, 3); lean_inc(x_14); if (lean_obj_tag(x_14) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_15 = lean_ctor_get(x_13, 0); -lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -lean_inc(x_1); -x_17 = l_Lean_Parser_ident___elambda__1(x_1, x_13); -x_18 = lean_ctor_get(x_17, 3); +uint8_t x_15; +x_15 = !lean_is_exclusive(x_1); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_16 = lean_ctor_get(x_1, 0); +x_17 = lean_ctor_get(x_1, 4); +lean_dec(x_17); +x_18 = lean_ctor_get(x_16, 2); lean_inc(x_18); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_19 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_17); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_16); -x_22 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_10); -return x_23; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_19 = lean_ctor_get(x_13, 1); +lean_inc(x_19); +x_20 = l_Lean_FileMap_toPosition(x_18, x_19); lean_dec(x_18); +lean_inc(x_20); +x_21 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_1, 4, x_21); +x_22 = lean_ctor_get(x_13, 0); +lean_inc(x_22); +x_23 = lean_array_get_size(x_22); +lean_dec(x_22); +x_24 = lean_ctor_get(x_20, 1); +lean_inc(x_24); +lean_dec(x_20); +x_25 = lean_nat_dec_le(x_24, x_24); +lean_dec(x_24); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_dec(x_1); -x_24 = l_Lean_nullKind; -x_25 = l_Lean_Parser_ParserState_mkNode(x_17, x_24, x_16); -x_26 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_10); -return x_27; +x_26 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_27 = l_Lean_Parser_ParserState_mkError(x_13, x_26); +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_23); +x_30 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_10); +return x_31; +} +else +{ +lean_object* x_32; lean_object* x_33; +lean_inc(x_1); +x_32 = l_Lean_Parser_ident___elambda__1(x_1, x_13); +x_33 = lean_ctor_get(x_32, 3); +lean_inc(x_33); +if (lean_obj_tag(x_33) == 0) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_34 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_32); +x_35 = l_Lean_nullKind; +x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_23); +x_37 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_10); +return x_38; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_dec(x_33); +lean_dec(x_1); +x_39 = l_Lean_nullKind; +x_40 = l_Lean_Parser_ParserState_mkNode(x_32, x_39, x_23); +x_41 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_10); +return x_42; +} } } else { -lean_object* x_28; lean_object* x_29; +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; uint8_t x_56; +x_43 = lean_ctor_get(x_1, 0); +x_44 = lean_ctor_get(x_1, 1); +x_45 = lean_ctor_get(x_1, 2); +x_46 = lean_ctor_get(x_1, 3); +x_47 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_46); +lean_inc(x_45); +lean_inc(x_44); +lean_inc(x_43); +lean_dec(x_1); +x_48 = lean_ctor_get(x_43, 2); +lean_inc(x_48); +x_49 = lean_ctor_get(x_13, 1); +lean_inc(x_49); +x_50 = l_Lean_FileMap_toPosition(x_48, x_49); +lean_dec(x_48); +lean_inc(x_50); +x_51 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_52 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_52, 0, x_43); +lean_ctor_set(x_52, 1, x_44); +lean_ctor_set(x_52, 2, x_45); +lean_ctor_set(x_52, 3, x_46); +lean_ctor_set(x_52, 4, x_51); +lean_ctor_set_uint8(x_52, sizeof(void*)*5, x_47); +x_53 = lean_ctor_get(x_13, 0); +lean_inc(x_53); +x_54 = lean_array_get_size(x_53); +lean_dec(x_53); +x_55 = lean_ctor_get(x_50, 1); +lean_inc(x_55); +lean_dec(x_50); +x_56 = lean_nat_dec_le(x_55, x_55); +lean_dec(x_55); +if (x_56 == 0) +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; +lean_dec(x_52); +x_57 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_58 = l_Lean_Parser_ParserState_mkError(x_13, x_57); +x_59 = l_Lean_nullKind; +x_60 = l_Lean_Parser_ParserState_mkNode(x_58, x_59, x_54); +x_61 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_62 = l_Lean_Parser_ParserState_mkNode(x_60, x_61, x_10); +return x_62; +} +else +{ +lean_object* x_63; lean_object* x_64; +lean_inc(x_52); +x_63 = l_Lean_Parser_ident___elambda__1(x_52, x_13); +x_64 = lean_ctor_get(x_63, 3); +lean_inc(x_64); +if (lean_obj_tag(x_64) == 0) +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_65 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_52, x_63); +x_66 = l_Lean_nullKind; +x_67 = l_Lean_Parser_ParserState_mkNode(x_65, x_66, x_54); +x_68 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_69 = l_Lean_Parser_ParserState_mkNode(x_67, x_68, x_10); +return x_69; +} +else +{ +lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; +lean_dec(x_64); +lean_dec(x_52); +x_70 = l_Lean_nullKind; +x_71 = l_Lean_Parser_ParserState_mkNode(x_63, x_70, x_54); +x_72 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_73 = l_Lean_Parser_ParserState_mkNode(x_71, x_72, x_10); +return x_73; +} +} +} +} +else +{ +lean_object* x_74; lean_object* x_75; lean_dec(x_14); lean_dec(x_1); -x_28 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; -x_29 = l_Lean_Parser_ParserState_mkNode(x_13, x_28, x_10); -return x_29; +x_74 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_75 = l_Lean_Parser_ParserState_mkNode(x_13, x_74, x_10); +return x_75; } } else @@ -3648,126 +4530,430 @@ return x_7; } else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_30 = lean_ctor_get(x_2, 0); -lean_inc(x_30); -x_31 = lean_array_get_size(x_30); -lean_dec(x_30); -x_32 = lean_ctor_get(x_2, 1); -lean_inc(x_32); +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_76 = lean_ctor_get(x_2, 0); +lean_inc(x_76); +x_77 = lean_array_get_size(x_76); +lean_dec(x_76); +x_78 = lean_ctor_get(x_2, 1); +lean_inc(x_78); lean_inc(x_1); -x_33 = lean_apply_2(x_4, x_1, x_2); -x_34 = lean_ctor_get(x_33, 3); -lean_inc(x_34); -if (lean_obj_tag(x_34) == 0) +x_79 = lean_apply_2(x_4, x_1, x_2); +x_80 = lean_ctor_get(x_79, 3); +lean_inc(x_80); +if (lean_obj_tag(x_80) == 0) { -lean_dec(x_32); -lean_dec(x_31); +lean_dec(x_78); +lean_dec(x_77); lean_dec(x_1); -return x_33; +return x_79; } else { -lean_object* x_35; lean_object* x_36; uint8_t x_37; -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -lean_dec(x_34); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -x_37 = lean_nat_dec_eq(x_36, x_32); -lean_dec(x_36); -if (x_37 == 0) +uint8_t x_81; +x_81 = !lean_is_exclusive(x_80); +if (x_81 == 0) { -lean_dec(x_35); -lean_dec(x_32); -lean_dec(x_31); +lean_object* x_82; lean_object* x_83; uint8_t x_84; +x_82 = lean_ctor_get(x_80, 0); +x_83 = lean_ctor_get(x_79, 1); +lean_inc(x_83); +x_84 = lean_nat_dec_eq(x_83, x_78); +lean_dec(x_83); +if (x_84 == 0) +{ +lean_free_object(x_80); +lean_dec(x_82); +lean_dec(x_78); +lean_dec(x_77); lean_dec(x_1); -return x_33; +return x_79; } else { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_inc(x_32); -x_38 = l_Lean_Parser_ParserState_restore(x_33, x_31, x_32); -lean_dec(x_31); -x_39 = lean_unsigned_to_nat(1024u); -x_40 = l_Lean_Parser_checkPrecFn(x_39, x_1, x_38); -x_41 = lean_ctor_get(x_40, 3); -lean_inc(x_41); -if (lean_obj_tag(x_41) == 0) +lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +lean_inc(x_78); +x_85 = l_Lean_Parser_ParserState_restore(x_79, x_77, x_78); +lean_dec(x_77); +x_86 = lean_unsigned_to_nat(1024u); +x_87 = l_Lean_Parser_checkPrecFn(x_86, x_1, x_85); +x_88 = lean_ctor_get(x_87, 3); +lean_inc(x_88); +if (lean_obj_tag(x_88) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_42 = lean_ctor_get(x_40, 0); -lean_inc(x_42); -x_43 = lean_array_get_size(x_42); -lean_dec(x_42); -x_44 = l_Lean_Parser_Tactic_revert___elambda__1___closed__6; -x_45 = l_Lean_Parser_Tactic_revert___elambda__1___closed__8; +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_89 = lean_ctor_get(x_87, 0); +lean_inc(x_89); +x_90 = lean_array_get_size(x_89); +lean_dec(x_89); +x_91 = l_Lean_Parser_Tactic_revert___elambda__1___closed__6; +x_92 = l_Lean_Parser_Tactic_revert___elambda__1___closed__8; lean_inc(x_1); -x_46 = l_Lean_Parser_nonReservedSymbolFnAux(x_44, x_45, x_1, x_40); -x_47 = lean_ctor_get(x_46, 3); -lean_inc(x_47); -if (lean_obj_tag(x_47) == 0) +x_93 = l_Lean_Parser_nonReservedSymbolFnAux(x_91, x_92, x_1, x_87); +x_94 = lean_ctor_get(x_93, 3); +lean_inc(x_94); +if (lean_obj_tag(x_94) == 0) { -lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_48 = lean_ctor_get(x_46, 0); -lean_inc(x_48); -x_49 = lean_array_get_size(x_48); -lean_dec(x_48); +uint8_t x_95; +x_95 = !lean_is_exclusive(x_1); +if (x_95 == 0) +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; +x_96 = lean_ctor_get(x_1, 0); +x_97 = lean_ctor_get(x_1, 4); +lean_dec(x_97); +x_98 = lean_ctor_get(x_96, 2); +lean_inc(x_98); +x_99 = lean_ctor_get(x_93, 1); +lean_inc(x_99); +x_100 = l_Lean_FileMap_toPosition(x_98, x_99); +lean_dec(x_98); +lean_inc(x_100); +lean_ctor_set(x_80, 0, x_100); +lean_ctor_set(x_1, 4, x_80); +x_101 = lean_ctor_get(x_93, 0); +lean_inc(x_101); +x_102 = lean_array_get_size(x_101); +lean_dec(x_101); +x_103 = lean_ctor_get(x_100, 1); +lean_inc(x_103); +lean_dec(x_100); +x_104 = lean_nat_dec_le(x_103, x_103); +lean_dec(x_103); +if (x_104 == 0) +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111; lean_object* x_112; +lean_dec(x_1); +x_105 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_106 = l_Lean_Parser_ParserState_mkError(x_93, x_105); +x_107 = l_Lean_nullKind; +x_108 = l_Lean_Parser_ParserState_mkNode(x_106, x_107, x_102); +x_109 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_110 = l_Lean_Parser_ParserState_mkNode(x_108, x_109, x_90); +x_111 = 1; +x_112 = l_Lean_Parser_mergeOrElseErrors(x_110, x_82, x_78, x_111); +lean_dec(x_78); +return x_112; +} +else +{ +lean_object* x_113; lean_object* x_114; lean_inc(x_1); -x_50 = l_Lean_Parser_ident___elambda__1(x_1, x_46); -x_51 = lean_ctor_get(x_50, 3); -lean_inc(x_51); -if (lean_obj_tag(x_51) == 0) +x_113 = l_Lean_Parser_ident___elambda__1(x_1, x_93); +x_114 = lean_ctor_get(x_113, 3); +lean_inc(x_114); +if (lean_obj_tag(x_114) == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; lean_object* x_58; -x_52 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_50); -x_53 = l_Lean_nullKind; -x_54 = l_Lean_Parser_ParserState_mkNode(x_52, x_53, x_49); -x_55 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; -x_56 = l_Lean_Parser_ParserState_mkNode(x_54, x_55, x_43); -x_57 = 1; -x_58 = l_Lean_Parser_mergeOrElseErrors(x_56, x_35, x_32, x_57); -lean_dec(x_32); -return x_58; +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; uint8_t x_120; lean_object* x_121; +x_115 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_113); +x_116 = l_Lean_nullKind; +x_117 = l_Lean_Parser_ParserState_mkNode(x_115, x_116, x_102); +x_118 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_119 = l_Lean_Parser_ParserState_mkNode(x_117, x_118, x_90); +x_120 = 1; +x_121 = l_Lean_Parser_mergeOrElseErrors(x_119, x_82, x_78, x_120); +lean_dec(x_78); +return x_121; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63; lean_object* x_64; -lean_dec(x_51); +lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; uint8_t x_126; lean_object* x_127; +lean_dec(x_114); lean_dec(x_1); -x_59 = l_Lean_nullKind; -x_60 = l_Lean_Parser_ParserState_mkNode(x_50, x_59, x_49); -x_61 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; -x_62 = l_Lean_Parser_ParserState_mkNode(x_60, x_61, x_43); -x_63 = 1; -x_64 = l_Lean_Parser_mergeOrElseErrors(x_62, x_35, x_32, x_63); -lean_dec(x_32); -return x_64; +x_122 = l_Lean_nullKind; +x_123 = l_Lean_Parser_ParserState_mkNode(x_113, x_122, x_102); +x_124 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_125 = l_Lean_Parser_ParserState_mkNode(x_123, x_124, x_90); +x_126 = 1; +x_127 = l_Lean_Parser_mergeOrElseErrors(x_125, x_82, x_78, x_126); +lean_dec(x_78); +return x_127; +} } } else { -lean_object* x_65; lean_object* x_66; uint8_t x_67; lean_object* x_68; -lean_dec(x_47); +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; uint8_t x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; uint8_t x_140; +x_128 = lean_ctor_get(x_1, 0); +x_129 = lean_ctor_get(x_1, 1); +x_130 = lean_ctor_get(x_1, 2); +x_131 = lean_ctor_get(x_1, 3); +x_132 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_131); +lean_inc(x_130); +lean_inc(x_129); +lean_inc(x_128); lean_dec(x_1); -x_65 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; -x_66 = l_Lean_Parser_ParserState_mkNode(x_46, x_65, x_43); -x_67 = 1; -x_68 = l_Lean_Parser_mergeOrElseErrors(x_66, x_35, x_32, x_67); -lean_dec(x_32); -return x_68; +x_133 = lean_ctor_get(x_128, 2); +lean_inc(x_133); +x_134 = lean_ctor_get(x_93, 1); +lean_inc(x_134); +x_135 = l_Lean_FileMap_toPosition(x_133, x_134); +lean_dec(x_133); +lean_inc(x_135); +lean_ctor_set(x_80, 0, x_135); +x_136 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_136, 0, x_128); +lean_ctor_set(x_136, 1, x_129); +lean_ctor_set(x_136, 2, x_130); +lean_ctor_set(x_136, 3, x_131); +lean_ctor_set(x_136, 4, x_80); +lean_ctor_set_uint8(x_136, sizeof(void*)*5, x_132); +x_137 = lean_ctor_get(x_93, 0); +lean_inc(x_137); +x_138 = lean_array_get_size(x_137); +lean_dec(x_137); +x_139 = lean_ctor_get(x_135, 1); +lean_inc(x_139); +lean_dec(x_135); +x_140 = lean_nat_dec_le(x_139, x_139); +lean_dec(x_139); +if (x_140 == 0) +{ +lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; uint8_t x_147; lean_object* x_148; +lean_dec(x_136); +x_141 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_142 = l_Lean_Parser_ParserState_mkError(x_93, x_141); +x_143 = l_Lean_nullKind; +x_144 = l_Lean_Parser_ParserState_mkNode(x_142, x_143, x_138); +x_145 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_146 = l_Lean_Parser_ParserState_mkNode(x_144, x_145, x_90); +x_147 = 1; +x_148 = l_Lean_Parser_mergeOrElseErrors(x_146, x_82, x_78, x_147); +lean_dec(x_78); +return x_148; +} +else +{ +lean_object* x_149; lean_object* x_150; +lean_inc(x_136); +x_149 = l_Lean_Parser_ident___elambda__1(x_136, x_93); +x_150 = lean_ctor_get(x_149, 3); +lean_inc(x_150); +if (lean_obj_tag(x_150) == 0) +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; uint8_t x_156; lean_object* x_157; +x_151 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_136, x_149); +x_152 = l_Lean_nullKind; +x_153 = l_Lean_Parser_ParserState_mkNode(x_151, x_152, x_138); +x_154 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_155 = l_Lean_Parser_ParserState_mkNode(x_153, x_154, x_90); +x_156 = 1; +x_157 = l_Lean_Parser_mergeOrElseErrors(x_155, x_82, x_78, x_156); +lean_dec(x_78); +return x_157; +} +else +{ +lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; uint8_t x_162; lean_object* x_163; +lean_dec(x_150); +lean_dec(x_136); +x_158 = l_Lean_nullKind; +x_159 = l_Lean_Parser_ParserState_mkNode(x_149, x_158, x_138); +x_160 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_161 = l_Lean_Parser_ParserState_mkNode(x_159, x_160, x_90); +x_162 = 1; +x_163 = l_Lean_Parser_mergeOrElseErrors(x_161, x_82, x_78, x_162); +lean_dec(x_78); +return x_163; +} +} } } else { -uint8_t x_69; lean_object* x_70; -lean_dec(x_41); +lean_object* x_164; lean_object* x_165; uint8_t x_166; lean_object* x_167; +lean_dec(x_94); +lean_free_object(x_80); lean_dec(x_1); -x_69 = 1; -x_70 = l_Lean_Parser_mergeOrElseErrors(x_40, x_35, x_32, x_69); -lean_dec(x_32); -return x_70; +x_164 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_165 = l_Lean_Parser_ParserState_mkNode(x_93, x_164, x_90); +x_166 = 1; +x_167 = l_Lean_Parser_mergeOrElseErrors(x_165, x_82, x_78, x_166); +lean_dec(x_78); +return x_167; +} +} +else +{ +uint8_t x_168; lean_object* x_169; +lean_dec(x_88); +lean_free_object(x_80); +lean_dec(x_1); +x_168 = 1; +x_169 = l_Lean_Parser_mergeOrElseErrors(x_87, x_82, x_78, x_168); +lean_dec(x_78); +return x_169; +} +} +} +else +{ +lean_object* x_170; lean_object* x_171; uint8_t x_172; +x_170 = lean_ctor_get(x_80, 0); +lean_inc(x_170); +lean_dec(x_80); +x_171 = lean_ctor_get(x_79, 1); +lean_inc(x_171); +x_172 = lean_nat_dec_eq(x_171, x_78); +lean_dec(x_171); +if (x_172 == 0) +{ +lean_dec(x_170); +lean_dec(x_78); +lean_dec(x_77); +lean_dec(x_1); +return x_79; +} +else +{ +lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; +lean_inc(x_78); +x_173 = l_Lean_Parser_ParserState_restore(x_79, x_77, x_78); +lean_dec(x_77); +x_174 = lean_unsigned_to_nat(1024u); +x_175 = l_Lean_Parser_checkPrecFn(x_174, x_1, x_173); +x_176 = lean_ctor_get(x_175, 3); +lean_inc(x_176); +if (lean_obj_tag(x_176) == 0) +{ +lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; +x_177 = lean_ctor_get(x_175, 0); +lean_inc(x_177); +x_178 = lean_array_get_size(x_177); +lean_dec(x_177); +x_179 = l_Lean_Parser_Tactic_revert___elambda__1___closed__6; +x_180 = l_Lean_Parser_Tactic_revert___elambda__1___closed__8; +lean_inc(x_1); +x_181 = l_Lean_Parser_nonReservedSymbolFnAux(x_179, x_180, x_1, x_175); +x_182 = lean_ctor_get(x_181, 3); +lean_inc(x_182); +if (lean_obj_tag(x_182) == 0) +{ +lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; uint8_t x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; uint8_t x_197; +x_183 = lean_ctor_get(x_1, 0); +lean_inc(x_183); +x_184 = lean_ctor_get(x_1, 1); +lean_inc(x_184); +x_185 = lean_ctor_get(x_1, 2); +lean_inc(x_185); +x_186 = lean_ctor_get(x_1, 3); +lean_inc(x_186); +x_187 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +if (lean_is_exclusive(x_1)) { + lean_ctor_release(x_1, 0); + lean_ctor_release(x_1, 1); + lean_ctor_release(x_1, 2); + lean_ctor_release(x_1, 3); + lean_ctor_release(x_1, 4); + x_188 = x_1; +} else { + lean_dec_ref(x_1); + x_188 = lean_box(0); +} +x_189 = lean_ctor_get(x_183, 2); +lean_inc(x_189); +x_190 = lean_ctor_get(x_181, 1); +lean_inc(x_190); +x_191 = l_Lean_FileMap_toPosition(x_189, x_190); +lean_dec(x_189); +lean_inc(x_191); +x_192 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_192, 0, x_191); +if (lean_is_scalar(x_188)) { + x_193 = lean_alloc_ctor(0, 5, 1); +} else { + x_193 = x_188; +} +lean_ctor_set(x_193, 0, x_183); +lean_ctor_set(x_193, 1, x_184); +lean_ctor_set(x_193, 2, x_185); +lean_ctor_set(x_193, 3, x_186); +lean_ctor_set(x_193, 4, x_192); +lean_ctor_set_uint8(x_193, sizeof(void*)*5, x_187); +x_194 = lean_ctor_get(x_181, 0); +lean_inc(x_194); +x_195 = lean_array_get_size(x_194); +lean_dec(x_194); +x_196 = lean_ctor_get(x_191, 1); +lean_inc(x_196); +lean_dec(x_191); +x_197 = lean_nat_dec_le(x_196, x_196); +lean_dec(x_196); +if (x_197 == 0) +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; uint8_t x_204; lean_object* x_205; +lean_dec(x_193); +x_198 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_199 = l_Lean_Parser_ParserState_mkError(x_181, x_198); +x_200 = l_Lean_nullKind; +x_201 = l_Lean_Parser_ParserState_mkNode(x_199, x_200, x_195); +x_202 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_203 = l_Lean_Parser_ParserState_mkNode(x_201, x_202, x_178); +x_204 = 1; +x_205 = l_Lean_Parser_mergeOrElseErrors(x_203, x_170, x_78, x_204); +lean_dec(x_78); +return x_205; +} +else +{ +lean_object* x_206; lean_object* x_207; +lean_inc(x_193); +x_206 = l_Lean_Parser_ident___elambda__1(x_193, x_181); +x_207 = lean_ctor_get(x_206, 3); +lean_inc(x_207); +if (lean_obj_tag(x_207) == 0) +{ +lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; uint8_t x_213; lean_object* x_214; +x_208 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_193, x_206); +x_209 = l_Lean_nullKind; +x_210 = l_Lean_Parser_ParserState_mkNode(x_208, x_209, x_195); +x_211 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_212 = l_Lean_Parser_ParserState_mkNode(x_210, x_211, x_178); +x_213 = 1; +x_214 = l_Lean_Parser_mergeOrElseErrors(x_212, x_170, x_78, x_213); +lean_dec(x_78); +return x_214; +} +else +{ +lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; uint8_t x_219; lean_object* x_220; +lean_dec(x_207); +lean_dec(x_193); +x_215 = l_Lean_nullKind; +x_216 = l_Lean_Parser_ParserState_mkNode(x_206, x_215, x_195); +x_217 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_218 = l_Lean_Parser_ParserState_mkNode(x_216, x_217, x_178); +x_219 = 1; +x_220 = l_Lean_Parser_mergeOrElseErrors(x_218, x_170, x_78, x_219); +lean_dec(x_78); +return x_220; +} +} +} +else +{ +lean_object* x_221; lean_object* x_222; uint8_t x_223; lean_object* x_224; +lean_dec(x_182); +lean_dec(x_1); +x_221 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_222 = l_Lean_Parser_ParserState_mkNode(x_181, x_221, x_178); +x_223 = 1; +x_224 = l_Lean_Parser_mergeOrElseErrors(x_222, x_170, x_78, x_223); +lean_dec(x_78); +return x_224; +} +} +else +{ +uint8_t x_225; lean_object* x_226; +lean_dec(x_176); +lean_dec(x_1); +x_225 = 1; +x_226 = l_Lean_Parser_mergeOrElseErrors(x_175, x_170, x_78, x_225); +lean_dec(x_78); +return x_226; +} } } } @@ -3791,7 +4977,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_ident; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Tactic_revert___closed__1; +x_3 = l_Lean_Parser_Parser_inhabited___closed__1; x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); return x_4; } @@ -3800,9 +4986,9 @@ lean_object* _init_l_Lean_Parser_Tactic_revert___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_revert___closed__1; x_2 = l_Lean_Parser_Tactic_revert___closed__2; -x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } } @@ -3810,25 +4996,35 @@ lean_object* _init_l_Lean_Parser_Tactic_revert___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_epsilonInfo; +x_1 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_revert___closed__3; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); return x_3; } } lean_object* _init_l_Lean_Parser_Tactic_revert___closed__5() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_epsilonInfo; +x_2 = l_Lean_Parser_Tactic_revert___closed__4; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_revert___closed__6() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_revert___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Tactic_revert___closed__4; +x_3 = l_Lean_Parser_Tactic_revert___closed__5; x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); return x_4; } } -lean_object* _init_l_Lean_Parser_Tactic_revert___closed__6() { +lean_object* _init_l_Lean_Parser_Tactic_revert___closed__7() { _start: { lean_object* x_1; @@ -3836,12 +5032,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_revert___elambda__1), 2, 0 return x_1; } } -lean_object* _init_l_Lean_Parser_Tactic_revert___closed__7() { +lean_object* _init_l_Lean_Parser_Tactic_revert___closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_revert___closed__5; -x_2 = l_Lean_Parser_Tactic_revert___closed__6; +x_1 = l_Lean_Parser_Tactic_revert___closed__6; +x_2 = l_Lean_Parser_Tactic_revert___closed__7; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -3852,7 +5048,7 @@ lean_object* _init_l_Lean_Parser_Tactic_revert() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Tactic_revert___closed__7; +x_1 = l_Lean_Parser_Tactic_revert___closed__8; return x_1; } } @@ -3899,7 +5095,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Level_ident_formatter___closed__1; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_many1_formatter), 6, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_many1Indent_formatter), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -3977,7 +5173,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Level_ident_parenthesizer___closed__1; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_many1_parenthesizer), 6, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_many1Indent_parenthesizer), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -4146,45 +5342,164 @@ x_14 = lean_ctor_get(x_13, 3); lean_inc(x_14); if (lean_obj_tag(x_14) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_15 = lean_ctor_get(x_13, 0); -lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -lean_inc(x_1); -x_17 = l_Lean_Parser_ident___elambda__1(x_1, x_13); -x_18 = lean_ctor_get(x_17, 3); +uint8_t x_15; +x_15 = !lean_is_exclusive(x_1); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_16 = lean_ctor_get(x_1, 0); +x_17 = lean_ctor_get(x_1, 4); +lean_dec(x_17); +x_18 = lean_ctor_get(x_16, 2); lean_inc(x_18); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_19 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_17); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_16); -x_22 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_10); -return x_23; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_19 = lean_ctor_get(x_13, 1); +lean_inc(x_19); +x_20 = l_Lean_FileMap_toPosition(x_18, x_19); lean_dec(x_18); +lean_inc(x_20); +x_21 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_1, 4, x_21); +x_22 = lean_ctor_get(x_13, 0); +lean_inc(x_22); +x_23 = lean_array_get_size(x_22); +lean_dec(x_22); +x_24 = lean_ctor_get(x_20, 1); +lean_inc(x_24); +lean_dec(x_20); +x_25 = lean_nat_dec_le(x_24, x_24); +lean_dec(x_24); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_dec(x_1); -x_24 = l_Lean_nullKind; -x_25 = l_Lean_Parser_ParserState_mkNode(x_17, x_24, x_16); -x_26 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_10); -return x_27; +x_26 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_27 = l_Lean_Parser_ParserState_mkError(x_13, x_26); +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_23); +x_30 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_10); +return x_31; +} +else +{ +lean_object* x_32; lean_object* x_33; +lean_inc(x_1); +x_32 = l_Lean_Parser_ident___elambda__1(x_1, x_13); +x_33 = lean_ctor_get(x_32, 3); +lean_inc(x_33); +if (lean_obj_tag(x_33) == 0) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_34 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_32); +x_35 = l_Lean_nullKind; +x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_23); +x_37 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_10); +return x_38; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_dec(x_33); +lean_dec(x_1); +x_39 = l_Lean_nullKind; +x_40 = l_Lean_Parser_ParserState_mkNode(x_32, x_39, x_23); +x_41 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_10); +return x_42; +} } } else { -lean_object* x_28; lean_object* x_29; +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; uint8_t x_56; +x_43 = lean_ctor_get(x_1, 0); +x_44 = lean_ctor_get(x_1, 1); +x_45 = lean_ctor_get(x_1, 2); +x_46 = lean_ctor_get(x_1, 3); +x_47 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_46); +lean_inc(x_45); +lean_inc(x_44); +lean_inc(x_43); +lean_dec(x_1); +x_48 = lean_ctor_get(x_43, 2); +lean_inc(x_48); +x_49 = lean_ctor_get(x_13, 1); +lean_inc(x_49); +x_50 = l_Lean_FileMap_toPosition(x_48, x_49); +lean_dec(x_48); +lean_inc(x_50); +x_51 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_52 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_52, 0, x_43); +lean_ctor_set(x_52, 1, x_44); +lean_ctor_set(x_52, 2, x_45); +lean_ctor_set(x_52, 3, x_46); +lean_ctor_set(x_52, 4, x_51); +lean_ctor_set_uint8(x_52, sizeof(void*)*5, x_47); +x_53 = lean_ctor_get(x_13, 0); +lean_inc(x_53); +x_54 = lean_array_get_size(x_53); +lean_dec(x_53); +x_55 = lean_ctor_get(x_50, 1); +lean_inc(x_55); +lean_dec(x_50); +x_56 = lean_nat_dec_le(x_55, x_55); +lean_dec(x_55); +if (x_56 == 0) +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; +lean_dec(x_52); +x_57 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_58 = l_Lean_Parser_ParserState_mkError(x_13, x_57); +x_59 = l_Lean_nullKind; +x_60 = l_Lean_Parser_ParserState_mkNode(x_58, x_59, x_54); +x_61 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_62 = l_Lean_Parser_ParserState_mkNode(x_60, x_61, x_10); +return x_62; +} +else +{ +lean_object* x_63; lean_object* x_64; +lean_inc(x_52); +x_63 = l_Lean_Parser_ident___elambda__1(x_52, x_13); +x_64 = lean_ctor_get(x_63, 3); +lean_inc(x_64); +if (lean_obj_tag(x_64) == 0) +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_65 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_52, x_63); +x_66 = l_Lean_nullKind; +x_67 = l_Lean_Parser_ParserState_mkNode(x_65, x_66, x_54); +x_68 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_69 = l_Lean_Parser_ParserState_mkNode(x_67, x_68, x_10); +return x_69; +} +else +{ +lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; +lean_dec(x_64); +lean_dec(x_52); +x_70 = l_Lean_nullKind; +x_71 = l_Lean_Parser_ParserState_mkNode(x_63, x_70, x_54); +x_72 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_73 = l_Lean_Parser_ParserState_mkNode(x_71, x_72, x_10); +return x_73; +} +} +} +} +else +{ +lean_object* x_74; lean_object* x_75; lean_dec(x_14); lean_dec(x_1); -x_28 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; -x_29 = l_Lean_Parser_ParserState_mkNode(x_13, x_28, x_10); -return x_29; +x_74 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_75 = l_Lean_Parser_ParserState_mkNode(x_13, x_74, x_10); +return x_75; } } else @@ -4196,126 +5511,430 @@ return x_7; } else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_30 = lean_ctor_get(x_2, 0); -lean_inc(x_30); -x_31 = lean_array_get_size(x_30); -lean_dec(x_30); -x_32 = lean_ctor_get(x_2, 1); -lean_inc(x_32); +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_76 = lean_ctor_get(x_2, 0); +lean_inc(x_76); +x_77 = lean_array_get_size(x_76); +lean_dec(x_76); +x_78 = lean_ctor_get(x_2, 1); +lean_inc(x_78); lean_inc(x_1); -x_33 = lean_apply_2(x_4, x_1, x_2); -x_34 = lean_ctor_get(x_33, 3); -lean_inc(x_34); -if (lean_obj_tag(x_34) == 0) +x_79 = lean_apply_2(x_4, x_1, x_2); +x_80 = lean_ctor_get(x_79, 3); +lean_inc(x_80); +if (lean_obj_tag(x_80) == 0) { -lean_dec(x_32); -lean_dec(x_31); +lean_dec(x_78); +lean_dec(x_77); lean_dec(x_1); -return x_33; +return x_79; } else { -lean_object* x_35; lean_object* x_36; uint8_t x_37; -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -lean_dec(x_34); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -x_37 = lean_nat_dec_eq(x_36, x_32); -lean_dec(x_36); -if (x_37 == 0) +uint8_t x_81; +x_81 = !lean_is_exclusive(x_80); +if (x_81 == 0) { -lean_dec(x_35); -lean_dec(x_32); -lean_dec(x_31); +lean_object* x_82; lean_object* x_83; uint8_t x_84; +x_82 = lean_ctor_get(x_80, 0); +x_83 = lean_ctor_get(x_79, 1); +lean_inc(x_83); +x_84 = lean_nat_dec_eq(x_83, x_78); +lean_dec(x_83); +if (x_84 == 0) +{ +lean_free_object(x_80); +lean_dec(x_82); +lean_dec(x_78); +lean_dec(x_77); lean_dec(x_1); -return x_33; +return x_79; } else { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_inc(x_32); -x_38 = l_Lean_Parser_ParserState_restore(x_33, x_31, x_32); -lean_dec(x_31); -x_39 = lean_unsigned_to_nat(1024u); -x_40 = l_Lean_Parser_checkPrecFn(x_39, x_1, x_38); -x_41 = lean_ctor_get(x_40, 3); -lean_inc(x_41); -if (lean_obj_tag(x_41) == 0) +lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +lean_inc(x_78); +x_85 = l_Lean_Parser_ParserState_restore(x_79, x_77, x_78); +lean_dec(x_77); +x_86 = lean_unsigned_to_nat(1024u); +x_87 = l_Lean_Parser_checkPrecFn(x_86, x_1, x_85); +x_88 = lean_ctor_get(x_87, 3); +lean_inc(x_88); +if (lean_obj_tag(x_88) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_42 = lean_ctor_get(x_40, 0); -lean_inc(x_42); -x_43 = lean_array_get_size(x_42); -lean_dec(x_42); -x_44 = l_Lean_Parser_Tactic_clear___elambda__1___closed__6; -x_45 = l_Lean_Parser_Tactic_clear___elambda__1___closed__8; +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_89 = lean_ctor_get(x_87, 0); +lean_inc(x_89); +x_90 = lean_array_get_size(x_89); +lean_dec(x_89); +x_91 = l_Lean_Parser_Tactic_clear___elambda__1___closed__6; +x_92 = l_Lean_Parser_Tactic_clear___elambda__1___closed__8; lean_inc(x_1); -x_46 = l_Lean_Parser_nonReservedSymbolFnAux(x_44, x_45, x_1, x_40); -x_47 = lean_ctor_get(x_46, 3); -lean_inc(x_47); -if (lean_obj_tag(x_47) == 0) +x_93 = l_Lean_Parser_nonReservedSymbolFnAux(x_91, x_92, x_1, x_87); +x_94 = lean_ctor_get(x_93, 3); +lean_inc(x_94); +if (lean_obj_tag(x_94) == 0) { -lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_48 = lean_ctor_get(x_46, 0); -lean_inc(x_48); -x_49 = lean_array_get_size(x_48); -lean_dec(x_48); +uint8_t x_95; +x_95 = !lean_is_exclusive(x_1); +if (x_95 == 0) +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; +x_96 = lean_ctor_get(x_1, 0); +x_97 = lean_ctor_get(x_1, 4); +lean_dec(x_97); +x_98 = lean_ctor_get(x_96, 2); +lean_inc(x_98); +x_99 = lean_ctor_get(x_93, 1); +lean_inc(x_99); +x_100 = l_Lean_FileMap_toPosition(x_98, x_99); +lean_dec(x_98); +lean_inc(x_100); +lean_ctor_set(x_80, 0, x_100); +lean_ctor_set(x_1, 4, x_80); +x_101 = lean_ctor_get(x_93, 0); +lean_inc(x_101); +x_102 = lean_array_get_size(x_101); +lean_dec(x_101); +x_103 = lean_ctor_get(x_100, 1); +lean_inc(x_103); +lean_dec(x_100); +x_104 = lean_nat_dec_le(x_103, x_103); +lean_dec(x_103); +if (x_104 == 0) +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111; lean_object* x_112; +lean_dec(x_1); +x_105 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_106 = l_Lean_Parser_ParserState_mkError(x_93, x_105); +x_107 = l_Lean_nullKind; +x_108 = l_Lean_Parser_ParserState_mkNode(x_106, x_107, x_102); +x_109 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_110 = l_Lean_Parser_ParserState_mkNode(x_108, x_109, x_90); +x_111 = 1; +x_112 = l_Lean_Parser_mergeOrElseErrors(x_110, x_82, x_78, x_111); +lean_dec(x_78); +return x_112; +} +else +{ +lean_object* x_113; lean_object* x_114; lean_inc(x_1); -x_50 = l_Lean_Parser_ident___elambda__1(x_1, x_46); -x_51 = lean_ctor_get(x_50, 3); -lean_inc(x_51); -if (lean_obj_tag(x_51) == 0) +x_113 = l_Lean_Parser_ident___elambda__1(x_1, x_93); +x_114 = lean_ctor_get(x_113, 3); +lean_inc(x_114); +if (lean_obj_tag(x_114) == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; lean_object* x_58; -x_52 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_50); -x_53 = l_Lean_nullKind; -x_54 = l_Lean_Parser_ParserState_mkNode(x_52, x_53, x_49); -x_55 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; -x_56 = l_Lean_Parser_ParserState_mkNode(x_54, x_55, x_43); -x_57 = 1; -x_58 = l_Lean_Parser_mergeOrElseErrors(x_56, x_35, x_32, x_57); -lean_dec(x_32); -return x_58; +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; uint8_t x_120; lean_object* x_121; +x_115 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_113); +x_116 = l_Lean_nullKind; +x_117 = l_Lean_Parser_ParserState_mkNode(x_115, x_116, x_102); +x_118 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_119 = l_Lean_Parser_ParserState_mkNode(x_117, x_118, x_90); +x_120 = 1; +x_121 = l_Lean_Parser_mergeOrElseErrors(x_119, x_82, x_78, x_120); +lean_dec(x_78); +return x_121; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63; lean_object* x_64; -lean_dec(x_51); +lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; uint8_t x_126; lean_object* x_127; +lean_dec(x_114); lean_dec(x_1); -x_59 = l_Lean_nullKind; -x_60 = l_Lean_Parser_ParserState_mkNode(x_50, x_59, x_49); -x_61 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; -x_62 = l_Lean_Parser_ParserState_mkNode(x_60, x_61, x_43); -x_63 = 1; -x_64 = l_Lean_Parser_mergeOrElseErrors(x_62, x_35, x_32, x_63); -lean_dec(x_32); -return x_64; +x_122 = l_Lean_nullKind; +x_123 = l_Lean_Parser_ParserState_mkNode(x_113, x_122, x_102); +x_124 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_125 = l_Lean_Parser_ParserState_mkNode(x_123, x_124, x_90); +x_126 = 1; +x_127 = l_Lean_Parser_mergeOrElseErrors(x_125, x_82, x_78, x_126); +lean_dec(x_78); +return x_127; +} } } else { -lean_object* x_65; lean_object* x_66; uint8_t x_67; lean_object* x_68; -lean_dec(x_47); +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; uint8_t x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; uint8_t x_140; +x_128 = lean_ctor_get(x_1, 0); +x_129 = lean_ctor_get(x_1, 1); +x_130 = lean_ctor_get(x_1, 2); +x_131 = lean_ctor_get(x_1, 3); +x_132 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_131); +lean_inc(x_130); +lean_inc(x_129); +lean_inc(x_128); lean_dec(x_1); -x_65 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; -x_66 = l_Lean_Parser_ParserState_mkNode(x_46, x_65, x_43); -x_67 = 1; -x_68 = l_Lean_Parser_mergeOrElseErrors(x_66, x_35, x_32, x_67); -lean_dec(x_32); -return x_68; +x_133 = lean_ctor_get(x_128, 2); +lean_inc(x_133); +x_134 = lean_ctor_get(x_93, 1); +lean_inc(x_134); +x_135 = l_Lean_FileMap_toPosition(x_133, x_134); +lean_dec(x_133); +lean_inc(x_135); +lean_ctor_set(x_80, 0, x_135); +x_136 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_136, 0, x_128); +lean_ctor_set(x_136, 1, x_129); +lean_ctor_set(x_136, 2, x_130); +lean_ctor_set(x_136, 3, x_131); +lean_ctor_set(x_136, 4, x_80); +lean_ctor_set_uint8(x_136, sizeof(void*)*5, x_132); +x_137 = lean_ctor_get(x_93, 0); +lean_inc(x_137); +x_138 = lean_array_get_size(x_137); +lean_dec(x_137); +x_139 = lean_ctor_get(x_135, 1); +lean_inc(x_139); +lean_dec(x_135); +x_140 = lean_nat_dec_le(x_139, x_139); +lean_dec(x_139); +if (x_140 == 0) +{ +lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; uint8_t x_147; lean_object* x_148; +lean_dec(x_136); +x_141 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_142 = l_Lean_Parser_ParserState_mkError(x_93, x_141); +x_143 = l_Lean_nullKind; +x_144 = l_Lean_Parser_ParserState_mkNode(x_142, x_143, x_138); +x_145 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_146 = l_Lean_Parser_ParserState_mkNode(x_144, x_145, x_90); +x_147 = 1; +x_148 = l_Lean_Parser_mergeOrElseErrors(x_146, x_82, x_78, x_147); +lean_dec(x_78); +return x_148; +} +else +{ +lean_object* x_149; lean_object* x_150; +lean_inc(x_136); +x_149 = l_Lean_Parser_ident___elambda__1(x_136, x_93); +x_150 = lean_ctor_get(x_149, 3); +lean_inc(x_150); +if (lean_obj_tag(x_150) == 0) +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; uint8_t x_156; lean_object* x_157; +x_151 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_136, x_149); +x_152 = l_Lean_nullKind; +x_153 = l_Lean_Parser_ParserState_mkNode(x_151, x_152, x_138); +x_154 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_155 = l_Lean_Parser_ParserState_mkNode(x_153, x_154, x_90); +x_156 = 1; +x_157 = l_Lean_Parser_mergeOrElseErrors(x_155, x_82, x_78, x_156); +lean_dec(x_78); +return x_157; +} +else +{ +lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; uint8_t x_162; lean_object* x_163; +lean_dec(x_150); +lean_dec(x_136); +x_158 = l_Lean_nullKind; +x_159 = l_Lean_Parser_ParserState_mkNode(x_149, x_158, x_138); +x_160 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_161 = l_Lean_Parser_ParserState_mkNode(x_159, x_160, x_90); +x_162 = 1; +x_163 = l_Lean_Parser_mergeOrElseErrors(x_161, x_82, x_78, x_162); +lean_dec(x_78); +return x_163; +} +} } } else { -uint8_t x_69; lean_object* x_70; -lean_dec(x_41); +lean_object* x_164; lean_object* x_165; uint8_t x_166; lean_object* x_167; +lean_dec(x_94); +lean_free_object(x_80); lean_dec(x_1); -x_69 = 1; -x_70 = l_Lean_Parser_mergeOrElseErrors(x_40, x_35, x_32, x_69); -lean_dec(x_32); -return x_70; +x_164 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_165 = l_Lean_Parser_ParserState_mkNode(x_93, x_164, x_90); +x_166 = 1; +x_167 = l_Lean_Parser_mergeOrElseErrors(x_165, x_82, x_78, x_166); +lean_dec(x_78); +return x_167; +} +} +else +{ +uint8_t x_168; lean_object* x_169; +lean_dec(x_88); +lean_free_object(x_80); +lean_dec(x_1); +x_168 = 1; +x_169 = l_Lean_Parser_mergeOrElseErrors(x_87, x_82, x_78, x_168); +lean_dec(x_78); +return x_169; +} +} +} +else +{ +lean_object* x_170; lean_object* x_171; uint8_t x_172; +x_170 = lean_ctor_get(x_80, 0); +lean_inc(x_170); +lean_dec(x_80); +x_171 = lean_ctor_get(x_79, 1); +lean_inc(x_171); +x_172 = lean_nat_dec_eq(x_171, x_78); +lean_dec(x_171); +if (x_172 == 0) +{ +lean_dec(x_170); +lean_dec(x_78); +lean_dec(x_77); +lean_dec(x_1); +return x_79; +} +else +{ +lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; +lean_inc(x_78); +x_173 = l_Lean_Parser_ParserState_restore(x_79, x_77, x_78); +lean_dec(x_77); +x_174 = lean_unsigned_to_nat(1024u); +x_175 = l_Lean_Parser_checkPrecFn(x_174, x_1, x_173); +x_176 = lean_ctor_get(x_175, 3); +lean_inc(x_176); +if (lean_obj_tag(x_176) == 0) +{ +lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; +x_177 = lean_ctor_get(x_175, 0); +lean_inc(x_177); +x_178 = lean_array_get_size(x_177); +lean_dec(x_177); +x_179 = l_Lean_Parser_Tactic_clear___elambda__1___closed__6; +x_180 = l_Lean_Parser_Tactic_clear___elambda__1___closed__8; +lean_inc(x_1); +x_181 = l_Lean_Parser_nonReservedSymbolFnAux(x_179, x_180, x_1, x_175); +x_182 = lean_ctor_get(x_181, 3); +lean_inc(x_182); +if (lean_obj_tag(x_182) == 0) +{ +lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; uint8_t x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; uint8_t x_197; +x_183 = lean_ctor_get(x_1, 0); +lean_inc(x_183); +x_184 = lean_ctor_get(x_1, 1); +lean_inc(x_184); +x_185 = lean_ctor_get(x_1, 2); +lean_inc(x_185); +x_186 = lean_ctor_get(x_1, 3); +lean_inc(x_186); +x_187 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +if (lean_is_exclusive(x_1)) { + lean_ctor_release(x_1, 0); + lean_ctor_release(x_1, 1); + lean_ctor_release(x_1, 2); + lean_ctor_release(x_1, 3); + lean_ctor_release(x_1, 4); + x_188 = x_1; +} else { + lean_dec_ref(x_1); + x_188 = lean_box(0); +} +x_189 = lean_ctor_get(x_183, 2); +lean_inc(x_189); +x_190 = lean_ctor_get(x_181, 1); +lean_inc(x_190); +x_191 = l_Lean_FileMap_toPosition(x_189, x_190); +lean_dec(x_189); +lean_inc(x_191); +x_192 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_192, 0, x_191); +if (lean_is_scalar(x_188)) { + x_193 = lean_alloc_ctor(0, 5, 1); +} else { + x_193 = x_188; +} +lean_ctor_set(x_193, 0, x_183); +lean_ctor_set(x_193, 1, x_184); +lean_ctor_set(x_193, 2, x_185); +lean_ctor_set(x_193, 3, x_186); +lean_ctor_set(x_193, 4, x_192); +lean_ctor_set_uint8(x_193, sizeof(void*)*5, x_187); +x_194 = lean_ctor_get(x_181, 0); +lean_inc(x_194); +x_195 = lean_array_get_size(x_194); +lean_dec(x_194); +x_196 = lean_ctor_get(x_191, 1); +lean_inc(x_196); +lean_dec(x_191); +x_197 = lean_nat_dec_le(x_196, x_196); +lean_dec(x_196); +if (x_197 == 0) +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; uint8_t x_204; lean_object* x_205; +lean_dec(x_193); +x_198 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_199 = l_Lean_Parser_ParserState_mkError(x_181, x_198); +x_200 = l_Lean_nullKind; +x_201 = l_Lean_Parser_ParserState_mkNode(x_199, x_200, x_195); +x_202 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_203 = l_Lean_Parser_ParserState_mkNode(x_201, x_202, x_178); +x_204 = 1; +x_205 = l_Lean_Parser_mergeOrElseErrors(x_203, x_170, x_78, x_204); +lean_dec(x_78); +return x_205; +} +else +{ +lean_object* x_206; lean_object* x_207; +lean_inc(x_193); +x_206 = l_Lean_Parser_ident___elambda__1(x_193, x_181); +x_207 = lean_ctor_get(x_206, 3); +lean_inc(x_207); +if (lean_obj_tag(x_207) == 0) +{ +lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; uint8_t x_213; lean_object* x_214; +x_208 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_193, x_206); +x_209 = l_Lean_nullKind; +x_210 = l_Lean_Parser_ParserState_mkNode(x_208, x_209, x_195); +x_211 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_212 = l_Lean_Parser_ParserState_mkNode(x_210, x_211, x_178); +x_213 = 1; +x_214 = l_Lean_Parser_mergeOrElseErrors(x_212, x_170, x_78, x_213); +lean_dec(x_78); +return x_214; +} +else +{ +lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; uint8_t x_219; lean_object* x_220; +lean_dec(x_207); +lean_dec(x_193); +x_215 = l_Lean_nullKind; +x_216 = l_Lean_Parser_ParserState_mkNode(x_206, x_215, x_195); +x_217 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_218 = l_Lean_Parser_ParserState_mkNode(x_216, x_217, x_178); +x_219 = 1; +x_220 = l_Lean_Parser_mergeOrElseErrors(x_218, x_170, x_78, x_219); +lean_dec(x_78); +return x_220; +} +} +} +else +{ +lean_object* x_221; lean_object* x_222; uint8_t x_223; lean_object* x_224; +lean_dec(x_182); +lean_dec(x_1); +x_221 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; +x_222 = l_Lean_Parser_ParserState_mkNode(x_181, x_221, x_178); +x_223 = 1; +x_224 = l_Lean_Parser_mergeOrElseErrors(x_222, x_170, x_78, x_223); +lean_dec(x_78); +return x_224; +} +} +else +{ +uint8_t x_225; lean_object* x_226; +lean_dec(x_176); +lean_dec(x_1); +x_225 = 1; +x_226 = l_Lean_Parser_mergeOrElseErrors(x_175, x_170, x_78, x_225); +lean_dec(x_78); +return x_226; +} } } } @@ -4335,13 +5954,11 @@ return x_3; lean_object* _init_l_Lean_Parser_Tactic_clear___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_ident; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -x_3 = l_Lean_Parser_Tactic_clear___closed__1; -x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); -return x_4; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_clear___closed__1; +x_2 = l_Lean_Parser_Tactic_revert___closed__2; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; } } lean_object* _init_l_Lean_Parser_Tactic_clear___closed__3() { @@ -4654,45 +6271,164 @@ x_14 = lean_ctor_get(x_13, 3); lean_inc(x_14); if (lean_obj_tag(x_14) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_15 = lean_ctor_get(x_13, 0); -lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -lean_inc(x_1); -x_17 = l_Lean_Parser_ident___elambda__1(x_1, x_13); -x_18 = lean_ctor_get(x_17, 3); +uint8_t x_15; +x_15 = !lean_is_exclusive(x_1); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_16 = lean_ctor_get(x_1, 0); +x_17 = lean_ctor_get(x_1, 4); +lean_dec(x_17); +x_18 = lean_ctor_get(x_16, 2); lean_inc(x_18); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_19 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_17); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_16); -x_22 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_10); -return x_23; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_19 = lean_ctor_get(x_13, 1); +lean_inc(x_19); +x_20 = l_Lean_FileMap_toPosition(x_18, x_19); lean_dec(x_18); +lean_inc(x_20); +x_21 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_1, 4, x_21); +x_22 = lean_ctor_get(x_13, 0); +lean_inc(x_22); +x_23 = lean_array_get_size(x_22); +lean_dec(x_22); +x_24 = lean_ctor_get(x_20, 1); +lean_inc(x_24); +lean_dec(x_20); +x_25 = lean_nat_dec_le(x_24, x_24); +lean_dec(x_24); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_dec(x_1); -x_24 = l_Lean_nullKind; -x_25 = l_Lean_Parser_ParserState_mkNode(x_17, x_24, x_16); -x_26 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_10); -return x_27; +x_26 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_27 = l_Lean_Parser_ParserState_mkError(x_13, x_26); +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_23); +x_30 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_10); +return x_31; +} +else +{ +lean_object* x_32; lean_object* x_33; +lean_inc(x_1); +x_32 = l_Lean_Parser_ident___elambda__1(x_1, x_13); +x_33 = lean_ctor_get(x_32, 3); +lean_inc(x_33); +if (lean_obj_tag(x_33) == 0) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_34 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_32); +x_35 = l_Lean_nullKind; +x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_23); +x_37 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_10); +return x_38; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_dec(x_33); +lean_dec(x_1); +x_39 = l_Lean_nullKind; +x_40 = l_Lean_Parser_ParserState_mkNode(x_32, x_39, x_23); +x_41 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_10); +return x_42; +} } } else { -lean_object* x_28; lean_object* x_29; +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; uint8_t x_56; +x_43 = lean_ctor_get(x_1, 0); +x_44 = lean_ctor_get(x_1, 1); +x_45 = lean_ctor_get(x_1, 2); +x_46 = lean_ctor_get(x_1, 3); +x_47 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_46); +lean_inc(x_45); +lean_inc(x_44); +lean_inc(x_43); +lean_dec(x_1); +x_48 = lean_ctor_get(x_43, 2); +lean_inc(x_48); +x_49 = lean_ctor_get(x_13, 1); +lean_inc(x_49); +x_50 = l_Lean_FileMap_toPosition(x_48, x_49); +lean_dec(x_48); +lean_inc(x_50); +x_51 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_52 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_52, 0, x_43); +lean_ctor_set(x_52, 1, x_44); +lean_ctor_set(x_52, 2, x_45); +lean_ctor_set(x_52, 3, x_46); +lean_ctor_set(x_52, 4, x_51); +lean_ctor_set_uint8(x_52, sizeof(void*)*5, x_47); +x_53 = lean_ctor_get(x_13, 0); +lean_inc(x_53); +x_54 = lean_array_get_size(x_53); +lean_dec(x_53); +x_55 = lean_ctor_get(x_50, 1); +lean_inc(x_55); +lean_dec(x_50); +x_56 = lean_nat_dec_le(x_55, x_55); +lean_dec(x_55); +if (x_56 == 0) +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; +lean_dec(x_52); +x_57 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_58 = l_Lean_Parser_ParserState_mkError(x_13, x_57); +x_59 = l_Lean_nullKind; +x_60 = l_Lean_Parser_ParserState_mkNode(x_58, x_59, x_54); +x_61 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_62 = l_Lean_Parser_ParserState_mkNode(x_60, x_61, x_10); +return x_62; +} +else +{ +lean_object* x_63; lean_object* x_64; +lean_inc(x_52); +x_63 = l_Lean_Parser_ident___elambda__1(x_52, x_13); +x_64 = lean_ctor_get(x_63, 3); +lean_inc(x_64); +if (lean_obj_tag(x_64) == 0) +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_65 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_52, x_63); +x_66 = l_Lean_nullKind; +x_67 = l_Lean_Parser_ParserState_mkNode(x_65, x_66, x_54); +x_68 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_69 = l_Lean_Parser_ParserState_mkNode(x_67, x_68, x_10); +return x_69; +} +else +{ +lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; +lean_dec(x_64); +lean_dec(x_52); +x_70 = l_Lean_nullKind; +x_71 = l_Lean_Parser_ParserState_mkNode(x_63, x_70, x_54); +x_72 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_73 = l_Lean_Parser_ParserState_mkNode(x_71, x_72, x_10); +return x_73; +} +} +} +} +else +{ +lean_object* x_74; lean_object* x_75; lean_dec(x_14); lean_dec(x_1); -x_28 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; -x_29 = l_Lean_Parser_ParserState_mkNode(x_13, x_28, x_10); -return x_29; +x_74 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_75 = l_Lean_Parser_ParserState_mkNode(x_13, x_74, x_10); +return x_75; } } else @@ -4704,126 +6440,430 @@ return x_7; } else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_30 = lean_ctor_get(x_2, 0); -lean_inc(x_30); -x_31 = lean_array_get_size(x_30); -lean_dec(x_30); -x_32 = lean_ctor_get(x_2, 1); -lean_inc(x_32); +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_76 = lean_ctor_get(x_2, 0); +lean_inc(x_76); +x_77 = lean_array_get_size(x_76); +lean_dec(x_76); +x_78 = lean_ctor_get(x_2, 1); +lean_inc(x_78); lean_inc(x_1); -x_33 = lean_apply_2(x_4, x_1, x_2); -x_34 = lean_ctor_get(x_33, 3); -lean_inc(x_34); -if (lean_obj_tag(x_34) == 0) +x_79 = lean_apply_2(x_4, x_1, x_2); +x_80 = lean_ctor_get(x_79, 3); +lean_inc(x_80); +if (lean_obj_tag(x_80) == 0) { -lean_dec(x_32); -lean_dec(x_31); +lean_dec(x_78); +lean_dec(x_77); lean_dec(x_1); -return x_33; +return x_79; } else { -lean_object* x_35; lean_object* x_36; uint8_t x_37; -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -lean_dec(x_34); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -x_37 = lean_nat_dec_eq(x_36, x_32); -lean_dec(x_36); -if (x_37 == 0) +uint8_t x_81; +x_81 = !lean_is_exclusive(x_80); +if (x_81 == 0) { -lean_dec(x_35); -lean_dec(x_32); -lean_dec(x_31); +lean_object* x_82; lean_object* x_83; uint8_t x_84; +x_82 = lean_ctor_get(x_80, 0); +x_83 = lean_ctor_get(x_79, 1); +lean_inc(x_83); +x_84 = lean_nat_dec_eq(x_83, x_78); +lean_dec(x_83); +if (x_84 == 0) +{ +lean_free_object(x_80); +lean_dec(x_82); +lean_dec(x_78); +lean_dec(x_77); lean_dec(x_1); -return x_33; +return x_79; } else { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_inc(x_32); -x_38 = l_Lean_Parser_ParserState_restore(x_33, x_31, x_32); -lean_dec(x_31); -x_39 = lean_unsigned_to_nat(1024u); -x_40 = l_Lean_Parser_checkPrecFn(x_39, x_1, x_38); -x_41 = lean_ctor_get(x_40, 3); -lean_inc(x_41); -if (lean_obj_tag(x_41) == 0) +lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +lean_inc(x_78); +x_85 = l_Lean_Parser_ParserState_restore(x_79, x_77, x_78); +lean_dec(x_77); +x_86 = lean_unsigned_to_nat(1024u); +x_87 = l_Lean_Parser_checkPrecFn(x_86, x_1, x_85); +x_88 = lean_ctor_get(x_87, 3); +lean_inc(x_88); +if (lean_obj_tag(x_88) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_42 = lean_ctor_get(x_40, 0); -lean_inc(x_42); -x_43 = lean_array_get_size(x_42); -lean_dec(x_42); -x_44 = l_Lean_Parser_Tactic_subst___elambda__1___closed__5; -x_45 = l_Lean_Parser_Tactic_subst___elambda__1___closed__7; +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_89 = lean_ctor_get(x_87, 0); +lean_inc(x_89); +x_90 = lean_array_get_size(x_89); +lean_dec(x_89); +x_91 = l_Lean_Parser_Tactic_subst___elambda__1___closed__5; +x_92 = l_Lean_Parser_Tactic_subst___elambda__1___closed__7; lean_inc(x_1); -x_46 = l_Lean_Parser_nonReservedSymbolFnAux(x_44, x_45, x_1, x_40); -x_47 = lean_ctor_get(x_46, 3); -lean_inc(x_47); -if (lean_obj_tag(x_47) == 0) +x_93 = l_Lean_Parser_nonReservedSymbolFnAux(x_91, x_92, x_1, x_87); +x_94 = lean_ctor_get(x_93, 3); +lean_inc(x_94); +if (lean_obj_tag(x_94) == 0) { -lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_48 = lean_ctor_get(x_46, 0); -lean_inc(x_48); -x_49 = lean_array_get_size(x_48); -lean_dec(x_48); +uint8_t x_95; +x_95 = !lean_is_exclusive(x_1); +if (x_95 == 0) +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; +x_96 = lean_ctor_get(x_1, 0); +x_97 = lean_ctor_get(x_1, 4); +lean_dec(x_97); +x_98 = lean_ctor_get(x_96, 2); +lean_inc(x_98); +x_99 = lean_ctor_get(x_93, 1); +lean_inc(x_99); +x_100 = l_Lean_FileMap_toPosition(x_98, x_99); +lean_dec(x_98); +lean_inc(x_100); +lean_ctor_set(x_80, 0, x_100); +lean_ctor_set(x_1, 4, x_80); +x_101 = lean_ctor_get(x_93, 0); +lean_inc(x_101); +x_102 = lean_array_get_size(x_101); +lean_dec(x_101); +x_103 = lean_ctor_get(x_100, 1); +lean_inc(x_103); +lean_dec(x_100); +x_104 = lean_nat_dec_le(x_103, x_103); +lean_dec(x_103); +if (x_104 == 0) +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111; lean_object* x_112; +lean_dec(x_1); +x_105 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_106 = l_Lean_Parser_ParserState_mkError(x_93, x_105); +x_107 = l_Lean_nullKind; +x_108 = l_Lean_Parser_ParserState_mkNode(x_106, x_107, x_102); +x_109 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_110 = l_Lean_Parser_ParserState_mkNode(x_108, x_109, x_90); +x_111 = 1; +x_112 = l_Lean_Parser_mergeOrElseErrors(x_110, x_82, x_78, x_111); +lean_dec(x_78); +return x_112; +} +else +{ +lean_object* x_113; lean_object* x_114; lean_inc(x_1); -x_50 = l_Lean_Parser_ident___elambda__1(x_1, x_46); -x_51 = lean_ctor_get(x_50, 3); -lean_inc(x_51); -if (lean_obj_tag(x_51) == 0) +x_113 = l_Lean_Parser_ident___elambda__1(x_1, x_93); +x_114 = lean_ctor_get(x_113, 3); +lean_inc(x_114); +if (lean_obj_tag(x_114) == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; lean_object* x_58; -x_52 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_50); -x_53 = l_Lean_nullKind; -x_54 = l_Lean_Parser_ParserState_mkNode(x_52, x_53, x_49); -x_55 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; -x_56 = l_Lean_Parser_ParserState_mkNode(x_54, x_55, x_43); -x_57 = 1; -x_58 = l_Lean_Parser_mergeOrElseErrors(x_56, x_35, x_32, x_57); -lean_dec(x_32); -return x_58; +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; uint8_t x_120; lean_object* x_121; +x_115 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_113); +x_116 = l_Lean_nullKind; +x_117 = l_Lean_Parser_ParserState_mkNode(x_115, x_116, x_102); +x_118 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_119 = l_Lean_Parser_ParserState_mkNode(x_117, x_118, x_90); +x_120 = 1; +x_121 = l_Lean_Parser_mergeOrElseErrors(x_119, x_82, x_78, x_120); +lean_dec(x_78); +return x_121; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63; lean_object* x_64; -lean_dec(x_51); +lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; uint8_t x_126; lean_object* x_127; +lean_dec(x_114); lean_dec(x_1); -x_59 = l_Lean_nullKind; -x_60 = l_Lean_Parser_ParserState_mkNode(x_50, x_59, x_49); -x_61 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; -x_62 = l_Lean_Parser_ParserState_mkNode(x_60, x_61, x_43); -x_63 = 1; -x_64 = l_Lean_Parser_mergeOrElseErrors(x_62, x_35, x_32, x_63); -lean_dec(x_32); -return x_64; +x_122 = l_Lean_nullKind; +x_123 = l_Lean_Parser_ParserState_mkNode(x_113, x_122, x_102); +x_124 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_125 = l_Lean_Parser_ParserState_mkNode(x_123, x_124, x_90); +x_126 = 1; +x_127 = l_Lean_Parser_mergeOrElseErrors(x_125, x_82, x_78, x_126); +lean_dec(x_78); +return x_127; +} } } else { -lean_object* x_65; lean_object* x_66; uint8_t x_67; lean_object* x_68; -lean_dec(x_47); +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; uint8_t x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; uint8_t x_140; +x_128 = lean_ctor_get(x_1, 0); +x_129 = lean_ctor_get(x_1, 1); +x_130 = lean_ctor_get(x_1, 2); +x_131 = lean_ctor_get(x_1, 3); +x_132 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_131); +lean_inc(x_130); +lean_inc(x_129); +lean_inc(x_128); lean_dec(x_1); -x_65 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; -x_66 = l_Lean_Parser_ParserState_mkNode(x_46, x_65, x_43); -x_67 = 1; -x_68 = l_Lean_Parser_mergeOrElseErrors(x_66, x_35, x_32, x_67); -lean_dec(x_32); -return x_68; +x_133 = lean_ctor_get(x_128, 2); +lean_inc(x_133); +x_134 = lean_ctor_get(x_93, 1); +lean_inc(x_134); +x_135 = l_Lean_FileMap_toPosition(x_133, x_134); +lean_dec(x_133); +lean_inc(x_135); +lean_ctor_set(x_80, 0, x_135); +x_136 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_136, 0, x_128); +lean_ctor_set(x_136, 1, x_129); +lean_ctor_set(x_136, 2, x_130); +lean_ctor_set(x_136, 3, x_131); +lean_ctor_set(x_136, 4, x_80); +lean_ctor_set_uint8(x_136, sizeof(void*)*5, x_132); +x_137 = lean_ctor_get(x_93, 0); +lean_inc(x_137); +x_138 = lean_array_get_size(x_137); +lean_dec(x_137); +x_139 = lean_ctor_get(x_135, 1); +lean_inc(x_139); +lean_dec(x_135); +x_140 = lean_nat_dec_le(x_139, x_139); +lean_dec(x_139); +if (x_140 == 0) +{ +lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; uint8_t x_147; lean_object* x_148; +lean_dec(x_136); +x_141 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_142 = l_Lean_Parser_ParserState_mkError(x_93, x_141); +x_143 = l_Lean_nullKind; +x_144 = l_Lean_Parser_ParserState_mkNode(x_142, x_143, x_138); +x_145 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_146 = l_Lean_Parser_ParserState_mkNode(x_144, x_145, x_90); +x_147 = 1; +x_148 = l_Lean_Parser_mergeOrElseErrors(x_146, x_82, x_78, x_147); +lean_dec(x_78); +return x_148; +} +else +{ +lean_object* x_149; lean_object* x_150; +lean_inc(x_136); +x_149 = l_Lean_Parser_ident___elambda__1(x_136, x_93); +x_150 = lean_ctor_get(x_149, 3); +lean_inc(x_150); +if (lean_obj_tag(x_150) == 0) +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; uint8_t x_156; lean_object* x_157; +x_151 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_136, x_149); +x_152 = l_Lean_nullKind; +x_153 = l_Lean_Parser_ParserState_mkNode(x_151, x_152, x_138); +x_154 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_155 = l_Lean_Parser_ParserState_mkNode(x_153, x_154, x_90); +x_156 = 1; +x_157 = l_Lean_Parser_mergeOrElseErrors(x_155, x_82, x_78, x_156); +lean_dec(x_78); +return x_157; +} +else +{ +lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; uint8_t x_162; lean_object* x_163; +lean_dec(x_150); +lean_dec(x_136); +x_158 = l_Lean_nullKind; +x_159 = l_Lean_Parser_ParserState_mkNode(x_149, x_158, x_138); +x_160 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_161 = l_Lean_Parser_ParserState_mkNode(x_159, x_160, x_90); +x_162 = 1; +x_163 = l_Lean_Parser_mergeOrElseErrors(x_161, x_82, x_78, x_162); +lean_dec(x_78); +return x_163; +} +} } } else { -uint8_t x_69; lean_object* x_70; -lean_dec(x_41); +lean_object* x_164; lean_object* x_165; uint8_t x_166; lean_object* x_167; +lean_dec(x_94); +lean_free_object(x_80); lean_dec(x_1); -x_69 = 1; -x_70 = l_Lean_Parser_mergeOrElseErrors(x_40, x_35, x_32, x_69); -lean_dec(x_32); -return x_70; +x_164 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_165 = l_Lean_Parser_ParserState_mkNode(x_93, x_164, x_90); +x_166 = 1; +x_167 = l_Lean_Parser_mergeOrElseErrors(x_165, x_82, x_78, x_166); +lean_dec(x_78); +return x_167; +} +} +else +{ +uint8_t x_168; lean_object* x_169; +lean_dec(x_88); +lean_free_object(x_80); +lean_dec(x_1); +x_168 = 1; +x_169 = l_Lean_Parser_mergeOrElseErrors(x_87, x_82, x_78, x_168); +lean_dec(x_78); +return x_169; +} +} +} +else +{ +lean_object* x_170; lean_object* x_171; uint8_t x_172; +x_170 = lean_ctor_get(x_80, 0); +lean_inc(x_170); +lean_dec(x_80); +x_171 = lean_ctor_get(x_79, 1); +lean_inc(x_171); +x_172 = lean_nat_dec_eq(x_171, x_78); +lean_dec(x_171); +if (x_172 == 0) +{ +lean_dec(x_170); +lean_dec(x_78); +lean_dec(x_77); +lean_dec(x_1); +return x_79; +} +else +{ +lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; +lean_inc(x_78); +x_173 = l_Lean_Parser_ParserState_restore(x_79, x_77, x_78); +lean_dec(x_77); +x_174 = lean_unsigned_to_nat(1024u); +x_175 = l_Lean_Parser_checkPrecFn(x_174, x_1, x_173); +x_176 = lean_ctor_get(x_175, 3); +lean_inc(x_176); +if (lean_obj_tag(x_176) == 0) +{ +lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; +x_177 = lean_ctor_get(x_175, 0); +lean_inc(x_177); +x_178 = lean_array_get_size(x_177); +lean_dec(x_177); +x_179 = l_Lean_Parser_Tactic_subst___elambda__1___closed__5; +x_180 = l_Lean_Parser_Tactic_subst___elambda__1___closed__7; +lean_inc(x_1); +x_181 = l_Lean_Parser_nonReservedSymbolFnAux(x_179, x_180, x_1, x_175); +x_182 = lean_ctor_get(x_181, 3); +lean_inc(x_182); +if (lean_obj_tag(x_182) == 0) +{ +lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; uint8_t x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; uint8_t x_197; +x_183 = lean_ctor_get(x_1, 0); +lean_inc(x_183); +x_184 = lean_ctor_get(x_1, 1); +lean_inc(x_184); +x_185 = lean_ctor_get(x_1, 2); +lean_inc(x_185); +x_186 = lean_ctor_get(x_1, 3); +lean_inc(x_186); +x_187 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +if (lean_is_exclusive(x_1)) { + lean_ctor_release(x_1, 0); + lean_ctor_release(x_1, 1); + lean_ctor_release(x_1, 2); + lean_ctor_release(x_1, 3); + lean_ctor_release(x_1, 4); + x_188 = x_1; +} else { + lean_dec_ref(x_1); + x_188 = lean_box(0); +} +x_189 = lean_ctor_get(x_183, 2); +lean_inc(x_189); +x_190 = lean_ctor_get(x_181, 1); +lean_inc(x_190); +x_191 = l_Lean_FileMap_toPosition(x_189, x_190); +lean_dec(x_189); +lean_inc(x_191); +x_192 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_192, 0, x_191); +if (lean_is_scalar(x_188)) { + x_193 = lean_alloc_ctor(0, 5, 1); +} else { + x_193 = x_188; +} +lean_ctor_set(x_193, 0, x_183); +lean_ctor_set(x_193, 1, x_184); +lean_ctor_set(x_193, 2, x_185); +lean_ctor_set(x_193, 3, x_186); +lean_ctor_set(x_193, 4, x_192); +lean_ctor_set_uint8(x_193, sizeof(void*)*5, x_187); +x_194 = lean_ctor_get(x_181, 0); +lean_inc(x_194); +x_195 = lean_array_get_size(x_194); +lean_dec(x_194); +x_196 = lean_ctor_get(x_191, 1); +lean_inc(x_196); +lean_dec(x_191); +x_197 = lean_nat_dec_le(x_196, x_196); +lean_dec(x_196); +if (x_197 == 0) +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; uint8_t x_204; lean_object* x_205; +lean_dec(x_193); +x_198 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_199 = l_Lean_Parser_ParserState_mkError(x_181, x_198); +x_200 = l_Lean_nullKind; +x_201 = l_Lean_Parser_ParserState_mkNode(x_199, x_200, x_195); +x_202 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_203 = l_Lean_Parser_ParserState_mkNode(x_201, x_202, x_178); +x_204 = 1; +x_205 = l_Lean_Parser_mergeOrElseErrors(x_203, x_170, x_78, x_204); +lean_dec(x_78); +return x_205; +} +else +{ +lean_object* x_206; lean_object* x_207; +lean_inc(x_193); +x_206 = l_Lean_Parser_ident___elambda__1(x_193, x_181); +x_207 = lean_ctor_get(x_206, 3); +lean_inc(x_207); +if (lean_obj_tag(x_207) == 0) +{ +lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; uint8_t x_213; lean_object* x_214; +x_208 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_193, x_206); +x_209 = l_Lean_nullKind; +x_210 = l_Lean_Parser_ParserState_mkNode(x_208, x_209, x_195); +x_211 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_212 = l_Lean_Parser_ParserState_mkNode(x_210, x_211, x_178); +x_213 = 1; +x_214 = l_Lean_Parser_mergeOrElseErrors(x_212, x_170, x_78, x_213); +lean_dec(x_78); +return x_214; +} +else +{ +lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; uint8_t x_219; lean_object* x_220; +lean_dec(x_207); +lean_dec(x_193); +x_215 = l_Lean_nullKind; +x_216 = l_Lean_Parser_ParserState_mkNode(x_206, x_215, x_195); +x_217 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_218 = l_Lean_Parser_ParserState_mkNode(x_216, x_217, x_178); +x_219 = 1; +x_220 = l_Lean_Parser_mergeOrElseErrors(x_218, x_170, x_78, x_219); +lean_dec(x_78); +return x_220; +} +} +} +else +{ +lean_object* x_221; lean_object* x_222; uint8_t x_223; lean_object* x_224; +lean_dec(x_182); +lean_dec(x_1); +x_221 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; +x_222 = l_Lean_Parser_ParserState_mkNode(x_181, x_221, x_178); +x_223 = 1; +x_224 = l_Lean_Parser_mergeOrElseErrors(x_222, x_170, x_78, x_223); +lean_dec(x_78); +return x_224; +} +} +else +{ +uint8_t x_225; lean_object* x_226; +lean_dec(x_176); +lean_dec(x_1); +x_225 = 1; +x_226 = l_Lean_Parser_mergeOrElseErrors(x_175, x_170, x_78, x_225); +lean_dec(x_78); +return x_226; +} } } } @@ -4843,13 +6883,11 @@ return x_3; lean_object* _init_l_Lean_Parser_Tactic_subst___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_ident; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -x_3 = l_Lean_Parser_Tactic_subst___closed__1; -x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); -return x_4; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_subst___closed__1; +x_2 = l_Lean_Parser_Tactic_revert___closed__2; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; } } lean_object* _init_l_Lean_Parser_Tactic_subst___closed__3() { @@ -12527,6 +14565,68 @@ x_1 = l_Lean_Parser_Tactic_locationTarget___closed__6; return x_1; } } +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_locationHyp___elambda__1___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +x_4 = lean_array_get_size(x_3); +lean_dec(x_3); +x_5 = lean_ctor_get(x_2, 1); +lean_inc(x_5); +lean_inc(x_1); +x_6 = l_Lean_Parser_ident___elambda__1(x_1, x_2); +x_7 = lean_ctor_get(x_6, 3); +lean_inc(x_7); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_8; uint8_t x_9; +lean_dec(x_4); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +x_9 = lean_nat_dec_eq(x_5, x_8); +lean_dec(x_8); +lean_dec(x_5); +if (x_9 == 0) +{ +x_2 = x_6; +goto _start; +} +else +{ +lean_object* x_11; lean_object* x_12; +lean_dec(x_1); +x_11 = l_Lean_Parser_manyAux___main___closed__1; +x_12 = l_Lean_Parser_ParserState_mkUnexpectedError(x_6, x_11); +return x_12; +} +} +else +{ +lean_object* x_13; uint8_t x_14; +lean_dec(x_7); +lean_dec(x_1); +x_13 = lean_ctor_get(x_6, 1); +lean_inc(x_13); +x_14 = lean_nat_dec_eq(x_5, x_13); +lean_dec(x_13); +if (x_14 == 0) +{ +lean_dec(x_5); +lean_dec(x_4); +return x_6; +} +else +{ +lean_object* x_15; +x_15 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); +lean_dec(x_4); +return x_15; +} +} +} +} lean_object* _init_l_Lean_Parser_Tactic_locationHyp___elambda__1___closed__1() { _start: { @@ -12598,7 +14698,7 @@ lean_inc(x_12); if (lean_obj_tag(x_12) == 0) { lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_13 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_11); +x_13 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_locationHyp___elambda__1___spec__1(x_1, x_11); x_14 = l_Lean_nullKind; lean_inc(x_10); x_15 = l_Lean_Parser_ParserState_mkNode(x_13, x_14, x_10); @@ -12688,7 +14788,7 @@ lean_inc(x_37); if (lean_obj_tag(x_37) == 0) { lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; uint8_t x_43; lean_object* x_44; -x_38 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_36); +x_38 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_locationHyp___elambda__1___spec__1(x_1, x_36); x_39 = l_Lean_nullKind; lean_inc(x_35); x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_35); @@ -14061,10 +16161,20 @@ return x_5; lean_object* _init_l_Lean_Parser_Tactic_locationHyp_formatter___closed__2() { _start: { +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Level_ident_formatter___closed__1; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_many1_formatter), 6, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_Tactic_locationHyp_formatter___closed__3() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_locationHyp___elambda__1___closed__2; x_2 = lean_unsigned_to_nat(1024u); -x_3 = l_Lean_Parser_Tactic_revert_formatter___closed__3; +x_3 = l_Lean_Parser_Tactic_locationHyp_formatter___closed__2; x_4 = lean_alloc_closure((void*)(l_Lean_Parser_leadingNode_formatter___boxed), 8, 3); lean_closure_set(x_4, 0, x_1); lean_closure_set(x_4, 1, x_2); @@ -14077,7 +16187,7 @@ _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; x_6 = l_Lean_Parser_Tactic_locationHyp_formatter___closed__1; -x_7 = l_Lean_Parser_Tactic_locationHyp_formatter___closed__2; +x_7 = l_Lean_Parser_Tactic_locationHyp_formatter___closed__3; x_8 = l_Lean_PrettyPrinter_Formatter_orelse_formatter(x_6, x_7, x_1, x_2, x_3, x_4, x_5); return x_8; } @@ -14391,10 +16501,20 @@ return x_4; lean_object* _init_l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__2() { _start: { +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Level_ident_parenthesizer___closed__1; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_many1_parenthesizer), 6, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__3() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_locationHyp___elambda__1___closed__2; x_2 = lean_unsigned_to_nat(1024u); -x_3 = l_Lean_Parser_Tactic_revert_parenthesizer___closed__2; +x_3 = l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__2; x_4 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___boxed), 8, 3); lean_closure_set(x_4, 0, x_1); lean_closure_set(x_4, 1, x_2); @@ -14407,7 +16527,7 @@ _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; x_6 = l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__1; -x_7 = l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__2; +x_7 = l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__3; x_8 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(x_6, x_7, x_1, x_2, x_3, x_4, x_5); return x_8; } @@ -19683,6 +21803,17 @@ return x_3; lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__3() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_ident_x27; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_noFirstTokenInfo(x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__4() { +_start: +{ lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Tactic_ident_x27___closed__2; x_2 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn), 3, 1); @@ -19690,7 +21821,7 @@ lean_closure_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__4() { +lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; @@ -19704,7 +21835,7 @@ x_5 = l_Lean_Parser_andthenInfo(x_2, x_4); return x_5; } } -lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__5() { +lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -19716,71 +21847,71 @@ lean_closure_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intros___closed__2; -x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__4; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); -return x_3; -} -} lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__7() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Tactic_inductionAlt___closed__3; x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__5; -x_3 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn), 4, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } } lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__8() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Tactic_ident_x27; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -x_3 = l_Lean_Parser_Tactic_inductionAlt___closed__6; -x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); -return x_4; -} -} -lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__9() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_ident_x27___closed__2; -x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__7; +x_1 = l_Lean_Parser_Tactic_inductionAlt___closed__4; +x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__6; x_3 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn), 4, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); return x_3; } } +lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__9() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Lean_Parser_Tactic_ident_x27; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Tactic_inductionAlt___closed__7; +x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); +return x_4; +} +} lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_inductionAlt___closed__8; -x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__9; -x_3 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3, 0, x_1); -lean_ctor_set(x_3, 1, x_2); +x_1 = l_Lean_Parser_Tactic_ident_x27___closed__2; +x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__8; +x_3 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn), 4, 2); +lean_closure_set(x_3, 0, x_1); +lean_closure_set(x_3, 1, x_2); return x_3; } } lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__11() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_inductionAlt___closed__9; +x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__10; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_inductionAlt___closed__12() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_inductionAlt___closed__1; x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__2; -x_3 = l_Lean_Parser_Tactic_inductionAlt___closed__10; +x_3 = l_Lean_Parser_Tactic_inductionAlt___closed__11; x_4 = l_Lean_Parser_nodeWithAntiquot(x_1, x_2, x_3); return x_4; } @@ -19789,7 +21920,7 @@ lean_object* _init_l_Lean_Parser_Tactic_inductionAlt() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Tactic_inductionAlt___closed__11; +x_1 = l_Lean_Parser_Tactic_inductionAlt___closed__12; return x_1; } } @@ -20840,7 +22971,7 @@ lean_inc(x_11); if (lean_obj_tag(x_11) == 0) { lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_revert___elambda__1___spec__1(x_1, x_10); +x_12 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_locationHyp___elambda__1___spec__1(x_1, x_10); x_13 = l_Lean_nullKind; x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_9); x_15 = lean_ctor_get(x_14, 3); @@ -21575,7 +23706,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Tactic_generalizingVars_formatter___closed__1; -x_2 = l_Lean_Parser_Tactic_revert_formatter___closed__3; +x_2 = l_Lean_Parser_Tactic_locationHyp_formatter___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -21616,28 +23747,26 @@ return x_8; lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_formatter___closed__1() { _start: { -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_altRHS_formatter), 5, 0); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Tactic_intros_formatter___closed__3; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_many_formatter), 6, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_formatter___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_matchAlt_formatter___closed__1; -x_2 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__1; -x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); -return x_3; +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_altRHS_formatter), 5, 0); +return x_1; } } lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_formatter___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intros_formatter___closed__4; +x_1 = l_Lean_Parser_Term_matchAlt_formatter___closed__1; x_2 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -21649,7 +23778,7 @@ lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_formatter___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intros_formatter___closed__3; +x_1 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__1; x_2 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__3; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -21657,13 +23786,25 @@ lean_closure_set(x_3, 1, x_2); return x_3; } } +lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_formatter___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_intros_formatter___closed__3; +x_2 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__4; +x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); +lean_closure_set(x_3, 0, x_1); +lean_closure_set(x_3, 1, x_2); +return x_3; +} +} lean_object* l_Lean_Parser_Tactic_inductionAlt_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; x_6 = l_Lean_Parser_Tactic_inductionAlt___closed__1; x_7 = l_Lean_Parser_Tactic_inductionAlt___closed__2; -x_8 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__4; +x_8 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__5; x_9 = l_Lean_Parser_nodeWithAntiquot_formatter(x_6, x_7, x_8, x_1, x_2, x_3, x_4, x_5); return x_9; } @@ -21938,7 +24079,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; -x_2 = l_Lean_Parser_Tactic_revert_parenthesizer___closed__2; +x_2 = l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -21979,28 +24120,26 @@ return x_8; lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__1() { _start: { -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_altRHS_parenthesizer), 5, 0); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Tactic_intros_parenthesizer___closed__2; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer), 6, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_matchAlt_parenthesizer___closed__1; -x_2 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__1; -x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); -return x_3; +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_altRHS_parenthesizer), 5, 0); +return x_1; } } lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intros_parenthesizer___closed__3; +x_1 = l_Lean_Parser_Term_matchAlt_parenthesizer___closed__1; x_2 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -22012,7 +24151,7 @@ lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__4() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intros_parenthesizer___closed__2; +x_1 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__1; x_2 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__3; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -22020,12 +24159,24 @@ lean_closure_set(x_3, 1, x_2); return x_3; } } +lean_object* _init_l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_intros_parenthesizer___closed__2; +x_2 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__4; +x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); +lean_closure_set(x_3, 0, x_1); +lean_closure_set(x_3, 1, x_2); +return x_3; +} +} lean_object* l_Lean_Parser_Tactic_inductionAlt_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; x_6 = l_Lean_Parser_Tactic_inductionAlt___closed__2; -x_7 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__4; +x_7 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__5; x_8 = l_Lean_Parser_nodeWithAntiquot_parenthesizer___rarg(x_6, x_7, x_1, x_2, x_3, x_4, x_5); return x_8; } @@ -23000,7 +25151,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_matchAlt___closed__3; -x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__4; +x_2 = l_Lean_Parser_Tactic_inductionAlt___closed__5; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } @@ -24302,7 +26453,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_tupleTail_formatter___closed__3; -x_2 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__2; +x_2 = l_Lean_Parser_Tactic_inductionAlt_formatter___closed__3; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -24527,7 +26678,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_tupleTail_parenthesizer___closed__2; -x_2 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__2; +x_2 = l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__3; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -24582,7 +26733,7 @@ lean_object* _init_l_Lean_Parser_Tactic_matchAlts_parenthesizer___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; x_2 = l_Lean_Parser_Tactic_matchAlts_parenthesizer___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -25140,6 +27291,68 @@ x_5 = l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(x_2, x_3, x_4, x_1); return x_5; } } +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_withIds___elambda__1___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +x_4 = lean_array_get_size(x_3); +lean_dec(x_3); +x_5 = lean_ctor_get(x_2, 1); +lean_inc(x_5); +lean_inc(x_1); +x_6 = l_Lean_Parser_Tactic_ident_x27___elambda__1(x_1, x_2); +x_7 = lean_ctor_get(x_6, 3); +lean_inc(x_7); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_8; uint8_t x_9; +lean_dec(x_4); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +x_9 = lean_nat_dec_eq(x_5, x_8); +lean_dec(x_8); +lean_dec(x_5); +if (x_9 == 0) +{ +x_2 = x_6; +goto _start; +} +else +{ +lean_object* x_11; lean_object* x_12; +lean_dec(x_1); +x_11 = l_Lean_Parser_manyAux___main___closed__1; +x_12 = l_Lean_Parser_ParserState_mkUnexpectedError(x_6, x_11); +return x_12; +} +} +else +{ +lean_object* x_13; uint8_t x_14; +lean_dec(x_7); +lean_dec(x_1); +x_13 = lean_ctor_get(x_6, 1); +lean_inc(x_13); +x_14 = lean_nat_dec_eq(x_5, x_13); +lean_dec(x_13); +if (x_14 == 0) +{ +lean_dec(x_5); +lean_dec(x_4); +return x_6; +} +else +{ +lean_object* x_15; +x_15 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); +lean_dec(x_4); +return x_15; +} +} +} +} lean_object* l_Lean_Parser_Tactic_withIds___elambda__1(lean_object* x_1, lean_object* x_2) { _start: { @@ -25225,7 +27438,7 @@ lean_inc(x_11); if (lean_obj_tag(x_11) == 0) { lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(x_1, x_10); +x_12 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_withIds___elambda__1___spec__1(x_1, x_10); x_13 = l_Lean_nullKind; x_14 = l_Lean_Parser_ParserState_mkNode(x_12, x_13, x_9); x_15 = lean_ctor_get(x_14, 3); @@ -29896,6 +32109,8 @@ l_Lean_Parser_Tactic_intro___closed__8 = _init_l_Lean_Parser_Tactic_intro___clos lean_mark_persistent(l_Lean_Parser_Tactic_intro___closed__8); l_Lean_Parser_Tactic_intro___closed__9 = _init_l_Lean_Parser_Tactic_intro___closed__9(); lean_mark_persistent(l_Lean_Parser_Tactic_intro___closed__9); +l_Lean_Parser_Tactic_intro___closed__10 = _init_l_Lean_Parser_Tactic_intro___closed__10(); +lean_mark_persistent(l_Lean_Parser_Tactic_intro___closed__10); l_Lean_Parser_Tactic_intro = _init_l_Lean_Parser_Tactic_intro(); lean_mark_persistent(l_Lean_Parser_Tactic_intro); res = l___regBuiltinParser_Lean_Parser_Tactic_intro(lean_io_mk_world()); @@ -29969,6 +32184,8 @@ l_Lean_Parser_Tactic_intros___closed__7 = _init_l_Lean_Parser_Tactic_intros___cl lean_mark_persistent(l_Lean_Parser_Tactic_intros___closed__7); l_Lean_Parser_Tactic_intros___closed__8 = _init_l_Lean_Parser_Tactic_intros___closed__8(); lean_mark_persistent(l_Lean_Parser_Tactic_intros___closed__8); +l_Lean_Parser_Tactic_intros___closed__9 = _init_l_Lean_Parser_Tactic_intros___closed__9(); +lean_mark_persistent(l_Lean_Parser_Tactic_intros___closed__9); l_Lean_Parser_Tactic_intros = _init_l_Lean_Parser_Tactic_intros(); lean_mark_persistent(l_Lean_Parser_Tactic_intros); res = l___regBuiltinParser_Lean_Parser_Tactic_intros(lean_io_mk_world()); @@ -30040,6 +32257,8 @@ l_Lean_Parser_Tactic_revert___closed__6 = _init_l_Lean_Parser_Tactic_revert___cl lean_mark_persistent(l_Lean_Parser_Tactic_revert___closed__6); l_Lean_Parser_Tactic_revert___closed__7 = _init_l_Lean_Parser_Tactic_revert___closed__7(); lean_mark_persistent(l_Lean_Parser_Tactic_revert___closed__7); +l_Lean_Parser_Tactic_revert___closed__8 = _init_l_Lean_Parser_Tactic_revert___closed__8(); +lean_mark_persistent(l_Lean_Parser_Tactic_revert___closed__8); l_Lean_Parser_Tactic_revert = _init_l_Lean_Parser_Tactic_revert(); lean_mark_persistent(l_Lean_Parser_Tactic_revert); res = l___regBuiltinParser_Lean_Parser_Tactic_revert(lean_io_mk_world()); @@ -31139,6 +33358,8 @@ l_Lean_Parser_Tactic_locationHyp_formatter___closed__1 = _init_l_Lean_Parser_Tac lean_mark_persistent(l_Lean_Parser_Tactic_locationHyp_formatter___closed__1); l_Lean_Parser_Tactic_locationHyp_formatter___closed__2 = _init_l_Lean_Parser_Tactic_locationHyp_formatter___closed__2(); lean_mark_persistent(l_Lean_Parser_Tactic_locationHyp_formatter___closed__2); +l_Lean_Parser_Tactic_locationHyp_formatter___closed__3 = _init_l_Lean_Parser_Tactic_locationHyp_formatter___closed__3(); +lean_mark_persistent(l_Lean_Parser_Tactic_locationHyp_formatter___closed__3); l_Lean_Parser_Tactic_location_formatter___closed__1 = _init_l_Lean_Parser_Tactic_location_formatter___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_location_formatter___closed__1); l_Lean_Parser_Tactic_location_formatter___closed__2 = _init_l_Lean_Parser_Tactic_location_formatter___closed__2(); @@ -31188,6 +33409,8 @@ l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__1 = _init_l_Lean_Parser lean_mark_persistent(l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__1); l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__2 = _init_l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__2(); lean_mark_persistent(l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__2); +l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__3 = _init_l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__3(); +lean_mark_persistent(l_Lean_Parser_Tactic_locationHyp_parenthesizer___closed__3); l_Lean_Parser_Tactic_location_parenthesizer___closed__1 = _init_l_Lean_Parser_Tactic_location_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_location_parenthesizer___closed__1); l_Lean_Parser_Tactic_location_parenthesizer___closed__2 = _init_l_Lean_Parser_Tactic_location_parenthesizer___closed__2(); @@ -31592,6 +33815,8 @@ l_Lean_Parser_Tactic_inductionAlt___closed__10 = _init_l_Lean_Parser_Tactic_indu lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt___closed__10); l_Lean_Parser_Tactic_inductionAlt___closed__11 = _init_l_Lean_Parser_Tactic_inductionAlt___closed__11(); lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt___closed__11); +l_Lean_Parser_Tactic_inductionAlt___closed__12 = _init_l_Lean_Parser_Tactic_inductionAlt___closed__12(); +lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt___closed__12); l_Lean_Parser_Tactic_inductionAlt = _init_l_Lean_Parser_Tactic_inductionAlt(); lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt); l_Lean_Parser_Tactic_inductionAlts___closed__1 = _init_l_Lean_Parser_Tactic_inductionAlts___closed__1(); @@ -31725,6 +33950,8 @@ l_Lean_Parser_Tactic_inductionAlt_formatter___closed__3 = _init_l_Lean_Parser_Ta lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt_formatter___closed__3); l_Lean_Parser_Tactic_inductionAlt_formatter___closed__4 = _init_l_Lean_Parser_Tactic_inductionAlt_formatter___closed__4(); lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt_formatter___closed__4); +l_Lean_Parser_Tactic_inductionAlt_formatter___closed__5 = _init_l_Lean_Parser_Tactic_inductionAlt_formatter___closed__5(); +lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt_formatter___closed__5); l_Lean_Parser_Tactic_inductionAlts_formatter___closed__1 = _init_l_Lean_Parser_Tactic_inductionAlts_formatter___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlts_formatter___closed__1); l_Lean_Parser_Tactic_inductionAlts_formatter___closed__2 = _init_l_Lean_Parser_Tactic_inductionAlts_formatter___closed__2(); @@ -31778,6 +34005,8 @@ l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__3 = _init_l_Lean_Parse lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__3); l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__4 = _init_l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__4(); lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__4); +l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__5 = _init_l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__5(); +lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlt_parenthesizer___closed__5); l_Lean_Parser_Tactic_inductionAlts_parenthesizer___closed__1 = _init_l_Lean_Parser_Tactic_inductionAlts_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_inductionAlts_parenthesizer___closed__1); l_Lean_Parser_Tactic_inductionAlts_parenthesizer___closed__2 = _init_l_Lean_Parser_Tactic_inductionAlts_parenthesizer___closed__2(); diff --git a/stage0/stdlib/Lean/Parser/Term.c b/stage0/stdlib/Lean/Parser/Term.c index 14e6cc81c7..23c402799e 100644 --- a/stage0/stdlib/Lean/Parser/Term.c +++ b/stage0/stdlib/Lean/Parser/Term.c @@ -17,6 +17,7 @@ lean_object* l_Lean_Parser_Term_if___elambda__1___closed__15; lean_object* l_Lean_Parser_Term_le_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_subst___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_panic_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__3; lean_object* l_Lean_Parser_Term_match___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_fcomp___elambda__1___closed__4; lean_object* l_Lean_Parser_Level_quot_formatter___closed__6; @@ -55,6 +56,7 @@ lean_object* l_Lean_Parser_Term_letIdDecl; lean_object* l_Lean_Parser_Term_heq___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented___closed__7; lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_many1Indent_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_dbgTrace___closed__5; lean_object* l_Lean_Parser_Term_parser_x21___elambda__1___closed__5; lean_object* l___regBuiltin_Lean_Parser_Term_str_parenthesizer___closed__1; @@ -105,7 +107,6 @@ lean_object* l_Lean_Parser_Term_bindOp___elambda__1(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_manyAux___main___closed__1; lean_object* l___regBuiltin_Lean_Parser_Term_forall_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_if___closed__13; -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__3; lean_object* l_Lean_Parser_Term_byTactic_formatter___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Term_sub(lean_object*); lean_object* l_Lean_Parser_Term_andthen___elambda__1___closed__1; @@ -344,7 +345,6 @@ lean_object* l_Lean_Parser_Term_eq___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_match_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__3; -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__2; lean_object* l_Lean_Parser_Term_letEqnsDecl___closed__1; lean_object* l_Lean_Parser_Term_where; lean_object* l_Lean_Parser_Term_quotedName___closed__1; @@ -357,6 +357,7 @@ lean_object* l_Lean_Parser_Term_inaccessible___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_seqLeft___closed__2; lean_object* l_Lean_Parser_Term_attributes_parenthesizer___closed__5; lean_object* l_Lean_Parser_Term_return___closed__7; +lean_object* l_Lean_Parser_many1Indent_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_namedArgument___closed__5; lean_object* l_Lean_Parser_Term_app_formatter___closed__6; lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -673,6 +674,7 @@ lean_object* l_Lean_Parser_Term_bor_parenthesizer(lean_object*, lean_object*, le lean_object* l_Lean_Parser_Term_structInst_formatter___closed__11; lean_object* l_Lean_Parser_Term_where_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_heq___closed__2; +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; extern lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_cons___closed__4; lean_object* l_Lean_Parser_Term_andM___elambda__1___closed__1; @@ -765,7 +767,6 @@ lean_object* l___regBuiltin_Lean_Parser_Term_prod_formatter___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Term_let_x21(lean_object*); lean_object* l_Lean_Parser_Term_let___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_suffices_parenthesizer___closed__2; -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__2; lean_object* l_Lean_Parser_Term_not___closed__3; lean_object* l_Lean_Parser_Term_return_parenthesizer___closed__2; @@ -799,6 +800,7 @@ lean_object* lean_string_append(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__9; lean_object* l_Lean_Parser_Term_dbgTrace___closed__6; lean_object* l_Lean_PrettyPrinter_Formatter_checkWsBefore_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__2; lean_object* l_Lean_Parser_Term_explicit___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_sorry___closed__2; lean_object* l_Lean_Parser_Term_nomatch___closed__7; @@ -809,7 +811,6 @@ extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___la lean_object* l_Lean_Parser_Term_app_parenthesizer___closed__7; lean_object* l_Lean_Parser_Term_return_formatter___closed__3; lean_object* l_Lean_Parser_Term_emptyC_parenthesizer___closed__4; -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__18; lean_object* l___regBuiltinParser_Lean_Parser_Term_map(lean_object*); lean_object* l_Lean_Parser_Term_sorry_formatter___closed__2; @@ -911,7 +912,6 @@ lean_object* l_Lean_Parser_Term_typeAscription___elambda__1___closed__2; lean_object* l_Lean_Parser_checkPrecFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_anonymousCtor___closed__9; lean_object* l_Lean_Parser_Term_sorry___closed__1; -lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__6; lean_object* l_Lean_Parser_Level_quot_formatter___closed__3; lean_object* l_Lean_Parser_Term_unicodeInfixL_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_explicitBinder___closed__10; @@ -1037,7 +1037,6 @@ lean_object* l___regBuiltin_Lean_Parser_Term_dollarProj_parenthesizer___closed__ lean_object* l_Lean_Parser_Term_suffices___elambda__1___closed__7; lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_matchAlts___spec__2___closed__4; lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__8; -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__4; lean_object* l_Lean_Parser_Term_hole_parenthesizer___closed__2; lean_object* l_Lean_Parser_Term_parser_x21_formatter___closed__1; lean_object* l_Lean_Parser_Term_uminus_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1399,7 +1398,6 @@ lean_object* l_Lean_Parser_Term_append___closed__3; lean_object* l_Lean_Parser_Term_structInstLVal_formatter___closed__8; lean_object* l_Lean_Parser_Term_return_formatter___closed__4; lean_object* l_Lean_Parser_Term_show___closed__1; -lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__6; lean_object* l_Lean_Parser_Term_subtype___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_not_formatter___closed__1; lean_object* l_Lean_Parser_Term_modN___elambda__1___closed__4; @@ -1503,6 +1501,7 @@ lean_object* l_Lean_Parser_Term_ge___closed__2; lean_object* l_Lean_Parser_Term_paren_formatter___closed__2; extern lean_object* l_Lean_Parser_antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_Term_optExprPrecedence___elambda__1(lean_object*, lean_object*); +lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented___closed__10; lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__4; lean_object* l___regBuiltin_Lean_Parser_Term_mod_parenthesizer(lean_object*); lean_object* l_Lean_Parser_Term_typeSpec___closed__2; @@ -1780,6 +1779,7 @@ lean_object* l_Lean_Parser_Term_structInst___elambda__1(lean_object*, lean_objec lean_object* l_Lean_Parser_Term_andM___closed__1; lean_object* l_Lean_Parser_Term_listLit___closed__5; lean_object* l_Lean_Parser_Term_seqLeft_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_many1Indent_formatter___closed__1; lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_matchDiscr___closed__7; lean_object* l_Lean_Parser_Term_implicitBinder_parenthesizer(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -2033,6 +2033,7 @@ lean_object* l_Lean_Parser_Term_have_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_fcomp___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_type_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_binderDefault___elambda__1___closed__3; +lean_object* l_Lean_Parser_many1Indent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Parser_Term_iff_parenthesizer___closed__1; lean_object* l_Lean_Parser_pushNone___elambda__1___rarg(lean_object*); lean_object* l_Lean_Parser_Term_arrayRef___elambda__1(lean_object*, lean_object*); @@ -2516,6 +2517,7 @@ lean_object* l_Lean_Parser_Term_syntheticHole_parenthesizer___closed__4; lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_fun___closed__9; lean_object* l_Lean_Parser_Term_prod_parenthesizer___closed__1; +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8_t, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_tacticSeqBracketed___elambda__1___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_many1_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -2551,7 +2553,6 @@ lean_object* l_Lean_Parser_Term_str_formatter(lean_object*, lean_object*, lean_o lean_object* l_Lean_Parser_Tactic_quot_formatter___closed__4; lean_object* l_Lean_Parser_Term_byTactic_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_structInstArrayRef_formatter___closed__5; -lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__7; lean_object* l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__7; lean_object* l_Lean_Parser_Term_not___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_if_parenthesizer___closed__4; @@ -2889,7 +2890,6 @@ lean_object* l_Lean_Parser_Term_forall___closed__9; lean_object* l_Lean_Parser_Level_quot___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_unreachable_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_parser_x21___closed__8; -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2(uint8_t, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_parser_x21___closed__1; lean_object* l___regBuiltin_Lean_Parser_Term_explicitUniv_parenthesizer(lean_object*); lean_object* l_Lean_Parser_Term_inaccessible___closed__3; @@ -3089,7 +3089,6 @@ lean_object* l_Lean_Parser_Term_matchAlts___closed__9; lean_object* l_Lean_Parser_Tactic_quot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_typeAscription___closed__1; lean_object* l_Lean_Parser_Term_gt___elambda__1___closed__3; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(uint8_t, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Parser_Term_bor_formatter(lean_object*); lean_object* l_Lean_Parser_Term_letEqnsDecl___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_syntheticHole_formatter___closed__1; @@ -3186,6 +3185,7 @@ lean_object* l_Lean_Parser_Term_bor_formatter(lean_object*, lean_object*, lean_o lean_object* l_Lean_Parser_Term_subtype___elambda__1___closed__10; lean_object* l_Lean_Parser_Term_letDecl___closed__12; lean_object* l_Lean_Parser_Term_binderDefault___elambda__1___closed__1; +extern lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; lean_object* l_Lean_Parser_Term_panic___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_cons___elambda__1___closed__2; lean_object* l___regBuiltin_Lean_Parser_Term_assert_parenthesizer(lean_object*); @@ -3552,12 +3552,10 @@ lean_object* l_Lean_Parser_Term_modN___closed__3; lean_object* l___regBuiltinParser_Lean_Parser_Term_namedPattern(lean_object*); lean_object* l_Lean_Parser_Term_attrInstance___closed__3; lean_object* l_Lean_Parser_Term_typeAscription___closed__6; -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; lean_object* l_Lean_Parser_Term_namedPattern_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_haveDecl___closed__6; lean_object* l_Lean_Parser_Term_bor_formatter___closed__1; lean_object* l_Lean_Parser_Term_lt; -lean_object* l_Lean_Parser_Term_structInst_parenthesizer___closed__15; lean_object* l_Lean_Parser_Term_matchAlt_formatter___closed__1; lean_object* l_Lean_Parser_Term_structInstArrayRef_formatter___closed__2; lean_object* l_Lean_Parser_Term_matchAlts___closed__5; @@ -3679,7 +3677,6 @@ lean_object* l_Lean_Parser_Term_num_parenthesizer(lean_object*, lean_object*, le lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_structInst___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_fcomp___closed__2; lean_object* l_Lean_Parser_Term_unreachable___elambda__1___closed__6; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_where___closed__3; lean_object* l___regBuiltin_Lean_Parser_Term_fun_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_dbgTrace___elambda__1___closed__9; @@ -3701,6 +3698,7 @@ lean_object* l_Lean_Parser_Term_namedArgument_parenthesizer___closed__5; lean_object* l_Lean_Parser_Term_panic___closed__7; lean_object* l___regBuiltin_Lean_Parser_Term_heq_formatter(lean_object*); lean_object* l_Lean_Parser_Term_explicit___closed__5; +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_letrec___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_matchDiscr_parenthesizer___closed__6; lean_object* l_Lean_Parser_Term_panic_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -3964,7 +3962,6 @@ lean_object* l___regBuiltin_Lean_Parser_Term_proj_formatter(lean_object*); lean_object* l_Lean_Parser_Term_optIdent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_unicodeInfixL___elambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_nativeRefl___elambda__1___closed__9; -lean_object* l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__7; lean_object* l_Lean_Parser_Term_subtype___closed__11; lean_object* l_Lean_Parser_unicodeSymbolFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_paren_formatter___closed__7; @@ -4188,7 +4185,7 @@ x_3 = l_Lean_Parser_categoryParser(x_2, x_1); return x_3; } } -lean_object* _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1() { +lean_object* _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1() { _start: { lean_object* x_1; lean_object* x_2; @@ -4197,337 +4194,282 @@ x_2 = l_String_trim(x_1); return x_2; } } -lean_object* _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__2() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("tatic must be indented"); -return x_1; -} -} -lean_object* _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__3() { +lean_object* _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Char_HasRepr___closed__1; -x_2 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_2 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_3 = lean_string_append(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__4() { +lean_object* _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__3; +x_1 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__2; x_2 = l_Char_HasRepr___closed__1; x_3 = lean_string_append(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5() { +lean_object* _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__4; +x_2 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__3; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); return x_3; } } -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2(uint8_t x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -x_7 = lean_array_get_size(x_6); -lean_dec(x_6); -x_8 = lean_ctor_get(x_5, 1); -lean_inc(x_8); -x_9 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; -x_10 = lean_unsigned_to_nat(0u); -lean_inc(x_4); -x_11 = l_Lean_Parser_categoryParser___elambda__1(x_9, x_10, x_4, x_5); -x_12 = lean_ctor_get(x_11, 3); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_17; lean_object* x_52; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +x_4 = lean_array_get_size(x_3); +lean_dec(x_3); +x_5 = lean_ctor_get(x_2, 1); +lean_inc(x_5); +x_52 = lean_ctor_get(x_1, 4); +lean_inc(x_52); +if (lean_obj_tag(x_52) == 0) { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_31; lean_object* x_57; lean_object* x_58; -lean_dec(x_8); -lean_dec(x_7); -x_13 = lean_ctor_get(x_11, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -x_15 = lean_array_get_size(x_13); -lean_dec(x_13); -lean_inc(x_4); -x_57 = l_Lean_Parser_tokenFn(x_4, x_11); -x_58 = lean_ctor_get(x_57, 3); +x_17 = x_2; +goto block_51; +} +else +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_59; +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +lean_dec(x_52); +x_54 = lean_ctor_get(x_1, 0); +lean_inc(x_54); +x_55 = lean_ctor_get(x_54, 2); +lean_inc(x_55); +lean_dec(x_54); +lean_inc(x_5); +x_56 = l_Lean_FileMap_toPosition(x_55, x_5); +lean_dec(x_55); +x_57 = lean_ctor_get(x_53, 1); +lean_inc(x_57); +lean_dec(x_53); +x_58 = lean_ctor_get(x_56, 1); lean_inc(x_58); -if (lean_obj_tag(x_58) == 0) -{ -lean_object* x_59; lean_object* x_60; -x_59 = lean_ctor_get(x_57, 0); -lean_inc(x_59); -x_60 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_59); -lean_dec(x_59); -if (lean_obj_tag(x_60) == 2) -{ -lean_object* x_61; lean_object* x_62; uint8_t x_63; -x_61 = lean_ctor_get(x_60, 1); -lean_inc(x_61); -lean_dec(x_60); -x_62 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; -x_63 = lean_string_dec_eq(x_61, x_62); -lean_dec(x_61); -if (x_63 == 0) -{ -lean_object* x_64; lean_object* x_65; -x_64 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_14); -x_65 = l_Lean_Parser_ParserState_mkErrorsAt(x_57, x_64, x_14); -x_31 = x_65; -goto block_56; -} -else -{ -x_31 = x_57; -goto block_56; -} -} -else -{ -lean_object* x_66; lean_object* x_67; -lean_dec(x_60); -x_66 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_14); -x_67 = l_Lean_Parser_ParserState_mkErrorsAt(x_57, x_66, x_14); -x_31 = x_67; -goto block_56; -} -} -else -{ -lean_object* x_68; lean_object* x_69; +lean_dec(x_56); +x_59 = lean_nat_dec_le(x_57, x_58); lean_dec(x_58); -x_68 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; -lean_inc(x_14); -x_69 = l_Lean_Parser_ParserState_mkErrorsAt(x_57, x_68, x_14); -x_31 = x_69; -goto block_56; +lean_dec(x_57); +if (x_59 == 0) +{ +lean_object* x_60; lean_object* x_61; +x_60 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_61 = l_Lean_Parser_ParserState_mkError(x_2, x_60); +x_17 = x_61; +goto block_51; } -block_30: +else { -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_20; -lean_dec(x_18); -lean_dec(x_17); -x_20 = lean_ctor_get(x_16, 3); -lean_inc(x_20); -if (lean_obj_tag(x_20) == 0) -{ -lean_dec(x_15); -lean_dec(x_14); -{ -uint8_t _tmp_2 = x_1; -lean_object* _tmp_4 = x_16; -x_3 = _tmp_2; -x_5 = _tmp_4; +x_17 = x_2; +goto block_51; } +} +block_16: +{ +lean_object* x_7; +x_7 = lean_ctor_get(x_6, 3); +lean_inc(x_7); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_8; uint8_t x_9; +lean_dec(x_4); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +x_9 = lean_nat_dec_eq(x_5, x_8); +lean_dec(x_8); +lean_dec(x_5); +if (x_9 == 0) +{ +x_2 = x_6; goto _start; } else { -lean_object* x_22; lean_object* x_23; lean_object* x_24; -lean_dec(x_20); -lean_dec(x_4); -x_22 = l_Lean_Parser_ParserState_restore(x_16, x_15, x_14); -lean_dec(x_15); -x_23 = l_Lean_nullKind; -x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_2); -return x_24; +lean_object* x_11; lean_object* x_12; +lean_dec(x_1); +x_11 = l_Lean_Parser_manyAux___main___closed__1; +x_12 = l_Lean_Parser_ParserState_mkUnexpectedError(x_6, x_11); +return x_12; } } else { -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; -lean_dec(x_16); +lean_object* x_13; uint8_t x_14; +lean_dec(x_7); +lean_dec(x_1); +x_13 = lean_ctor_get(x_6, 1); +lean_inc(x_13); +x_14 = lean_nat_dec_eq(x_5, x_13); +lean_dec(x_13); +if (x_14 == 0) +{ +lean_dec(x_5); lean_dec(x_4); -x_25 = l_Array_shrink___main___rarg(x_17, x_15); -lean_inc(x_14); -x_26 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_26, 1, x_14); -lean_ctor_set(x_26, 2, x_18); -lean_ctor_set(x_26, 3, x_19); -x_27 = l_Lean_Parser_ParserState_restore(x_26, x_15, x_14); -lean_dec(x_15); -x_28 = l_Lean_nullKind; -x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_2); -return x_29; -} -} -block_56: -{ -lean_object* x_32; -x_32 = lean_ctor_get(x_31, 3); -lean_inc(x_32); -if (lean_obj_tag(x_32) == 0) -{ -lean_object* x_33; -x_33 = lean_ctor_get(x_4, 4); -lean_inc(x_33); -if (lean_obj_tag(x_33) == 0) -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_34 = lean_ctor_get(x_31, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_31, 2); -lean_inc(x_35); -x_36 = lean_ctor_get(x_31, 3); -lean_inc(x_36); -x_16 = x_31; -x_17 = x_34; -x_18 = x_35; -x_19 = x_36; -goto block_30; +return x_6; } else { -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; -x_37 = lean_ctor_get(x_33, 0); -lean_inc(x_37); -lean_dec(x_33); -x_38 = lean_ctor_get(x_4, 0); -lean_inc(x_38); -x_39 = lean_ctor_get(x_38, 2); +lean_object* x_15; +x_15 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); +lean_dec(x_4); +return x_15; +} +} +} +block_51: +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_19 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; +x_20 = lean_unsigned_to_nat(0u); +lean_inc(x_1); +x_21 = l_Lean_Parser_categoryParser___elambda__1(x_19, x_20, x_1, x_17); +x_22 = lean_ctor_get(x_21, 3); +lean_inc(x_22); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_38; lean_object* x_39; +x_23 = lean_ctor_get(x_21, 0); +lean_inc(x_23); +x_24 = lean_array_get_size(x_23); +lean_dec(x_23); +x_25 = lean_ctor_get(x_21, 1); +lean_inc(x_25); +lean_inc(x_1); +x_38 = l_Lean_Parser_tokenFn(x_1, x_21); +x_39 = lean_ctor_get(x_38, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_31, 1); +if (lean_obj_tag(x_39) == 0) +{ +lean_object* x_40; lean_object* x_41; +x_40 = lean_ctor_get(x_38, 0); lean_inc(x_40); -x_41 = l_Lean_FileMap_toPosition(x_39, x_40); -lean_dec(x_39); -x_42 = lean_ctor_get(x_37, 1); +x_41 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_40); +lean_dec(x_40); +if (lean_obj_tag(x_41) == 2) +{ +lean_object* x_42; lean_object* x_43; uint8_t x_44; +x_42 = lean_ctor_get(x_41, 1); lean_inc(x_42); -lean_dec(x_37); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); lean_dec(x_41); -x_44 = lean_nat_dec_le(x_42, x_43); -lean_dec(x_43); +x_43 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; +x_44 = lean_string_dec_eq(x_42, x_43); lean_dec(x_42); if (x_44 == 0) { -lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_45 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__2; -x_46 = l_Lean_Parser_ParserState_mkError(x_31, x_45); -x_47 = lean_ctor_get(x_46, 0); -lean_inc(x_47); -x_48 = lean_ctor_get(x_46, 2); -lean_inc(x_48); -x_49 = lean_ctor_get(x_46, 3); -lean_inc(x_49); -x_16 = x_46; -x_17 = x_47; -x_18 = x_48; -x_19 = x_49; -goto block_30; +lean_object* x_45; lean_object* x_46; +x_45 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_25); +x_46 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_45, x_25); +x_26 = x_46; +goto block_37; } else { -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = lean_ctor_get(x_31, 0); -lean_inc(x_50); -x_51 = lean_ctor_get(x_31, 2); -lean_inc(x_51); -x_52 = lean_ctor_get(x_31, 3); -lean_inc(x_52); -x_16 = x_31; -x_17 = x_50; -x_18 = x_51; -x_19 = x_52; -goto block_30; +x_26 = x_38; +goto block_37; +} +} +else +{ +lean_object* x_47; lean_object* x_48; +lean_dec(x_41); +x_47 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_25); +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_47, x_25); +x_26 = x_48; +goto block_37; +} +} +else +{ +lean_object* x_49; lean_object* x_50; +lean_dec(x_39); +x_49 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_25); +x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_38, x_49, x_25); +x_26 = x_50; +goto block_37; +} +block_37: +{ +lean_object* x_27; +x_27 = lean_ctor_get(x_26, 3); +lean_inc(x_27); +if (lean_obj_tag(x_27) == 0) +{ +lean_object* x_28; lean_object* x_29; +lean_dec(x_25); +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_26, x_28, x_24); +x_6 = x_29; +goto block_16; +} +else +{ +lean_object* x_30; uint8_t x_31; +lean_dec(x_27); +x_30 = lean_ctor_get(x_26, 1); +lean_inc(x_30); +x_31 = lean_nat_dec_eq(x_30, x_25); +lean_dec(x_30); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; +lean_dec(x_25); +x_32 = l_Lean_nullKind; +x_33 = l_Lean_Parser_ParserState_mkNode(x_26, x_32, x_24); +x_6 = x_33; +goto block_16; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = l_Lean_Parser_ParserState_restore(x_26, x_24, x_25); +x_35 = l_Lean_nullKind; +x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_24); +x_6 = x_36; +goto block_16; +} } } } else { -lean_object* x_53; lean_object* x_54; lean_object* x_55; -lean_dec(x_32); -x_53 = lean_ctor_get(x_31, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_31, 2); -lean_inc(x_54); -x_55 = lean_ctor_get(x_31, 3); -lean_inc(x_55); -x_16 = x_31; -x_17 = x_53; -x_18 = x_54; -x_19 = x_55; -goto block_30; -} -} -} -else -{ -lean_object* x_70; uint8_t x_71; -lean_dec(x_12); -lean_dec(x_4); -x_70 = lean_ctor_get(x_11, 1); -lean_inc(x_70); -x_71 = lean_nat_dec_lt(x_8, x_70); -lean_dec(x_70); -if (x_71 == 0) -{ -if (x_3 == 0) -{ -lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -lean_dec(x_8); -lean_dec(x_7); -x_72 = lean_box(0); -x_73 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_72); -x_74 = l_Lean_nullKind; -x_75 = l_Lean_Parser_ParserState_mkNode(x_73, x_74, x_2); -return x_75; -} -else -{ -lean_object* x_76; lean_object* x_77; lean_object* x_78; -x_76 = l_Lean_Parser_ParserState_restore(x_11, x_7, x_8); -lean_dec(x_7); -x_77 = l_Lean_nullKind; -x_78 = l_Lean_Parser_ParserState_mkNode(x_76, x_77, x_2); -return x_78; +lean_dec(x_22); +x_6 = x_21; +goto block_16; } } else { -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -return x_11; +lean_dec(x_18); +x_6 = x_17; +goto block_16; } } } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(uint8_t x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -lean_object* x_4; lean_object* x_5; uint8_t x_6; lean_object* x_7; -x_4 = lean_ctor_get(x_3, 0); -lean_inc(x_4); -x_5 = lean_array_get_size(x_4); -lean_dec(x_4); -x_6 = 0; -x_7 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2(x_1, x_5, x_6, x_2, x_3); -return x_7; -} -} lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__1() { _start: { @@ -4595,7 +4537,7 @@ lean_dec(x_9); x_11 = !lean_is_exclusive(x_1); if (x_11 == 0) { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_30; uint8_t x_31; x_12 = lean_ctor_get(x_1, 0); x_13 = lean_ctor_get(x_1, 4); lean_dec(x_13); @@ -4605,48 +4547,382 @@ x_15 = lean_ctor_get(x_7, 1); lean_inc(x_15); x_16 = l_Lean_FileMap_toPosition(x_14, x_15); lean_dec(x_14); +lean_inc(x_16); x_17 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_17, 0, x_16); lean_ctor_set(x_1, 4, x_17); -x_18 = 0; -x_19 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_18, x_1, x_7); -x_20 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_10); -return x_21; +x_30 = lean_ctor_get(x_16, 1); +lean_inc(x_30); +lean_dec(x_16); +x_31 = lean_nat_dec_le(x_30, x_30); +lean_dec(x_30); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +lean_dec(x_1); +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_33 = l_Lean_Parser_ParserState_mkError(x_7, x_32); +x_34 = l_Lean_nullKind; +lean_inc(x_10); +x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_10); +x_36 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_10); +return x_37; } else { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_22 = lean_ctor_get(x_1, 0); -x_23 = lean_ctor_get(x_1, 1); -x_24 = lean_ctor_get(x_1, 2); -x_25 = lean_ctor_get(x_1, 3); -x_26 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); -lean_inc(x_25); -lean_inc(x_24); -lean_inc(x_23); -lean_inc(x_22); +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_38 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; +x_39 = lean_unsigned_to_nat(0u); +lean_inc(x_1); +x_40 = l_Lean_Parser_categoryParser___elambda__1(x_38, x_39, x_1, x_7); +x_41 = lean_ctor_get(x_40, 3); +lean_inc(x_41); +if (lean_obj_tag(x_41) == 0) +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_57; lean_object* x_58; +x_42 = lean_ctor_get(x_40, 0); +lean_inc(x_42); +x_43 = lean_array_get_size(x_42); +lean_dec(x_42); +x_44 = lean_ctor_get(x_40, 1); +lean_inc(x_44); +lean_inc(x_1); +x_57 = l_Lean_Parser_tokenFn(x_1, x_40); +x_58 = lean_ctor_get(x_57, 3); +lean_inc(x_58); +if (lean_obj_tag(x_58) == 0) +{ +lean_object* x_59; lean_object* x_60; +x_59 = lean_ctor_get(x_57, 0); +lean_inc(x_59); +x_60 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_59); +lean_dec(x_59); +if (lean_obj_tag(x_60) == 2) +{ +lean_object* x_61; lean_object* x_62; uint8_t x_63; +x_61 = lean_ctor_get(x_60, 1); +lean_inc(x_61); +lean_dec(x_60); +x_62 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; +x_63 = lean_string_dec_eq(x_61, x_62); +lean_dec(x_61); +if (x_63 == 0) +{ +lean_object* x_64; lean_object* x_65; +x_64 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_44); +x_65 = l_Lean_Parser_ParserState_mkErrorsAt(x_57, x_64, x_44); +x_45 = x_65; +goto block_56; +} +else +{ +x_45 = x_57; +goto block_56; +} +} +else +{ +lean_object* x_66; lean_object* x_67; +lean_dec(x_60); +x_66 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_44); +x_67 = l_Lean_Parser_ParserState_mkErrorsAt(x_57, x_66, x_44); +x_45 = x_67; +goto block_56; +} +} +else +{ +lean_object* x_68; lean_object* x_69; +lean_dec(x_58); +x_68 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_44); +x_69 = l_Lean_Parser_ParserState_mkErrorsAt(x_57, x_68, x_44); +x_45 = x_69; +goto block_56; +} +block_56: +{ +lean_object* x_46; +x_46 = lean_ctor_get(x_45, 3); +lean_inc(x_46); +if (lean_obj_tag(x_46) == 0) +{ +lean_object* x_47; lean_object* x_48; +lean_dec(x_44); +x_47 = l_Lean_nullKind; +x_48 = l_Lean_Parser_ParserState_mkNode(x_45, x_47, x_43); +x_18 = x_48; +goto block_29; +} +else +{ +lean_object* x_49; uint8_t x_50; +lean_dec(x_46); +x_49 = lean_ctor_get(x_45, 1); +lean_inc(x_49); +x_50 = lean_nat_dec_eq(x_49, x_44); +lean_dec(x_49); +if (x_50 == 0) +{ +lean_object* x_51; lean_object* x_52; +lean_dec(x_44); +x_51 = l_Lean_nullKind; +x_52 = l_Lean_Parser_ParserState_mkNode(x_45, x_51, x_43); +x_18 = x_52; +goto block_29; +} +else +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_53 = l_Lean_Parser_ParserState_restore(x_45, x_43, x_44); +x_54 = l_Lean_nullKind; +x_55 = l_Lean_Parser_ParserState_mkNode(x_53, x_54, x_43); +x_18 = x_55; +goto block_29; +} +} +} +} +else +{ +lean_dec(x_41); +x_18 = x_40; +goto block_29; +} +} +block_29: +{ +lean_object* x_19; +x_19 = lean_ctor_get(x_18, 3); +lean_inc(x_19); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_20 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_1, x_18); +x_21 = l_Lean_nullKind; +lean_inc(x_10); +x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_10); +x_23 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_10); +return x_24; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +lean_dec(x_19); lean_dec(x_1); -x_27 = lean_ctor_get(x_22, 2); -lean_inc(x_27); -x_28 = lean_ctor_get(x_7, 1); -lean_inc(x_28); -x_29 = l_Lean_FileMap_toPosition(x_27, x_28); -lean_dec(x_27); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_31, 0, x_22); -lean_ctor_set(x_31, 1, x_23); -lean_ctor_set(x_31, 2, x_24); -lean_ctor_set(x_31, 3, x_25); -lean_ctor_set(x_31, 4, x_30); -lean_ctor_set_uint8(x_31, sizeof(void*)*5, x_26); -x_32 = 0; -x_33 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_32, x_31, x_7); -x_34 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; -x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_10); -return x_35; +x_25 = l_Lean_nullKind; +lean_inc(x_10); +x_26 = l_Lean_Parser_ParserState_mkNode(x_18, x_25, x_10); +x_27 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_10); +return x_28; +} +} +} +else +{ +lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; uint8_t x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_92; uint8_t x_93; +x_70 = lean_ctor_get(x_1, 0); +x_71 = lean_ctor_get(x_1, 1); +x_72 = lean_ctor_get(x_1, 2); +x_73 = lean_ctor_get(x_1, 3); +x_74 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_73); +lean_inc(x_72); +lean_inc(x_71); +lean_inc(x_70); +lean_dec(x_1); +x_75 = lean_ctor_get(x_70, 2); +lean_inc(x_75); +x_76 = lean_ctor_get(x_7, 1); +lean_inc(x_76); +x_77 = l_Lean_FileMap_toPosition(x_75, x_76); +lean_dec(x_75); +lean_inc(x_77); +x_78 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_78, 0, x_77); +x_79 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_79, 0, x_70); +lean_ctor_set(x_79, 1, x_71); +lean_ctor_set(x_79, 2, x_72); +lean_ctor_set(x_79, 3, x_73); +lean_ctor_set(x_79, 4, x_78); +lean_ctor_set_uint8(x_79, sizeof(void*)*5, x_74); +x_92 = lean_ctor_get(x_77, 1); +lean_inc(x_92); +lean_dec(x_77); +x_93 = lean_nat_dec_le(x_92, x_92); +lean_dec(x_92); +if (x_93 == 0) +{ +lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; +lean_dec(x_79); +x_94 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_95 = l_Lean_Parser_ParserState_mkError(x_7, x_94); +x_96 = l_Lean_nullKind; +lean_inc(x_10); +x_97 = l_Lean_Parser_ParserState_mkNode(x_95, x_96, x_10); +x_98 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_99 = l_Lean_Parser_ParserState_mkNode(x_97, x_98, x_10); +return x_99; +} +else +{ +lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_100 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; +x_101 = lean_unsigned_to_nat(0u); +lean_inc(x_79); +x_102 = l_Lean_Parser_categoryParser___elambda__1(x_100, x_101, x_79, x_7); +x_103 = lean_ctor_get(x_102, 3); +lean_inc(x_103); +if (lean_obj_tag(x_103) == 0) +{ +lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_119; lean_object* x_120; +x_104 = lean_ctor_get(x_102, 0); +lean_inc(x_104); +x_105 = lean_array_get_size(x_104); +lean_dec(x_104); +x_106 = lean_ctor_get(x_102, 1); +lean_inc(x_106); +lean_inc(x_79); +x_119 = l_Lean_Parser_tokenFn(x_79, x_102); +x_120 = lean_ctor_get(x_119, 3); +lean_inc(x_120); +if (lean_obj_tag(x_120) == 0) +{ +lean_object* x_121; lean_object* x_122; +x_121 = lean_ctor_get(x_119, 0); +lean_inc(x_121); +x_122 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_121); +lean_dec(x_121); +if (lean_obj_tag(x_122) == 2) +{ +lean_object* x_123; lean_object* x_124; uint8_t x_125; +x_123 = lean_ctor_get(x_122, 1); +lean_inc(x_123); +lean_dec(x_122); +x_124 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; +x_125 = lean_string_dec_eq(x_123, x_124); +lean_dec(x_123); +if (x_125 == 0) +{ +lean_object* x_126; lean_object* x_127; +x_126 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_106); +x_127 = l_Lean_Parser_ParserState_mkErrorsAt(x_119, x_126, x_106); +x_107 = x_127; +goto block_118; +} +else +{ +x_107 = x_119; +goto block_118; +} +} +else +{ +lean_object* x_128; lean_object* x_129; +lean_dec(x_122); +x_128 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_106); +x_129 = l_Lean_Parser_ParserState_mkErrorsAt(x_119, x_128, x_106); +x_107 = x_129; +goto block_118; +} +} +else +{ +lean_object* x_130; lean_object* x_131; +lean_dec(x_120); +x_130 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_106); +x_131 = l_Lean_Parser_ParserState_mkErrorsAt(x_119, x_130, x_106); +x_107 = x_131; +goto block_118; +} +block_118: +{ +lean_object* x_108; +x_108 = lean_ctor_get(x_107, 3); +lean_inc(x_108); +if (lean_obj_tag(x_108) == 0) +{ +lean_object* x_109; lean_object* x_110; +lean_dec(x_106); +x_109 = l_Lean_nullKind; +x_110 = l_Lean_Parser_ParserState_mkNode(x_107, x_109, x_105); +x_80 = x_110; +goto block_91; +} +else +{ +lean_object* x_111; uint8_t x_112; +lean_dec(x_108); +x_111 = lean_ctor_get(x_107, 1); +lean_inc(x_111); +x_112 = lean_nat_dec_eq(x_111, x_106); +lean_dec(x_111); +if (x_112 == 0) +{ +lean_object* x_113; lean_object* x_114; +lean_dec(x_106); +x_113 = l_Lean_nullKind; +x_114 = l_Lean_Parser_ParserState_mkNode(x_107, x_113, x_105); +x_80 = x_114; +goto block_91; +} +else +{ +lean_object* x_115; lean_object* x_116; lean_object* x_117; +x_115 = l_Lean_Parser_ParserState_restore(x_107, x_105, x_106); +x_116 = l_Lean_nullKind; +x_117 = l_Lean_Parser_ParserState_mkNode(x_115, x_116, x_105); +x_80 = x_117; +goto block_91; +} +} +} +} +else +{ +lean_dec(x_103); +x_80 = x_102; +goto block_91; +} +} +block_91: +{ +lean_object* x_81; +x_81 = lean_ctor_get(x_80, 3); +lean_inc(x_81); +if (lean_obj_tag(x_81) == 0) +{ +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +x_82 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_79, x_80); +x_83 = l_Lean_nullKind; +lean_inc(x_10); +x_84 = l_Lean_Parser_ParserState_mkNode(x_82, x_83, x_10); +x_85 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_86 = l_Lean_Parser_ParserState_mkNode(x_84, x_85, x_10); +return x_86; +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; +lean_dec(x_81); +lean_dec(x_79); +x_87 = l_Lean_nullKind; +lean_inc(x_10); +x_88 = l_Lean_Parser_ParserState_mkNode(x_80, x_87, x_10); +x_89 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_90 = l_Lean_Parser_ParserState_mkNode(x_88, x_89, x_10); +return x_90; +} +} } } else @@ -4658,228 +4934,747 @@ return x_7; } else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_36 = lean_ctor_get(x_2, 0); -lean_inc(x_36); -x_37 = lean_array_get_size(x_36); -lean_dec(x_36); -x_38 = lean_ctor_get(x_2, 1); -lean_inc(x_38); +lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; +x_132 = lean_ctor_get(x_2, 0); +lean_inc(x_132); +x_133 = lean_array_get_size(x_132); +lean_dec(x_132); +x_134 = lean_ctor_get(x_2, 1); +lean_inc(x_134); lean_inc(x_1); -x_39 = lean_apply_2(x_4, x_1, x_2); -x_40 = lean_ctor_get(x_39, 3); -lean_inc(x_40); -if (lean_obj_tag(x_40) == 0) +x_135 = lean_apply_2(x_4, x_1, x_2); +x_136 = lean_ctor_get(x_135, 3); +lean_inc(x_136); +if (lean_obj_tag(x_136) == 0) { -lean_dec(x_38); -lean_dec(x_37); +lean_dec(x_134); +lean_dec(x_133); lean_dec(x_1); -return x_39; +return x_135; } else { -uint8_t x_41; -x_41 = !lean_is_exclusive(x_40); -if (x_41 == 0) +uint8_t x_137; +x_137 = !lean_is_exclusive(x_136); +if (x_137 == 0) { -lean_object* x_42; lean_object* x_43; uint8_t x_44; -x_42 = lean_ctor_get(x_40, 0); -x_43 = lean_ctor_get(x_39, 1); -lean_inc(x_43); -x_44 = lean_nat_dec_eq(x_43, x_38); -lean_dec(x_43); -if (x_44 == 0) +lean_object* x_138; lean_object* x_139; uint8_t x_140; +x_138 = lean_ctor_get(x_136, 0); +x_139 = lean_ctor_get(x_135, 1); +lean_inc(x_139); +x_140 = lean_nat_dec_eq(x_139, x_134); +lean_dec(x_139); +if (x_140 == 0) { -lean_free_object(x_40); -lean_dec(x_42); -lean_dec(x_38); -lean_dec(x_37); +lean_free_object(x_136); +lean_dec(x_138); +lean_dec(x_134); +lean_dec(x_133); lean_dec(x_1); -return x_39; +return x_135; } else { -lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -lean_inc(x_38); -x_45 = l_Lean_Parser_ParserState_restore(x_39, x_37, x_38); -lean_dec(x_37); -x_46 = lean_unsigned_to_nat(1024u); -x_47 = l_Lean_Parser_checkPrecFn(x_46, x_1, x_45); -x_48 = lean_ctor_get(x_47, 3); -lean_inc(x_48); -if (lean_obj_tag(x_48) == 0) +lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; +lean_inc(x_134); +x_141 = l_Lean_Parser_ParserState_restore(x_135, x_133, x_134); +lean_dec(x_133); +x_142 = lean_unsigned_to_nat(1024u); +x_143 = l_Lean_Parser_checkPrecFn(x_142, x_1, x_141); +x_144 = lean_ctor_get(x_143, 3); +lean_inc(x_144); +if (lean_obj_tag(x_144) == 0) { -lean_object* x_49; lean_object* x_50; uint8_t x_51; -x_49 = lean_ctor_get(x_47, 0); -lean_inc(x_49); -x_50 = lean_array_get_size(x_49); -lean_dec(x_49); -x_51 = !lean_is_exclusive(x_1); -if (x_51 == 0) +lean_object* x_145; lean_object* x_146; uint8_t x_147; +x_145 = lean_ctor_get(x_143, 0); +lean_inc(x_145); +x_146 = lean_array_get_size(x_145); +lean_dec(x_145); +x_147 = !lean_is_exclusive(x_1); +if (x_147 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; uint8_t x_61; lean_object* x_62; -x_52 = lean_ctor_get(x_1, 0); -x_53 = lean_ctor_get(x_1, 4); -lean_dec(x_53); -x_54 = lean_ctor_get(x_52, 2); -lean_inc(x_54); -x_55 = lean_ctor_get(x_47, 1); -lean_inc(x_55); -x_56 = l_Lean_FileMap_toPosition(x_54, x_55); -lean_dec(x_54); -lean_ctor_set(x_40, 0, x_56); -lean_ctor_set(x_1, 4, x_40); -x_57 = 0; -x_58 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_57, x_1, x_47); -x_59 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; -x_60 = l_Lean_Parser_ParserState_mkNode(x_58, x_59, x_50); -x_61 = 1; -x_62 = l_Lean_Parser_mergeOrElseErrors(x_60, x_42, x_38, x_61); -lean_dec(x_38); -return x_62; -} -else +lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_169; uint8_t x_170; +x_148 = lean_ctor_get(x_1, 0); +x_149 = lean_ctor_get(x_1, 4); +lean_dec(x_149); +x_150 = lean_ctor_get(x_148, 2); +lean_inc(x_150); +x_151 = lean_ctor_get(x_143, 1); +lean_inc(x_151); +x_152 = l_Lean_FileMap_toPosition(x_150, x_151); +lean_dec(x_150); +lean_inc(x_152); +lean_ctor_set(x_136, 0, x_152); +lean_ctor_set(x_1, 4, x_136); +x_169 = lean_ctor_get(x_152, 1); +lean_inc(x_169); +lean_dec(x_152); +x_170 = lean_nat_dec_le(x_169, x_169); +lean_dec(x_169); +if (x_170 == 0) { -lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; uint8_t x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; uint8_t x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; uint8_t x_76; lean_object* x_77; -x_63 = lean_ctor_get(x_1, 0); -x_64 = lean_ctor_get(x_1, 1); -x_65 = lean_ctor_get(x_1, 2); -x_66 = lean_ctor_get(x_1, 3); -x_67 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); -lean_inc(x_66); -lean_inc(x_65); -lean_inc(x_64); -lean_inc(x_63); +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; uint8_t x_177; lean_object* x_178; lean_dec(x_1); -x_68 = lean_ctor_get(x_63, 2); -lean_inc(x_68); -x_69 = lean_ctor_get(x_47, 1); -lean_inc(x_69); -x_70 = l_Lean_FileMap_toPosition(x_68, x_69); -lean_dec(x_68); -lean_ctor_set(x_40, 0, x_70); -x_71 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_71, 0, x_63); -lean_ctor_set(x_71, 1, x_64); -lean_ctor_set(x_71, 2, x_65); -lean_ctor_set(x_71, 3, x_66); -lean_ctor_set(x_71, 4, x_40); -lean_ctor_set_uint8(x_71, sizeof(void*)*5, x_67); -x_72 = 0; -x_73 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_72, x_71, x_47); -x_74 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; -x_75 = l_Lean_Parser_ParserState_mkNode(x_73, x_74, x_50); -x_76 = 1; -x_77 = l_Lean_Parser_mergeOrElseErrors(x_75, x_42, x_38, x_76); -lean_dec(x_38); -return x_77; +x_171 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_172 = l_Lean_Parser_ParserState_mkError(x_143, x_171); +x_173 = l_Lean_nullKind; +lean_inc(x_146); +x_174 = l_Lean_Parser_ParserState_mkNode(x_172, x_173, x_146); +x_175 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_176 = l_Lean_Parser_ParserState_mkNode(x_174, x_175, x_146); +x_177 = 1; +x_178 = l_Lean_Parser_mergeOrElseErrors(x_176, x_138, x_134, x_177); +lean_dec(x_134); +return x_178; +} +else +{ +lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; +x_179 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; +x_180 = lean_unsigned_to_nat(0u); +lean_inc(x_1); +x_181 = l_Lean_Parser_categoryParser___elambda__1(x_179, x_180, x_1, x_143); +x_182 = lean_ctor_get(x_181, 3); +lean_inc(x_182); +if (lean_obj_tag(x_182) == 0) +{ +lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_198; lean_object* x_199; +x_183 = lean_ctor_get(x_181, 0); +lean_inc(x_183); +x_184 = lean_array_get_size(x_183); +lean_dec(x_183); +x_185 = lean_ctor_get(x_181, 1); +lean_inc(x_185); +lean_inc(x_1); +x_198 = l_Lean_Parser_tokenFn(x_1, x_181); +x_199 = lean_ctor_get(x_198, 3); +lean_inc(x_199); +if (lean_obj_tag(x_199) == 0) +{ +lean_object* x_200; lean_object* x_201; +x_200 = lean_ctor_get(x_198, 0); +lean_inc(x_200); +x_201 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_200); +lean_dec(x_200); +if (lean_obj_tag(x_201) == 2) +{ +lean_object* x_202; lean_object* x_203; uint8_t x_204; +x_202 = lean_ctor_get(x_201, 1); +lean_inc(x_202); +lean_dec(x_201); +x_203 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; +x_204 = lean_string_dec_eq(x_202, x_203); +lean_dec(x_202); +if (x_204 == 0) +{ +lean_object* x_205; lean_object* x_206; +x_205 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_185); +x_206 = l_Lean_Parser_ParserState_mkErrorsAt(x_198, x_205, x_185); +x_186 = x_206; +goto block_197; +} +else +{ +x_186 = x_198; +goto block_197; } } else { -uint8_t x_78; lean_object* x_79; -lean_dec(x_48); -lean_free_object(x_40); +lean_object* x_207; lean_object* x_208; +lean_dec(x_201); +x_207 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_185); +x_208 = l_Lean_Parser_ParserState_mkErrorsAt(x_198, x_207, x_185); +x_186 = x_208; +goto block_197; +} +} +else +{ +lean_object* x_209; lean_object* x_210; +lean_dec(x_199); +x_209 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_185); +x_210 = l_Lean_Parser_ParserState_mkErrorsAt(x_198, x_209, x_185); +x_186 = x_210; +goto block_197; +} +block_197: +{ +lean_object* x_187; +x_187 = lean_ctor_get(x_186, 3); +lean_inc(x_187); +if (lean_obj_tag(x_187) == 0) +{ +lean_object* x_188; lean_object* x_189; +lean_dec(x_185); +x_188 = l_Lean_nullKind; +x_189 = l_Lean_Parser_ParserState_mkNode(x_186, x_188, x_184); +x_153 = x_189; +goto block_168; +} +else +{ +lean_object* x_190; uint8_t x_191; +lean_dec(x_187); +x_190 = lean_ctor_get(x_186, 1); +lean_inc(x_190); +x_191 = lean_nat_dec_eq(x_190, x_185); +lean_dec(x_190); +if (x_191 == 0) +{ +lean_object* x_192; lean_object* x_193; +lean_dec(x_185); +x_192 = l_Lean_nullKind; +x_193 = l_Lean_Parser_ParserState_mkNode(x_186, x_192, x_184); +x_153 = x_193; +goto block_168; +} +else +{ +lean_object* x_194; lean_object* x_195; lean_object* x_196; +x_194 = l_Lean_Parser_ParserState_restore(x_186, x_184, x_185); +x_195 = l_Lean_nullKind; +x_196 = l_Lean_Parser_ParserState_mkNode(x_194, x_195, x_184); +x_153 = x_196; +goto block_168; +} +} +} +} +else +{ +lean_dec(x_182); +x_153 = x_181; +goto block_168; +} +} +block_168: +{ +lean_object* x_154; +x_154 = lean_ctor_get(x_153, 3); +lean_inc(x_154); +if (lean_obj_tag(x_154) == 0) +{ +lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; uint8_t x_160; lean_object* x_161; +x_155 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_1, x_153); +x_156 = l_Lean_nullKind; +lean_inc(x_146); +x_157 = l_Lean_Parser_ParserState_mkNode(x_155, x_156, x_146); +x_158 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_159 = l_Lean_Parser_ParserState_mkNode(x_157, x_158, x_146); +x_160 = 1; +x_161 = l_Lean_Parser_mergeOrElseErrors(x_159, x_138, x_134, x_160); +lean_dec(x_134); +return x_161; +} +else +{ +lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; uint8_t x_166; lean_object* x_167; +lean_dec(x_154); lean_dec(x_1); -x_78 = 1; -x_79 = l_Lean_Parser_mergeOrElseErrors(x_47, x_42, x_38, x_78); -lean_dec(x_38); -return x_79; +x_162 = l_Lean_nullKind; +lean_inc(x_146); +x_163 = l_Lean_Parser_ParserState_mkNode(x_153, x_162, x_146); +x_164 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_165 = l_Lean_Parser_ParserState_mkNode(x_163, x_164, x_146); +x_166 = 1; +x_167 = l_Lean_Parser_mergeOrElseErrors(x_165, x_138, x_134, x_166); +lean_dec(x_134); +return x_167; } } } else { -lean_object* x_80; lean_object* x_81; uint8_t x_82; -x_80 = lean_ctor_get(x_40, 0); -lean_inc(x_80); -lean_dec(x_40); -x_81 = lean_ctor_get(x_39, 1); -lean_inc(x_81); -x_82 = lean_nat_dec_eq(x_81, x_38); -lean_dec(x_81); -if (x_82 == 0) -{ -lean_dec(x_80); -lean_dec(x_38); -lean_dec(x_37); +lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; uint8_t x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_236; uint8_t x_237; +x_211 = lean_ctor_get(x_1, 0); +x_212 = lean_ctor_get(x_1, 1); +x_213 = lean_ctor_get(x_1, 2); +x_214 = lean_ctor_get(x_1, 3); +x_215 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_inc(x_214); +lean_inc(x_213); +lean_inc(x_212); +lean_inc(x_211); lean_dec(x_1); -return x_39; +x_216 = lean_ctor_get(x_211, 2); +lean_inc(x_216); +x_217 = lean_ctor_get(x_143, 1); +lean_inc(x_217); +x_218 = l_Lean_FileMap_toPosition(x_216, x_217); +lean_dec(x_216); +lean_inc(x_218); +lean_ctor_set(x_136, 0, x_218); +x_219 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_219, 0, x_211); +lean_ctor_set(x_219, 1, x_212); +lean_ctor_set(x_219, 2, x_213); +lean_ctor_set(x_219, 3, x_214); +lean_ctor_set(x_219, 4, x_136); +lean_ctor_set_uint8(x_219, sizeof(void*)*5, x_215); +x_236 = lean_ctor_get(x_218, 1); +lean_inc(x_236); +lean_dec(x_218); +x_237 = lean_nat_dec_le(x_236, x_236); +lean_dec(x_236); +if (x_237 == 0) +{ +lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; uint8_t x_244; lean_object* x_245; +lean_dec(x_219); +x_238 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_239 = l_Lean_Parser_ParserState_mkError(x_143, x_238); +x_240 = l_Lean_nullKind; +lean_inc(x_146); +x_241 = l_Lean_Parser_ParserState_mkNode(x_239, x_240, x_146); +x_242 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_243 = l_Lean_Parser_ParserState_mkNode(x_241, x_242, x_146); +x_244 = 1; +x_245 = l_Lean_Parser_mergeOrElseErrors(x_243, x_138, x_134, x_244); +lean_dec(x_134); +return x_245; } else { -lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; -lean_inc(x_38); -x_83 = l_Lean_Parser_ParserState_restore(x_39, x_37, x_38); -lean_dec(x_37); -x_84 = lean_unsigned_to_nat(1024u); -x_85 = l_Lean_Parser_checkPrecFn(x_84, x_1, x_83); -x_86 = lean_ctor_get(x_85, 3); -lean_inc(x_86); -if (lean_obj_tag(x_86) == 0) +lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; +x_246 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; +x_247 = lean_unsigned_to_nat(0u); +lean_inc(x_219); +x_248 = l_Lean_Parser_categoryParser___elambda__1(x_246, x_247, x_219, x_143); +x_249 = lean_ctor_get(x_248, 3); +lean_inc(x_249); +if (lean_obj_tag(x_249) == 0) { -lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; uint8_t x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; uint8_t x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; lean_object* x_105; -x_87 = lean_ctor_get(x_85, 0); -lean_inc(x_87); -x_88 = lean_array_get_size(x_87); -lean_dec(x_87); -x_89 = lean_ctor_get(x_1, 0); -lean_inc(x_89); -x_90 = lean_ctor_get(x_1, 1); -lean_inc(x_90); -x_91 = lean_ctor_get(x_1, 2); -lean_inc(x_91); -x_92 = lean_ctor_get(x_1, 3); -lean_inc(x_92); -x_93 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_265; lean_object* x_266; +x_250 = lean_ctor_get(x_248, 0); +lean_inc(x_250); +x_251 = lean_array_get_size(x_250); +lean_dec(x_250); +x_252 = lean_ctor_get(x_248, 1); +lean_inc(x_252); +lean_inc(x_219); +x_265 = l_Lean_Parser_tokenFn(x_219, x_248); +x_266 = lean_ctor_get(x_265, 3); +lean_inc(x_266); +if (lean_obj_tag(x_266) == 0) +{ +lean_object* x_267; lean_object* x_268; +x_267 = lean_ctor_get(x_265, 0); +lean_inc(x_267); +x_268 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_267); +lean_dec(x_267); +if (lean_obj_tag(x_268) == 2) +{ +lean_object* x_269; lean_object* x_270; uint8_t x_271; +x_269 = lean_ctor_get(x_268, 1); +lean_inc(x_269); +lean_dec(x_268); +x_270 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; +x_271 = lean_string_dec_eq(x_269, x_270); +lean_dec(x_269); +if (x_271 == 0) +{ +lean_object* x_272; lean_object* x_273; +x_272 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_252); +x_273 = l_Lean_Parser_ParserState_mkErrorsAt(x_265, x_272, x_252); +x_253 = x_273; +goto block_264; +} +else +{ +x_253 = x_265; +goto block_264; +} +} +else +{ +lean_object* x_274; lean_object* x_275; +lean_dec(x_268); +x_274 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_252); +x_275 = l_Lean_Parser_ParserState_mkErrorsAt(x_265, x_274, x_252); +x_253 = x_275; +goto block_264; +} +} +else +{ +lean_object* x_276; lean_object* x_277; +lean_dec(x_266); +x_276 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_252); +x_277 = l_Lean_Parser_ParserState_mkErrorsAt(x_265, x_276, x_252); +x_253 = x_277; +goto block_264; +} +block_264: +{ +lean_object* x_254; +x_254 = lean_ctor_get(x_253, 3); +lean_inc(x_254); +if (lean_obj_tag(x_254) == 0) +{ +lean_object* x_255; lean_object* x_256; +lean_dec(x_252); +x_255 = l_Lean_nullKind; +x_256 = l_Lean_Parser_ParserState_mkNode(x_253, x_255, x_251); +x_220 = x_256; +goto block_235; +} +else +{ +lean_object* x_257; uint8_t x_258; +lean_dec(x_254); +x_257 = lean_ctor_get(x_253, 1); +lean_inc(x_257); +x_258 = lean_nat_dec_eq(x_257, x_252); +lean_dec(x_257); +if (x_258 == 0) +{ +lean_object* x_259; lean_object* x_260; +lean_dec(x_252); +x_259 = l_Lean_nullKind; +x_260 = l_Lean_Parser_ParserState_mkNode(x_253, x_259, x_251); +x_220 = x_260; +goto block_235; +} +else +{ +lean_object* x_261; lean_object* x_262; lean_object* x_263; +x_261 = l_Lean_Parser_ParserState_restore(x_253, x_251, x_252); +x_262 = l_Lean_nullKind; +x_263 = l_Lean_Parser_ParserState_mkNode(x_261, x_262, x_251); +x_220 = x_263; +goto block_235; +} +} +} +} +else +{ +lean_dec(x_249); +x_220 = x_248; +goto block_235; +} +} +block_235: +{ +lean_object* x_221; +x_221 = lean_ctor_get(x_220, 3); +lean_inc(x_221); +if (lean_obj_tag(x_221) == 0) +{ +lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; uint8_t x_227; lean_object* x_228; +x_222 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_219, x_220); +x_223 = l_Lean_nullKind; +lean_inc(x_146); +x_224 = l_Lean_Parser_ParserState_mkNode(x_222, x_223, x_146); +x_225 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_226 = l_Lean_Parser_ParserState_mkNode(x_224, x_225, x_146); +x_227 = 1; +x_228 = l_Lean_Parser_mergeOrElseErrors(x_226, x_138, x_134, x_227); +lean_dec(x_134); +return x_228; +} +else +{ +lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; uint8_t x_233; lean_object* x_234; +lean_dec(x_221); +lean_dec(x_219); +x_229 = l_Lean_nullKind; +lean_inc(x_146); +x_230 = l_Lean_Parser_ParserState_mkNode(x_220, x_229, x_146); +x_231 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_232 = l_Lean_Parser_ParserState_mkNode(x_230, x_231, x_146); +x_233 = 1; +x_234 = l_Lean_Parser_mergeOrElseErrors(x_232, x_138, x_134, x_233); +lean_dec(x_134); +return x_234; +} +} +} +} +else +{ +uint8_t x_278; lean_object* x_279; +lean_dec(x_144); +lean_free_object(x_136); +lean_dec(x_1); +x_278 = 1; +x_279 = l_Lean_Parser_mergeOrElseErrors(x_143, x_138, x_134, x_278); +lean_dec(x_134); +return x_279; +} +} +} +else +{ +lean_object* x_280; lean_object* x_281; uint8_t x_282; +x_280 = lean_ctor_get(x_136, 0); +lean_inc(x_280); +lean_dec(x_136); +x_281 = lean_ctor_get(x_135, 1); +lean_inc(x_281); +x_282 = lean_nat_dec_eq(x_281, x_134); +lean_dec(x_281); +if (x_282 == 0) +{ +lean_dec(x_280); +lean_dec(x_134); +lean_dec(x_133); +lean_dec(x_1); +return x_135; +} +else +{ +lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; +lean_inc(x_134); +x_283 = l_Lean_Parser_ParserState_restore(x_135, x_133, x_134); +lean_dec(x_133); +x_284 = lean_unsigned_to_nat(1024u); +x_285 = l_Lean_Parser_checkPrecFn(x_284, x_1, x_283); +x_286 = lean_ctor_get(x_285, 3); +lean_inc(x_286); +if (lean_obj_tag(x_286) == 0) +{ +lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; uint8_t x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_316; uint8_t x_317; +x_287 = lean_ctor_get(x_285, 0); +lean_inc(x_287); +x_288 = lean_array_get_size(x_287); +lean_dec(x_287); +x_289 = lean_ctor_get(x_1, 0); +lean_inc(x_289); +x_290 = lean_ctor_get(x_1, 1); +lean_inc(x_290); +x_291 = lean_ctor_get(x_1, 2); +lean_inc(x_291); +x_292 = lean_ctor_get(x_1, 3); +lean_inc(x_292); +x_293 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); if (lean_is_exclusive(x_1)) { lean_ctor_release(x_1, 0); lean_ctor_release(x_1, 1); lean_ctor_release(x_1, 2); lean_ctor_release(x_1, 3); lean_ctor_release(x_1, 4); - x_94 = x_1; + x_294 = x_1; } else { lean_dec_ref(x_1); - x_94 = lean_box(0); + x_294 = lean_box(0); } -x_95 = lean_ctor_get(x_89, 2); -lean_inc(x_95); -x_96 = lean_ctor_get(x_85, 1); -lean_inc(x_96); -x_97 = l_Lean_FileMap_toPosition(x_95, x_96); -lean_dec(x_95); -x_98 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_98, 0, x_97); -if (lean_is_scalar(x_94)) { - x_99 = lean_alloc_ctor(0, 5, 1); +x_295 = lean_ctor_get(x_289, 2); +lean_inc(x_295); +x_296 = lean_ctor_get(x_285, 1); +lean_inc(x_296); +x_297 = l_Lean_FileMap_toPosition(x_295, x_296); +lean_dec(x_295); +lean_inc(x_297); +x_298 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_298, 0, x_297); +if (lean_is_scalar(x_294)) { + x_299 = lean_alloc_ctor(0, 5, 1); } else { - x_99 = x_94; + x_299 = x_294; } -lean_ctor_set(x_99, 0, x_89); -lean_ctor_set(x_99, 1, x_90); -lean_ctor_set(x_99, 2, x_91); -lean_ctor_set(x_99, 3, x_92); -lean_ctor_set(x_99, 4, x_98); -lean_ctor_set_uint8(x_99, sizeof(void*)*5, x_93); -x_100 = 0; -x_101 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_100, x_99, x_85); -x_102 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; -x_103 = l_Lean_Parser_ParserState_mkNode(x_101, x_102, x_88); -x_104 = 1; -x_105 = l_Lean_Parser_mergeOrElseErrors(x_103, x_80, x_38, x_104); -lean_dec(x_38); -return x_105; +lean_ctor_set(x_299, 0, x_289); +lean_ctor_set(x_299, 1, x_290); +lean_ctor_set(x_299, 2, x_291); +lean_ctor_set(x_299, 3, x_292); +lean_ctor_set(x_299, 4, x_298); +lean_ctor_set_uint8(x_299, sizeof(void*)*5, x_293); +x_316 = lean_ctor_get(x_297, 1); +lean_inc(x_316); +lean_dec(x_297); +x_317 = lean_nat_dec_le(x_316, x_316); +lean_dec(x_316); +if (x_317 == 0) +{ +lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; uint8_t x_324; lean_object* x_325; +lean_dec(x_299); +x_318 = l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___closed__1; +x_319 = l_Lean_Parser_ParserState_mkError(x_285, x_318); +x_320 = l_Lean_nullKind; +lean_inc(x_288); +x_321 = l_Lean_Parser_ParserState_mkNode(x_319, x_320, x_288); +x_322 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_323 = l_Lean_Parser_ParserState_mkNode(x_321, x_322, x_288); +x_324 = 1; +x_325 = l_Lean_Parser_mergeOrElseErrors(x_323, x_280, x_134, x_324); +lean_dec(x_134); +return x_325; } else { -uint8_t x_106; lean_object* x_107; -lean_dec(x_86); +lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_object* x_329; +x_326 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; +x_327 = lean_unsigned_to_nat(0u); +lean_inc(x_299); +x_328 = l_Lean_Parser_categoryParser___elambda__1(x_326, x_327, x_299, x_285); +x_329 = lean_ctor_get(x_328, 3); +lean_inc(x_329); +if (lean_obj_tag(x_329) == 0) +{ +lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_345; lean_object* x_346; +x_330 = lean_ctor_get(x_328, 0); +lean_inc(x_330); +x_331 = lean_array_get_size(x_330); +lean_dec(x_330); +x_332 = lean_ctor_get(x_328, 1); +lean_inc(x_332); +lean_inc(x_299); +x_345 = l_Lean_Parser_tokenFn(x_299, x_328); +x_346 = lean_ctor_get(x_345, 3); +lean_inc(x_346); +if (lean_obj_tag(x_346) == 0) +{ +lean_object* x_347; lean_object* x_348; +x_347 = lean_ctor_get(x_345, 0); +lean_inc(x_347); +x_348 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_347); +lean_dec(x_347); +if (lean_obj_tag(x_348) == 2) +{ +lean_object* x_349; lean_object* x_350; uint8_t x_351; +x_349 = lean_ctor_get(x_348, 1); +lean_inc(x_349); +lean_dec(x_348); +x_350 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; +x_351 = lean_string_dec_eq(x_349, x_350); +lean_dec(x_349); +if (x_351 == 0) +{ +lean_object* x_352; lean_object* x_353; +x_352 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_332); +x_353 = l_Lean_Parser_ParserState_mkErrorsAt(x_345, x_352, x_332); +x_333 = x_353; +goto block_344; +} +else +{ +x_333 = x_345; +goto block_344; +} +} +else +{ +lean_object* x_354; lean_object* x_355; +lean_dec(x_348); +x_354 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_332); +x_355 = l_Lean_Parser_ParserState_mkErrorsAt(x_345, x_354, x_332); +x_333 = x_355; +goto block_344; +} +} +else +{ +lean_object* x_356; lean_object* x_357; +lean_dec(x_346); +x_356 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; +lean_inc(x_332); +x_357 = l_Lean_Parser_ParserState_mkErrorsAt(x_345, x_356, x_332); +x_333 = x_357; +goto block_344; +} +block_344: +{ +lean_object* x_334; +x_334 = lean_ctor_get(x_333, 3); +lean_inc(x_334); +if (lean_obj_tag(x_334) == 0) +{ +lean_object* x_335; lean_object* x_336; +lean_dec(x_332); +x_335 = l_Lean_nullKind; +x_336 = l_Lean_Parser_ParserState_mkNode(x_333, x_335, x_331); +x_300 = x_336; +goto block_315; +} +else +{ +lean_object* x_337; uint8_t x_338; +lean_dec(x_334); +x_337 = lean_ctor_get(x_333, 1); +lean_inc(x_337); +x_338 = lean_nat_dec_eq(x_337, x_332); +lean_dec(x_337); +if (x_338 == 0) +{ +lean_object* x_339; lean_object* x_340; +lean_dec(x_332); +x_339 = l_Lean_nullKind; +x_340 = l_Lean_Parser_ParserState_mkNode(x_333, x_339, x_331); +x_300 = x_340; +goto block_315; +} +else +{ +lean_object* x_341; lean_object* x_342; lean_object* x_343; +x_341 = l_Lean_Parser_ParserState_restore(x_333, x_331, x_332); +x_342 = l_Lean_nullKind; +x_343 = l_Lean_Parser_ParserState_mkNode(x_341, x_342, x_331); +x_300 = x_343; +goto block_315; +} +} +} +} +else +{ +lean_dec(x_329); +x_300 = x_328; +goto block_315; +} +} +block_315: +{ +lean_object* x_301; +x_301 = lean_ctor_get(x_300, 3); +lean_inc(x_301); +if (lean_obj_tag(x_301) == 0) +{ +lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; uint8_t x_307; lean_object* x_308; +x_302 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_299, x_300); +x_303 = l_Lean_nullKind; +lean_inc(x_288); +x_304 = l_Lean_Parser_ParserState_mkNode(x_302, x_303, x_288); +x_305 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_306 = l_Lean_Parser_ParserState_mkNode(x_304, x_305, x_288); +x_307 = 1; +x_308 = l_Lean_Parser_mergeOrElseErrors(x_306, x_280, x_134, x_307); +lean_dec(x_134); +return x_308; +} +else +{ +lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; uint8_t x_313; lean_object* x_314; +lean_dec(x_301); +lean_dec(x_299); +x_309 = l_Lean_nullKind; +lean_inc(x_288); +x_310 = l_Lean_Parser_ParserState_mkNode(x_300, x_309, x_288); +x_311 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_312 = l_Lean_Parser_ParserState_mkNode(x_310, x_311, x_288); +x_313 = 1; +x_314 = l_Lean_Parser_mergeOrElseErrors(x_312, x_280, x_134, x_313); +lean_dec(x_134); +return x_314; +} +} +} +else +{ +uint8_t x_358; lean_object* x_359; +lean_dec(x_286); lean_dec(x_1); -x_106 = 1; -x_107 = l_Lean_Parser_mergeOrElseErrors(x_85, x_80, x_38, x_106); -lean_dec(x_38); -return x_107; +x_358 = 1; +x_359 = l_Lean_Parser_mergeOrElseErrors(x_285, x_280, x_134, x_358); +lean_dec(x_134); +return x_359; } } } @@ -4901,7 +5696,7 @@ lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_1 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_2 = l_Lean_Parser_symbolInfo(x_1); return x_2; } @@ -4909,11 +5704,10 @@ return x_2; lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__3() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; +lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__2; -x_2 = l_Lean_Parser_Parser_inhabited___closed__1; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); -return x_3; +x_2 = l_Lean_Parser_optionaInfo(x_1); +return x_2; } } lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__4() { @@ -4924,7 +5718,7 @@ x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__1; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); x_3 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__3; -x_4 = l_Lean_Parser_sepBy1Info(x_2, x_3); +x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } } @@ -4932,9 +5726,9 @@ lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; +x_1 = l_Lean_Parser_Parser_inhabited___closed__1; x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__4; -x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } } @@ -4942,25 +5736,35 @@ lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_epsilonInfo; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__5; -x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); return x_3; } } lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__7() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_epsilonInfo; +x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__6; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__8() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__6; +x_3 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__7; x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); return x_4; } } -lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__8() { +lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__9() { _start: { lean_object* x_1; @@ -4968,12 +5772,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_tacticSeq1Indented___elamb return x_1; } } -lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__9() { +lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__7; -x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__8; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__8; +x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__9; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -4984,32 +5788,10 @@ lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__9; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__10; return x_1; } } -lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -uint8_t x_6; uint8_t x_7; lean_object* x_8; -x_6 = lean_unbox(x_1); -lean_dec(x_1); -x_7 = lean_unbox(x_3); -lean_dec(x_3); -x_8 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2(x_6, x_2, x_7, x_4, x_5); -return x_8; -} -} -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -uint8_t x_4; lean_object* x_5; -x_4 = lean_unbox(x_1); -lean_dec(x_1); -x_5 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1(x_4, x_2, x_3); -return x_5; -} -} lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeqBracketed___elambda__1___spec__2(uint8_t x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -5054,13 +5836,13 @@ lean_object* x_27; lean_object* x_28; uint8_t x_29; x_27 = lean_ctor_get(x_26, 1); lean_inc(x_27); lean_dec(x_26); -x_28 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_28 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_29 = lean_string_dec_eq(x_27, x_28); lean_dec(x_27); if (x_29 == 0) { lean_object* x_30; lean_object* x_31; -x_30 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_30 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); x_16 = x_31; @@ -5076,7 +5858,7 @@ else { lean_object* x_32; lean_object* x_33; lean_dec(x_26); -x_32 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); x_16 = x_33; @@ -5087,7 +5869,7 @@ else { lean_object* x_34; lean_object* x_35; lean_dec(x_24); -x_34 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_34 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); x_16 = x_35; @@ -5891,7 +6673,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Tactic_tacticSeqBracketed___closed__9; -x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__8; +x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented___closed__9; x_3 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn), 4, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -7064,6 +7846,26 @@ x_8 = l_Lean_PrettyPrinter_Formatter_orelse_formatter(x_6, x_7, x_1, x_2, x_3, x return x_8; } } +lean_object* _init_l_Lean_Parser_many1Indent_formatter___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed), 4, 0); +return x_1; +} +} +lean_object* l_Lean_Parser_many1Indent_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = l_Lean_Parser_many1Indent_formatter___closed__1; +x_8 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); +lean_closure_set(x_8, 0, x_7); +lean_closure_set(x_8, 1, x_1); +x_9 = l_Lean_PrettyPrinter_Formatter_many_formatter(x_8, x_2, x_3, x_4, x_5, x_6); +return x_9; +} +} lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__1() { _start: { @@ -7082,16 +7884,18 @@ return x_5; lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2() { _start: { -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed), 4, 0); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__3; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_optional_formatter), 6, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__3; +x_1 = l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__4; x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -7104,7 +7908,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__3; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_try_formatter), 6, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_many1Indent_formatter), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -7112,32 +7916,10 @@ return x_2; lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__5() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__4; -x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__4; -x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_sepBy1_formatter), 7, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__5; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_withPosition_formatter), 6, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__7() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; x_2 = lean_unsigned_to_nat(1024u); -x_3 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__6; +x_3 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__4; x_4 = lean_alloc_closure((void*)(l_Lean_Parser_leadingNode_formatter___boxed), 8, 3); lean_closure_set(x_4, 0, x_1); lean_closure_set(x_4, 1, x_2); @@ -7150,7 +7932,7 @@ _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; x_6 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__1; -x_7 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__7; +x_7 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__5; x_8 = l_Lean_PrettyPrinter_Formatter_orelse_formatter(x_6, x_7, x_1, x_2, x_3, x_4, x_5); return x_8; } @@ -7410,6 +8192,26 @@ x_8 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(x_6, x_7, x_1, x_2 return x_8; } } +lean_object* _init_l_Lean_Parser_many1Indent_parenthesizer___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed), 4, 0); +return x_1; +} +} +lean_object* l_Lean_Parser_many1Indent_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = l_Lean_Parser_many1Indent_parenthesizer___closed__1; +x_8 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); +lean_closure_set(x_8, 0, x_7); +lean_closure_set(x_8, 1, x_1); +x_9 = l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer(x_8, x_2, x_3, x_4, x_5, x_6); +return x_9; +} +} lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__1() { _start: { @@ -7426,16 +8228,18 @@ return x_4; lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2() { _start: { -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed), 4, 0); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_optional_parenthesizer), 6, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; +x_1 = l_Lean_Parser_Tactic_tacticSeqBracketed_parenthesizer___closed__2; x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -7448,7 +8252,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__3; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_try_parenthesizer), 6, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_many1Indent_parenthesizer), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -7456,32 +8260,10 @@ return x_2; lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__5() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeqBracketed_parenthesizer___closed__2; -x_2 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__4; -x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_sepBy1_parenthesizer), 7, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__5; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer), 6, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__7() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2; x_2 = lean_unsigned_to_nat(1024u); -x_3 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__6; +x_3 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__4; x_4 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___boxed), 8, 3); lean_closure_set(x_4, 0, x_1); lean_closure_set(x_4, 1, x_2); @@ -7494,7 +8276,7 @@ _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; x_6 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__1; -x_7 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__7; +x_7 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__5; x_8 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(x_6, x_7, x_1, x_2, x_3, x_4, x_5); return x_8; } @@ -20242,14 +21024,14 @@ lean_object* x_20; lean_object* x_21; uint8_t x_22; x_20 = lean_ctor_get(x_19, 1); lean_inc(x_20); lean_dec(x_19); -x_21 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_21 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_22 = lean_string_dec_eq(x_20, x_21); lean_dec(x_20); if (x_22 == 0) { lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_dec(x_1); -x_23 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_23 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); x_25 = l_Lean_Parser_Term_have___elambda__1___closed__2; x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_10); @@ -20272,7 +21054,7 @@ else lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_dec(x_19); lean_dec(x_1); -x_32 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_32, x_15); x_34 = l_Lean_Parser_Term_have___elambda__1___closed__2; x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_10); @@ -20284,7 +21066,7 @@ else lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_dec(x_17); lean_dec(x_1); -x_36 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_36 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_36, x_15); x_38 = l_Lean_Parser_Term_have___elambda__1___closed__2; x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_10); @@ -20464,14 +21246,14 @@ lean_object* x_82; lean_object* x_83; uint8_t x_84; x_82 = lean_ctor_get(x_81, 1); lean_inc(x_82); lean_dec(x_81); -x_83 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_83 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_84 = lean_string_dec_eq(x_82, x_83); lean_dec(x_82); if (x_84 == 0) { lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; uint8_t x_89; lean_object* x_90; lean_dec(x_1); -x_85 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_85 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_86 = l_Lean_Parser_ParserState_mkErrorsAt(x_78, x_85, x_77); x_87 = l_Lean_Parser_Term_have___elambda__1___closed__2; x_88 = l_Lean_Parser_ParserState_mkNode(x_86, x_87, x_72); @@ -20500,7 +21282,7 @@ else lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; lean_object* x_103; lean_dec(x_81); lean_dec(x_1); -x_98 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_98 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_99 = l_Lean_Parser_ParserState_mkErrorsAt(x_78, x_98, x_77); x_100 = l_Lean_Parser_Term_have___elambda__1___closed__2; x_101 = l_Lean_Parser_ParserState_mkNode(x_99, x_100, x_72); @@ -20515,7 +21297,7 @@ else lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; lean_object* x_109; lean_dec(x_79); lean_dec(x_1); -x_104 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_104 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_105 = l_Lean_Parser_ParserState_mkErrorsAt(x_78, x_104, x_77); x_106 = l_Lean_Parser_Term_have___elambda__1___closed__2; x_107 = l_Lean_Parser_ParserState_mkNode(x_105, x_106, x_72); @@ -21498,14 +22280,14 @@ lean_object* x_20; lean_object* x_21; uint8_t x_22; x_20 = lean_ctor_get(x_19, 1); lean_inc(x_20); lean_dec(x_19); -x_21 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_21 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_22 = lean_string_dec_eq(x_20, x_21); lean_dec(x_20); if (x_22 == 0) { lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_dec(x_1); -x_23 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_23 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15); x_25 = l_Lean_Parser_Term_suffices___elambda__1___closed__2; x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_10); @@ -21528,7 +22310,7 @@ else lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_dec(x_19); lean_dec(x_1); -x_32 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_32, x_15); x_34 = l_Lean_Parser_Term_suffices___elambda__1___closed__2; x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_10); @@ -21540,7 +22322,7 @@ else lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_dec(x_17); lean_dec(x_1); -x_36 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_36 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_36, x_15); x_38 = l_Lean_Parser_Term_suffices___elambda__1___closed__2; x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_10); @@ -21720,14 +22502,14 @@ lean_object* x_82; lean_object* x_83; uint8_t x_84; x_82 = lean_ctor_get(x_81, 1); lean_inc(x_82); lean_dec(x_81); -x_83 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_83 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_84 = lean_string_dec_eq(x_82, x_83); lean_dec(x_82); if (x_84 == 0) { lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; uint8_t x_89; lean_object* x_90; lean_dec(x_1); -x_85 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_85 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_86 = l_Lean_Parser_ParserState_mkErrorsAt(x_78, x_85, x_77); x_87 = l_Lean_Parser_Term_suffices___elambda__1___closed__2; x_88 = l_Lean_Parser_ParserState_mkNode(x_86, x_87, x_72); @@ -21756,7 +22538,7 @@ else lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; lean_object* x_103; lean_dec(x_81); lean_dec(x_1); -x_98 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_98 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_99 = l_Lean_Parser_ParserState_mkErrorsAt(x_78, x_98, x_77); x_100 = l_Lean_Parser_Term_suffices___elambda__1___closed__2; x_101 = l_Lean_Parser_ParserState_mkNode(x_99, x_100, x_72); @@ -21771,7 +22553,7 @@ else lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; lean_object* x_109; lean_dec(x_79); lean_dec(x_1); -x_104 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_104 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_105 = l_Lean_Parser_ParserState_mkErrorsAt(x_78, x_104, x_77); x_106 = l_Lean_Parser_Term_suffices___elambda__1___closed__2; x_107 = l_Lean_Parser_ParserState_mkNode(x_105, x_106, x_72); @@ -27524,7 +28306,7 @@ lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; +x_1 = l_Lean_Parser_Term_typeAscription_parenthesizer___closed__2; x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_optional_parenthesizer), 6, 1); lean_closure_set(x_2, 0, x_1); return x_2; @@ -27533,19 +28315,21 @@ return x_2; lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__7() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Term_typeAscription_parenthesizer___closed__2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_optional_parenthesizer), 6, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; +x_2 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; +x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); +lean_closure_set(x_3, 0, x_1); +lean_closure_set(x_3, 1, x_2); +return x_3; } } lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__7; -x_2 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; +x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__7; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -27556,7 +28340,7 @@ lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__9() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; +x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__5; x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__8; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -27568,7 +28352,7 @@ lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__5; +x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__3; x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__9; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -27579,8 +28363,16 @@ return x_3; lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__11() { _start: { +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppHardSpace_parenthesizer___boxed), 4, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__12() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__3; +x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__11; x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__10; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -27588,20 +28380,12 @@ lean_closure_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__12() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppHardSpace_parenthesizer___boxed), 4, 0); -return x_1; -} -} lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__13() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__12; -x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__11; +x_1 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; +x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__12; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -27611,22 +28395,10 @@ return x_3; lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__14() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; -x_2 = l_Lean_Parser_Term_structInst_parenthesizer___closed__13; -x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__15() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; x_2 = lean_unsigned_to_nat(1024u); -x_3 = l_Lean_Parser_Term_structInst_parenthesizer___closed__14; +x_3 = l_Lean_Parser_Term_structInst_parenthesizer___closed__13; x_4 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___boxed), 8, 3); lean_closure_set(x_4, 0, x_1); lean_closure_set(x_4, 1, x_2); @@ -27639,7 +28411,7 @@ _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; x_6 = l_Lean_Parser_Term_structInst_parenthesizer___closed__1; -x_7 = l_Lean_Parser_Term_structInst_parenthesizer___closed__15; +x_7 = l_Lean_Parser_Term_structInst_parenthesizer___closed__14; x_8 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(x_6, x_7, x_1, x_2, x_3, x_4, x_5); return x_8; } @@ -41141,7 +41913,7 @@ lean_object* _init_l_Lean_Parser_Term_matchAlts_formatter___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2; +x_1 = l_Lean_Parser_many1Indent_formatter___closed__1; x_2 = l_Lean_Parser_Term_matchAlts_formatter___closed__2; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_andthen_formatter), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -41615,7 +42387,7 @@ lean_object* _init_l_Lean_Parser_Term_matchAlts_parenthesizer___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; +x_1 = l_Lean_Parser_many1Indent_parenthesizer___closed__1; x_2 = l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -41683,7 +42455,7 @@ lean_object* _init_l_Lean_Parser_Term_matchAlts_parenthesizer___closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_structInst_parenthesizer___closed__6; +x_1 = l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2; x_2 = l_Lean_Parser_Term_matchAlts_parenthesizer___closed__4; x_3 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer), 7, 2); lean_closure_set(x_3, 0, x_1); @@ -49136,14 +49908,14 @@ lean_object* x_22; lean_object* x_23; uint8_t x_24; x_22 = lean_ctor_get(x_21, 1); lean_inc(x_22); lean_dec(x_21); -x_23 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_23 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_24 = lean_string_dec_eq(x_22, x_23); lean_dec(x_22); if (x_24 == 0) { lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_dec(x_1); -x_25 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_25 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_25, x_17); x_27 = l_Lean_Parser_Term_let___elambda__1___closed__2; x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_12); @@ -49166,7 +49938,7 @@ else lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_dec(x_21); lean_dec(x_1); -x_34 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_34 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_34, x_17); x_36 = l_Lean_Parser_Term_let___elambda__1___closed__2; x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_12); @@ -49178,7 +49950,7 @@ else lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_dec(x_19); lean_dec(x_1); -x_38 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_38 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_38, x_17); x_40 = l_Lean_Parser_Term_let___elambda__1___closed__2; x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_12); @@ -49362,14 +50134,14 @@ lean_object* x_84; lean_object* x_85; uint8_t x_86; x_84 = lean_ctor_get(x_83, 1); lean_inc(x_84); lean_dec(x_83); -x_85 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_85 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_86 = lean_string_dec_eq(x_84, x_85); lean_dec(x_84); if (x_86 == 0) { lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; uint8_t x_91; lean_object* x_92; lean_dec(x_1); -x_87 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_87 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_88 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_87, x_79); x_89 = l_Lean_Parser_Term_let___elambda__1___closed__2; x_90 = l_Lean_Parser_ParserState_mkNode(x_88, x_89, x_74); @@ -49398,7 +50170,7 @@ else lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; lean_object* x_105; lean_dec(x_83); lean_dec(x_1); -x_100 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_100 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_101 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_100, x_79); x_102 = l_Lean_Parser_Term_let___elambda__1___closed__2; x_103 = l_Lean_Parser_ParserState_mkNode(x_101, x_102, x_74); @@ -49413,7 +50185,7 @@ else lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; uint8_t x_110; lean_object* x_111; lean_dec(x_81); lean_dec(x_1); -x_106 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_106 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_107 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_106, x_79); x_108 = l_Lean_Parser_Term_let___elambda__1___closed__2; x_109 = l_Lean_Parser_ParserState_mkNode(x_107, x_108, x_74); @@ -50532,14 +51304,14 @@ lean_object* x_22; lean_object* x_23; uint8_t x_24; x_22 = lean_ctor_get(x_21, 1); lean_inc(x_22); lean_dec(x_21); -x_23 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_23 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_24 = lean_string_dec_eq(x_22, x_23); lean_dec(x_22); if (x_24 == 0) { lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_dec(x_1); -x_25 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_25 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_25, x_17); x_27 = l_Lean_Parser_Term_let_x21___elambda__1___closed__2; x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_12); @@ -50562,7 +51334,7 @@ else lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_dec(x_21); lean_dec(x_1); -x_34 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_34 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_34, x_17); x_36 = l_Lean_Parser_Term_let_x21___elambda__1___closed__2; x_37 = l_Lean_Parser_ParserState_mkNode(x_35, x_36, x_12); @@ -50574,7 +51346,7 @@ else lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_dec(x_19); lean_dec(x_1); -x_38 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_38 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_38, x_17); x_40 = l_Lean_Parser_Term_let_x21___elambda__1___closed__2; x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_12); @@ -50758,14 +51530,14 @@ lean_object* x_84; lean_object* x_85; uint8_t x_86; x_84 = lean_ctor_get(x_83, 1); lean_inc(x_84); lean_dec(x_83); -x_85 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_85 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_86 = lean_string_dec_eq(x_84, x_85); lean_dec(x_84); if (x_86 == 0) { lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; uint8_t x_91; lean_object* x_92; lean_dec(x_1); -x_87 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_87 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_88 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_87, x_79); x_89 = l_Lean_Parser_Term_let_x21___elambda__1___closed__2; x_90 = l_Lean_Parser_ParserState_mkNode(x_88, x_89, x_74); @@ -50794,7 +51566,7 @@ else lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; lean_object* x_105; lean_dec(x_83); lean_dec(x_1); -x_100 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_100 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_101 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_100, x_79); x_102 = l_Lean_Parser_Term_let_x21___elambda__1___closed__2; x_103 = l_Lean_Parser_ParserState_mkNode(x_101, x_102, x_74); @@ -50809,7 +51581,7 @@ else lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; uint8_t x_110; lean_object* x_111; lean_dec(x_81); lean_dec(x_1); -x_106 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_106 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_107 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_106, x_79); x_108 = l_Lean_Parser_Term_let_x21___elambda__1___closed__2; x_109 = l_Lean_Parser_ParserState_mkNode(x_107, x_108, x_74); @@ -52853,14 +53625,14 @@ lean_object* x_23; lean_object* x_24; uint8_t x_25; x_23 = lean_ctor_get(x_22, 1); lean_inc(x_23); lean_dec(x_22); -x_24 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_24 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_25 = lean_string_dec_eq(x_23, x_24); lean_dec(x_23); if (x_25 == 0) { lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_dec(x_1); -x_26 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_26 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_26, x_18); x_28 = l_Lean_Parser_Term_letrec___elambda__1___closed__2; x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_10); @@ -52883,7 +53655,7 @@ else lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_dec(x_22); lean_dec(x_1); -x_35 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_35 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_35, x_18); x_37 = l_Lean_Parser_Term_letrec___elambda__1___closed__2; x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_10); @@ -52895,7 +53667,7 @@ else lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_dec(x_20); lean_dec(x_1); -x_39 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_39 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_19, x_39, x_18); x_41 = l_Lean_Parser_Term_letrec___elambda__1___closed__2; x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_10); @@ -53101,14 +53873,14 @@ lean_object* x_94; lean_object* x_95; uint8_t x_96; x_94 = lean_ctor_get(x_93, 1); lean_inc(x_94); lean_dec(x_93); -x_95 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_95 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_96 = lean_string_dec_eq(x_94, x_95); lean_dec(x_94); if (x_96 == 0) { lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; uint8_t x_101; lean_object* x_102; lean_dec(x_1); -x_97 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_97 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_98 = l_Lean_Parser_ParserState_mkErrorsAt(x_90, x_97, x_89); x_99 = l_Lean_Parser_Term_letrec___elambda__1___closed__2; x_100 = l_Lean_Parser_ParserState_mkNode(x_98, x_99, x_81); @@ -53137,7 +53909,7 @@ else lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; uint8_t x_114; lean_object* x_115; lean_dec(x_93); lean_dec(x_1); -x_110 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_110 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_111 = l_Lean_Parser_ParserState_mkErrorsAt(x_90, x_110, x_89); x_112 = l_Lean_Parser_Term_letrec___elambda__1___closed__2; x_113 = l_Lean_Parser_ParserState_mkNode(x_111, x_112, x_81); @@ -53152,7 +53924,7 @@ else lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; uint8_t x_120; lean_object* x_121; lean_dec(x_91); lean_dec(x_1); -x_116 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_116 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_117 = l_Lean_Parser_ParserState_mkErrorsAt(x_90, x_116, x_89); x_118 = l_Lean_Parser_Term_letrec___elambda__1___closed__2; x_119 = l_Lean_Parser_ParserState_mkNode(x_117, x_118, x_81); @@ -63297,13 +64069,13 @@ lean_object* x_45; lean_object* x_46; uint8_t x_47; x_45 = lean_ctor_get(x_44, 1); lean_inc(x_45); lean_dec(x_44); -x_46 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_46 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_47 = lean_string_dec_eq(x_45, x_46); lean_dec(x_45); if (x_47 == 0) { lean_object* x_48; lean_object* x_49; -x_48 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_48 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_49 = l_Lean_Parser_ParserState_mkErrorsAt(x_41, x_48, x_15); x_24 = x_49; @@ -63319,7 +64091,7 @@ else { lean_object* x_50; lean_object* x_51; lean_dec(x_44); -x_50 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_50 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_51 = l_Lean_Parser_ParserState_mkErrorsAt(x_41, x_50, x_15); x_24 = x_51; @@ -63330,7 +64102,7 @@ else { lean_object* x_52; lean_object* x_53; lean_dec(x_42); -x_52 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_52 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; lean_inc(x_15); x_53 = l_Lean_Parser_ParserState_mkErrorsAt(x_41, x_52, x_15); x_24 = x_53; @@ -74389,14 +75161,14 @@ lean_object* x_22; lean_object* x_23; uint8_t x_24; x_22 = lean_ctor_get(x_21, 1); lean_inc(x_22); lean_dec(x_21); -x_23 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_23 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_24 = lean_string_dec_eq(x_22, x_23); lean_dec(x_22); if (x_24 == 0) { lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_dec(x_1); -x_25 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_25 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_25, x_17); x_27 = l_Lean_Parser_Term_dbgTrace___elambda__1___closed__2; x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_10); @@ -74417,7 +75189,7 @@ else lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_dec(x_21); lean_dec(x_1); -x_32 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_32, x_17); x_34 = l_Lean_Parser_Term_dbgTrace___elambda__1___closed__2; x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_10); @@ -74429,7 +75201,7 @@ else lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_dec(x_19); lean_dec(x_1); -x_36 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_36 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_36, x_17); x_38 = l_Lean_Parser_Term_dbgTrace___elambda__1___closed__2; x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_10); @@ -74611,14 +75383,14 @@ lean_object* x_84; lean_object* x_85; uint8_t x_86; x_84 = lean_ctor_get(x_83, 1); lean_inc(x_84); lean_dec(x_83); -x_85 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_85 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_86 = lean_string_dec_eq(x_84, x_85); lean_dec(x_84); if (x_86 == 0) { lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; uint8_t x_91; lean_object* x_92; lean_dec(x_1); -x_87 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_87 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_88 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_87, x_79); x_89 = l_Lean_Parser_Term_dbgTrace___elambda__1___closed__2; x_90 = l_Lean_Parser_ParserState_mkNode(x_88, x_89, x_72); @@ -74645,7 +75417,7 @@ else lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; lean_object* x_103; lean_dec(x_83); lean_dec(x_1); -x_98 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_98 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_99 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_98, x_79); x_100 = l_Lean_Parser_Term_dbgTrace___elambda__1___closed__2; x_101 = l_Lean_Parser_ParserState_mkNode(x_99, x_100, x_72); @@ -74660,7 +75432,7 @@ else lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; lean_object* x_109; lean_dec(x_81); lean_dec(x_1); -x_104 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_104 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_105 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_104, x_79); x_106 = l_Lean_Parser_Term_dbgTrace___elambda__1___closed__2; x_107 = l_Lean_Parser_ParserState_mkNode(x_105, x_106, x_72); @@ -75181,14 +75953,14 @@ lean_object* x_22; lean_object* x_23; uint8_t x_24; x_22 = lean_ctor_get(x_21, 1); lean_inc(x_22); lean_dec(x_21); -x_23 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_23 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_24 = lean_string_dec_eq(x_22, x_23); lean_dec(x_22); if (x_24 == 0) { lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_dec(x_1); -x_25 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_25 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_25, x_17); x_27 = l_Lean_Parser_Term_assert___elambda__1___closed__2; x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_10); @@ -75209,7 +75981,7 @@ else lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_dec(x_21); lean_dec(x_1); -x_32 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_32 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_32, x_17); x_34 = l_Lean_Parser_Term_assert___elambda__1___closed__2; x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_10); @@ -75221,7 +75993,7 @@ else lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_dec(x_19); lean_dec(x_1); -x_36 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_36 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_18, x_36, x_17); x_38 = l_Lean_Parser_Term_assert___elambda__1___closed__2; x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_10); @@ -75403,14 +76175,14 @@ lean_object* x_84; lean_object* x_85; uint8_t x_86; x_84 = lean_ctor_get(x_83, 1); lean_inc(x_84); lean_dec(x_83); -x_85 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1; +x_85 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1; x_86 = lean_string_dec_eq(x_84, x_85); lean_dec(x_84); if (x_86 == 0) { lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; uint8_t x_91; lean_object* x_92; lean_dec(x_1); -x_87 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_87 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_88 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_87, x_79); x_89 = l_Lean_Parser_Term_assert___elambda__1___closed__2; x_90 = l_Lean_Parser_ParserState_mkNode(x_88, x_89, x_72); @@ -75437,7 +76209,7 @@ else lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; lean_object* x_103; lean_dec(x_83); lean_dec(x_1); -x_98 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_98 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_99 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_98, x_79); x_100 = l_Lean_Parser_Term_assert___elambda__1___closed__2; x_101 = l_Lean_Parser_ParserState_mkNode(x_99, x_100, x_72); @@ -75452,7 +76224,7 @@ else lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; lean_object* x_109; lean_dec(x_81); lean_dec(x_1); -x_104 = l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5; +x_104 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4; x_105 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_104, x_79); x_106 = l_Lean_Parser_Term_assert___elambda__1___closed__2; x_107 = l_Lean_Parser_ParserState_mkNode(x_105, x_106, x_72); @@ -78076,16 +78848,14 @@ lean_mark_persistent(l_Lean_Parser_regTacticParserAttribute___closed__2); res = l_Lean_Parser_regTacticParserAttribute(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1 = _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1(); -lean_mark_persistent(l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__1); -l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__2 = _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__2(); -lean_mark_persistent(l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__2); -l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__3 = _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__3(); -lean_mark_persistent(l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__3); -l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__4 = _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__4(); -lean_mark_persistent(l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__4); -l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5 = _init_l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5(); -lean_mark_persistent(l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__2___closed__5); +l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1 = _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1(); +lean_mark_persistent(l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__1); +l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__2 = _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__2(); +lean_mark_persistent(l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__2); +l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__3 = _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__3(); +lean_mark_persistent(l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__3); +l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4 = _init_l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4(); +lean_mark_persistent(l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___spec__1___closed__4); l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__1 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__1); l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented___elambda__1___closed__2(); @@ -78112,6 +78882,8 @@ l_Lean_Parser_Tactic_tacticSeq1Indented___closed__8 = _init_l_Lean_Parser_Tactic lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented___closed__8); l_Lean_Parser_Tactic_tacticSeq1Indented___closed__9 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__9(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented___closed__9); +l_Lean_Parser_Tactic_tacticSeq1Indented___closed__10 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented___closed__10(); +lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented___closed__10); l_Lean_Parser_Tactic_tacticSeq1Indented = _init_l_Lean_Parser_Tactic_tacticSeq1Indented(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented); l_Lean_Parser_Tactic_tacticSeqBracketed___elambda__1___closed__1 = _init_l_Lean_Parser_Tactic_tacticSeqBracketed___elambda__1___closed__1(); @@ -78257,6 +79029,8 @@ l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__8 = _init_l_Lean_Par lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__8); l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__9 = _init_l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__9(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeqBracketed_formatter___closed__9); +l_Lean_Parser_many1Indent_formatter___closed__1 = _init_l_Lean_Parser_many1Indent_formatter___closed__1(); +lean_mark_persistent(l_Lean_Parser_many1Indent_formatter___closed__1); l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__1 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__1); l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__2(); @@ -78267,10 +79041,6 @@ l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__4 = _init_l_Lean_Par lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__4); l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__5 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__5(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__5); -l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__6 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__6(); -lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__6); -l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__7 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__7(); -lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_formatter___closed__7); l_Lean_Parser_Tactic_tacticSeq_formatter___closed__1 = _init_l_Lean_Parser_Tactic_tacticSeq_formatter___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq_formatter___closed__1); l_Lean_Parser_Tactic_tacticSeq_formatter___closed__2 = _init_l_Lean_Parser_Tactic_tacticSeq_formatter___closed__2(); @@ -78304,6 +79074,8 @@ l_Lean_Parser_Tactic_tacticSeqBracketed_parenthesizer___closed__5 = _init_l_Lean lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeqBracketed_parenthesizer___closed__5); l_Lean_Parser_Tactic_tacticSeqBracketed_parenthesizer___closed__6 = _init_l_Lean_Parser_Tactic_tacticSeqBracketed_parenthesizer___closed__6(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeqBracketed_parenthesizer___closed__6); +l_Lean_Parser_many1Indent_parenthesizer___closed__1 = _init_l_Lean_Parser_many1Indent_parenthesizer___closed__1(); +lean_mark_persistent(l_Lean_Parser_many1Indent_parenthesizer___closed__1); l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__1 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__1); l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__2(); @@ -78314,10 +79086,6 @@ l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__4 = _init_l_Lean lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__4); l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__5 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__5(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__5); -l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__6 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__6(); -lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__6); -l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__7 = _init_l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__7(); -lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq1Indented_parenthesizer___closed__7); l_Lean_Parser_Tactic_tacticSeq_parenthesizer___closed__1 = _init_l_Lean_Parser_Tactic_tacticSeq_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_tacticSeq_parenthesizer___closed__1); l_Lean_Parser_Tactic_tacticSeq_parenthesizer___closed__2 = _init_l_Lean_Parser_Tactic_tacticSeq_parenthesizer___closed__2(); @@ -80013,8 +80781,6 @@ l_Lean_Parser_Term_structInst_parenthesizer___closed__13 = _init_l_Lean_Parser_T lean_mark_persistent(l_Lean_Parser_Term_structInst_parenthesizer___closed__13); l_Lean_Parser_Term_structInst_parenthesizer___closed__14 = _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__14(); lean_mark_persistent(l_Lean_Parser_Term_structInst_parenthesizer___closed__14); -l_Lean_Parser_Term_structInst_parenthesizer___closed__15 = _init_l_Lean_Parser_Term_structInst_parenthesizer___closed__15(); -lean_mark_persistent(l_Lean_Parser_Term_structInst_parenthesizer___closed__15); l___regBuiltin_Lean_Parser_Term_structInst_parenthesizer___closed__1 = _init_l___regBuiltin_Lean_Parser_Term_structInst_parenthesizer___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_Parser_Term_structInst_parenthesizer___closed__1); res = l___regBuiltin_Lean_Parser_Term_structInst_parenthesizer(lean_io_mk_world());