From afefe93cc2fbf19f9a75ee4f1abca2baf7fa0da0 Mon Sep 17 00:00:00 2001 From: Leonardo de Moura Date: Thu, 16 Jan 2020 20:58:07 -0800 Subject: [PATCH] chore: update stage0 --- stage0/src/Init/Lean/Elab/Tactic/Basic.lean | 29 +- stage0/src/Init/Lean/Parser/Parser.lean | 23 +- stage0/src/Init/Lean/Parser/Tactic.lean | 3 +- stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c | 3035 ++++++++++--------- stage0/stdlib/Init/Lean/Parser/Command.c | 1055 ++++--- stage0/stdlib/Init/Lean/Parser/Parser.c | 2365 ++++++++------- stage0/stdlib/Init/Lean/Parser/Tactic.c | 725 +++-- stage0/stdlib/Init/Lean/Parser/Term.c | 2195 ++++++++------ 8 files changed, 5187 insertions(+), 4243 deletions(-) diff --git a/stage0/src/Init/Lean/Elab/Tactic/Basic.lean b/stage0/src/Init/Lean/Elab/Tactic/Basic.lean index 5cff2ed560..2e8b6a6a7b 100644 --- a/stage0/src/Init/Lean/Elab/Tactic/Basic.lean +++ b/stage0/src/Init/Lean/Elab/Tactic/Basic.lean @@ -136,19 +136,24 @@ adaptReader (fun (ctx : Context) => { macroStack := stx :: ctx.macroStack, .. ct partial def evalTactic : Syntax → TacticM Unit | stx => withIncRecDepth stx $ withFreshMacroScope $ match stx with - | Syntax.node k args => do + | Syntax.node k args => + if k == nullKind then + -- list of tactics separated by `;` => evaluate in order + -- Syntax quotations can return multiple ones + stx.forSepArgsM evalTactic + else do trace `Elab.step stx $ fun _ => stx; - s ← get; - let table := (tacticElabAttribute.ext.getState s.env).table; - let k := stx.getKind; - match table.find? k with - | some elabFns => evalTacticUsing s stx elabFns - | none => do - scp ← getCurrMacroScope; - env ← getEnv; - match expandMacro env stx scp with - | some stx' => withMacroExpansion stx $ evalTactic stx' - | none => throwError stx ("tactic '" ++ toString k ++ "' has not been implemented") + s ← get; + let table := (tacticElabAttribute.ext.getState s.env).table; + let k := stx.getKind; + match table.find? k with + | some elabFns => evalTacticUsing s stx elabFns + | none => do + scp ← getCurrMacroScope; + env ← getEnv; + match expandMacro env stx scp with + | some stx' => withMacroExpansion stx $ evalTactic stx' + | none => throwError stx ("tactic '" ++ toString k ++ "' has not been implemented") | _ => throwError stx "unexpected command" @[inline] def withLCtx {α} (lctx : LocalContext) (localInsts : LocalInstances) (x : TacticM α) : TacticM α := diff --git a/stage0/src/Init/Lean/Parser/Parser.lean b/stage0/src/Init/Lean/Parser/Parser.lean index f088b0359e..be83a8c547 100644 --- a/stage0/src/Init/Lean/Parser/Parser.lean +++ b/stage0/src/Init/Lean/Parser/Parser.lean @@ -441,7 +441,8 @@ fun a c s => { info := p.info, fn := many1Fn p.fn unboxSingleton } -@[specialize] private partial def sepByFnAux {k : ParserKind} (p : ParserFn k) (sep : ParserFn k) (allowTrailingSep : Bool) (iniSz : Nat) : Bool → ParserFn k +@[specialize] private partial def sepByFnAux {k : ParserKind} (p : ParserFn k) (sep : ParserFn k) (allowTrailingSep : Bool) + (iniSz : Nat) (unboxSingleton : Bool) : Bool → ParserFn k | pOpt, a, c, s => let sz := s.stackSize; let pos := s.pos; @@ -449,7 +450,10 @@ fun a c s => if s.hasError then if pOpt then let s := s.restore sz pos; - s.mkNode nullKind iniSz + if s.stackSize - iniSz == 2 && unboxSingleton then + s.popSyntax + else + s.mkNode nullKind iniSz else -- append `Syntax.missing` to make clear that List is incomplete let s := s.pushSyntax Syntax.missing; @@ -460,19 +464,22 @@ fun a c s => let s := sep a c s; if s.hasError then let s := s.restore sz pos; - s.mkNode nullKind iniSz + if s.stackSize - iniSz == 1 && unboxSingleton then + s + else + s.mkNode nullKind iniSz else sepByFnAux allowTrailingSep a c s @[specialize] def sepByFn {k : ParserKind} (allowTrailingSep : Bool) (p : ParserFn k) (sep : ParserFn k) : ParserFn k | a, c, s => let iniSz := s.stackSize; - sepByFnAux p sep allowTrailingSep iniSz true a c s + sepByFnAux p sep allowTrailingSep iniSz false true a c s -@[specialize] def sepBy1Fn {k : ParserKind} (allowTrailingSep : Bool) (p : ParserFn k) (sep : ParserFn k) : ParserFn k +@[specialize] def sepBy1Fn {k : ParserKind} (allowTrailingSep : Bool) (p : ParserFn k) (sep : ParserFn k) (unboxSingleton : Bool) : ParserFn k | a, c, s => let iniSz := s.stackSize; - sepByFnAux p sep allowTrailingSep iniSz false a c s + sepByFnAux p sep allowTrailingSep iniSz unboxSingleton false a c s @[noinline] def sepByInfo (p sep : ParserInfo) : ParserInfo := { collectTokens := p.collectTokens ∘ sep.collectTokens, @@ -487,9 +494,9 @@ fun a c s => { info := sepByInfo p.info sep.info, fn := sepByFn allowTrailingSep p.fn sep.fn } -@[inline] def sepBy1 {k : ParserKind} (p sep : Parser k) (allowTrailingSep : Bool := false) : Parser k := +@[inline] def sepBy1 {k : ParserKind} (p sep : Parser k) (allowTrailingSep : Bool := false) (unboxSingleton := false) : Parser k := { info := sepBy1Info p.info sep.info, - fn := sepBy1Fn allowTrailingSep p.fn sep.fn } + fn := sepBy1Fn allowTrailingSep p.fn sep.fn unboxSingleton } @[specialize] partial def satisfyFn (p : Char → Bool) (errorMsg : String := "unexpected character") : BasicParserFn | c, s => diff --git a/stage0/src/Init/Lean/Parser/Tactic.lean b/stage0/src/Init/Lean/Parser/Tactic.lean index e0a46623c3..29f8f13021 100644 --- a/stage0/src/Init/Lean/Parser/Tactic.lean +++ b/stage0/src/Init/Lean/Parser/Tactic.lean @@ -49,7 +49,8 @@ end Tactic namespace Term @[builtinTermParser] def tacticBlock := parser! symbol "begin " appPrec >> Tactic.seq >> "end" -@[builtinTermParser] def tacticStxQuot : Parser := node `Lean.Parser.Term.stxQuot $ symbol "`(tactic|" appPrec >> tacticParser >> ")" +-- Use `unboxSingleton` trick similar to the one used at Command.lean for `Term.stxQuot` +@[builtinTermParser] def tacticStxQuot : Parser := node `Lean.Parser.Term.stxQuot $ symbol "`(tactic|" appPrec >> sepBy1 tacticParser "; " true true >> ")" end Term diff --git a/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c b/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c index feea9631b0..803c456735 100644 --- a/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c +++ b/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c @@ -34,9 +34,11 @@ extern lean_object* l_Lean_nameToExprAux___main___closed__1; lean_object* l_Lean_Elab_Tactic_monadQuotation; lean_object* l_unreachable_x21___rarg(lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr(lean_object*); +extern lean_object* l_Lean_nullKind; extern lean_object* l_Lean_Elab_Term_elabTermAux___main___closed__6; lean_object* l_Lean_Elab_Tactic_mkTacticAttribute(lean_object*); lean_object* l_Lean_Elab_Tactic_getMCtx___rarg(lean_object*); +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_MessageData_ofList___closed__3; lean_object* lean_array_uget(lean_object*, size_t); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__2; @@ -99,6 +101,7 @@ lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_IO_ofExcept___at_Lean_registerClassAttr___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___closed__1; lean_object* l_Lean_Elab_Tactic_monadLog___closed__3; +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__1; extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__1; lean_object* l_Lean_Meta_intro(lean_object*, lean_object*, lean_object*, lean_object*); @@ -159,7 +162,6 @@ lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalSeq(lean_object*); lean_object* l_Lean_Elab_Tactic_withLCtx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_coeDecidableEq(uint8_t); lean_object* l_ReaderT_read___at_Lean_Elab_Tactic_monadLog___spec__1(lean_object*, lean_object*); -lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalSeq___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_modn(size_t, lean_object*); lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__1; lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__3; @@ -254,7 +256,6 @@ lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_ob lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__3; lean_object* l_Lean_Elab_Tactic_evalIntro___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTactic___spec__2___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalSeq___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__3; extern lean_object* l___private_Init_Lean_Parser_Parser_8__throwParserCategoryAlreadyDefined___rarg___closed__2; extern lean_object* l___private_Init_Lean_Meta_Tactic_Util_1__regTraceClasses___closed__1; @@ -3617,6 +3618,72 @@ return x_9; } } } +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(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; uint8_t x_8; +x_7 = lean_array_get_size(x_2); +x_8 = lean_nat_dec_lt(x_3, x_7); +lean_dec(x_7); +if (x_8 == 0) +{ +lean_object* x_9; +lean_dec(x_5); +lean_dec(x_3); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_4); +lean_ctor_set(x_9, 1, x_6); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; +lean_dec(x_4); +x_10 = lean_array_fget(x_2, x_3); +lean_inc(x_5); +x_11 = l_Lean_Elab_Tactic_evalTactic___main(x_10, x_5, x_6); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +lean_dec(x_11); +x_14 = lean_nat_add(x_3, x_1); +lean_dec(x_3); +x_3 = x_14; +x_4 = x_12; +x_6 = x_13; +goto _start; +} +else +{ +uint8_t x_16; +lean_dec(x_5); +lean_dec(x_3); +x_16 = !lean_is_exclusive(x_11); +if (x_16 == 0) +{ +return x_11; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_11, 0); +x_18 = lean_ctor_get(x_11, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_11); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +} lean_object* l_Lean_Elab_Tactic_evalTactic___main___lambda__1(lean_object* x_1, lean_object* x_2) { _start: { @@ -3667,67 +3734,67 @@ return x_3; lean_object* l_Lean_Elab_Tactic_evalTactic___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_4; lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; uint8_t x_404; -x_400 = lean_ctor_get(x_2, 0); -lean_inc(x_400); -x_401 = lean_ctor_get(x_400, 0); -lean_inc(x_401); -lean_dec(x_400); -x_402 = lean_ctor_get(x_401, 3); -lean_inc(x_402); -x_403 = lean_ctor_get(x_401, 4); -lean_inc(x_403); -lean_dec(x_401); -x_404 = lean_nat_dec_eq(x_402, x_403); -lean_dec(x_403); -lean_dec(x_402); -if (x_404 == 0) +lean_object* x_4; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; uint8_t x_452; +x_448 = lean_ctor_get(x_2, 0); +lean_inc(x_448); +x_449 = lean_ctor_get(x_448, 0); +lean_inc(x_449); +lean_dec(x_448); +x_450 = lean_ctor_get(x_449, 3); +lean_inc(x_450); +x_451 = lean_ctor_get(x_449, 4); +lean_inc(x_451); +lean_dec(x_449); +x_452 = lean_nat_dec_eq(x_450, x_451); +lean_dec(x_451); +lean_dec(x_450); +if (x_452 == 0) { x_4 = x_3; -goto block_399; +goto block_447; } else { -lean_object* x_405; lean_object* x_406; -x_405 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +lean_object* x_453; lean_object* x_454; +x_453 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; lean_inc(x_2); lean_inc(x_1); -x_406 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_405, x_2, x_3); -if (lean_obj_tag(x_406) == 0) +x_454 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_453, x_2, x_3); +if (lean_obj_tag(x_454) == 0) { -lean_object* x_407; -x_407 = lean_ctor_get(x_406, 1); -lean_inc(x_407); -lean_dec(x_406); -x_4 = x_407; -goto block_399; +lean_object* x_455; +x_455 = lean_ctor_get(x_454, 1); +lean_inc(x_455); +lean_dec(x_454); +x_4 = x_455; +goto block_447; } else { -uint8_t x_408; +uint8_t x_456; lean_dec(x_2); lean_dec(x_1); -x_408 = !lean_is_exclusive(x_406); -if (x_408 == 0) +x_456 = !lean_is_exclusive(x_454); +if (x_456 == 0) { -return x_406; +return x_454; } else { -lean_object* x_409; lean_object* x_410; lean_object* x_411; -x_409 = lean_ctor_get(x_406, 0); -x_410 = lean_ctor_get(x_406, 1); -lean_inc(x_410); -lean_inc(x_409); -lean_dec(x_406); -x_411 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_411, 0, x_409); -lean_ctor_set(x_411, 1, x_410); -return x_411; +lean_object* x_457; lean_object* x_458; lean_object* x_459; +x_457 = lean_ctor_get(x_454, 0); +x_458 = lean_ctor_get(x_454, 1); +lean_inc(x_458); +lean_inc(x_457); +lean_dec(x_454); +x_459 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_459, 0, x_457); +lean_ctor_set(x_459, 1, x_458); +return x_459; } } } -block_399: +block_447: { lean_object* x_5; lean_object* x_6; uint8_t x_7; x_5 = lean_ctor_get(x_2, 0); @@ -3795,65 +3862,73 @@ lean_inc(x_9); lean_inc(x_8); if (lean_obj_tag(x_1) == 1) { -lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -lean_inc(x_1); -x_32 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); -lean_closure_set(x_32, 0, x_1); -x_33 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; -lean_inc(x_1); -x_34 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); -lean_closure_set(x_34, 0, x_33); -lean_closure_set(x_34, 1, x_1); -lean_closure_set(x_34, 2, x_32); -lean_inc(x_2); -x_35 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_34, x_2, x_4); -if (lean_obj_tag(x_35) == 0) +lean_object* x_32; lean_object* x_33; uint8_t x_34; +x_32 = lean_ctor_get(x_1, 0); +lean_inc(x_32); +x_33 = l_Lean_nullKind; +x_34 = lean_name_eq(x_32, x_33); +lean_dec(x_32); +if (x_34 == 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; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_36 = lean_ctor_get(x_35, 1); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_Elab_Tactic_tacticElabAttribute; -x_38 = lean_ctor_get(x_37, 1); -lean_inc(x_38); -x_39 = lean_ctor_get(x_36, 0); +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +lean_inc(x_1); +x_35 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_35, 0, x_1); +x_36 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; +lean_inc(x_1); +x_37 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_37, 0, x_36); +lean_closure_set(x_37, 1, x_1); +lean_closure_set(x_37, 2, x_35); +lean_inc(x_2); +x_38 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_37, x_2, x_4); +if (lean_obj_tag(x_38) == 0) +{ +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; lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_39 = lean_ctor_get(x_38, 1); lean_inc(x_39); -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -lean_dec(x_39); -x_41 = lean_ctor_get(x_40, 0); -lean_inc(x_41); -lean_dec(x_40); -x_42 = l_Lean_PersistentEnvExtension_getState___rarg(x_38, x_41); -lean_dec(x_41); lean_dec(x_38); -x_43 = lean_ctor_get(x_42, 1); +x_40 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_41 = lean_ctor_get(x_40, 1); +lean_inc(x_41); +x_42 = lean_ctor_get(x_39, 0); +lean_inc(x_42); +x_43 = lean_ctor_get(x_42, 0); lean_inc(x_43); lean_dec(x_42); +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +lean_dec(x_43); +x_45 = l_Lean_PersistentEnvExtension_getState___rarg(x_41, x_44); +lean_dec(x_44); +lean_dec(x_41); +x_46 = lean_ctor_get(x_45, 1); +lean_inc(x_46); +lean_dec(x_45); lean_inc(x_1); -x_44 = l_Lean_Syntax_getKind(x_1); -x_45 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_43, x_44); -if (lean_obj_tag(x_45) == 0) +x_47 = l_Lean_Syntax_getKind(x_1); +x_48 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_46, x_47); +if (lean_obj_tag(x_48) == 0) { -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; -x_46 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_36); -x_47 = lean_ctor_get(x_46, 0); -lean_inc(x_47); -x_48 = lean_ctor_get(x_46, 1); -lean_inc(x_48); -lean_dec(x_46); -x_49 = l_Lean_Elab_Tactic_getEnv___rarg(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; +x_49 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_39); x_50 = lean_ctor_get(x_49, 0); lean_inc(x_50); x_51 = lean_ctor_get(x_49, 1); lean_inc(x_51); lean_dec(x_49); +x_52 = l_Lean_Elab_Tactic_getEnv___rarg(x_51); +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +lean_dec(x_52); lean_inc(x_1); -x_52 = l_Lean_Elab_expandMacro(x_50, x_1, x_47); -lean_dec(x_50); -if (lean_obj_tag(x_52) == 0) +x_55 = l_Lean_Elab_expandMacro(x_53, x_1, x_50); +lean_dec(x_53); +if (lean_obj_tag(x_55) == 0) { -lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; +lean_object* x_56; 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_object* x_63; lean_object* x_64; lean_dec(x_30); lean_dec(x_6); lean_dec(x_19); @@ -3866,60 +3941,60 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_53 = l_Lean_Name_toString___closed__1; -x_54 = l_Lean_Name_toStringWithSep___main(x_53, x_44); -x_55 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_55, 0, x_54); -x_56 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_56, 0, x_55); -x_57 = l_Lean_Meta_Exception_toMessageData___closed__45; -x_58 = lean_alloc_ctor(9, 2, 0); +x_56 = l_Lean_Name_toString___closed__1; +x_57 = l_Lean_Name_toStringWithSep___main(x_56, x_47); +x_58 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_58, 0, x_57); -lean_ctor_set(x_58, 1, x_56); -x_59 = l_Lean_Elab_Term_elabTermAux___main___closed__6; -x_60 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_60, 0, x_58); -lean_ctor_set(x_60, 1, x_59); -x_61 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_60, x_2, x_51); -return x_61; +x_59 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = l_Lean_Meta_Exception_toMessageData___closed__45; +x_61 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_61, 0, x_60); +lean_ctor_set(x_61, 1, x_59); +x_62 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_63 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_63, 0, x_61); +lean_ctor_set(x_63, 1, x_62); +x_64 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_63, x_2, x_54); +return x_64; } else { -lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -lean_dec(x_44); +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; +lean_dec(x_47); lean_dec(x_2); -x_62 = lean_ctor_get(x_52, 0); -lean_inc(x_62); -lean_dec(x_52); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_1); -lean_ctor_set(x_63, 1, x_19); -x_64 = lean_alloc_ctor(0, 10, 1); -lean_ctor_set(x_64, 0, x_6); -lean_ctor_set(x_64, 1, x_12); -lean_ctor_set(x_64, 2, x_13); -lean_ctor_set(x_64, 3, x_14); -lean_ctor_set(x_64, 4, x_15); -lean_ctor_set(x_64, 5, x_16); -lean_ctor_set(x_64, 6, x_17); -lean_ctor_set(x_64, 7, x_18); -lean_ctor_set(x_64, 8, x_63); -lean_ctor_set(x_64, 9, x_30); -lean_ctor_set_uint8(x_64, sizeof(void*)*10, x_20); -x_65 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_65, 0, x_64); -lean_ctor_set(x_65, 1, x_8); -lean_ctor_set(x_65, 2, x_9); -x_1 = x_62; -x_2 = x_65; -x_3 = x_51; +x_65 = lean_ctor_get(x_55, 0); +lean_inc(x_65); +lean_dec(x_55); +x_66 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_66, 0, x_1); +lean_ctor_set(x_66, 1, x_19); +x_67 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_67, 0, x_6); +lean_ctor_set(x_67, 1, x_12); +lean_ctor_set(x_67, 2, x_13); +lean_ctor_set(x_67, 3, x_14); +lean_ctor_set(x_67, 4, x_15); +lean_ctor_set(x_67, 5, x_16); +lean_ctor_set(x_67, 6, x_17); +lean_ctor_set(x_67, 7, x_18); +lean_ctor_set(x_67, 8, x_66); +lean_ctor_set(x_67, 9, x_30); +lean_ctor_set_uint8(x_67, sizeof(void*)*10, x_20); +x_68 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_68, 0, x_67); +lean_ctor_set(x_68, 1, x_8); +lean_ctor_set(x_68, 2, x_9); +x_1 = x_65; +x_2 = x_68; +x_3 = x_54; goto _start; } } else { -lean_object* x_67; lean_object* x_68; -lean_dec(x_44); +lean_object* x_70; lean_object* x_71; +lean_dec(x_47); lean_dec(x_30); lean_dec(x_6); lean_dec(x_19); @@ -3932,17 +4007,17 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_67 = lean_ctor_get(x_45, 0); -lean_inc(x_67); -lean_dec(x_45); -lean_inc(x_36); -x_68 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_36, x_1, x_67, x_2, x_36); -return x_68; +x_70 = lean_ctor_get(x_48, 0); +lean_inc(x_70); +lean_dec(x_48); +lean_inc(x_39); +x_71 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_39, x_1, x_70, x_2, x_39); +return x_71; } } else { -uint8_t x_69; +uint8_t x_72; lean_dec(x_2); lean_dec(x_30); lean_dec(x_6); @@ -3957,29 +4032,29 @@ lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); lean_dec(x_1); -x_69 = !lean_is_exclusive(x_35); -if (x_69 == 0) +x_72 = !lean_is_exclusive(x_38); +if (x_72 == 0) { -return x_35; +return x_38; } else { -lean_object* x_70; lean_object* x_71; lean_object* x_72; -x_70 = lean_ctor_get(x_35, 0); -x_71 = lean_ctor_get(x_35, 1); -lean_inc(x_71); -lean_inc(x_70); -lean_dec(x_35); -x_72 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_72, 0, x_70); -lean_ctor_set(x_72, 1, x_71); -return x_72; +lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_73 = lean_ctor_get(x_38, 0); +x_74 = lean_ctor_get(x_38, 1); +lean_inc(x_74); +lean_inc(x_73); +lean_dec(x_38); +x_75 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_75, 0, x_73); +lean_ctor_set(x_75, 1, x_74); +return x_75; } } } else { -lean_object* x_73; lean_object* x_74; +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_dec(x_30); lean_dec(x_6); lean_dec(x_19); @@ -3992,37 +4067,62 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_73 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; -x_74 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_73, x_2, x_4); -return x_74; +x_76 = l_Lean_Syntax_getArgs(x_1); +lean_dec(x_1); +x_77 = lean_unsigned_to_nat(2u); +x_78 = lean_unsigned_to_nat(0u); +x_79 = lean_box(0); +x_80 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(x_77, x_76, x_78, x_79, x_2, x_4); +lean_dec(x_76); +return x_80; } } else { -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_81; lean_object* x_82; -x_75 = lean_ctor_get(x_28, 0); -x_76 = lean_ctor_get(x_28, 1); -x_77 = lean_ctor_get(x_28, 2); -x_78 = lean_ctor_get(x_28, 3); -x_79 = lean_ctor_get(x_28, 4); -x_80 = lean_ctor_get(x_28, 5); -lean_inc(x_80); -lean_inc(x_79); -lean_inc(x_78); -lean_inc(x_77); -lean_inc(x_76); -lean_inc(x_75); +lean_object* x_81; lean_object* x_82; +lean_dec(x_30); +lean_dec(x_6); +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +x_81 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; +x_82 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_81, x_2, x_4); +return x_82; +} +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; +x_83 = lean_ctor_get(x_28, 0); +x_84 = lean_ctor_get(x_28, 1); +x_85 = lean_ctor_get(x_28, 2); +x_86 = lean_ctor_get(x_28, 3); +x_87 = lean_ctor_get(x_28, 4); +x_88 = lean_ctor_get(x_28, 5); +lean_inc(x_88); +lean_inc(x_87); +lean_inc(x_86); +lean_inc(x_85); +lean_inc(x_84); +lean_inc(x_83); lean_dec(x_28); -x_81 = lean_nat_add(x_80, x_25); -x_82 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_82, 0, x_75); -lean_ctor_set(x_82, 1, x_76); -lean_ctor_set(x_82, 2, x_77); -lean_ctor_set(x_82, 3, x_78); -lean_ctor_set(x_82, 4, x_79); -lean_ctor_set(x_82, 5, x_81); -lean_ctor_set(x_4, 0, x_82); -lean_inc(x_80); +x_89 = lean_nat_add(x_88, x_25); +x_90 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_90, 0, x_83); +lean_ctor_set(x_90, 1, x_84); +lean_ctor_set(x_90, 2, x_85); +lean_ctor_set(x_90, 3, x_86); +lean_ctor_set(x_90, 4, x_87); +lean_ctor_set(x_90, 5, x_89); +lean_ctor_set(x_4, 0, x_90); +lean_inc(x_88); lean_inc(x_19); lean_inc(x_18); lean_inc(x_17); @@ -4032,137 +4132,79 @@ lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); lean_inc(x_6); -lean_ctor_set(x_5, 9, x_80); +lean_ctor_set(x_5, 9, x_88); lean_inc(x_9); lean_inc(x_8); if (lean_obj_tag(x_1) == 1) { -lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; -lean_inc(x_1); -x_83 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); -lean_closure_set(x_83, 0, x_1); -x_84 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; -lean_inc(x_1); -x_85 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); -lean_closure_set(x_85, 0, x_84); -lean_closure_set(x_85, 1, x_1); -lean_closure_set(x_85, 2, x_83); -lean_inc(x_2); -x_86 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_85, x_2, x_4); -if (lean_obj_tag(x_86) == 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; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; -x_87 = lean_ctor_get(x_86, 1); -lean_inc(x_87); -lean_dec(x_86); -x_88 = l_Lean_Elab_Tactic_tacticElabAttribute; -x_89 = lean_ctor_get(x_88, 1); -lean_inc(x_89); -x_90 = lean_ctor_get(x_87, 0); -lean_inc(x_90); -x_91 = lean_ctor_get(x_90, 0); +lean_object* x_91; lean_object* x_92; uint8_t x_93; +x_91 = lean_ctor_get(x_1, 0); lean_inc(x_91); -lean_dec(x_90); -x_92 = lean_ctor_get(x_91, 0); -lean_inc(x_92); +x_92 = l_Lean_nullKind; +x_93 = lean_name_eq(x_91, x_92); lean_dec(x_91); -x_93 = l_Lean_PersistentEnvExtension_getState___rarg(x_89, x_92); -lean_dec(x_92); -lean_dec(x_89); -x_94 = lean_ctor_get(x_93, 1); -lean_inc(x_94); -lean_dec(x_93); -lean_inc(x_1); -x_95 = l_Lean_Syntax_getKind(x_1); -x_96 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_94, x_95); -if (lean_obj_tag(x_96) == 0) +if (x_93 == 0) { -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; -x_97 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_87); -x_98 = lean_ctor_get(x_97, 0); +lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; +lean_inc(x_1); +x_94 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_94, 0, x_1); +x_95 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; +lean_inc(x_1); +x_96 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_96, 0, x_95); +lean_closure_set(x_96, 1, x_1); +lean_closure_set(x_96, 2, x_94); +lean_inc(x_2); +x_97 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_96, x_2, x_4); +if (lean_obj_tag(x_97) == 0) +{ +lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_98 = lean_ctor_get(x_97, 1); lean_inc(x_98); -x_99 = lean_ctor_get(x_97, 1); -lean_inc(x_99); lean_dec(x_97); -x_100 = l_Lean_Elab_Tactic_getEnv___rarg(x_99); -x_101 = lean_ctor_get(x_100, 0); +x_99 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_100 = lean_ctor_get(x_99, 1); +lean_inc(x_100); +x_101 = lean_ctor_get(x_98, 0); lean_inc(x_101); -x_102 = lean_ctor_get(x_100, 1); +x_102 = lean_ctor_get(x_101, 0); lean_inc(x_102); -lean_dec(x_100); -lean_inc(x_1); -x_103 = l_Lean_Elab_expandMacro(x_101, x_1, x_98); lean_dec(x_101); -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_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; -lean_dec(x_80); -lean_dec(x_6); -lean_dec(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_9); -lean_dec(x_8); -x_104 = l_Lean_Name_toString___closed__1; -x_105 = l_Lean_Name_toStringWithSep___main(x_104, x_95); -x_106 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_106, 0, x_105); -x_107 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_107, 0, x_106); -x_108 = l_Lean_Meta_Exception_toMessageData___closed__45; -x_109 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_109, 0, x_108); -lean_ctor_set(x_109, 1, x_107); -x_110 = l_Lean_Elab_Term_elabTermAux___main___closed__6; -x_111 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_111, 0, x_109); -lean_ctor_set(x_111, 1, x_110); -x_112 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_111, x_2, x_102); -return x_112; -} -else -{ -lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; -lean_dec(x_95); -lean_dec(x_2); -x_113 = lean_ctor_get(x_103, 0); -lean_inc(x_113); +x_103 = lean_ctor_get(x_102, 0); +lean_inc(x_103); +lean_dec(x_102); +x_104 = l_Lean_PersistentEnvExtension_getState___rarg(x_100, x_103); lean_dec(x_103); -x_114 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_114, 0, x_1); -lean_ctor_set(x_114, 1, x_19); -x_115 = lean_alloc_ctor(0, 10, 1); -lean_ctor_set(x_115, 0, x_6); -lean_ctor_set(x_115, 1, x_12); -lean_ctor_set(x_115, 2, x_13); -lean_ctor_set(x_115, 3, x_14); -lean_ctor_set(x_115, 4, x_15); -lean_ctor_set(x_115, 5, x_16); -lean_ctor_set(x_115, 6, x_17); -lean_ctor_set(x_115, 7, x_18); -lean_ctor_set(x_115, 8, x_114); -lean_ctor_set(x_115, 9, x_80); -lean_ctor_set_uint8(x_115, sizeof(void*)*10, x_20); -x_116 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_116, 0, x_115); -lean_ctor_set(x_116, 1, x_8); -lean_ctor_set(x_116, 2, x_9); -x_1 = x_113; -x_2 = x_116; -x_3 = x_102; -goto _start; -} -} -else +lean_dec(x_100); +x_105 = lean_ctor_get(x_104, 1); +lean_inc(x_105); +lean_dec(x_104); +lean_inc(x_1); +x_106 = l_Lean_Syntax_getKind(x_1); +x_107 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_105, x_106); +if (lean_obj_tag(x_107) == 0) { -lean_object* x_118; lean_object* x_119; -lean_dec(x_95); -lean_dec(x_80); +lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; +x_108 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_98); +x_109 = lean_ctor_get(x_108, 0); +lean_inc(x_109); +x_110 = lean_ctor_get(x_108, 1); +lean_inc(x_110); +lean_dec(x_108); +x_111 = l_Lean_Elab_Tactic_getEnv___rarg(x_110); +x_112 = lean_ctor_get(x_111, 0); +lean_inc(x_112); +x_113 = lean_ctor_get(x_111, 1); +lean_inc(x_113); +lean_dec(x_111); +lean_inc(x_1); +x_114 = l_Lean_Elab_expandMacro(x_112, x_1, x_109); +lean_dec(x_112); +if (lean_obj_tag(x_114) == 0) +{ +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; +lean_dec(x_88); lean_dec(x_6); lean_dec(x_19); lean_dec(x_18); @@ -4174,262 +4216,61 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_118 = lean_ctor_get(x_96, 0); -lean_inc(x_118); -lean_dec(x_96); -lean_inc(x_87); -x_119 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_87, x_1, x_118, x_2, x_87); -return x_119; -} -} -else -{ -lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; -lean_dec(x_2); -lean_dec(x_80); -lean_dec(x_6); -lean_dec(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_1); -x_120 = lean_ctor_get(x_86, 0); -lean_inc(x_120); -x_121 = lean_ctor_get(x_86, 1); -lean_inc(x_121); -if (lean_is_exclusive(x_86)) { - lean_ctor_release(x_86, 0); - lean_ctor_release(x_86, 1); - x_122 = x_86; -} else { - lean_dec_ref(x_86); - x_122 = lean_box(0); -} -if (lean_is_scalar(x_122)) { - x_123 = lean_alloc_ctor(1, 2, 0); -} else { - x_123 = x_122; -} -lean_ctor_set(x_123, 0, x_120); -lean_ctor_set(x_123, 1, x_121); +x_115 = l_Lean_Name_toString___closed__1; +x_116 = l_Lean_Name_toStringWithSep___main(x_115, x_106); +x_117 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_117, 0, x_116); +x_118 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_118, 0, x_117); +x_119 = l_Lean_Meta_Exception_toMessageData___closed__45; +x_120 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_120, 0, x_119); +lean_ctor_set(x_120, 1, x_118); +x_121 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_122 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_122, 0, x_120); +lean_ctor_set(x_122, 1, x_121); +x_123 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_122, x_2, x_113); return x_123; } -} else { -lean_object* x_124; lean_object* x_125; -lean_dec(x_80); -lean_dec(x_6); -lean_dec(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_9); -lean_dec(x_8); -x_124 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; -x_125 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_124, x_2, x_4); -return x_125; -} -} -} -else -{ -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; lean_object* x_137; -x_126 = lean_ctor_get(x_4, 0); -x_127 = lean_ctor_get(x_4, 1); -lean_inc(x_127); -lean_inc(x_126); -lean_dec(x_4); -x_128 = lean_ctor_get(x_126, 0); -lean_inc(x_128); -x_129 = lean_ctor_get(x_126, 1); -lean_inc(x_129); -x_130 = lean_ctor_get(x_126, 2); -lean_inc(x_130); -x_131 = lean_ctor_get(x_126, 3); -lean_inc(x_131); -x_132 = lean_ctor_get(x_126, 4); -lean_inc(x_132); -x_133 = lean_ctor_get(x_126, 5); -lean_inc(x_133); -if (lean_is_exclusive(x_126)) { - lean_ctor_release(x_126, 0); - lean_ctor_release(x_126, 1); - lean_ctor_release(x_126, 2); - lean_ctor_release(x_126, 3); - lean_ctor_release(x_126, 4); - lean_ctor_release(x_126, 5); - x_134 = x_126; -} else { - lean_dec_ref(x_126); - x_134 = lean_box(0); -} -x_135 = lean_nat_add(x_133, x_25); -if (lean_is_scalar(x_134)) { - x_136 = lean_alloc_ctor(0, 6, 0); -} else { - x_136 = x_134; -} -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_132); -lean_ctor_set(x_136, 5, x_135); -x_137 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_137, 0, x_136); -lean_ctor_set(x_137, 1, x_127); -lean_inc(x_133); -lean_inc(x_19); -lean_inc(x_18); -lean_inc(x_17); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_6); -lean_ctor_set(x_5, 9, x_133); -lean_inc(x_9); -lean_inc(x_8); -if (lean_obj_tag(x_1) == 1) -{ -lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; -lean_inc(x_1); -x_138 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); -lean_closure_set(x_138, 0, x_1); -x_139 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; -lean_inc(x_1); -x_140 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); -lean_closure_set(x_140, 0, x_139); -lean_closure_set(x_140, 1, x_1); -lean_closure_set(x_140, 2, x_138); -lean_inc(x_2); -x_141 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_140, x_2, x_137); -if (lean_obj_tag(x_141) == 0) -{ -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; lean_object* x_151; -x_142 = lean_ctor_get(x_141, 1); -lean_inc(x_142); -lean_dec(x_141); -x_143 = l_Lean_Elab_Tactic_tacticElabAttribute; -x_144 = lean_ctor_get(x_143, 1); -lean_inc(x_144); -x_145 = lean_ctor_get(x_142, 0); -lean_inc(x_145); -x_146 = lean_ctor_get(x_145, 0); -lean_inc(x_146); -lean_dec(x_145); -x_147 = lean_ctor_get(x_146, 0); -lean_inc(x_147); -lean_dec(x_146); -x_148 = l_Lean_PersistentEnvExtension_getState___rarg(x_144, x_147); -lean_dec(x_147); -lean_dec(x_144); -x_149 = lean_ctor_get(x_148, 1); -lean_inc(x_149); -lean_dec(x_148); -lean_inc(x_1); -x_150 = l_Lean_Syntax_getKind(x_1); -x_151 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_149, x_150); -if (lean_obj_tag(x_151) == 0) -{ -lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; -x_152 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_142); -x_153 = lean_ctor_get(x_152, 0); -lean_inc(x_153); -x_154 = lean_ctor_get(x_152, 1); -lean_inc(x_154); -lean_dec(x_152); -x_155 = l_Lean_Elab_Tactic_getEnv___rarg(x_154); -x_156 = lean_ctor_get(x_155, 0); -lean_inc(x_156); -x_157 = lean_ctor_get(x_155, 1); -lean_inc(x_157); -lean_dec(x_155); -lean_inc(x_1); -x_158 = l_Lean_Elab_expandMacro(x_156, x_1, x_153); -lean_dec(x_156); -if (lean_obj_tag(x_158) == 0) -{ -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_dec(x_133); -lean_dec(x_6); -lean_dec(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_9); -lean_dec(x_8); -x_159 = l_Lean_Name_toString___closed__1; -x_160 = l_Lean_Name_toStringWithSep___main(x_159, x_150); -x_161 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_161, 0, x_160); -x_162 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_162, 0, x_161); -x_163 = l_Lean_Meta_Exception_toMessageData___closed__45; -x_164 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_164, 0, x_163); -lean_ctor_set(x_164, 1, x_162); -x_165 = l_Lean_Elab_Term_elabTermAux___main___closed__6; -x_166 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_166, 0, x_164); -lean_ctor_set(x_166, 1, x_165); -x_167 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_166, x_2, x_157); -return x_167; -} -else -{ -lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; -lean_dec(x_150); +lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; +lean_dec(x_106); lean_dec(x_2); -x_168 = lean_ctor_get(x_158, 0); -lean_inc(x_168); -lean_dec(x_158); -x_169 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_169, 0, x_1); -lean_ctor_set(x_169, 1, x_19); -x_170 = lean_alloc_ctor(0, 10, 1); -lean_ctor_set(x_170, 0, x_6); -lean_ctor_set(x_170, 1, x_12); -lean_ctor_set(x_170, 2, x_13); -lean_ctor_set(x_170, 3, x_14); -lean_ctor_set(x_170, 4, x_15); -lean_ctor_set(x_170, 5, x_16); -lean_ctor_set(x_170, 6, x_17); -lean_ctor_set(x_170, 7, x_18); -lean_ctor_set(x_170, 8, x_169); -lean_ctor_set(x_170, 9, x_133); -lean_ctor_set_uint8(x_170, sizeof(void*)*10, x_20); -x_171 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_171, 0, x_170); -lean_ctor_set(x_171, 1, x_8); -lean_ctor_set(x_171, 2, x_9); -x_1 = x_168; -x_2 = x_171; -x_3 = x_157; +x_124 = lean_ctor_get(x_114, 0); +lean_inc(x_124); +lean_dec(x_114); +x_125 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_125, 0, x_1); +lean_ctor_set(x_125, 1, x_19); +x_126 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_126, 0, x_6); +lean_ctor_set(x_126, 1, x_12); +lean_ctor_set(x_126, 2, x_13); +lean_ctor_set(x_126, 3, x_14); +lean_ctor_set(x_126, 4, x_15); +lean_ctor_set(x_126, 5, x_16); +lean_ctor_set(x_126, 6, x_17); +lean_ctor_set(x_126, 7, x_18); +lean_ctor_set(x_126, 8, x_125); +lean_ctor_set(x_126, 9, x_88); +lean_ctor_set_uint8(x_126, sizeof(void*)*10, x_20); +x_127 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_127, 0, x_126); +lean_ctor_set(x_127, 1, x_8); +lean_ctor_set(x_127, 2, x_9); +x_1 = x_124; +x_2 = x_127; +x_3 = x_113; goto _start; } } else { -lean_object* x_173; lean_object* x_174; -lean_dec(x_150); -lean_dec(x_133); +lean_object* x_129; lean_object* x_130; +lean_dec(x_106); +lean_dec(x_88); lean_dec(x_6); lean_dec(x_19); lean_dec(x_18); @@ -4441,19 +4282,19 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_173 = lean_ctor_get(x_151, 0); -lean_inc(x_173); -lean_dec(x_151); -lean_inc(x_142); -x_174 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_142, x_1, x_173, x_2, x_142); -return x_174; +x_129 = lean_ctor_get(x_107, 0); +lean_inc(x_129); +lean_dec(x_107); +lean_inc(x_98); +x_130 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_98, x_1, x_129, x_2, x_98); +return x_130; } } else { -lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; +lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_dec(x_2); -lean_dec(x_133); +lean_dec(x_88); lean_dec(x_6); lean_dec(x_19); lean_dec(x_18); @@ -4466,32 +4307,32 @@ lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); lean_dec(x_1); -x_175 = lean_ctor_get(x_141, 0); -lean_inc(x_175); -x_176 = lean_ctor_get(x_141, 1); -lean_inc(x_176); -if (lean_is_exclusive(x_141)) { - lean_ctor_release(x_141, 0); - lean_ctor_release(x_141, 1); - x_177 = x_141; +x_131 = lean_ctor_get(x_97, 0); +lean_inc(x_131); +x_132 = lean_ctor_get(x_97, 1); +lean_inc(x_132); +if (lean_is_exclusive(x_97)) { + lean_ctor_release(x_97, 0); + lean_ctor_release(x_97, 1); + x_133 = x_97; } else { - lean_dec_ref(x_141); - x_177 = lean_box(0); + lean_dec_ref(x_97); + x_133 = lean_box(0); } -if (lean_is_scalar(x_177)) { - x_178 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_133)) { + x_134 = lean_alloc_ctor(1, 2, 0); } else { - x_178 = x_177; + x_134 = x_133; } -lean_ctor_set(x_178, 0, x_175); -lean_ctor_set(x_178, 1, x_176); -return x_178; +lean_ctor_set(x_134, 0, x_131); +lean_ctor_set(x_134, 1, x_132); +return x_134; } } else { -lean_object* x_179; lean_object* x_180; -lean_dec(x_133); +lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; +lean_dec(x_88); lean_dec(x_6); lean_dec(x_19); lean_dec(x_18); @@ -4503,91 +4344,416 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_179 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; -x_180 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_179, x_2, x_137); -return x_180; +x_135 = l_Lean_Syntax_getArgs(x_1); +lean_dec(x_1); +x_136 = lean_unsigned_to_nat(2u); +x_137 = lean_unsigned_to_nat(0u); +x_138 = lean_box(0); +x_139 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(x_136, x_135, x_137, x_138, x_2, x_4); +lean_dec(x_135); +return x_139; +} +} +else +{ +lean_object* x_140; lean_object* x_141; +lean_dec(x_88); +lean_dec(x_6); +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +x_140 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; +x_141 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_140, x_2, x_4); +return x_141; } } } else { -lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* 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; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; -x_181 = lean_ctor_get(x_6, 0); -x_182 = lean_ctor_get(x_6, 1); -x_183 = lean_ctor_get(x_6, 2); -x_184 = lean_ctor_get(x_6, 3); -x_185 = lean_ctor_get(x_6, 4); -lean_inc(x_185); -lean_inc(x_184); -lean_inc(x_183); -lean_inc(x_182); -lean_inc(x_181); +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; lean_object* x_151; lean_object* x_152; lean_object* x_153; +x_142 = lean_ctor_get(x_4, 0); +x_143 = lean_ctor_get(x_4, 1); +lean_inc(x_143); +lean_inc(x_142); +lean_dec(x_4); +x_144 = lean_ctor_get(x_142, 0); +lean_inc(x_144); +x_145 = lean_ctor_get(x_142, 1); +lean_inc(x_145); +x_146 = lean_ctor_get(x_142, 2); +lean_inc(x_146); +x_147 = lean_ctor_get(x_142, 3); +lean_inc(x_147); +x_148 = lean_ctor_get(x_142, 4); +lean_inc(x_148); +x_149 = lean_ctor_get(x_142, 5); +lean_inc(x_149); +if (lean_is_exclusive(x_142)) { + lean_ctor_release(x_142, 0); + lean_ctor_release(x_142, 1); + lean_ctor_release(x_142, 2); + lean_ctor_release(x_142, 3); + lean_ctor_release(x_142, 4); + lean_ctor_release(x_142, 5); + x_150 = x_142; +} else { + lean_dec_ref(x_142); + x_150 = lean_box(0); +} +x_151 = lean_nat_add(x_149, x_25); +if (lean_is_scalar(x_150)) { + x_152 = lean_alloc_ctor(0, 6, 0); +} else { + x_152 = x_150; +} +lean_ctor_set(x_152, 0, x_144); +lean_ctor_set(x_152, 1, x_145); +lean_ctor_set(x_152, 2, x_146); +lean_ctor_set(x_152, 3, x_147); +lean_ctor_set(x_152, 4, x_148); +lean_ctor_set(x_152, 5, x_151); +x_153 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_153, 0, x_152); +lean_ctor_set(x_153, 1, x_143); +lean_inc(x_149); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_6); +lean_ctor_set(x_5, 9, x_149); +lean_inc(x_9); +lean_inc(x_8); +if (lean_obj_tag(x_1) == 1) +{ +lean_object* x_154; lean_object* x_155; uint8_t x_156; +x_154 = lean_ctor_get(x_1, 0); +lean_inc(x_154); +x_155 = l_Lean_nullKind; +x_156 = lean_name_eq(x_154, x_155); +lean_dec(x_154); +if (x_156 == 0) +{ +lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; +lean_inc(x_1); +x_157 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_157, 0, x_1); +x_158 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; +lean_inc(x_1); +x_159 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_159, 0, x_158); +lean_closure_set(x_159, 1, x_1); +lean_closure_set(x_159, 2, x_157); +lean_inc(x_2); +x_160 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_159, x_2, x_153); +if (lean_obj_tag(x_160) == 0) +{ +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; +x_161 = lean_ctor_get(x_160, 1); +lean_inc(x_161); +lean_dec(x_160); +x_162 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_163 = lean_ctor_get(x_162, 1); +lean_inc(x_163); +x_164 = lean_ctor_get(x_161, 0); +lean_inc(x_164); +x_165 = lean_ctor_get(x_164, 0); +lean_inc(x_165); +lean_dec(x_164); +x_166 = lean_ctor_get(x_165, 0); +lean_inc(x_166); +lean_dec(x_165); +x_167 = l_Lean_PersistentEnvExtension_getState___rarg(x_163, x_166); +lean_dec(x_166); +lean_dec(x_163); +x_168 = lean_ctor_get(x_167, 1); +lean_inc(x_168); +lean_dec(x_167); +lean_inc(x_1); +x_169 = l_Lean_Syntax_getKind(x_1); +x_170 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_168, x_169); +if (lean_obj_tag(x_170) == 0) +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; +x_171 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_161); +x_172 = lean_ctor_get(x_171, 0); +lean_inc(x_172); +x_173 = lean_ctor_get(x_171, 1); +lean_inc(x_173); +lean_dec(x_171); +x_174 = l_Lean_Elab_Tactic_getEnv___rarg(x_173); +x_175 = lean_ctor_get(x_174, 0); +lean_inc(x_175); +x_176 = lean_ctor_get(x_174, 1); +lean_inc(x_176); +lean_dec(x_174); +lean_inc(x_1); +x_177 = l_Lean_Elab_expandMacro(x_175, x_1, x_172); +lean_dec(x_175); +if (lean_obj_tag(x_177) == 0) +{ +lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; +lean_dec(x_149); lean_dec(x_6); -x_186 = lean_unsigned_to_nat(1u); -x_187 = lean_nat_add(x_184, x_186); -lean_dec(x_184); -x_188 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_188, 0, x_181); -lean_ctor_set(x_188, 1, x_182); -lean_ctor_set(x_188, 2, x_183); -lean_ctor_set(x_188, 3, x_187); -lean_ctor_set(x_188, 4, x_185); -x_189 = lean_ctor_get(x_4, 0); -lean_inc(x_189); -x_190 = lean_ctor_get(x_4, 1); -lean_inc(x_190); +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +x_178 = l_Lean_Name_toString___closed__1; +x_179 = l_Lean_Name_toStringWithSep___main(x_178, x_169); +x_180 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_180, 0, x_179); +x_181 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_181, 0, x_180); +x_182 = l_Lean_Meta_Exception_toMessageData___closed__45; +x_183 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_183, 0, x_182); +lean_ctor_set(x_183, 1, x_181); +x_184 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_185 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_185, 0, x_183); +lean_ctor_set(x_185, 1, x_184); +x_186 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_185, x_2, x_176); +return x_186; +} +else +{ +lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; +lean_dec(x_169); +lean_dec(x_2); +x_187 = lean_ctor_get(x_177, 0); +lean_inc(x_187); +lean_dec(x_177); +x_188 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_188, 0, x_1); +lean_ctor_set(x_188, 1, x_19); +x_189 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_189, 0, x_6); +lean_ctor_set(x_189, 1, x_12); +lean_ctor_set(x_189, 2, x_13); +lean_ctor_set(x_189, 3, x_14); +lean_ctor_set(x_189, 4, x_15); +lean_ctor_set(x_189, 5, x_16); +lean_ctor_set(x_189, 6, x_17); +lean_ctor_set(x_189, 7, x_18); +lean_ctor_set(x_189, 8, x_188); +lean_ctor_set(x_189, 9, x_149); +lean_ctor_set_uint8(x_189, sizeof(void*)*10, x_20); +x_190 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_190, 0, x_189); +lean_ctor_set(x_190, 1, x_8); +lean_ctor_set(x_190, 2, x_9); +x_1 = x_187; +x_2 = x_190; +x_3 = x_176; +goto _start; +} +} +else +{ +lean_object* x_192; lean_object* x_193; +lean_dec(x_169); +lean_dec(x_149); +lean_dec(x_6); +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +x_192 = lean_ctor_get(x_170, 0); +lean_inc(x_192); +lean_dec(x_170); +lean_inc(x_161); +x_193 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_161, x_1, x_192, x_2, x_161); +return x_193; +} +} +else +{ +lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; +lean_dec(x_2); +lean_dec(x_149); +lean_dec(x_6); +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_1); +x_194 = lean_ctor_get(x_160, 0); +lean_inc(x_194); +x_195 = lean_ctor_get(x_160, 1); +lean_inc(x_195); +if (lean_is_exclusive(x_160)) { + lean_ctor_release(x_160, 0); + lean_ctor_release(x_160, 1); + x_196 = x_160; +} else { + lean_dec_ref(x_160); + x_196 = lean_box(0); +} +if (lean_is_scalar(x_196)) { + x_197 = lean_alloc_ctor(1, 2, 0); +} else { + x_197 = x_196; +} +lean_ctor_set(x_197, 0, x_194); +lean_ctor_set(x_197, 1, x_195); +return x_197; +} +} +else +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; +lean_dec(x_149); +lean_dec(x_6); +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +x_198 = l_Lean_Syntax_getArgs(x_1); +lean_dec(x_1); +x_199 = lean_unsigned_to_nat(2u); +x_200 = lean_unsigned_to_nat(0u); +x_201 = lean_box(0); +x_202 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(x_199, x_198, x_200, x_201, x_2, x_153); +lean_dec(x_198); +return x_202; +} +} +else +{ +lean_object* x_203; lean_object* x_204; +lean_dec(x_149); +lean_dec(x_6); +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +x_203 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; +x_204 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_203, x_2, x_153); +return x_204; +} +} +} +else +{ +lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* 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_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; +x_205 = lean_ctor_get(x_6, 0); +x_206 = lean_ctor_get(x_6, 1); +x_207 = lean_ctor_get(x_6, 2); +x_208 = lean_ctor_get(x_6, 3); +x_209 = lean_ctor_get(x_6, 4); +lean_inc(x_209); +lean_inc(x_208); +lean_inc(x_207); +lean_inc(x_206); +lean_inc(x_205); +lean_dec(x_6); +x_210 = lean_unsigned_to_nat(1u); +x_211 = lean_nat_add(x_208, x_210); +lean_dec(x_208); +x_212 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_212, 0, x_205); +lean_ctor_set(x_212, 1, x_206); +lean_ctor_set(x_212, 2, x_207); +lean_ctor_set(x_212, 3, x_211); +lean_ctor_set(x_212, 4, x_209); +x_213 = lean_ctor_get(x_4, 0); +lean_inc(x_213); +x_214 = lean_ctor_get(x_4, 1); +lean_inc(x_214); if (lean_is_exclusive(x_4)) { lean_ctor_release(x_4, 0); lean_ctor_release(x_4, 1); - x_191 = x_4; + x_215 = x_4; } else { lean_dec_ref(x_4); - x_191 = lean_box(0); + x_215 = lean_box(0); } -x_192 = lean_ctor_get(x_189, 0); -lean_inc(x_192); -x_193 = lean_ctor_get(x_189, 1); -lean_inc(x_193); -x_194 = lean_ctor_get(x_189, 2); -lean_inc(x_194); -x_195 = lean_ctor_get(x_189, 3); -lean_inc(x_195); -x_196 = lean_ctor_get(x_189, 4); -lean_inc(x_196); -x_197 = lean_ctor_get(x_189, 5); -lean_inc(x_197); -if (lean_is_exclusive(x_189)) { - lean_ctor_release(x_189, 0); - lean_ctor_release(x_189, 1); - lean_ctor_release(x_189, 2); - lean_ctor_release(x_189, 3); - lean_ctor_release(x_189, 4); - lean_ctor_release(x_189, 5); - x_198 = x_189; +x_216 = lean_ctor_get(x_213, 0); +lean_inc(x_216); +x_217 = lean_ctor_get(x_213, 1); +lean_inc(x_217); +x_218 = lean_ctor_get(x_213, 2); +lean_inc(x_218); +x_219 = lean_ctor_get(x_213, 3); +lean_inc(x_219); +x_220 = lean_ctor_get(x_213, 4); +lean_inc(x_220); +x_221 = lean_ctor_get(x_213, 5); +lean_inc(x_221); +if (lean_is_exclusive(x_213)) { + lean_ctor_release(x_213, 0); + lean_ctor_release(x_213, 1); + lean_ctor_release(x_213, 2); + lean_ctor_release(x_213, 3); + lean_ctor_release(x_213, 4); + lean_ctor_release(x_213, 5); + x_222 = x_213; } else { - lean_dec_ref(x_189); - x_198 = lean_box(0); + lean_dec_ref(x_213); + x_222 = lean_box(0); } -x_199 = lean_nat_add(x_197, x_186); -if (lean_is_scalar(x_198)) { - x_200 = lean_alloc_ctor(0, 6, 0); +x_223 = lean_nat_add(x_221, x_210); +if (lean_is_scalar(x_222)) { + x_224 = lean_alloc_ctor(0, 6, 0); } else { - x_200 = x_198; + x_224 = x_222; } -lean_ctor_set(x_200, 0, x_192); -lean_ctor_set(x_200, 1, x_193); -lean_ctor_set(x_200, 2, x_194); -lean_ctor_set(x_200, 3, x_195); -lean_ctor_set(x_200, 4, x_196); -lean_ctor_set(x_200, 5, x_199); -if (lean_is_scalar(x_191)) { - x_201 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_224, 0, x_216); +lean_ctor_set(x_224, 1, x_217); +lean_ctor_set(x_224, 2, x_218); +lean_ctor_set(x_224, 3, x_219); +lean_ctor_set(x_224, 4, x_220); +lean_ctor_set(x_224, 5, x_223); +if (lean_is_scalar(x_215)) { + x_225 = lean_alloc_ctor(0, 2, 0); } else { - x_201 = x_191; + x_225 = x_215; } -lean_ctor_set(x_201, 0, x_200); -lean_ctor_set(x_201, 1, x_190); -lean_inc(x_197); +lean_ctor_set(x_225, 0, x_224); +lean_ctor_set(x_225, 1, x_214); +lean_inc(x_221); lean_inc(x_19); lean_inc(x_18); lean_inc(x_17); @@ -4596,74 +4762,82 @@ lean_inc(x_15); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -lean_inc(x_188); -lean_ctor_set(x_5, 9, x_197); -lean_ctor_set(x_5, 0, x_188); +lean_inc(x_212); +lean_ctor_set(x_5, 9, x_221); +lean_ctor_set(x_5, 0, x_212); lean_inc(x_9); lean_inc(x_8); if (lean_obj_tag(x_1) == 1) { -lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; +lean_object* x_226; lean_object* x_227; uint8_t x_228; +x_226 = lean_ctor_get(x_1, 0); +lean_inc(x_226); +x_227 = l_Lean_nullKind; +x_228 = lean_name_eq(x_226, x_227); +lean_dec(x_226); +if (x_228 == 0) +{ +lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_inc(x_1); -x_202 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); -lean_closure_set(x_202, 0, x_1); -x_203 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; +x_229 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_229, 0, x_1); +x_230 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; lean_inc(x_1); -x_204 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); -lean_closure_set(x_204, 0, x_203); -lean_closure_set(x_204, 1, x_1); -lean_closure_set(x_204, 2, x_202); +x_231 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_231, 0, x_230); +lean_closure_set(x_231, 1, x_1); +lean_closure_set(x_231, 2, x_229); lean_inc(x_2); -x_205 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_204, x_2, x_201); -if (lean_obj_tag(x_205) == 0) +x_232 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_231, x_2, x_225); +if (lean_obj_tag(x_232) == 0) { -lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; -x_206 = lean_ctor_get(x_205, 1); -lean_inc(x_206); -lean_dec(x_205); -x_207 = l_Lean_Elab_Tactic_tacticElabAttribute; -x_208 = lean_ctor_get(x_207, 1); -lean_inc(x_208); -x_209 = lean_ctor_get(x_206, 0); -lean_inc(x_209); -x_210 = lean_ctor_get(x_209, 0); -lean_inc(x_210); -lean_dec(x_209); -x_211 = lean_ctor_get(x_210, 0); -lean_inc(x_211); -lean_dec(x_210); -x_212 = l_Lean_PersistentEnvExtension_getState___rarg(x_208, x_211); -lean_dec(x_211); -lean_dec(x_208); -x_213 = lean_ctor_get(x_212, 1); -lean_inc(x_213); +lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; +x_233 = lean_ctor_get(x_232, 1); +lean_inc(x_233); +lean_dec(x_232); +x_234 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_235 = lean_ctor_get(x_234, 1); +lean_inc(x_235); +x_236 = lean_ctor_get(x_233, 0); +lean_inc(x_236); +x_237 = lean_ctor_get(x_236, 0); +lean_inc(x_237); +lean_dec(x_236); +x_238 = lean_ctor_get(x_237, 0); +lean_inc(x_238); +lean_dec(x_237); +x_239 = l_Lean_PersistentEnvExtension_getState___rarg(x_235, x_238); +lean_dec(x_238); +lean_dec(x_235); +x_240 = lean_ctor_get(x_239, 1); +lean_inc(x_240); +lean_dec(x_239); +lean_inc(x_1); +x_241 = l_Lean_Syntax_getKind(x_1); +x_242 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_240, x_241); +if (lean_obj_tag(x_242) == 0) +{ +lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; +x_243 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_233); +x_244 = lean_ctor_get(x_243, 0); +lean_inc(x_244); +x_245 = lean_ctor_get(x_243, 1); +lean_inc(x_245); +lean_dec(x_243); +x_246 = l_Lean_Elab_Tactic_getEnv___rarg(x_245); +x_247 = lean_ctor_get(x_246, 0); +lean_inc(x_247); +x_248 = lean_ctor_get(x_246, 1); +lean_inc(x_248); +lean_dec(x_246); +lean_inc(x_1); +x_249 = l_Lean_Elab_expandMacro(x_247, x_1, x_244); +lean_dec(x_247); +if (lean_obj_tag(x_249) == 0) +{ +lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; +lean_dec(x_221); lean_dec(x_212); -lean_inc(x_1); -x_214 = l_Lean_Syntax_getKind(x_1); -x_215 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_213, x_214); -if (lean_obj_tag(x_215) == 0) -{ -lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; -x_216 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_206); -x_217 = lean_ctor_get(x_216, 0); -lean_inc(x_217); -x_218 = lean_ctor_get(x_216, 1); -lean_inc(x_218); -lean_dec(x_216); -x_219 = l_Lean_Elab_Tactic_getEnv___rarg(x_218); -x_220 = lean_ctor_get(x_219, 0); -lean_inc(x_220); -x_221 = lean_ctor_get(x_219, 1); -lean_inc(x_221); -lean_dec(x_219); -lean_inc(x_1); -x_222 = l_Lean_Elab_expandMacro(x_220, x_1, x_217); -lean_dec(x_220); -if (lean_obj_tag(x_222) == 0) -{ -lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; -lean_dec(x_197); -lean_dec(x_188); lean_dec(x_19); lean_dec(x_18); lean_dec(x_17); @@ -4674,62 +4848,62 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_223 = l_Lean_Name_toString___closed__1; -x_224 = l_Lean_Name_toStringWithSep___main(x_223, x_214); -x_225 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_225, 0, x_224); -x_226 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_226, 0, x_225); -x_227 = l_Lean_Meta_Exception_toMessageData___closed__45; -x_228 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_228, 0, x_227); -lean_ctor_set(x_228, 1, x_226); -x_229 = l_Lean_Elab_Term_elabTermAux___main___closed__6; -x_230 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_230, 0, x_228); -lean_ctor_set(x_230, 1, x_229); -x_231 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_230, x_2, x_221); -return x_231; +x_250 = l_Lean_Name_toString___closed__1; +x_251 = l_Lean_Name_toStringWithSep___main(x_250, x_241); +x_252 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_252, 0, x_251); +x_253 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_253, 0, x_252); +x_254 = l_Lean_Meta_Exception_toMessageData___closed__45; +x_255 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_255, 0, x_254); +lean_ctor_set(x_255, 1, x_253); +x_256 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_257 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_257, 0, x_255); +lean_ctor_set(x_257, 1, x_256); +x_258 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_257, x_2, x_248); +return x_258; } else { -lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; -lean_dec(x_214); +lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; +lean_dec(x_241); lean_dec(x_2); -x_232 = lean_ctor_get(x_222, 0); -lean_inc(x_232); -lean_dec(x_222); -x_233 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_233, 0, x_1); -lean_ctor_set(x_233, 1, x_19); -x_234 = lean_alloc_ctor(0, 10, 1); -lean_ctor_set(x_234, 0, x_188); -lean_ctor_set(x_234, 1, x_12); -lean_ctor_set(x_234, 2, x_13); -lean_ctor_set(x_234, 3, x_14); -lean_ctor_set(x_234, 4, x_15); -lean_ctor_set(x_234, 5, x_16); -lean_ctor_set(x_234, 6, x_17); -lean_ctor_set(x_234, 7, x_18); -lean_ctor_set(x_234, 8, x_233); -lean_ctor_set(x_234, 9, x_197); -lean_ctor_set_uint8(x_234, sizeof(void*)*10, x_20); -x_235 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_235, 0, x_234); -lean_ctor_set(x_235, 1, x_8); -lean_ctor_set(x_235, 2, x_9); -x_1 = x_232; -x_2 = x_235; -x_3 = x_221; +x_259 = lean_ctor_get(x_249, 0); +lean_inc(x_259); +lean_dec(x_249); +x_260 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_260, 0, x_1); +lean_ctor_set(x_260, 1, x_19); +x_261 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_261, 0, x_212); +lean_ctor_set(x_261, 1, x_12); +lean_ctor_set(x_261, 2, x_13); +lean_ctor_set(x_261, 3, x_14); +lean_ctor_set(x_261, 4, x_15); +lean_ctor_set(x_261, 5, x_16); +lean_ctor_set(x_261, 6, x_17); +lean_ctor_set(x_261, 7, x_18); +lean_ctor_set(x_261, 8, x_260); +lean_ctor_set(x_261, 9, x_221); +lean_ctor_set_uint8(x_261, sizeof(void*)*10, x_20); +x_262 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_262, 0, x_261); +lean_ctor_set(x_262, 1, x_8); +lean_ctor_set(x_262, 2, x_9); +x_1 = x_259; +x_2 = x_262; +x_3 = x_248; goto _start; } } else { -lean_object* x_237; lean_object* x_238; -lean_dec(x_214); -lean_dec(x_197); -lean_dec(x_188); +lean_object* x_264; lean_object* x_265; +lean_dec(x_241); +lean_dec(x_221); +lean_dec(x_212); lean_dec(x_19); lean_dec(x_18); lean_dec(x_17); @@ -4740,20 +4914,20 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_237 = lean_ctor_get(x_215, 0); -lean_inc(x_237); -lean_dec(x_215); -lean_inc(x_206); -x_238 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_206, x_1, x_237, x_2, x_206); -return x_238; +x_264 = lean_ctor_get(x_242, 0); +lean_inc(x_264); +lean_dec(x_242); +lean_inc(x_233); +x_265 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_233, x_1, x_264, x_2, x_233); +return x_265; } } else { -lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; +lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_dec(x_2); -lean_dec(x_197); -lean_dec(x_188); +lean_dec(x_221); +lean_dec(x_212); lean_dec(x_19); lean_dec(x_18); lean_dec(x_17); @@ -4765,33 +4939,33 @@ lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); lean_dec(x_1); -x_239 = lean_ctor_get(x_205, 0); -lean_inc(x_239); -x_240 = lean_ctor_get(x_205, 1); -lean_inc(x_240); -if (lean_is_exclusive(x_205)) { - lean_ctor_release(x_205, 0); - lean_ctor_release(x_205, 1); - x_241 = x_205; +x_266 = lean_ctor_get(x_232, 0); +lean_inc(x_266); +x_267 = lean_ctor_get(x_232, 1); +lean_inc(x_267); +if (lean_is_exclusive(x_232)) { + lean_ctor_release(x_232, 0); + lean_ctor_release(x_232, 1); + x_268 = x_232; } else { - lean_dec_ref(x_205); - x_241 = lean_box(0); + lean_dec_ref(x_232); + x_268 = lean_box(0); } -if (lean_is_scalar(x_241)) { - x_242 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_268)) { + x_269 = lean_alloc_ctor(1, 2, 0); } else { - x_242 = x_241; + x_269 = x_268; } -lean_ctor_set(x_242, 0, x_239); -lean_ctor_set(x_242, 1, x_240); -return x_242; +lean_ctor_set(x_269, 0, x_266); +lean_ctor_set(x_269, 1, x_267); +return x_269; } } else { -lean_object* x_243; lean_object* x_244; -lean_dec(x_197); -lean_dec(x_188); +lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; +lean_dec(x_221); +lean_dec(x_212); lean_dec(x_19); lean_dec(x_18); lean_dec(x_17); @@ -4802,379 +4976,437 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_243 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; -x_244 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_243, x_2, x_201); -return x_244; +x_270 = l_Lean_Syntax_getArgs(x_1); +lean_dec(x_1); +x_271 = lean_unsigned_to_nat(2u); +x_272 = lean_unsigned_to_nat(0u); +x_273 = lean_box(0); +x_274 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(x_271, x_270, x_272, x_273, x_2, x_225); +lean_dec(x_270); +return x_274; +} +} +else +{ +lean_object* x_275; lean_object* x_276; +lean_dec(x_221); +lean_dec(x_212); +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +x_275 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; +x_276 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_275, x_2, x_225); +return x_276; } } } else { -lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; uint8_t x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; -x_245 = lean_ctor_get(x_5, 1); -x_246 = lean_ctor_get(x_5, 2); -x_247 = lean_ctor_get(x_5, 3); -x_248 = lean_ctor_get(x_5, 4); -x_249 = lean_ctor_get(x_5, 5); -x_250 = lean_ctor_get(x_5, 6); -x_251 = lean_ctor_get(x_5, 7); -x_252 = lean_ctor_get(x_5, 8); -x_253 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); -lean_inc(x_252); -lean_inc(x_251); -lean_inc(x_250); -lean_inc(x_249); -lean_inc(x_248); -lean_inc(x_247); -lean_inc(x_246); -lean_inc(x_245); +lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; uint8_t x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* 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_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; +x_277 = lean_ctor_get(x_5, 1); +x_278 = lean_ctor_get(x_5, 2); +x_279 = lean_ctor_get(x_5, 3); +x_280 = lean_ctor_get(x_5, 4); +x_281 = lean_ctor_get(x_5, 5); +x_282 = lean_ctor_get(x_5, 6); +x_283 = lean_ctor_get(x_5, 7); +x_284 = lean_ctor_get(x_5, 8); +x_285 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); +lean_inc(x_284); +lean_inc(x_283); +lean_inc(x_282); +lean_inc(x_281); +lean_inc(x_280); +lean_inc(x_279); +lean_inc(x_278); +lean_inc(x_277); lean_dec(x_5); -x_254 = lean_ctor_get(x_6, 0); -lean_inc(x_254); -x_255 = lean_ctor_get(x_6, 1); -lean_inc(x_255); -x_256 = lean_ctor_get(x_6, 2); -lean_inc(x_256); -x_257 = lean_ctor_get(x_6, 3); -lean_inc(x_257); -x_258 = lean_ctor_get(x_6, 4); -lean_inc(x_258); +x_286 = lean_ctor_get(x_6, 0); +lean_inc(x_286); +x_287 = lean_ctor_get(x_6, 1); +lean_inc(x_287); +x_288 = lean_ctor_get(x_6, 2); +lean_inc(x_288); +x_289 = lean_ctor_get(x_6, 3); +lean_inc(x_289); +x_290 = lean_ctor_get(x_6, 4); +lean_inc(x_290); if (lean_is_exclusive(x_6)) { lean_ctor_release(x_6, 0); lean_ctor_release(x_6, 1); lean_ctor_release(x_6, 2); lean_ctor_release(x_6, 3); lean_ctor_release(x_6, 4); - x_259 = x_6; + x_291 = x_6; } else { lean_dec_ref(x_6); - x_259 = lean_box(0); + x_291 = lean_box(0); } -x_260 = lean_unsigned_to_nat(1u); -x_261 = lean_nat_add(x_257, x_260); -lean_dec(x_257); -if (lean_is_scalar(x_259)) { - x_262 = lean_alloc_ctor(0, 5, 0); +x_292 = lean_unsigned_to_nat(1u); +x_293 = lean_nat_add(x_289, x_292); +lean_dec(x_289); +if (lean_is_scalar(x_291)) { + x_294 = lean_alloc_ctor(0, 5, 0); } else { - x_262 = x_259; + x_294 = x_291; } -lean_ctor_set(x_262, 0, x_254); -lean_ctor_set(x_262, 1, x_255); -lean_ctor_set(x_262, 2, x_256); -lean_ctor_set(x_262, 3, x_261); -lean_ctor_set(x_262, 4, x_258); -x_263 = lean_ctor_get(x_4, 0); -lean_inc(x_263); -x_264 = lean_ctor_get(x_4, 1); -lean_inc(x_264); +lean_ctor_set(x_294, 0, x_286); +lean_ctor_set(x_294, 1, x_287); +lean_ctor_set(x_294, 2, x_288); +lean_ctor_set(x_294, 3, x_293); +lean_ctor_set(x_294, 4, x_290); +x_295 = lean_ctor_get(x_4, 0); +lean_inc(x_295); +x_296 = lean_ctor_get(x_4, 1); +lean_inc(x_296); if (lean_is_exclusive(x_4)) { lean_ctor_release(x_4, 0); lean_ctor_release(x_4, 1); - x_265 = x_4; + x_297 = x_4; } else { lean_dec_ref(x_4); - x_265 = lean_box(0); + x_297 = lean_box(0); } -x_266 = lean_ctor_get(x_263, 0); -lean_inc(x_266); -x_267 = lean_ctor_get(x_263, 1); -lean_inc(x_267); -x_268 = lean_ctor_get(x_263, 2); -lean_inc(x_268); -x_269 = lean_ctor_get(x_263, 3); -lean_inc(x_269); -x_270 = lean_ctor_get(x_263, 4); -lean_inc(x_270); -x_271 = lean_ctor_get(x_263, 5); -lean_inc(x_271); -if (lean_is_exclusive(x_263)) { - lean_ctor_release(x_263, 0); - lean_ctor_release(x_263, 1); - lean_ctor_release(x_263, 2); - lean_ctor_release(x_263, 3); - lean_ctor_release(x_263, 4); - lean_ctor_release(x_263, 5); - x_272 = x_263; +x_298 = lean_ctor_get(x_295, 0); +lean_inc(x_298); +x_299 = lean_ctor_get(x_295, 1); +lean_inc(x_299); +x_300 = lean_ctor_get(x_295, 2); +lean_inc(x_300); +x_301 = lean_ctor_get(x_295, 3); +lean_inc(x_301); +x_302 = lean_ctor_get(x_295, 4); +lean_inc(x_302); +x_303 = lean_ctor_get(x_295, 5); +lean_inc(x_303); +if (lean_is_exclusive(x_295)) { + lean_ctor_release(x_295, 0); + lean_ctor_release(x_295, 1); + lean_ctor_release(x_295, 2); + lean_ctor_release(x_295, 3); + lean_ctor_release(x_295, 4); + lean_ctor_release(x_295, 5); + x_304 = x_295; } else { - lean_dec_ref(x_263); - x_272 = lean_box(0); + lean_dec_ref(x_295); + x_304 = lean_box(0); } -x_273 = lean_nat_add(x_271, x_260); -if (lean_is_scalar(x_272)) { - x_274 = lean_alloc_ctor(0, 6, 0); +x_305 = lean_nat_add(x_303, x_292); +if (lean_is_scalar(x_304)) { + x_306 = lean_alloc_ctor(0, 6, 0); } else { - x_274 = x_272; + x_306 = x_304; } -lean_ctor_set(x_274, 0, x_266); -lean_ctor_set(x_274, 1, x_267); -lean_ctor_set(x_274, 2, x_268); -lean_ctor_set(x_274, 3, x_269); -lean_ctor_set(x_274, 4, x_270); -lean_ctor_set(x_274, 5, x_273); -if (lean_is_scalar(x_265)) { - x_275 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_306, 0, x_298); +lean_ctor_set(x_306, 1, x_299); +lean_ctor_set(x_306, 2, x_300); +lean_ctor_set(x_306, 3, x_301); +lean_ctor_set(x_306, 4, x_302); +lean_ctor_set(x_306, 5, x_305); +if (lean_is_scalar(x_297)) { + x_307 = lean_alloc_ctor(0, 2, 0); } else { - x_275 = x_265; + x_307 = x_297; } -lean_ctor_set(x_275, 0, x_274); -lean_ctor_set(x_275, 1, x_264); -lean_inc(x_271); -lean_inc(x_252); -lean_inc(x_251); -lean_inc(x_250); -lean_inc(x_249); -lean_inc(x_248); -lean_inc(x_247); -lean_inc(x_246); -lean_inc(x_245); -lean_inc(x_262); -x_276 = lean_alloc_ctor(0, 10, 1); -lean_ctor_set(x_276, 0, x_262); -lean_ctor_set(x_276, 1, x_245); -lean_ctor_set(x_276, 2, x_246); -lean_ctor_set(x_276, 3, x_247); -lean_ctor_set(x_276, 4, x_248); -lean_ctor_set(x_276, 5, x_249); -lean_ctor_set(x_276, 6, x_250); -lean_ctor_set(x_276, 7, x_251); -lean_ctor_set(x_276, 8, x_252); -lean_ctor_set(x_276, 9, x_271); -lean_ctor_set_uint8(x_276, sizeof(void*)*10, x_253); +lean_ctor_set(x_307, 0, x_306); +lean_ctor_set(x_307, 1, x_296); +lean_inc(x_303); +lean_inc(x_284); +lean_inc(x_283); +lean_inc(x_282); +lean_inc(x_281); +lean_inc(x_280); +lean_inc(x_279); +lean_inc(x_278); +lean_inc(x_277); +lean_inc(x_294); +x_308 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_308, 0, x_294); +lean_ctor_set(x_308, 1, x_277); +lean_ctor_set(x_308, 2, x_278); +lean_ctor_set(x_308, 3, x_279); +lean_ctor_set(x_308, 4, x_280); +lean_ctor_set(x_308, 5, x_281); +lean_ctor_set(x_308, 6, x_282); +lean_ctor_set(x_308, 7, x_283); +lean_ctor_set(x_308, 8, x_284); +lean_ctor_set(x_308, 9, x_303); +lean_ctor_set_uint8(x_308, sizeof(void*)*10, x_285); lean_inc(x_9); lean_inc(x_8); -lean_ctor_set(x_2, 0, x_276); +lean_ctor_set(x_2, 0, x_308); if (lean_obj_tag(x_1) == 1) { -lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; +lean_object* x_309; lean_object* x_310; uint8_t x_311; +x_309 = lean_ctor_get(x_1, 0); +lean_inc(x_309); +x_310 = l_Lean_nullKind; +x_311 = lean_name_eq(x_309, x_310); +lean_dec(x_309); +if (x_311 == 0) +{ +lean_object* x_312; lean_object* x_313; lean_object* x_314; lean_object* x_315; lean_inc(x_1); -x_277 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); -lean_closure_set(x_277, 0, x_1); -x_278 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; +x_312 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_312, 0, x_1); +x_313 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; lean_inc(x_1); -x_279 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); -lean_closure_set(x_279, 0, x_278); -lean_closure_set(x_279, 1, x_1); -lean_closure_set(x_279, 2, x_277); +x_314 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_314, 0, x_313); +lean_closure_set(x_314, 1, x_1); +lean_closure_set(x_314, 2, x_312); lean_inc(x_2); -x_280 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_279, x_2, x_275); -if (lean_obj_tag(x_280) == 0) +x_315 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_314, x_2, x_307); +if (lean_obj_tag(x_315) == 0) { -lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; -x_281 = lean_ctor_get(x_280, 1); -lean_inc(x_281); -lean_dec(x_280); -x_282 = l_Lean_Elab_Tactic_tacticElabAttribute; -x_283 = lean_ctor_get(x_282, 1); -lean_inc(x_283); -x_284 = lean_ctor_get(x_281, 0); -lean_inc(x_284); -x_285 = lean_ctor_get(x_284, 0); -lean_inc(x_285); -lean_dec(x_284); -x_286 = lean_ctor_get(x_285, 0); -lean_inc(x_286); -lean_dec(x_285); -x_287 = l_Lean_PersistentEnvExtension_getState___rarg(x_283, x_286); -lean_dec(x_286); -lean_dec(x_283); -x_288 = lean_ctor_get(x_287, 1); -lean_inc(x_288); -lean_dec(x_287); +lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; +x_316 = lean_ctor_get(x_315, 1); +lean_inc(x_316); +lean_dec(x_315); +x_317 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_318 = lean_ctor_get(x_317, 1); +lean_inc(x_318); +x_319 = lean_ctor_get(x_316, 0); +lean_inc(x_319); +x_320 = lean_ctor_get(x_319, 0); +lean_inc(x_320); +lean_dec(x_319); +x_321 = lean_ctor_get(x_320, 0); +lean_inc(x_321); +lean_dec(x_320); +x_322 = l_Lean_PersistentEnvExtension_getState___rarg(x_318, x_321); +lean_dec(x_321); +lean_dec(x_318); +x_323 = lean_ctor_get(x_322, 1); +lean_inc(x_323); +lean_dec(x_322); lean_inc(x_1); -x_289 = l_Lean_Syntax_getKind(x_1); -x_290 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_288, x_289); -if (lean_obj_tag(x_290) == 0) +x_324 = l_Lean_Syntax_getKind(x_1); +x_325 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_323, x_324); +if (lean_obj_tag(x_325) == 0) { -lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; -x_291 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_281); -x_292 = lean_ctor_get(x_291, 0); -lean_inc(x_292); -x_293 = lean_ctor_get(x_291, 1); -lean_inc(x_293); -lean_dec(x_291); -x_294 = l_Lean_Elab_Tactic_getEnv___rarg(x_293); -x_295 = lean_ctor_get(x_294, 0); -lean_inc(x_295); -x_296 = lean_ctor_get(x_294, 1); -lean_inc(x_296); +lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; +x_326 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_316); +x_327 = lean_ctor_get(x_326, 0); +lean_inc(x_327); +x_328 = lean_ctor_get(x_326, 1); +lean_inc(x_328); +lean_dec(x_326); +x_329 = l_Lean_Elab_Tactic_getEnv___rarg(x_328); +x_330 = lean_ctor_get(x_329, 0); +lean_inc(x_330); +x_331 = lean_ctor_get(x_329, 1); +lean_inc(x_331); +lean_dec(x_329); +lean_inc(x_1); +x_332 = l_Lean_Elab_expandMacro(x_330, x_1, x_327); +lean_dec(x_330); +if (lean_obj_tag(x_332) == 0) +{ +lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; +lean_dec(x_303); lean_dec(x_294); -lean_inc(x_1); -x_297 = l_Lean_Elab_expandMacro(x_295, x_1, x_292); -lean_dec(x_295); -if (lean_obj_tag(x_297) == 0) -{ -lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; -lean_dec(x_271); -lean_dec(x_262); -lean_dec(x_252); -lean_dec(x_251); -lean_dec(x_250); -lean_dec(x_249); -lean_dec(x_248); -lean_dec(x_247); -lean_dec(x_246); -lean_dec(x_245); +lean_dec(x_284); +lean_dec(x_283); +lean_dec(x_282); +lean_dec(x_281); +lean_dec(x_280); +lean_dec(x_279); +lean_dec(x_278); +lean_dec(x_277); lean_dec(x_9); lean_dec(x_8); -x_298 = l_Lean_Name_toString___closed__1; -x_299 = l_Lean_Name_toStringWithSep___main(x_298, x_289); -x_300 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_300, 0, x_299); -x_301 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_301, 0, x_300); -x_302 = l_Lean_Meta_Exception_toMessageData___closed__45; -x_303 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_303, 0, x_302); -lean_ctor_set(x_303, 1, x_301); -x_304 = l_Lean_Elab_Term_elabTermAux___main___closed__6; -x_305 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_305, 0, x_303); -lean_ctor_set(x_305, 1, x_304); -x_306 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_305, x_2, x_296); -return x_306; +x_333 = l_Lean_Name_toString___closed__1; +x_334 = l_Lean_Name_toStringWithSep___main(x_333, x_324); +x_335 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_335, 0, x_334); +x_336 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_336, 0, x_335); +x_337 = l_Lean_Meta_Exception_toMessageData___closed__45; +x_338 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_338, 0, x_337); +lean_ctor_set(x_338, 1, x_336); +x_339 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_340 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_340, 0, x_338); +lean_ctor_set(x_340, 1, x_339); +x_341 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_340, x_2, x_331); +return x_341; } else { -lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; -lean_dec(x_289); +lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; +lean_dec(x_324); lean_dec(x_2); -x_307 = lean_ctor_get(x_297, 0); -lean_inc(x_307); -lean_dec(x_297); -x_308 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_308, 0, x_1); -lean_ctor_set(x_308, 1, x_252); -x_309 = lean_alloc_ctor(0, 10, 1); -lean_ctor_set(x_309, 0, x_262); -lean_ctor_set(x_309, 1, x_245); -lean_ctor_set(x_309, 2, x_246); -lean_ctor_set(x_309, 3, x_247); -lean_ctor_set(x_309, 4, x_248); -lean_ctor_set(x_309, 5, x_249); -lean_ctor_set(x_309, 6, x_250); -lean_ctor_set(x_309, 7, x_251); -lean_ctor_set(x_309, 8, x_308); -lean_ctor_set(x_309, 9, x_271); -lean_ctor_set_uint8(x_309, sizeof(void*)*10, x_253); -x_310 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_310, 0, x_309); -lean_ctor_set(x_310, 1, x_8); -lean_ctor_set(x_310, 2, x_9); -x_1 = x_307; -x_2 = x_310; -x_3 = x_296; +x_342 = lean_ctor_get(x_332, 0); +lean_inc(x_342); +lean_dec(x_332); +x_343 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_343, 0, x_1); +lean_ctor_set(x_343, 1, x_284); +x_344 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_344, 0, x_294); +lean_ctor_set(x_344, 1, x_277); +lean_ctor_set(x_344, 2, x_278); +lean_ctor_set(x_344, 3, x_279); +lean_ctor_set(x_344, 4, x_280); +lean_ctor_set(x_344, 5, x_281); +lean_ctor_set(x_344, 6, x_282); +lean_ctor_set(x_344, 7, x_283); +lean_ctor_set(x_344, 8, x_343); +lean_ctor_set(x_344, 9, x_303); +lean_ctor_set_uint8(x_344, sizeof(void*)*10, x_285); +x_345 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_345, 0, x_344); +lean_ctor_set(x_345, 1, x_8); +lean_ctor_set(x_345, 2, x_9); +x_1 = x_342; +x_2 = x_345; +x_3 = x_331; goto _start; } } else { -lean_object* x_312; lean_object* x_313; -lean_dec(x_289); -lean_dec(x_271); -lean_dec(x_262); -lean_dec(x_252); -lean_dec(x_251); -lean_dec(x_250); -lean_dec(x_249); -lean_dec(x_248); -lean_dec(x_247); -lean_dec(x_246); -lean_dec(x_245); +lean_object* x_347; lean_object* x_348; +lean_dec(x_324); +lean_dec(x_303); +lean_dec(x_294); +lean_dec(x_284); +lean_dec(x_283); +lean_dec(x_282); +lean_dec(x_281); +lean_dec(x_280); +lean_dec(x_279); +lean_dec(x_278); +lean_dec(x_277); lean_dec(x_9); lean_dec(x_8); -x_312 = lean_ctor_get(x_290, 0); -lean_inc(x_312); -lean_dec(x_290); -lean_inc(x_281); -x_313 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_281, x_1, x_312, x_2, x_281); -return x_313; +x_347 = lean_ctor_get(x_325, 0); +lean_inc(x_347); +lean_dec(x_325); +lean_inc(x_316); +x_348 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_316, x_1, x_347, x_2, x_316); +return x_348; } } else { -lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; +lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_dec(x_2); -lean_dec(x_271); -lean_dec(x_262); -lean_dec(x_252); -lean_dec(x_251); -lean_dec(x_250); -lean_dec(x_249); -lean_dec(x_248); -lean_dec(x_247); -lean_dec(x_246); -lean_dec(x_245); +lean_dec(x_303); +lean_dec(x_294); +lean_dec(x_284); +lean_dec(x_283); +lean_dec(x_282); +lean_dec(x_281); +lean_dec(x_280); +lean_dec(x_279); +lean_dec(x_278); +lean_dec(x_277); lean_dec(x_9); lean_dec(x_8); lean_dec(x_1); -x_314 = lean_ctor_get(x_280, 0); -lean_inc(x_314); -x_315 = lean_ctor_get(x_280, 1); -lean_inc(x_315); -if (lean_is_exclusive(x_280)) { - lean_ctor_release(x_280, 0); - lean_ctor_release(x_280, 1); - x_316 = x_280; +x_349 = lean_ctor_get(x_315, 0); +lean_inc(x_349); +x_350 = lean_ctor_get(x_315, 1); +lean_inc(x_350); +if (lean_is_exclusive(x_315)) { + lean_ctor_release(x_315, 0); + lean_ctor_release(x_315, 1); + x_351 = x_315; } else { - lean_dec_ref(x_280); - x_316 = lean_box(0); + lean_dec_ref(x_315); + x_351 = lean_box(0); } -if (lean_is_scalar(x_316)) { - x_317 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_351)) { + x_352 = lean_alloc_ctor(1, 2, 0); } else { - x_317 = x_316; + x_352 = x_351; } -lean_ctor_set(x_317, 0, x_314); -lean_ctor_set(x_317, 1, x_315); -return x_317; +lean_ctor_set(x_352, 0, x_349); +lean_ctor_set(x_352, 1, x_350); +return x_352; } } else { -lean_object* x_318; lean_object* x_319; -lean_dec(x_271); -lean_dec(x_262); -lean_dec(x_252); -lean_dec(x_251); -lean_dec(x_250); -lean_dec(x_249); -lean_dec(x_248); -lean_dec(x_247); -lean_dec(x_246); -lean_dec(x_245); +lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; +lean_dec(x_303); +lean_dec(x_294); +lean_dec(x_284); +lean_dec(x_283); +lean_dec(x_282); +lean_dec(x_281); +lean_dec(x_280); +lean_dec(x_279); +lean_dec(x_278); +lean_dec(x_277); lean_dec(x_9); lean_dec(x_8); -x_318 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; -x_319 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_318, x_2, x_275); -return x_319; +x_353 = l_Lean_Syntax_getArgs(x_1); +lean_dec(x_1); +x_354 = lean_unsigned_to_nat(2u); +x_355 = lean_unsigned_to_nat(0u); +x_356 = lean_box(0); +x_357 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(x_354, x_353, x_355, x_356, x_2, x_307); +lean_dec(x_353); +return x_357; +} +} +else +{ +lean_object* x_358; lean_object* x_359; +lean_dec(x_303); +lean_dec(x_294); +lean_dec(x_284); +lean_dec(x_283); +lean_dec(x_282); +lean_dec(x_281); +lean_dec(x_280); +lean_dec(x_279); +lean_dec(x_278); +lean_dec(x_277); +lean_dec(x_9); +lean_dec(x_8); +x_358 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; +x_359 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_358, x_2, x_307); +return x_359; } } } else { -lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_object* x_329; uint8_t x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; -x_320 = lean_ctor_get(x_2, 1); -x_321 = lean_ctor_get(x_2, 2); -lean_inc(x_321); -lean_inc(x_320); +lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; uint8_t x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; lean_object* x_395; +x_360 = lean_ctor_get(x_2, 1); +x_361 = lean_ctor_get(x_2, 2); +lean_inc(x_361); +lean_inc(x_360); lean_dec(x_2); -x_322 = lean_ctor_get(x_5, 1); -lean_inc(x_322); -x_323 = lean_ctor_get(x_5, 2); -lean_inc(x_323); -x_324 = lean_ctor_get(x_5, 3); -lean_inc(x_324); -x_325 = lean_ctor_get(x_5, 4); -lean_inc(x_325); -x_326 = lean_ctor_get(x_5, 5); -lean_inc(x_326); -x_327 = lean_ctor_get(x_5, 6); -lean_inc(x_327); -x_328 = lean_ctor_get(x_5, 7); -lean_inc(x_328); -x_329 = lean_ctor_get(x_5, 8); -lean_inc(x_329); -x_330 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); +x_362 = lean_ctor_get(x_5, 1); +lean_inc(x_362); +x_363 = lean_ctor_get(x_5, 2); +lean_inc(x_363); +x_364 = lean_ctor_get(x_5, 3); +lean_inc(x_364); +x_365 = lean_ctor_get(x_5, 4); +lean_inc(x_365); +x_366 = lean_ctor_get(x_5, 5); +lean_inc(x_366); +x_367 = lean_ctor_get(x_5, 6); +lean_inc(x_367); +x_368 = lean_ctor_get(x_5, 7); +lean_inc(x_368); +x_369 = lean_ctor_get(x_5, 8); +lean_inc(x_369); +x_370 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); if (lean_is_exclusive(x_5)) { lean_ctor_release(x_5, 0); lean_ctor_release(x_5, 1); @@ -5186,336 +5418,369 @@ if (lean_is_exclusive(x_5)) { lean_ctor_release(x_5, 7); lean_ctor_release(x_5, 8); lean_ctor_release(x_5, 9); - x_331 = x_5; + x_371 = x_5; } else { lean_dec_ref(x_5); - x_331 = lean_box(0); + x_371 = lean_box(0); } -x_332 = lean_ctor_get(x_6, 0); -lean_inc(x_332); -x_333 = lean_ctor_get(x_6, 1); -lean_inc(x_333); -x_334 = lean_ctor_get(x_6, 2); -lean_inc(x_334); -x_335 = lean_ctor_get(x_6, 3); -lean_inc(x_335); -x_336 = lean_ctor_get(x_6, 4); -lean_inc(x_336); +x_372 = lean_ctor_get(x_6, 0); +lean_inc(x_372); +x_373 = lean_ctor_get(x_6, 1); +lean_inc(x_373); +x_374 = lean_ctor_get(x_6, 2); +lean_inc(x_374); +x_375 = lean_ctor_get(x_6, 3); +lean_inc(x_375); +x_376 = lean_ctor_get(x_6, 4); +lean_inc(x_376); if (lean_is_exclusive(x_6)) { lean_ctor_release(x_6, 0); lean_ctor_release(x_6, 1); lean_ctor_release(x_6, 2); lean_ctor_release(x_6, 3); lean_ctor_release(x_6, 4); - x_337 = x_6; + x_377 = x_6; } else { lean_dec_ref(x_6); - x_337 = lean_box(0); + x_377 = lean_box(0); } -x_338 = lean_unsigned_to_nat(1u); -x_339 = lean_nat_add(x_335, x_338); -lean_dec(x_335); -if (lean_is_scalar(x_337)) { - x_340 = lean_alloc_ctor(0, 5, 0); +x_378 = lean_unsigned_to_nat(1u); +x_379 = lean_nat_add(x_375, x_378); +lean_dec(x_375); +if (lean_is_scalar(x_377)) { + x_380 = lean_alloc_ctor(0, 5, 0); } else { - x_340 = x_337; + x_380 = x_377; } -lean_ctor_set(x_340, 0, x_332); -lean_ctor_set(x_340, 1, x_333); -lean_ctor_set(x_340, 2, x_334); -lean_ctor_set(x_340, 3, x_339); -lean_ctor_set(x_340, 4, x_336); -x_341 = lean_ctor_get(x_4, 0); -lean_inc(x_341); -x_342 = lean_ctor_get(x_4, 1); -lean_inc(x_342); +lean_ctor_set(x_380, 0, x_372); +lean_ctor_set(x_380, 1, x_373); +lean_ctor_set(x_380, 2, x_374); +lean_ctor_set(x_380, 3, x_379); +lean_ctor_set(x_380, 4, x_376); +x_381 = lean_ctor_get(x_4, 0); +lean_inc(x_381); +x_382 = lean_ctor_get(x_4, 1); +lean_inc(x_382); if (lean_is_exclusive(x_4)) { lean_ctor_release(x_4, 0); lean_ctor_release(x_4, 1); - x_343 = x_4; + x_383 = x_4; } else { lean_dec_ref(x_4); - x_343 = lean_box(0); + x_383 = lean_box(0); } -x_344 = lean_ctor_get(x_341, 0); -lean_inc(x_344); -x_345 = lean_ctor_get(x_341, 1); -lean_inc(x_345); -x_346 = lean_ctor_get(x_341, 2); -lean_inc(x_346); -x_347 = lean_ctor_get(x_341, 3); -lean_inc(x_347); -x_348 = lean_ctor_get(x_341, 4); -lean_inc(x_348); -x_349 = lean_ctor_get(x_341, 5); -lean_inc(x_349); -if (lean_is_exclusive(x_341)) { - lean_ctor_release(x_341, 0); - lean_ctor_release(x_341, 1); - lean_ctor_release(x_341, 2); - lean_ctor_release(x_341, 3); - lean_ctor_release(x_341, 4); - lean_ctor_release(x_341, 5); - x_350 = x_341; +x_384 = lean_ctor_get(x_381, 0); +lean_inc(x_384); +x_385 = lean_ctor_get(x_381, 1); +lean_inc(x_385); +x_386 = lean_ctor_get(x_381, 2); +lean_inc(x_386); +x_387 = lean_ctor_get(x_381, 3); +lean_inc(x_387); +x_388 = lean_ctor_get(x_381, 4); +lean_inc(x_388); +x_389 = lean_ctor_get(x_381, 5); +lean_inc(x_389); +if (lean_is_exclusive(x_381)) { + lean_ctor_release(x_381, 0); + lean_ctor_release(x_381, 1); + lean_ctor_release(x_381, 2); + lean_ctor_release(x_381, 3); + lean_ctor_release(x_381, 4); + lean_ctor_release(x_381, 5); + x_390 = x_381; } else { - lean_dec_ref(x_341); - x_350 = lean_box(0); + lean_dec_ref(x_381); + x_390 = lean_box(0); } -x_351 = lean_nat_add(x_349, x_338); -if (lean_is_scalar(x_350)) { - x_352 = lean_alloc_ctor(0, 6, 0); +x_391 = lean_nat_add(x_389, x_378); +if (lean_is_scalar(x_390)) { + x_392 = lean_alloc_ctor(0, 6, 0); } else { - x_352 = x_350; + x_392 = x_390; } -lean_ctor_set(x_352, 0, x_344); -lean_ctor_set(x_352, 1, x_345); -lean_ctor_set(x_352, 2, x_346); -lean_ctor_set(x_352, 3, x_347); -lean_ctor_set(x_352, 4, x_348); -lean_ctor_set(x_352, 5, x_351); -if (lean_is_scalar(x_343)) { - x_353 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_392, 0, x_384); +lean_ctor_set(x_392, 1, x_385); +lean_ctor_set(x_392, 2, x_386); +lean_ctor_set(x_392, 3, x_387); +lean_ctor_set(x_392, 4, x_388); +lean_ctor_set(x_392, 5, x_391); +if (lean_is_scalar(x_383)) { + x_393 = lean_alloc_ctor(0, 2, 0); } else { - x_353 = x_343; + x_393 = x_383; } -lean_ctor_set(x_353, 0, x_352); -lean_ctor_set(x_353, 1, x_342); -lean_inc(x_349); -lean_inc(x_329); -lean_inc(x_328); -lean_inc(x_327); -lean_inc(x_326); -lean_inc(x_325); -lean_inc(x_324); -lean_inc(x_323); -lean_inc(x_322); -lean_inc(x_340); -if (lean_is_scalar(x_331)) { - x_354 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_393, 0, x_392); +lean_ctor_set(x_393, 1, x_382); +lean_inc(x_389); +lean_inc(x_369); +lean_inc(x_368); +lean_inc(x_367); +lean_inc(x_366); +lean_inc(x_365); +lean_inc(x_364); +lean_inc(x_363); +lean_inc(x_362); +lean_inc(x_380); +if (lean_is_scalar(x_371)) { + x_394 = lean_alloc_ctor(0, 10, 1); } else { - x_354 = x_331; + x_394 = x_371; } -lean_ctor_set(x_354, 0, x_340); -lean_ctor_set(x_354, 1, x_322); -lean_ctor_set(x_354, 2, x_323); -lean_ctor_set(x_354, 3, x_324); -lean_ctor_set(x_354, 4, x_325); -lean_ctor_set(x_354, 5, x_326); -lean_ctor_set(x_354, 6, x_327); -lean_ctor_set(x_354, 7, x_328); -lean_ctor_set(x_354, 8, x_329); -lean_ctor_set(x_354, 9, x_349); -lean_ctor_set_uint8(x_354, sizeof(void*)*10, x_330); -lean_inc(x_321); -lean_inc(x_320); -x_355 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_355, 0, x_354); -lean_ctor_set(x_355, 1, x_320); -lean_ctor_set(x_355, 2, x_321); +lean_ctor_set(x_394, 0, x_380); +lean_ctor_set(x_394, 1, x_362); +lean_ctor_set(x_394, 2, x_363); +lean_ctor_set(x_394, 3, x_364); +lean_ctor_set(x_394, 4, x_365); +lean_ctor_set(x_394, 5, x_366); +lean_ctor_set(x_394, 6, x_367); +lean_ctor_set(x_394, 7, x_368); +lean_ctor_set(x_394, 8, x_369); +lean_ctor_set(x_394, 9, x_389); +lean_ctor_set_uint8(x_394, sizeof(void*)*10, x_370); +lean_inc(x_361); +lean_inc(x_360); +x_395 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_395, 0, x_394); +lean_ctor_set(x_395, 1, x_360); +lean_ctor_set(x_395, 2, x_361); if (lean_obj_tag(x_1) == 1) { -lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; -lean_inc(x_1); -x_356 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); -lean_closure_set(x_356, 0, x_1); -x_357 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; -lean_inc(x_1); -x_358 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); -lean_closure_set(x_358, 0, x_357); -lean_closure_set(x_358, 1, x_1); -lean_closure_set(x_358, 2, x_356); -lean_inc(x_355); -x_359 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_358, x_355, x_353); -if (lean_obj_tag(x_359) == 0) +lean_object* x_396; lean_object* x_397; uint8_t x_398; +x_396 = lean_ctor_get(x_1, 0); +lean_inc(x_396); +x_397 = l_Lean_nullKind; +x_398 = lean_name_eq(x_396, x_397); +lean_dec(x_396); +if (x_398 == 0) { -lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; -x_360 = lean_ctor_get(x_359, 1); -lean_inc(x_360); -lean_dec(x_359); -x_361 = l_Lean_Elab_Tactic_tacticElabAttribute; -x_362 = lean_ctor_get(x_361, 1); -lean_inc(x_362); -x_363 = lean_ctor_get(x_360, 0); -lean_inc(x_363); -x_364 = lean_ctor_get(x_363, 0); -lean_inc(x_364); -lean_dec(x_363); -x_365 = lean_ctor_get(x_364, 0); -lean_inc(x_365); -lean_dec(x_364); -x_366 = l_Lean_PersistentEnvExtension_getState___rarg(x_362, x_365); -lean_dec(x_365); -lean_dec(x_362); -x_367 = lean_ctor_get(x_366, 1); -lean_inc(x_367); +lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; +lean_inc(x_1); +x_399 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_399, 0, x_1); +x_400 = l_Lean_Elab_Tactic_evalTactic___main___closed__4; +lean_inc(x_1); +x_401 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_401, 0, x_400); +lean_closure_set(x_401, 1, x_1); +lean_closure_set(x_401, 2, x_399); +lean_inc(x_395); +x_402 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_401, x_395, x_393); +if (lean_obj_tag(x_402) == 0) +{ +lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; +x_403 = lean_ctor_get(x_402, 1); +lean_inc(x_403); +lean_dec(x_402); +x_404 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_405 = lean_ctor_get(x_404, 1); +lean_inc(x_405); +x_406 = lean_ctor_get(x_403, 0); +lean_inc(x_406); +x_407 = lean_ctor_get(x_406, 0); +lean_inc(x_407); +lean_dec(x_406); +x_408 = lean_ctor_get(x_407, 0); +lean_inc(x_408); +lean_dec(x_407); +x_409 = l_Lean_PersistentEnvExtension_getState___rarg(x_405, x_408); +lean_dec(x_408); +lean_dec(x_405); +x_410 = lean_ctor_get(x_409, 1); +lean_inc(x_410); +lean_dec(x_409); +lean_inc(x_1); +x_411 = l_Lean_Syntax_getKind(x_1); +x_412 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_410, x_411); +if (lean_obj_tag(x_412) == 0) +{ +lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; +x_413 = l_Lean_Elab_Tactic_getCurrMacroScope(x_395, x_403); +x_414 = lean_ctor_get(x_413, 0); +lean_inc(x_414); +x_415 = lean_ctor_get(x_413, 1); +lean_inc(x_415); +lean_dec(x_413); +x_416 = l_Lean_Elab_Tactic_getEnv___rarg(x_415); +x_417 = lean_ctor_get(x_416, 0); +lean_inc(x_417); +x_418 = lean_ctor_get(x_416, 1); +lean_inc(x_418); +lean_dec(x_416); +lean_inc(x_1); +x_419 = l_Lean_Elab_expandMacro(x_417, x_1, x_414); +lean_dec(x_417); +if (lean_obj_tag(x_419) == 0) +{ +lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; +lean_dec(x_389); +lean_dec(x_380); +lean_dec(x_369); +lean_dec(x_368); +lean_dec(x_367); lean_dec(x_366); -lean_inc(x_1); -x_368 = l_Lean_Syntax_getKind(x_1); -x_369 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(x_367, x_368); -if (lean_obj_tag(x_369) == 0) -{ -lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; -x_370 = l_Lean_Elab_Tactic_getCurrMacroScope(x_355, x_360); -x_371 = lean_ctor_get(x_370, 0); -lean_inc(x_371); -x_372 = lean_ctor_get(x_370, 1); -lean_inc(x_372); -lean_dec(x_370); -x_373 = l_Lean_Elab_Tactic_getEnv___rarg(x_372); -x_374 = lean_ctor_get(x_373, 0); -lean_inc(x_374); -x_375 = lean_ctor_get(x_373, 1); -lean_inc(x_375); -lean_dec(x_373); -lean_inc(x_1); -x_376 = l_Lean_Elab_expandMacro(x_374, x_1, x_371); -lean_dec(x_374); -if (lean_obj_tag(x_376) == 0) -{ -lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; -lean_dec(x_349); -lean_dec(x_340); -lean_dec(x_329); -lean_dec(x_328); -lean_dec(x_327); -lean_dec(x_326); -lean_dec(x_325); -lean_dec(x_324); -lean_dec(x_323); -lean_dec(x_322); -lean_dec(x_321); -lean_dec(x_320); -x_377 = l_Lean_Name_toString___closed__1; -x_378 = l_Lean_Name_toStringWithSep___main(x_377, x_368); -x_379 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_379, 0, x_378); -x_380 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_380, 0, x_379); -x_381 = l_Lean_Meta_Exception_toMessageData___closed__45; -x_382 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_382, 0, x_381); -lean_ctor_set(x_382, 1, x_380); -x_383 = l_Lean_Elab_Term_elabTermAux___main___closed__6; -x_384 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_384, 0, x_382); -lean_ctor_set(x_384, 1, x_383); -x_385 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_384, x_355, x_375); -return x_385; +lean_dec(x_365); +lean_dec(x_364); +lean_dec(x_363); +lean_dec(x_362); +lean_dec(x_361); +lean_dec(x_360); +x_420 = l_Lean_Name_toString___closed__1; +x_421 = l_Lean_Name_toStringWithSep___main(x_420, x_411); +x_422 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_422, 0, x_421); +x_423 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_423, 0, x_422); +x_424 = l_Lean_Meta_Exception_toMessageData___closed__45; +x_425 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_425, 0, x_424); +lean_ctor_set(x_425, 1, x_423); +x_426 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_427 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_427, 0, x_425); +lean_ctor_set(x_427, 1, x_426); +x_428 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_427, x_395, x_418); +return x_428; } else { -lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; -lean_dec(x_368); -lean_dec(x_355); -x_386 = lean_ctor_get(x_376, 0); -lean_inc(x_386); -lean_dec(x_376); -x_387 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_387, 0, x_1); -lean_ctor_set(x_387, 1, x_329); -x_388 = lean_alloc_ctor(0, 10, 1); -lean_ctor_set(x_388, 0, x_340); -lean_ctor_set(x_388, 1, x_322); -lean_ctor_set(x_388, 2, x_323); -lean_ctor_set(x_388, 3, x_324); -lean_ctor_set(x_388, 4, x_325); -lean_ctor_set(x_388, 5, x_326); -lean_ctor_set(x_388, 6, x_327); -lean_ctor_set(x_388, 7, x_328); -lean_ctor_set(x_388, 8, x_387); -lean_ctor_set(x_388, 9, x_349); -lean_ctor_set_uint8(x_388, sizeof(void*)*10, x_330); -x_389 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_389, 0, x_388); -lean_ctor_set(x_389, 1, x_320); -lean_ctor_set(x_389, 2, x_321); -x_1 = x_386; -x_2 = x_389; -x_3 = x_375; +lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; +lean_dec(x_411); +lean_dec(x_395); +x_429 = lean_ctor_get(x_419, 0); +lean_inc(x_429); +lean_dec(x_419); +x_430 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_430, 0, x_1); +lean_ctor_set(x_430, 1, x_369); +x_431 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_431, 0, x_380); +lean_ctor_set(x_431, 1, x_362); +lean_ctor_set(x_431, 2, x_363); +lean_ctor_set(x_431, 3, x_364); +lean_ctor_set(x_431, 4, x_365); +lean_ctor_set(x_431, 5, x_366); +lean_ctor_set(x_431, 6, x_367); +lean_ctor_set(x_431, 7, x_368); +lean_ctor_set(x_431, 8, x_430); +lean_ctor_set(x_431, 9, x_389); +lean_ctor_set_uint8(x_431, sizeof(void*)*10, x_370); +x_432 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_432, 0, x_431); +lean_ctor_set(x_432, 1, x_360); +lean_ctor_set(x_432, 2, x_361); +x_1 = x_429; +x_2 = x_432; +x_3 = x_418; goto _start; } } else { -lean_object* x_391; lean_object* x_392; -lean_dec(x_368); -lean_dec(x_349); -lean_dec(x_340); -lean_dec(x_329); -lean_dec(x_328); -lean_dec(x_327); -lean_dec(x_326); -lean_dec(x_325); -lean_dec(x_324); -lean_dec(x_323); -lean_dec(x_322); -lean_dec(x_321); -lean_dec(x_320); -x_391 = lean_ctor_get(x_369, 0); -lean_inc(x_391); +lean_object* x_434; lean_object* x_435; +lean_dec(x_411); +lean_dec(x_389); +lean_dec(x_380); lean_dec(x_369); -lean_inc(x_360); -x_392 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_360, x_1, x_391, x_355, x_360); -return x_392; +lean_dec(x_368); +lean_dec(x_367); +lean_dec(x_366); +lean_dec(x_365); +lean_dec(x_364); +lean_dec(x_363); +lean_dec(x_362); +lean_dec(x_361); +lean_dec(x_360); +x_434 = lean_ctor_get(x_412, 0); +lean_inc(x_434); +lean_dec(x_412); +lean_inc(x_403); +x_435 = l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(x_403, x_1, x_434, x_395, x_403); +return x_435; } } else { -lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; -lean_dec(x_355); -lean_dec(x_349); -lean_dec(x_340); -lean_dec(x_329); -lean_dec(x_328); -lean_dec(x_327); -lean_dec(x_326); -lean_dec(x_325); -lean_dec(x_324); -lean_dec(x_323); -lean_dec(x_322); -lean_dec(x_321); -lean_dec(x_320); +lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; +lean_dec(x_395); +lean_dec(x_389); +lean_dec(x_380); +lean_dec(x_369); +lean_dec(x_368); +lean_dec(x_367); +lean_dec(x_366); +lean_dec(x_365); +lean_dec(x_364); +lean_dec(x_363); +lean_dec(x_362); +lean_dec(x_361); +lean_dec(x_360); lean_dec(x_1); -x_393 = lean_ctor_get(x_359, 0); -lean_inc(x_393); -x_394 = lean_ctor_get(x_359, 1); -lean_inc(x_394); -if (lean_is_exclusive(x_359)) { - lean_ctor_release(x_359, 0); - lean_ctor_release(x_359, 1); - x_395 = x_359; +x_436 = lean_ctor_get(x_402, 0); +lean_inc(x_436); +x_437 = lean_ctor_get(x_402, 1); +lean_inc(x_437); +if (lean_is_exclusive(x_402)) { + lean_ctor_release(x_402, 0); + lean_ctor_release(x_402, 1); + x_438 = x_402; } else { - lean_dec_ref(x_359); - x_395 = lean_box(0); + lean_dec_ref(x_402); + x_438 = lean_box(0); } -if (lean_is_scalar(x_395)) { - x_396 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_438)) { + x_439 = lean_alloc_ctor(1, 2, 0); } else { - x_396 = x_395; + x_439 = x_438; } -lean_ctor_set(x_396, 0, x_393); -lean_ctor_set(x_396, 1, x_394); -return x_396; +lean_ctor_set(x_439, 0, x_436); +lean_ctor_set(x_439, 1, x_437); +return x_439; } } else { -lean_object* x_397; lean_object* x_398; -lean_dec(x_349); -lean_dec(x_340); -lean_dec(x_329); -lean_dec(x_328); -lean_dec(x_327); -lean_dec(x_326); -lean_dec(x_325); -lean_dec(x_324); -lean_dec(x_323); -lean_dec(x_322); -lean_dec(x_321); -lean_dec(x_320); -x_397 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; -x_398 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_397, x_355, x_353); -return x_398; +lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; +lean_dec(x_389); +lean_dec(x_380); +lean_dec(x_369); +lean_dec(x_368); +lean_dec(x_367); +lean_dec(x_366); +lean_dec(x_365); +lean_dec(x_364); +lean_dec(x_363); +lean_dec(x_362); +lean_dec(x_361); +lean_dec(x_360); +x_440 = l_Lean_Syntax_getArgs(x_1); +lean_dec(x_1); +x_441 = lean_unsigned_to_nat(2u); +x_442 = lean_unsigned_to_nat(0u); +x_443 = lean_box(0); +x_444 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(x_441, x_440, x_442, x_443, x_395, x_393); +lean_dec(x_440); +return x_444; +} +} +else +{ +lean_object* x_445; lean_object* x_446; +lean_dec(x_389); +lean_dec(x_380); +lean_dec(x_369); +lean_dec(x_368); +lean_dec(x_367); +lean_dec(x_366); +lean_dec(x_365); +lean_dec(x_364); +lean_dec(x_363); +lean_dec(x_362); +lean_dec(x_361); +lean_dec(x_360); +x_445 = l_Lean_Elab_Tactic_evalTactic___main___closed__3; +x_446 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_445, x_395, x_393); +return x_446; } } } @@ -5581,6 +5846,16 @@ lean_dec(x_2); return x_3; } } +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7___boxed(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; +x_7 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_2); +lean_dec(x_1); +return x_7; +} +} lean_object* l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { _start: { @@ -9504,72 +9779,6 @@ lean_dec(x_3); return x_5; } } -lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalSeq___spec__1(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; uint8_t x_8; -x_7 = lean_array_get_size(x_2); -x_8 = lean_nat_dec_lt(x_3, x_7); -lean_dec(x_7); -if (x_8 == 0) -{ -lean_object* x_9; -lean_dec(x_5); -lean_dec(x_3); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_4); -lean_ctor_set(x_9, 1, x_6); -return x_9; -} -else -{ -lean_object* x_10; lean_object* x_11; -lean_dec(x_4); -x_10 = lean_array_fget(x_2, x_3); -lean_inc(x_5); -x_11 = l_Lean_Elab_Tactic_evalTactic___main(x_10, x_5, x_6); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -lean_dec(x_11); -x_14 = lean_nat_add(x_3, x_1); -lean_dec(x_3); -x_3 = x_14; -x_4 = x_12; -x_6 = x_13; -goto _start; -} -else -{ -uint8_t x_16; -lean_dec(x_5); -lean_dec(x_3); -x_16 = !lean_is_exclusive(x_11); -if (x_16 == 0) -{ -return x_11; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_11, 0); -x_18 = lean_ctor_get(x_11, 1); -lean_inc(x_18); -lean_inc(x_17); -lean_dec(x_11); -x_19 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -} -} -} lean_object* l_Lean_Elab_Tactic_evalSeq(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -9580,21 +9789,11 @@ x_6 = l_Lean_Syntax_getArgs(x_5); lean_dec(x_5); x_7 = lean_unsigned_to_nat(2u); x_8 = lean_box(0); -x_9 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalSeq___spec__1(x_7, x_6, x_4, x_8, x_2, x_3); +x_9 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalTactic___main___spec__7(x_7, x_6, x_4, x_8, x_2, x_3); lean_dec(x_6); return x_9; } } -lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalSeq___spec__1___boxed(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; -x_7 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Tactic_evalSeq___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_2); -lean_dec(x_1); -return x_7; -} -} lean_object* l_Lean_Elab_Tactic_evalSeq___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { diff --git a/stage0/stdlib/Init/Lean/Parser/Command.c b/stage0/stdlib/Init/Lean/Parser/Command.c index fd2dc41fc2..8a5aa22a82 100644 --- a/stage0/stdlib/Init/Lean/Parser/Command.c +++ b/stage0/stdlib/Init/Lean/Parser/Command.c @@ -45,7 +45,7 @@ lean_object* l_Lean_Parser_Command_openRenamingItem___closed__6; extern lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; lean_object* l_Lean_Parser_Command_axiom___closed__5; lean_object* l_Lean_Parser_Command_section___closed__3; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_exit___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_abbrev___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_extends___closed__2; @@ -59,9 +59,9 @@ lean_object* l_Lean_Parser_Command_instance___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Command_variable(lean_object*); lean_object* l_Lean_Parser_Command_visibility; lean_object* l_Lean_Parser_Command_inductive___elambda__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_stxQuot___closed__8; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_structImplicitBinder___closed__2; lean_object* l_Lean_Parser_Command_extends___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_end___elambda__1(lean_object*, lean_object*, lean_object*); @@ -206,7 +206,7 @@ lean_object* l_Lean_Parser_Command_classInductive___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_exit___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_syntaxCat___elambda__1___closed__7; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_example; lean_object* l_Lean_Parser_Command_classTk___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_theorem___closed__3; @@ -240,7 +240,7 @@ extern lean_object* l_Lean_Parser_Term_matchAlt___elambda__1___closed__10; lean_object* l_Lean_Parser_Command_openRenamingItem___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_abbrev___closed__7; lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*); -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_init__quot___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Term_listLit___closed__4; @@ -261,9 +261,9 @@ lean_object* l_Lean_Parser_Command_theorem___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_openSimple; lean_object* l_Lean_Parser_Command_openRenamingItem___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_instance; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_instance___closed__8; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_openOnly___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_structFields___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_export___elambda__1___closed__8; @@ -458,7 +458,7 @@ lean_object* l_Lean_Parser_Command_classInductive___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_declValSimple___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_protected___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_structFields___elambda__1___closed__2; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_universes___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_structExplicitBinder; lean_object* l_Lean_Parser_Command_axiom___closed__7; @@ -519,7 +519,7 @@ lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__4; lean_object* l_Lean_Parser_regCommandParserAttribute___closed__1; lean_object* l_Lean_Parser_Command_set__option___elambda__1___closed__14; lean_object* l_Lean_Parser_Command_structImplicitBinder___closed__5; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_variable___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_synth___closed__6; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_declValEqns___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -675,6 +675,7 @@ lean_object* l_Lean_Parser_Command_exit___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_structCtor; lean_object* l_Lean_Parser_Command_structFields___closed__1; lean_object* l_Lean_Parser_Command_inductive___closed__8; +lean_object* l_Lean_Parser_ParserState_popSyntax(lean_object*); lean_object* l_Lean_Parser_Command_openHiding___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_openRenaming___closed__7; lean_object* l_Lean_Parser_Command_attrInstance___elambda__1___closed__1; @@ -845,7 +846,7 @@ lean_object* l_Lean_Parser_Command_syntaxCat___closed__5; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_stxQuot___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_declId___closed__7; lean_object* l_Lean_Parser_Command_openOnly___elambda__1___closed__3; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_structInstBinder___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_introRule___closed__6; lean_object* l_Lean_Parser_Command_protected___elambda__1___closed__4; @@ -932,7 +933,7 @@ lean_object* l_Lean_Parser_Command_universe___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_structureTk___closed__3; lean_object* l_Lean_Parser_Command_constant___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_universes___elambda__1___closed__2; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_classInductive___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_openRenaming___closed__2; lean_object* l_Lean_Parser_Command_openHiding___elambda__1___closed__9; @@ -1097,7 +1098,7 @@ lean_object* l_Lean_Parser_Command_docComment___closed__6; lean_object* l_Lean_Parser_Command_instance___closed__5; lean_object* l_Lean_Parser_Command_theorem___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_partial___elambda__1___closed__4; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_universes___closed__5; lean_object* l_Lean_Parser_Command_attrInstance___closed__1; lean_object* l_Lean_Parser_Command_openOnly___closed__3; @@ -1154,7 +1155,7 @@ lean_object* l_Lean_Parser_Command_set__option___closed__6; lean_object* l_Lean_Parser_Command_partial___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_constant___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_structCtor___elambda__1___closed__6; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_universe___closed__3; lean_object* l_Lean_Parser_Command_structure___closed__12; lean_object* l_Lean_Parser_Command_structInstBinder___elambda__1(lean_object*, lean_object*, lean_object*); @@ -2782,158 +2783,216 @@ x_6 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_attrInstance___elamb return x_6; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -lean_inc(x_6); -lean_inc(x_5); -x_11 = l_Lean_Parser_Command_attrInstance___elambda__1(x_5, x_6, x_7); -x_12 = lean_ctor_get(x_11, 3); -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_23; lean_object* x_24; -lean_dec(x_10); +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_13 = lean_ctor_get(x_11, 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); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +lean_inc(x_7); lean_inc(x_6); -x_23 = l_Lean_Parser_tokenFn(x_6, x_11); -x_24 = lean_ctor_get(x_23, 3); -lean_inc(x_24); -if (lean_obj_tag(x_24) == 0) +x_12 = l_Lean_Parser_Command_attrInstance___elambda__1(x_6, x_7, x_8); +x_13 = lean_ctor_get(x_12, 3); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 0) { -lean_object* x_25; lean_object* x_26; -x_25 = lean_ctor_get(x_23, 0); -lean_inc(x_25); -x_26 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_25); -lean_dec(x_25); -if (lean_obj_tag(x_26) == 2) -{ -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_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___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_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); -x_16 = x_31; -goto block_22; -} -else -{ -x_16 = x_23; -goto block_22; -} -} -else -{ -lean_object* x_32; lean_object* x_33; -lean_dec(x_26); -x_32 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); -x_16 = x_33; -goto block_22; -} -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_24); -x_34 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); -x_16 = x_35; -goto block_22; -} -block_22: -{ -lean_object* x_17; -x_17 = lean_ctor_get(x_16, 3); -lean_inc(x_17); -if (lean_obj_tag(x_17) == 0) -{ -lean_dec(x_15); +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_31; lean_object* x_32; +lean_dec(x_11); +lean_dec(x_10); +x_14 = lean_ctor_get(x_12, 0); +lean_inc(x_14); +x_15 = lean_array_get_size(x_14); lean_dec(x_14); +x_16 = lean_ctor_get(x_12, 1); +lean_inc(x_16); +lean_inc(x_7); +x_31 = l_Lean_Parser_tokenFn(x_7, x_12); +x_32 = lean_ctor_get(x_31, 3); +lean_inc(x_32); +if (lean_obj_tag(x_32) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_16; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_31, 0); +lean_inc(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +lean_dec(x_33); +if (lean_obj_tag(x_34) == 2) +{ +lean_object* x_35; lean_object* x_36; uint8_t x_37; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; +x_37 = lean_string_dec_eq(x_35, x_36); +lean_dec(x_35); +if (x_37 == 0) +{ +lean_object* x_38; lean_object* x_39; +x_38 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_38, x_16); +x_17 = x_39; +goto block_30; +} +else +{ +x_17 = x_31; +goto block_30; +} +} +else +{ +lean_object* x_40; lean_object* x_41; +lean_dec(x_34); +x_40 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_40, x_16); +x_17 = x_41; +goto block_30; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_32); +x_42 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_42, x_16); +x_17 = x_43; +goto block_30; +} +block_30: +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +lean_dec(x_16); +lean_dec(x_15); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_17; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_19; lean_object* x_20; lean_object* x_21; -lean_dec(x_17); +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +lean_dec(x_18); +lean_dec(x_7); lean_dec(x_6); -lean_dec(x_5); -x_19 = l_Lean_Parser_ParserState_restore(x_16, x_14, x_15); -lean_dec(x_14); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_3); -return x_21; -} -} +x_20 = l_Lean_Parser_ParserState_restore(x_17, x_15, x_16); +lean_dec(x_15); +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_array_get_size(x_21); +lean_dec(x_21); +x_23 = lean_nat_sub(x_22, x_3); +lean_dec(x_22); +x_24 = lean_unsigned_to_nat(1u); +x_25 = lean_nat_dec_eq(x_23, x_24); +lean_dec(x_23); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = l_Lean_nullKind; +x_27 = l_Lean_Parser_ParserState_mkNode(x_20, x_26, x_3); +return x_27; } else { -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); if (x_4 == 0) { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -lean_dec(x_10); -lean_dec(x_9); -x_36 = lean_box(0); -x_37 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_36); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_3); -return x_39; +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_20, x_28, x_3); +return x_29; } else { -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); -lean_dec(x_9); -x_41 = l_Lean_nullKind; -x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_3); -return x_42; +lean_dec(x_3); +return x_20; } } } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +} +else +{ +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_6); +if (x_5 == 0) +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +lean_dec(x_11); +lean_dec(x_10); +x_44 = lean_box(0); +x_45 = l_Lean_Parser_ParserState_pushSyntax(x_12, x_44); +x_46 = l_Lean_nullKind; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_3); +return x_47; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_48 = l_Lean_Parser_ParserState_restore(x_12, x_10, x_11); +lean_dec(x_10); +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_array_get_size(x_49); +lean_dec(x_49); +x_51 = lean_nat_sub(x_50, x_3); +lean_dec(x_50); +x_52 = lean_unsigned_to_nat(2u); +x_53 = lean_nat_dec_eq(x_51, x_52); +lean_dec(x_51); +if (x_53 == 0) +{ +lean_object* x_54; lean_object* x_55; +x_54 = l_Lean_nullKind; +x_55 = l_Lean_Parser_ParserState_mkNode(x_48, x_54, x_3); +return x_55; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_48, x_56, x_3); +return x_57; +} +else +{ +lean_object* x_58; +lean_dec(x_3); +x_58 = l_Lean_Parser_ParserState_popSyntax(x_48); +return x_58; +} +} +} +} +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; -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 = 0; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +x_9 = 0; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(x_1, x_2, x_8, x_3, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Command_attributes___elambda__1___closed__1() { @@ -3147,7 +3206,7 @@ uint8_t x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; x_19 = 0; x_20 = 0; lean_inc(x_2); -x_21 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_19, x_20, x_1, x_2, x_17); +x_21 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_19, x_20, x_20, x_1, x_2, x_17); x_22 = lean_ctor_get(x_21, 3); lean_inc(x_22); if (lean_obj_tag(x_22) == 0) @@ -3343,30 +3402,34 @@ x_1 = l_Lean_Parser_Command_attributes___closed__8; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); -return x_11; +x_12 = lean_unbox(x_5); +lean_dec(x_5); +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +return x_13; } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1___boxed(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: { -uint8_t x_6; uint8_t x_7; lean_object* x_8; -x_6 = lean_unbox(x_1); +uint8_t x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = lean_unbox(x_2); +x_8 = lean_unbox(x_2); lean_dec(x_2); -x_8 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); -return x_8; +x_9 = lean_unbox(x_3); +lean_dec(x_3); +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_7, x_8, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Command_private___elambda__1___closed__1() { @@ -5492,161 +5555,219 @@ x_1 = l_Lean_Parser_Command_declModifiers___closed__15; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -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; -x_8 = l_Lean_Parser_Level_ident___elambda__1___closed__4; -x_9 = lean_ctor_get(x_8, 1); -lean_inc(x_9); -x_10 = lean_ctor_get(x_7, 0); +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_9 = l_Lean_Parser_Level_ident___elambda__1___closed__4; +x_10 = lean_ctor_get(x_9, 1); lean_inc(x_10); -x_11 = lean_array_get_size(x_10); -lean_dec(x_10); -x_12 = lean_ctor_get(x_7, 1); -lean_inc(x_12); -lean_inc(x_6); -lean_inc(x_5); -x_13 = lean_apply_3(x_9, x_5, x_6, x_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_25; lean_object* x_26; -lean_dec(x_12); +x_11 = lean_ctor_get(x_8, 0); +lean_inc(x_11); +x_12 = lean_array_get_size(x_11); lean_dec(x_11); -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 = lean_ctor_get(x_13, 1); -lean_inc(x_17); +x_13 = lean_ctor_get(x_8, 1); +lean_inc(x_13); +lean_inc(x_7); lean_inc(x_6); -x_25 = l_Lean_Parser_tokenFn(x_6, x_13); -x_26 = lean_ctor_get(x_25, 3); -lean_inc(x_26); -if (lean_obj_tag(x_26) == 0) +x_14 = lean_apply_3(x_10, x_6, x_7, x_8); +x_15 = lean_ctor_get(x_14, 3); +lean_inc(x_15); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_25, 0); -lean_inc(x_27); -x_28 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_27); -lean_dec(x_27); -if (lean_obj_tag(x_28) == 2) -{ -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_28, 1); -lean_inc(x_29); -lean_dec(x_28); -x_30 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; -x_31 = lean_string_dec_eq(x_29, x_30); -lean_dec(x_29); -if (x_31 == 0) -{ -lean_object* x_32; lean_object* x_33; -x_32 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); -x_18 = x_33; -goto block_24; -} -else -{ -x_18 = x_25; -goto block_24; -} -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_28); -x_34 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); -x_18 = x_35; -goto block_24; -} -} -else -{ -lean_object* x_36; lean_object* x_37; -lean_dec(x_26); -x_36 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); -x_18 = x_37; -goto block_24; -} -block_24: -{ -lean_object* x_19; -x_19 = lean_ctor_get(x_18, 3); -lean_inc(x_19); -if (lean_obj_tag(x_19) == 0) -{ -lean_dec(x_17); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_33; lean_object* x_34; +lean_dec(x_13); +lean_dec(x_12); +x_16 = lean_ctor_get(x_14, 0); +lean_inc(x_16); +x_17 = lean_array_get_size(x_16); lean_dec(x_16); +x_18 = lean_ctor_get(x_14, 1); +lean_inc(x_18); +lean_inc(x_7); +x_33 = l_Lean_Parser_tokenFn(x_7, x_14); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +if (lean_obj_tag(x_34) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_18; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_33, 0); +lean_inc(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +lean_dec(x_35); +if (lean_obj_tag(x_36) == 2) +{ +lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_37 = lean_ctor_get(x_36, 1); +lean_inc(x_37); +lean_dec(x_36); +x_38 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; +x_39 = lean_string_dec_eq(x_37, x_38); +lean_dec(x_37); +if (x_39 == 0) +{ +lean_object* x_40; lean_object* x_41; +x_40 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_40, x_18); +x_19 = x_41; +goto block_32; +} +else +{ +x_19 = x_33; +goto block_32; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_36); +x_42 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_42, x_18); +x_19 = x_43; +goto block_32; +} +} +else +{ +lean_object* x_44; lean_object* x_45; +lean_dec(x_34); +x_44 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_44, x_18); +x_19 = x_45; +goto block_32; +} +block_32: +{ +lean_object* x_20; +x_20 = lean_ctor_get(x_19, 3); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) +{ +lean_dec(x_18); +lean_dec(x_17); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_19; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_19); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_dec(x_20); +lean_dec(x_7); lean_dec(x_6); -lean_dec(x_5); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); -lean_dec(x_16); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; -} -} +x_22 = l_Lean_Parser_ParserState_restore(x_19, x_17, x_18); +lean_dec(x_17); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_array_get_size(x_23); +lean_dec(x_23); +x_25 = lean_nat_sub(x_24, x_3); +lean_dec(x_24); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_dec_eq(x_25, x_26); +lean_dec(x_25); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_22, x_28, x_3); +return x_29; } else { -lean_dec(x_14); -lean_dec(x_6); -lean_dec(x_5); if (x_4 == 0) { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_dec(x_12); -lean_dec(x_11); -x_38 = lean_box(0); -x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); -return x_41; +lean_object* x_30; lean_object* x_31; +x_30 = l_Lean_nullKind; +x_31 = l_Lean_Parser_ParserState_mkNode(x_22, x_30, x_3); +return x_31; } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = l_Lean_Parser_ParserState_restore(x_13, x_11, x_12); -lean_dec(x_11); -x_43 = l_Lean_nullKind; -x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); -return x_44; +lean_dec(x_3); +return x_22; } } } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +} +else +{ +lean_dec(x_15); +lean_dec(x_7); +lean_dec(x_6); +if (x_5 == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +lean_dec(x_13); +lean_dec(x_12); +x_46 = lean_box(0); +x_47 = l_Lean_Parser_ParserState_pushSyntax(x_14, x_46); +x_48 = l_Lean_nullKind; +x_49 = l_Lean_Parser_ParserState_mkNode(x_47, x_48, x_3); +return x_49; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_50 = l_Lean_Parser_ParserState_restore(x_14, x_12, x_13); +lean_dec(x_12); +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_array_get_size(x_51); +lean_dec(x_51); +x_53 = lean_nat_sub(x_52, x_3); +lean_dec(x_52); +x_54 = lean_unsigned_to_nat(2u); +x_55 = lean_nat_dec_eq(x_53, x_54); +lean_dec(x_53); +if (x_55 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_50, x_56, x_3); +return x_57; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_58; lean_object* x_59; +x_58 = l_Lean_nullKind; +x_59 = l_Lean_Parser_ParserState_mkNode(x_50, x_58, x_3); +return x_59; +} +else +{ +lean_object* x_60; +lean_dec(x_3); +x_60 = l_Lean_Parser_ParserState_popSyntax(x_50); +return x_60; +} +} +} +} +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; -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 = 0; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +x_9 = 0; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(x_1, x_2, x_8, x_3, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Command_declId___elambda__1___closed__1() { @@ -5881,7 +6002,7 @@ uint8_t x_47; uint8_t x_48; lean_object* x_49; lean_object* x_50; x_47 = 0; x_48 = 0; lean_inc(x_2); -x_49 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1(x_47, x_48, x_1, x_2, x_45); +x_49 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1(x_47, x_48, x_48, x_1, x_2, x_45); x_50 = lean_ctor_get(x_49, 3); lean_inc(x_50); if (lean_obj_tag(x_50) == 0) @@ -6080,30 +6201,34 @@ x_1 = l_Lean_Parser_Command_declId___closed__9; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); -return x_11; +x_12 = lean_unbox(x_5); +lean_dec(x_5); +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +return x_13; } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1___boxed(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: { -uint8_t x_6; uint8_t x_7; lean_object* x_8; -x_6 = lean_unbox(x_1); +uint8_t x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = lean_unbox(x_2); +x_8 = lean_unbox(x_2); lean_dec(x_2); -x_8 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); -return x_8; +x_9 = lean_unbox(x_3); +lean_dec(x_3); +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_declId___elambda__1___spec__1(x_7, x_8, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Command_declSig___elambda__1___closed__1() { @@ -15414,7 +15539,7 @@ if (lean_obj_tag(x_18) == 0) uint8_t x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; x_19 = 0; x_20 = 0; -x_21 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_19, x_20, x_1, x_2, x_17); +x_21 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_19, x_20, x_20, x_1, x_2, x_17); lean_dec(x_1); x_22 = l_Lean_Parser_Command_extends___elambda__1___closed__2; x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_16); @@ -21923,7 +22048,7 @@ x_43 = 0; x_44 = 0; lean_inc(x_2); lean_inc(x_1); -x_45 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_43, x_44, x_1, x_2, x_41); +x_45 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(x_43, x_44, x_44, x_1, x_2, x_41); x_46 = lean_ctor_get(x_45, 3); lean_inc(x_46); if (lean_obj_tag(x_46) == 0) @@ -23722,158 +23847,216 @@ x_1 = l_Lean_Parser_Command_openRenamingItem___closed__7; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -lean_inc(x_6); -lean_inc(x_5); -x_11 = l_Lean_Parser_Command_openRenamingItem___elambda__1(x_5, x_6, x_7); -x_12 = lean_ctor_get(x_11, 3); -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_23; lean_object* x_24; -lean_dec(x_10); +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_13 = lean_ctor_get(x_11, 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); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +lean_inc(x_7); lean_inc(x_6); -x_23 = l_Lean_Parser_tokenFn(x_6, x_11); -x_24 = lean_ctor_get(x_23, 3); -lean_inc(x_24); -if (lean_obj_tag(x_24) == 0) +x_12 = l_Lean_Parser_Command_openRenamingItem___elambda__1(x_6, x_7, x_8); +x_13 = lean_ctor_get(x_12, 3); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 0) { -lean_object* x_25; lean_object* x_26; -x_25 = lean_ctor_get(x_23, 0); -lean_inc(x_25); -x_26 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_25); -lean_dec(x_25); -if (lean_obj_tag(x_26) == 2) -{ -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_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___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_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); -x_16 = x_31; -goto block_22; -} -else -{ -x_16 = x_23; -goto block_22; -} -} -else -{ -lean_object* x_32; lean_object* x_33; -lean_dec(x_26); -x_32 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); -x_16 = x_33; -goto block_22; -} -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_24); -x_34 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); -x_16 = x_35; -goto block_22; -} -block_22: -{ -lean_object* x_17; -x_17 = lean_ctor_get(x_16, 3); -lean_inc(x_17); -if (lean_obj_tag(x_17) == 0) -{ -lean_dec(x_15); +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_31; lean_object* x_32; +lean_dec(x_11); +lean_dec(x_10); +x_14 = lean_ctor_get(x_12, 0); +lean_inc(x_14); +x_15 = lean_array_get_size(x_14); lean_dec(x_14); +x_16 = lean_ctor_get(x_12, 1); +lean_inc(x_16); +lean_inc(x_7); +x_31 = l_Lean_Parser_tokenFn(x_7, x_12); +x_32 = lean_ctor_get(x_31, 3); +lean_inc(x_32); +if (lean_obj_tag(x_32) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_16; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_31, 0); +lean_inc(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +lean_dec(x_33); +if (lean_obj_tag(x_34) == 2) +{ +lean_object* x_35; lean_object* x_36; uint8_t x_37; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; +x_37 = lean_string_dec_eq(x_35, x_36); +lean_dec(x_35); +if (x_37 == 0) +{ +lean_object* x_38; lean_object* x_39; +x_38 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_38, x_16); +x_17 = x_39; +goto block_30; +} +else +{ +x_17 = x_31; +goto block_30; +} +} +else +{ +lean_object* x_40; lean_object* x_41; +lean_dec(x_34); +x_40 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_40, x_16); +x_17 = x_41; +goto block_30; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_32); +x_42 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_42, x_16); +x_17 = x_43; +goto block_30; +} +block_30: +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +lean_dec(x_16); +lean_dec(x_15); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_17; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_19; lean_object* x_20; lean_object* x_21; -lean_dec(x_17); +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +lean_dec(x_18); +lean_dec(x_7); lean_dec(x_6); -lean_dec(x_5); -x_19 = l_Lean_Parser_ParserState_restore(x_16, x_14, x_15); -lean_dec(x_14); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_3); -return x_21; -} -} +x_20 = l_Lean_Parser_ParserState_restore(x_17, x_15, x_16); +lean_dec(x_15); +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_array_get_size(x_21); +lean_dec(x_21); +x_23 = lean_nat_sub(x_22, x_3); +lean_dec(x_22); +x_24 = lean_unsigned_to_nat(1u); +x_25 = lean_nat_dec_eq(x_23, x_24); +lean_dec(x_23); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = l_Lean_nullKind; +x_27 = l_Lean_Parser_ParserState_mkNode(x_20, x_26, x_3); +return x_27; } else { -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); if (x_4 == 0) { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -lean_dec(x_10); -lean_dec(x_9); -x_36 = lean_box(0); -x_37 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_36); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_3); -return x_39; +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_20, x_28, x_3); +return x_29; } else { -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); -lean_dec(x_9); -x_41 = l_Lean_nullKind; -x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_3); -return x_42; +lean_dec(x_3); +return x_20; } } } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +} +else +{ +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_6); +if (x_5 == 0) +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +lean_dec(x_11); +lean_dec(x_10); +x_44 = lean_box(0); +x_45 = l_Lean_Parser_ParserState_pushSyntax(x_12, x_44); +x_46 = l_Lean_nullKind; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_3); +return x_47; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_48 = l_Lean_Parser_ParserState_restore(x_12, x_10, x_11); +lean_dec(x_10); +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_array_get_size(x_49); +lean_dec(x_49); +x_51 = lean_nat_sub(x_50, x_3); +lean_dec(x_50); +x_52 = lean_unsigned_to_nat(2u); +x_53 = lean_nat_dec_eq(x_51, x_52); +lean_dec(x_51); +if (x_53 == 0) +{ +lean_object* x_54; lean_object* x_55; +x_54 = l_Lean_nullKind; +x_55 = l_Lean_Parser_ParserState_mkNode(x_48, x_54, x_3); +return x_55; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_48, x_56, x_3); +return x_57; +} +else +{ +lean_object* x_58; +lean_dec(x_3); +x_58 = l_Lean_Parser_ParserState_popSyntax(x_48); +return x_58; +} +} +} +} +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; -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 = 0; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +x_9 = 0; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(x_1, x_2, x_8, x_3, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Command_openRenaming___elambda__1___closed__1() { @@ -24171,7 +24354,7 @@ if (lean_obj_tag(x_24) == 0) uint8_t x_25; uint8_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; x_25 = 0; x_26 = 0; -x_27 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(x_25, x_26, x_1, x_2, x_20); +x_27 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(x_25, x_26, x_26, x_1, x_2, x_20); x_28 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__2; x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_19); x_30 = l_Lean_Parser_mergeOrElseErrors(x_29, x_14, x_9); @@ -24313,30 +24496,34 @@ x_1 = l_Lean_Parser_Command_openRenaming___closed__8; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); -return x_11; +x_12 = lean_unbox(x_5); +lean_dec(x_5); +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +return x_13; } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1___boxed(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: { -uint8_t x_6; uint8_t x_7; lean_object* x_8; -x_6 = lean_unbox(x_1); +uint8_t x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = lean_unbox(x_2); +x_8 = lean_unbox(x_2); lean_dec(x_2); -x_8 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); -return x_8; +x_9 = lean_unbox(x_3); +lean_dec(x_3); +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1(x_7, x_8, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Command_openOnly___elambda__1___closed__1() { diff --git a/stage0/stdlib/Init/Lean/Parser/Parser.c b/stage0/stdlib/Init/Lean/Parser/Parser.c index a1944694f3..3880948cc4 100644 --- a/stage0/stdlib/Init/Lean/Parser/Parser.c +++ b/stage0/stdlib/Init/Lean/Parser/Parser.c @@ -383,7 +383,7 @@ lean_object* l_Lean_Parser_checkNoWsBeforeFn___boxed(lean_object*, lean_object*, lean_object* lean_array_fget(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAtomicInfo___elambda__2(lean_object*); lean_object* l_Lean_Parser_manyAux___main(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_fieldIdx___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_rawCh___elambda__1___spec__1(uint32_t, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); @@ -489,7 +489,7 @@ extern lean_object* l_Lean_strLitKind___closed__1; lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_19__ParserAttribute_add___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_21__noImmediateColon___elambda__1(uint8_t, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux(uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux(uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_1__expectedToString___main___closed__1; lean_object* l_Lean_Parser_binNumberFn(lean_object*, lean_object*, lean_object*); lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); @@ -544,7 +544,7 @@ lean_object* l_Lean_Parser_sepByFn(uint8_t, uint8_t, lean_object*, lean_object*, lean_object* l_Lean_Parser_fieldIdx___closed__2; lean_object* l___private_Init_Lean_Parser_Parser_18__BuiltinParserAttribute_add(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_chFn___spec__1(uint32_t, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_PersistentHashMap_insertAux___main___rarg___closed__3; lean_object* l_Lean_Syntax_getId(lean_object*); lean_object* l_Lean_Parser_rawCh___boxed(lean_object*, lean_object*, lean_object*); @@ -659,7 +659,7 @@ lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache_ lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolAux(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_isValidSyntaxNodeKind___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Parser_sepBy1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension(lean_object*); lean_object* l_Lean_Parser_ParserState_popSyntax(lean_object*); lean_object* l_Lean_Parser_checkWsBefore___elambda__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -716,10 +716,10 @@ lean_object* l_Lean_Parser_categoryParserFnExtension___elambda__2(lean_object*); lean_object* l_Lean_Parser_trailingNode(lean_object*, lean_object*); lean_object* l_Lean_Parser_orelseInfo___elambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_quotedCharFn___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Parser_sepBy1(uint8_t, lean_object*, lean_object*, uint8_t); +lean_object* l_Lean_Parser_sepBy1(uint8_t, lean_object*, lean_object*, uint8_t, uint8_t); lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_19__ParserAttribute_add___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__4; -lean_object* l_Lean_Parser_sepBy1Fn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_anyRangeMAux___main___at_Lean_Parser_mkParserExtension___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParser___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_forSepArgsM___spec__1___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -835,7 +835,7 @@ lean_object* l_Lean_Parser_mkFreshKind(lean_object*, lean_object*); lean_object* l_Lean_Parser_numLitFn___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_getOptionalIdent_x3f(lean_object*); lean_object* l_Lean_Parser_fieldIdx___lambda__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_sepBy1Fn(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn(uint8_t, uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_octalNumberFn___spec__1___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Util_1__mkPanicMessage___closed__2; lean_object* l_Lean_Syntax_foldArgsAuxM___main___boxed(lean_object*, lean_object*); @@ -1098,7 +1098,7 @@ lean_object* l___private_Init_Lean_Parser_Parser_21__noImmediateColon___elambda_ lean_object* l_PersistentHashMap_insert___at_Lean_Parser_SyntaxNodeKindSet_insert___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_21__noImmediateColon___elambda__1___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_manyAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_group___boxed(lean_object*, lean_object*); @@ -5236,143 +5236,206 @@ x_6 = l_Lean_Parser_many1(x_4, x_2, x_5); return x_6; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(uint8_t x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(uint8_t x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, uint8_t x_6, uint8_t x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_array_get_size(x_10); -lean_dec(x_10); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_inc(x_2); -lean_inc(x_8); -lean_inc(x_7); -x_13 = lean_apply_3(x_2, x_7, x_8, x_9); -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_dec(x_12); +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_array_get_size(x_11); lean_dec(x_11); -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 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_inc(x_3); +x_13 = lean_ctor_get(x_10, 1); +lean_inc(x_13); +lean_inc(x_2); +lean_inc(x_9); lean_inc(x_8); -lean_inc(x_7); -x_18 = lean_apply_3(x_3, x_7, x_8, x_13); -x_19 = lean_ctor_get(x_18, 3); -lean_inc(x_19); -if (lean_obj_tag(x_19) == 0) +x_14 = lean_apply_3(x_2, x_8, x_9, x_10); +x_15 = lean_ctor_get(x_14, 3); +lean_inc(x_15); +if (lean_obj_tag(x_15) == 0) { -lean_dec(x_17); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_dec(x_13); +lean_dec(x_12); +x_16 = lean_ctor_get(x_14, 0); +lean_inc(x_16); +x_17 = lean_array_get_size(x_16); lean_dec(x_16); +x_18 = lean_ctor_get(x_14, 1); +lean_inc(x_18); +lean_inc(x_3); +lean_inc(x_9); +lean_inc(x_8); +x_19 = lean_apply_3(x_3, x_8, x_9, x_14); +x_20 = lean_ctor_get(x_19, 3); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) { -uint8_t _tmp_5 = x_4; -lean_object* _tmp_8 = x_18; -x_6 = _tmp_5; -x_9 = _tmp_8; +lean_dec(x_18); +lean_dec(x_17); +{ +uint8_t _tmp_6 = x_4; +lean_object* _tmp_9 = x_19; +x_7 = _tmp_6; +x_10 = _tmp_9; } goto _start; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_19); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_dec(x_20); +lean_dec(x_9); lean_dec(x_8); -lean_dec(x_7); lean_dec(x_3); lean_dec(x_2); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); -lean_dec(x_16); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); -return x_23; -} +x_22 = l_Lean_Parser_ParserState_restore(x_19, x_17, x_18); +lean_dec(x_17); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_array_get_size(x_23); +lean_dec(x_23); +x_25 = lean_nat_sub(x_24, x_5); +lean_dec(x_24); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_dec_eq(x_25, x_26); +lean_dec(x_25); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_22, x_28, x_5); +return x_29; } else { -lean_dec(x_14); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); if (x_6 == 0) { -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -lean_dec(x_12); -lean_dec(x_11); -x_24 = lean_box(0); -x_25 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_24); -x_26 = l_Lean_nullKind; -x_27 = l_Lean_Parser_ParserState_mkNode(x_25, x_26, x_5); -return x_27; +lean_object* x_30; lean_object* x_31; +x_30 = l_Lean_nullKind; +x_31 = l_Lean_Parser_ParserState_mkNode(x_22, x_30, x_5); +return x_31; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = l_Lean_Parser_ParserState_restore(x_13, x_11, x_12); -lean_dec(x_11); -x_29 = l_Lean_nullKind; -x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_5); -return x_30; +lean_dec(x_5); +return x_22; } } } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___boxed(lean_object* x_1, lean_object* x_2, 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) { +else +{ +lean_dec(x_15); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_3); +lean_dec(x_2); +if (x_7 == 0) +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +lean_dec(x_13); +lean_dec(x_12); +x_32 = lean_box(0); +x_33 = l_Lean_Parser_ParserState_pushSyntax(x_14, x_32); +x_34 = l_Lean_nullKind; +x_35 = l_Lean_Parser_ParserState_mkNode(x_33, x_34, x_5); +return x_35; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; +x_36 = l_Lean_Parser_ParserState_restore(x_14, x_12, x_13); +lean_dec(x_12); +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +x_38 = lean_array_get_size(x_37); +lean_dec(x_37); +x_39 = lean_nat_sub(x_38, x_5); +lean_dec(x_38); +x_40 = lean_unsigned_to_nat(2u); +x_41 = lean_nat_dec_eq(x_39, x_40); +lean_dec(x_39); +if (x_41 == 0) +{ +lean_object* x_42; lean_object* x_43; +x_42 = l_Lean_nullKind; +x_43 = l_Lean_Parser_ParserState_mkNode(x_36, x_42, x_5); +return x_43; +} +else +{ +if (x_6 == 0) +{ +lean_object* x_44; lean_object* x_45; +x_44 = l_Lean_nullKind; +x_45 = l_Lean_Parser_ParserState_mkNode(x_36, x_44, x_5); +return x_45; +} +else +{ +lean_object* x_46; +lean_dec(x_5); +x_46 = l_Lean_Parser_ParserState_popSyntax(x_36); +return x_46; +} +} +} +} +} +} +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___boxed(lean_object* x_1, lean_object* x_2, 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_10) { _start: { -uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; -x_10 = lean_unbox(x_1); +uint8_t x_11; uint8_t x_12; uint8_t x_13; uint8_t x_14; lean_object* x_15; +x_11 = lean_unbox(x_1); lean_dec(x_1); -x_11 = lean_unbox(x_4); +x_12 = lean_unbox(x_4); lean_dec(x_4); -x_12 = lean_unbox(x_6); +x_13 = lean_unbox(x_6); lean_dec(x_6); -x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(x_10, x_2, x_3, x_11, x_5, x_12, x_7, x_8, x_9); -return x_13; +x_14 = lean_unbox(x_7); +lean_dec(x_7); +x_15 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(x_11, x_2, x_3, x_12, x_5, x_13, x_14, x_8, x_9, x_10); +return x_15; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux(uint8_t x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux(uint8_t x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, uint8_t x_6, uint8_t x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -lean_object* x_10; -x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -return x_10; +lean_object* x_11; +x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_11; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___boxed(lean_object* x_1, lean_object* x_2, 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* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___boxed(lean_object* x_1, lean_object* x_2, 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_10) { _start: { -uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; -x_10 = lean_unbox(x_1); +uint8_t x_11; uint8_t x_12; uint8_t x_13; uint8_t x_14; lean_object* x_15; +x_11 = lean_unbox(x_1); lean_dec(x_1); -x_11 = lean_unbox(x_4); +x_12 = lean_unbox(x_4); lean_dec(x_4); -x_12 = lean_unbox(x_6); +x_13 = lean_unbox(x_6); lean_dec(x_6); -x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux(x_10, x_2, x_3, x_11, x_5, x_12, x_7, x_8, x_9); -return x_13; +x_14 = lean_unbox(x_7); +lean_dec(x_7); +x_15 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux(x_11, x_2, x_3, x_12, x_5, x_13, x_14, x_8, x_9, x_10); +return x_15; } } lean_object* l_Lean_Parser_sepByFn(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; uint8_t x_10; lean_object* x_11; +lean_object* x_8; lean_object* x_9; uint8_t x_10; uint8_t x_11; lean_object* x_12; x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); x_9 = lean_array_get_size(x_8); lean_dec(x_8); -x_10 = 1; -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(x_1, x_3, x_4, x_2, x_9, x_10, x_5, x_6, x_7); -return x_11; +x_10 = 0; +x_11 = 1; +x_12 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(x_1, x_3, x_4, x_2, x_9, x_10, x_11, x_5, x_6, x_7); +return x_12; } } lean_object* l_Lean_Parser_sepByFn___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { @@ -5387,29 +5450,31 @@ x_10 = l_Lean_Parser_sepByFn(x_8, x_9, x_3, x_4, x_5, x_6, x_7); return x_10; } } -lean_object* l_Lean_Parser_sepBy1Fn(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Lean_Parser_sepBy1Fn(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_8; lean_object* x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = 0; -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(x_1, x_3, x_4, x_2, x_9, x_10, x_5, x_6, x_7); -return x_11; +lean_object* x_9; lean_object* x_10; uint8_t x_11; lean_object* x_12; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); +lean_dec(x_9); +x_11 = 0; +x_12 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(x_1, x_3, x_4, x_2, x_10, x_5, x_11, x_6, x_7, x_8); +return x_12; } } -lean_object* l_Lean_Parser_sepBy1Fn___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Lean_Parser_sepBy1Fn___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; lean_object* x_10; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; lean_object* x_12; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = l_Lean_Parser_sepBy1Fn(x_8, x_9, x_3, x_4, x_5, x_6, x_7); -return x_10; +x_11 = lean_unbox(x_5); +lean_dec(x_5); +x_12 = l_Lean_Parser_sepBy1Fn(x_9, x_10, x_3, x_4, x_11, x_6, x_7, x_8); +return x_12; } } lean_object* l_Lean_Parser_sepByInfo___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { @@ -5570,44 +5635,48 @@ x_7 = l_Lean_Parser_sepBy(x_5, x_2, x_3, x_6); return x_7; } } -lean_object* l_Lean_Parser_sepBy1(uint8_t x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4) { +lean_object* l_Lean_Parser_sepBy1(uint8_t x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5) { _start: { -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; -x_5 = lean_ctor_get(x_2, 0); -lean_inc(x_5); -x_6 = lean_ctor_get(x_3, 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; lean_object* x_15; +x_6 = lean_ctor_get(x_2, 0); lean_inc(x_6); -x_7 = l_Lean_Parser_sepBy1Info(x_5, x_6); -x_8 = lean_ctor_get(x_2, 1); -lean_inc(x_8); -lean_dec(x_2); -x_9 = lean_ctor_get(x_3, 1); +x_7 = lean_ctor_get(x_3, 0); +lean_inc(x_7); +x_8 = l_Lean_Parser_sepBy1Info(x_6, x_7); +x_9 = lean_ctor_get(x_2, 1); lean_inc(x_9); +lean_dec(x_2); +x_10 = lean_ctor_get(x_3, 1); +lean_inc(x_10); lean_dec(x_3); -x_10 = lean_box(x_1); -x_11 = lean_box(x_4); -x_12 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_12, 0, x_10); -lean_closure_set(x_12, 1, x_11); -lean_closure_set(x_12, 2, x_8); -lean_closure_set(x_12, 3, x_9); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_7); -lean_ctor_set(x_13, 1, x_12); -return x_13; +x_11 = lean_box(x_1); +x_12 = lean_box(x_4); +x_13 = lean_box(x_5); +x_14 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); +lean_closure_set(x_14, 0, x_11); +lean_closure_set(x_14, 1, x_12); +lean_closure_set(x_14, 2, x_9); +lean_closure_set(x_14, 3, x_10); +lean_closure_set(x_14, 4, x_13); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_14); +return x_15; } } -lean_object* l_Lean_Parser_sepBy1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Parser_sepBy1___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_5; uint8_t x_6; lean_object* x_7; -x_5 = lean_unbox(x_1); +uint8_t x_6; uint8_t x_7; uint8_t x_8; lean_object* x_9; +x_6 = lean_unbox(x_1); lean_dec(x_1); -x_6 = lean_unbox(x_4); +x_7 = lean_unbox(x_4); lean_dec(x_4); -x_7 = l_Lean_Parser_sepBy1(x_5, x_2, x_3, x_6); -return x_7; +x_8 = lean_unbox(x_5); +lean_dec(x_5); +x_9 = l_Lean_Parser_sepBy1(x_6, x_2, x_3, x_7, x_8); +return x_9; } } lean_object* l_Lean_Parser_satisfyFn(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { @@ -28598,7 +28667,7 @@ uint8_t x_220; x_220 = !lean_is_exclusive(x_216); if (x_220 == 0) { -lean_object* x_221; 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; lean_object* x_229; lean_object* x_230; lean_object* x_231; +lean_object* x_221; 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; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; x_221 = lean_ctor_get(x_216, 0); x_222 = lean_ctor_get(x_215, 0); lean_inc(x_222); @@ -28614,261 +28683,265 @@ lean_dec(x_221); x_227 = 0; x_228 = lean_box(x_2); x_229 = lean_box(x_227); -x_230 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_230, 0, x_228); -lean_closure_set(x_230, 1, x_229); -lean_closure_set(x_230, 2, x_225); -lean_closure_set(x_230, 3, x_226); -x_231 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_231, 0, x_224); -lean_ctor_set(x_231, 1, x_230); -lean_ctor_set(x_216, 0, x_231); +x_230 = lean_box(x_227); +x_231 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); +lean_closure_set(x_231, 0, x_228); +lean_closure_set(x_231, 1, x_229); +lean_closure_set(x_231, 2, x_225); +lean_closure_set(x_231, 3, x_226); +lean_closure_set(x_231, 4, x_230); +x_232 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_232, 0, x_224); +lean_ctor_set(x_232, 1, x_231); +lean_ctor_set(x_216, 0, x_232); return x_216; } else { -lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; uint8_t x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; -x_232 = lean_ctor_get(x_216, 0); -lean_inc(x_232); -lean_dec(x_216); -x_233 = lean_ctor_get(x_215, 0); +lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; uint8_t x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; +x_233 = lean_ctor_get(x_216, 0); lean_inc(x_233); -x_234 = lean_ctor_get(x_232, 0); +lean_dec(x_216); +x_234 = lean_ctor_get(x_215, 0); lean_inc(x_234); -x_235 = l_Lean_Parser_sepBy1Info(x_233, x_234); -x_236 = lean_ctor_get(x_215, 1); -lean_inc(x_236); -lean_dec(x_215); -x_237 = lean_ctor_get(x_232, 1); +x_235 = lean_ctor_get(x_233, 0); +lean_inc(x_235); +x_236 = l_Lean_Parser_sepBy1Info(x_234, x_235); +x_237 = lean_ctor_get(x_215, 1); lean_inc(x_237); -lean_dec(x_232); -x_238 = 0; -x_239 = lean_box(x_2); -x_240 = lean_box(x_238); -x_241 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_241, 0, x_239); -lean_closure_set(x_241, 1, x_240); -lean_closure_set(x_241, 2, x_236); -lean_closure_set(x_241, 3, x_237); -x_242 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_242, 0, x_235); -lean_ctor_set(x_242, 1, x_241); -x_243 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_243, 0, x_242); -return x_243; +lean_dec(x_215); +x_238 = lean_ctor_get(x_233, 1); +lean_inc(x_238); +lean_dec(x_233); +x_239 = 0; +x_240 = lean_box(x_2); +x_241 = lean_box(x_239); +x_242 = lean_box(x_239); +x_243 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); +lean_closure_set(x_243, 0, x_240); +lean_closure_set(x_243, 1, x_241); +lean_closure_set(x_243, 2, x_237); +lean_closure_set(x_243, 3, x_238); +lean_closure_set(x_243, 4, x_242); +x_244 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_244, 0, x_236); +lean_ctor_set(x_244, 1, x_243); +x_245 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_245, 0, x_244); +return x_245; } } } } case 9: { -lean_object* x_244; lean_object* x_245; lean_object* x_246; -x_244 = lean_ctor_get(x_3, 0); -lean_inc(x_244); -x_245 = lean_ctor_get(x_3, 1); -lean_inc(x_245); +lean_object* x_246; lean_object* x_247; lean_object* x_248; +x_246 = lean_ctor_get(x_3, 0); +lean_inc(x_246); +x_247 = lean_ctor_get(x_3, 1); +lean_inc(x_247); lean_dec(x_3); -x_246 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_245); -if (lean_obj_tag(x_246) == 0) +x_248 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_247); +if (lean_obj_tag(x_248) == 0) { -uint8_t x_247; -lean_dec(x_244); -x_247 = !lean_is_exclusive(x_246); -if (x_247 == 0) -{ -return x_246; -} -else -{ -lean_object* x_248; lean_object* x_249; -x_248 = lean_ctor_get(x_246, 0); -lean_inc(x_248); +uint8_t x_249; lean_dec(x_246); -x_249 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_249, 0, x_248); -return x_249; +x_249 = !lean_is_exclusive(x_248); +if (x_249 == 0) +{ +return x_248; +} +else +{ +lean_object* x_250; lean_object* x_251; +x_250 = lean_ctor_get(x_248, 0); +lean_inc(x_250); +lean_dec(x_248); +x_251 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_251, 0, x_250); +return x_251; } } else { -uint8_t x_250; -x_250 = !lean_is_exclusive(x_246); -if (x_250 == 0) +uint8_t x_252; +x_252 = !lean_is_exclusive(x_248); +if (x_252 == 0) { -lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; -x_251 = lean_ctor_get(x_246, 0); -x_252 = lean_ctor_get(x_251, 0); -lean_inc(x_252); -lean_inc(x_244); -x_253 = l_Lean_Parser_nodeInfo(x_244, x_252); -x_254 = lean_ctor_get(x_251, 1); +lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; +x_253 = lean_ctor_get(x_248, 0); +x_254 = lean_ctor_get(x_253, 0); lean_inc(x_254); -lean_dec(x_251); -x_255 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_255, 0, x_244); -lean_closure_set(x_255, 1, x_254); -x_256 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_256, 0, x_253); -lean_ctor_set(x_256, 1, x_255); -lean_ctor_set(x_246, 0, x_256); -return x_246; +lean_inc(x_246); +x_255 = l_Lean_Parser_nodeInfo(x_246, x_254); +x_256 = lean_ctor_get(x_253, 1); +lean_inc(x_256); +lean_dec(x_253); +x_257 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_257, 0, x_246); +lean_closure_set(x_257, 1, x_256); +x_258 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_258, 0, x_255); +lean_ctor_set(x_258, 1, x_257); +lean_ctor_set(x_248, 0, x_258); +return x_248; } else { -lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; -x_257 = lean_ctor_get(x_246, 0); -lean_inc(x_257); -lean_dec(x_246); -x_258 = lean_ctor_get(x_257, 0); -lean_inc(x_258); -lean_inc(x_244); -x_259 = l_Lean_Parser_nodeInfo(x_244, x_258); -x_260 = lean_ctor_get(x_257, 1); +lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; +x_259 = lean_ctor_get(x_248, 0); +lean_inc(x_259); +lean_dec(x_248); +x_260 = lean_ctor_get(x_259, 0); lean_inc(x_260); -lean_dec(x_257); -x_261 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_261, 0, x_244); -lean_closure_set(x_261, 1, x_260); -x_262 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_262, 0, x_259); -lean_ctor_set(x_262, 1, x_261); -x_263 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_263, 0, x_262); -return x_263; +lean_inc(x_246); +x_261 = l_Lean_Parser_nodeInfo(x_246, x_260); +x_262 = lean_ctor_get(x_259, 1); +lean_inc(x_262); +lean_dec(x_259); +x_263 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_263, 0, x_246); +lean_closure_set(x_263, 1, x_262); +x_264 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_264, 0, x_261); +lean_ctor_set(x_264, 1, x_263); +x_265 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_265, 0, x_264); +return x_265; } } } case 10: { -lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; +lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_dec(x_1); -x_264 = lean_ctor_get(x_3, 0); -lean_inc(x_264); -x_265 = lean_ctor_get(x_3, 1); -lean_inc(x_265); -lean_dec(x_3); -x_266 = l_String_trim(x_264); -lean_dec(x_264); +x_266 = lean_ctor_get(x_3, 0); lean_inc(x_266); -x_267 = l_Lean_Parser_symbolInfo(x_266, x_265); -x_268 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); -lean_closure_set(x_268, 0, x_266); -x_269 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_269, 0, x_267); -lean_ctor_set(x_269, 1, x_268); -x_270 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_270, 0, x_269); -return x_270; +x_267 = lean_ctor_get(x_3, 1); +lean_inc(x_267); +lean_dec(x_3); +x_268 = l_String_trim(x_266); +lean_dec(x_266); +lean_inc(x_268); +x_269 = l_Lean_Parser_symbolInfo(x_268, x_267); +x_270 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); +lean_closure_set(x_270, 0, x_268); +x_271 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_271, 0, x_269); +lean_ctor_set(x_271, 1, x_270); +x_272 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_272, 0, x_271); +return x_272; } case 11: { -lean_object* x_271; uint8_t x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; +lean_object* x_273; uint8_t x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_dec(x_1); -x_271 = lean_ctor_get(x_3, 0); -lean_inc(x_271); -x_272 = lean_ctor_get_uint8(x_3, sizeof(void*)*1); -lean_dec(x_3); -x_273 = l_String_trim(x_271); -lean_dec(x_271); +x_273 = lean_ctor_get(x_3, 0); lean_inc(x_273); -x_274 = l_Lean_Parser_nonReservedSymbolInfo(x_273, x_272); -x_275 = lean_alloc_closure((void*)(l_Lean_Parser_nonReservedSymbol___lambda__1___boxed), 4, 1); -lean_closure_set(x_275, 0, x_273); -x_276 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_276, 0, x_274); -lean_ctor_set(x_276, 1, x_275); -x_277 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_277, 0, x_276); -return x_277; +x_274 = lean_ctor_get_uint8(x_3, sizeof(void*)*1); +lean_dec(x_3); +x_275 = l_String_trim(x_273); +lean_dec(x_273); +lean_inc(x_275); +x_276 = l_Lean_Parser_nonReservedSymbolInfo(x_275, x_274); +x_277 = lean_alloc_closure((void*)(l_Lean_Parser_nonReservedSymbol___lambda__1___boxed), 4, 1); +lean_closure_set(x_277, 0, x_275); +x_278 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_278, 0, x_276); +lean_ctor_set(x_278, 1, x_277); +x_279 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_279, 0, x_278); +return x_279; } case 12: { -lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; +lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_dec(x_3); lean_dec(x_1); -x_278 = lean_box(x_2); -x_279 = lean_alloc_closure((void*)(l_Lean_Parser_numLitFn___boxed), 2, 1); -lean_closure_set(x_279, 0, x_278); -x_280 = l_Lean_Parser_numLit___closed__1; -x_281 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_281, 0, x_280); -lean_ctor_set(x_281, 1, x_279); -x_282 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_282, 0, x_281); -return x_282; +x_280 = lean_box(x_2); +x_281 = lean_alloc_closure((void*)(l_Lean_Parser_numLitFn___boxed), 2, 1); +lean_closure_set(x_281, 0, x_280); +x_282 = l_Lean_Parser_numLit___closed__1; +x_283 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_283, 0, x_282); +lean_ctor_set(x_283, 1, x_281); +x_284 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_284, 0, x_283); +return x_284; } case 13: { -lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; +lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_dec(x_3); lean_dec(x_1); -x_283 = lean_box(x_2); -x_284 = lean_alloc_closure((void*)(l_Lean_Parser_strLitFn___boxed), 2, 1); -lean_closure_set(x_284, 0, x_283); -x_285 = l_Lean_Parser_strLit___closed__1; -x_286 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_286, 0, x_285); -lean_ctor_set(x_286, 1, x_284); -x_287 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_287, 0, x_286); -return x_287; +x_285 = lean_box(x_2); +x_286 = lean_alloc_closure((void*)(l_Lean_Parser_strLitFn___boxed), 2, 1); +lean_closure_set(x_286, 0, x_285); +x_287 = l_Lean_Parser_strLit___closed__1; +x_288 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_288, 0, x_287); +lean_ctor_set(x_288, 1, x_286); +x_289 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_289, 0, x_288); +return x_289; } case 14: { -lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; +lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_dec(x_3); lean_dec(x_1); -x_288 = lean_box(x_2); -x_289 = lean_alloc_closure((void*)(l_Lean_Parser_charLitFn___boxed), 2, 1); -lean_closure_set(x_289, 0, x_288); -x_290 = l_Lean_Parser_charLit___closed__1; -x_291 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_291, 0, x_290); -lean_ctor_set(x_291, 1, x_289); -x_292 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_292, 0, x_291); -return x_292; +x_290 = lean_box(x_2); +x_291 = lean_alloc_closure((void*)(l_Lean_Parser_charLitFn___boxed), 2, 1); +lean_closure_set(x_291, 0, x_290); +x_292 = l_Lean_Parser_charLit___closed__1; +x_293 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_293, 0, x_292); +lean_ctor_set(x_293, 1, x_291); +x_294 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_294, 0, x_293); +return x_294; } case 15: { -lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; +lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_dec(x_3); lean_dec(x_1); -x_293 = lean_box(x_2); -x_294 = lean_alloc_closure((void*)(l_Lean_Parser_identFn___boxed), 2, 1); -lean_closure_set(x_294, 0, x_293); -x_295 = l_Lean_Parser_identNoAntiquot___closed__1; -x_296 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_296, 0, x_295); -lean_ctor_set(x_296, 1, x_294); -x_297 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_297, 0, x_296); -return x_297; +x_295 = lean_box(x_2); +x_296 = lean_alloc_closure((void*)(l_Lean_Parser_identFn___boxed), 2, 1); +lean_closure_set(x_296, 0, x_295); +x_297 = l_Lean_Parser_identNoAntiquot___closed__1; +x_298 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_298, 0, x_297); +lean_ctor_set(x_298, 1, x_296); +x_299 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_299, 0, x_298); +return x_299; } default: { -lean_object* x_298; lean_object* x_299; lean_object* x_300; -x_298 = lean_ctor_get(x_3, 0); -lean_inc(x_298); -x_299 = lean_ctor_get(x_3, 1); -lean_inc(x_299); +lean_object* x_300; lean_object* x_301; lean_object* x_302; +x_300 = lean_ctor_get(x_3, 0); +lean_inc(x_300); +x_301 = lean_ctor_get(x_3, 1); +lean_inc(x_301); lean_dec(x_3); -x_300 = l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1(x_1, x_298); -if (lean_obj_tag(x_300) == 0) +x_302 = l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1(x_1, x_300); +if (lean_obj_tag(x_302) == 0) { -lean_object* x_301; -lean_dec(x_299); -x_301 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_298); -return x_301; +lean_object* x_303; +lean_dec(x_301); +x_303 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_300); +return x_303; } else { -lean_object* x_302; lean_object* x_303; -lean_dec(x_300); -x_302 = l_Lean_Parser_categoryParser(x_2, x_298, x_299); -x_303 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_303, 0, x_302); -return x_303; +lean_object* x_304; lean_object* x_305; +lean_dec(x_302); +x_304 = l_Lean_Parser_categoryParser(x_2, x_300, x_301); +x_305 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_305, 0, x_304); +return x_305; } } } @@ -28878,1126 +28951,1130 @@ else switch (lean_obj_tag(x_3)) { case 0: { -lean_object* x_304; lean_object* x_305; lean_object* x_306; -x_304 = lean_ctor_get(x_3, 0); -lean_inc(x_304); -x_305 = lean_ctor_get(x_3, 1); -lean_inc(x_305); +lean_object* x_306; lean_object* x_307; lean_object* x_308; +x_306 = lean_ctor_get(x_3, 0); +lean_inc(x_306); +x_307 = lean_ctor_get(x_3, 1); +lean_inc(x_307); lean_dec(x_3); lean_inc(x_1); -x_306 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_304); -if (lean_obj_tag(x_306) == 0) +x_308 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_306); +if (lean_obj_tag(x_308) == 0) { -uint8_t x_307; -lean_dec(x_305); +uint8_t x_309; +lean_dec(x_307); lean_dec(x_1); -x_307 = !lean_is_exclusive(x_306); -if (x_307 == 0) +x_309 = !lean_is_exclusive(x_308); +if (x_309 == 0) { -return x_306; -} -else -{ -lean_object* x_308; lean_object* x_309; -x_308 = lean_ctor_get(x_306, 0); -lean_inc(x_308); -lean_dec(x_306); -x_309 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_309, 0, x_308); -return x_309; -} +return x_308; } else { lean_object* x_310; lean_object* x_311; -x_310 = lean_ctor_get(x_306, 0); +x_310 = lean_ctor_get(x_308, 0); lean_inc(x_310); -lean_dec(x_306); -x_311 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_305); -if (lean_obj_tag(x_311) == 0) -{ -uint8_t x_312; -lean_dec(x_310); -x_312 = !lean_is_exclusive(x_311); -if (x_312 == 0) -{ +lean_dec(x_308); +x_311 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_311, 0, x_310); return x_311; } +} else { -lean_object* x_313; lean_object* x_314; -x_313 = lean_ctor_get(x_311, 0); -lean_inc(x_313); -lean_dec(x_311); -x_314 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_314, 0, x_313); -return x_314; +lean_object* x_312; lean_object* x_313; +x_312 = lean_ctor_get(x_308, 0); +lean_inc(x_312); +lean_dec(x_308); +x_313 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_307); +if (lean_obj_tag(x_313) == 0) +{ +uint8_t x_314; +lean_dec(x_312); +x_314 = !lean_is_exclusive(x_313); +if (x_314 == 0) +{ +return x_313; +} +else +{ +lean_object* x_315; lean_object* x_316; +x_315 = lean_ctor_get(x_313, 0); +lean_inc(x_315); +lean_dec(x_313); +x_316 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_316, 0, x_315); +return x_316; } } else { -uint8_t x_315; -x_315 = !lean_is_exclusive(x_311); -if (x_315 == 0) +uint8_t x_317; +x_317 = !lean_is_exclusive(x_313); +if (x_317 == 0) { -lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; -x_316 = lean_ctor_get(x_311, 0); -x_317 = lean_ctor_get(x_310, 0); -lean_inc(x_317); -x_318 = lean_ctor_get(x_316, 0); -lean_inc(x_318); -x_319 = l_Lean_Parser_andthenInfo(x_317, x_318); -x_320 = lean_ctor_get(x_310, 1); +lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; +x_318 = lean_ctor_get(x_313, 0); +x_319 = lean_ctor_get(x_312, 0); +lean_inc(x_319); +x_320 = lean_ctor_get(x_318, 0); lean_inc(x_320); -lean_dec(x_310); -x_321 = lean_ctor_get(x_316, 1); -lean_inc(x_321); -lean_dec(x_316); -x_322 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); -lean_closure_set(x_322, 0, x_320); -lean_closure_set(x_322, 1, x_321); -x_323 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_323, 0, x_319); -lean_ctor_set(x_323, 1, x_322); -lean_ctor_set(x_311, 0, x_323); -return x_311; +x_321 = l_Lean_Parser_andthenInfo(x_319, x_320); +x_322 = lean_ctor_get(x_312, 1); +lean_inc(x_322); +lean_dec(x_312); +x_323 = lean_ctor_get(x_318, 1); +lean_inc(x_323); +lean_dec(x_318); +x_324 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); +lean_closure_set(x_324, 0, x_322); +lean_closure_set(x_324, 1, x_323); +x_325 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_325, 0, x_321); +lean_ctor_set(x_325, 1, x_324); +lean_ctor_set(x_313, 0, x_325); +return x_313; } else { -lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; -x_324 = lean_ctor_get(x_311, 0); -lean_inc(x_324); -lean_dec(x_311); -x_325 = lean_ctor_get(x_310, 0); -lean_inc(x_325); -x_326 = lean_ctor_get(x_324, 0); +lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; +x_326 = lean_ctor_get(x_313, 0); lean_inc(x_326); -x_327 = l_Lean_Parser_andthenInfo(x_325, x_326); -x_328 = lean_ctor_get(x_310, 1); +lean_dec(x_313); +x_327 = lean_ctor_get(x_312, 0); +lean_inc(x_327); +x_328 = lean_ctor_get(x_326, 0); lean_inc(x_328); -lean_dec(x_310); -x_329 = lean_ctor_get(x_324, 1); -lean_inc(x_329); -lean_dec(x_324); -x_330 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); -lean_closure_set(x_330, 0, x_328); -lean_closure_set(x_330, 1, x_329); -x_331 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_331, 0, x_327); -lean_ctor_set(x_331, 1, x_330); -x_332 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_332, 0, x_331); -return x_332; +x_329 = l_Lean_Parser_andthenInfo(x_327, x_328); +x_330 = lean_ctor_get(x_312, 1); +lean_inc(x_330); +lean_dec(x_312); +x_331 = lean_ctor_get(x_326, 1); +lean_inc(x_331); +lean_dec(x_326); +x_332 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); +lean_closure_set(x_332, 0, x_330); +lean_closure_set(x_332, 1, x_331); +x_333 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_333, 0, x_329); +lean_ctor_set(x_333, 1, x_332); +x_334 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_334, 0, x_333); +return x_334; } } } } case 1: { -lean_object* x_333; lean_object* x_334; lean_object* x_335; -x_333 = lean_ctor_get(x_3, 0); -lean_inc(x_333); -x_334 = lean_ctor_get(x_3, 1); -lean_inc(x_334); +lean_object* x_335; lean_object* x_336; lean_object* x_337; +x_335 = lean_ctor_get(x_3, 0); +lean_inc(x_335); +x_336 = lean_ctor_get(x_3, 1); +lean_inc(x_336); lean_dec(x_3); lean_inc(x_1); -x_335 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_333); -if (lean_obj_tag(x_335) == 0) +x_337 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_335); +if (lean_obj_tag(x_337) == 0) { -uint8_t x_336; -lean_dec(x_334); +uint8_t x_338; +lean_dec(x_336); lean_dec(x_1); -x_336 = !lean_is_exclusive(x_335); -if (x_336 == 0) +x_338 = !lean_is_exclusive(x_337); +if (x_338 == 0) { -return x_335; -} -else -{ -lean_object* x_337; lean_object* x_338; -x_337 = lean_ctor_get(x_335, 0); -lean_inc(x_337); -lean_dec(x_335); -x_338 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_338, 0, x_337); -return x_338; -} +return x_337; } else { lean_object* x_339; lean_object* x_340; -x_339 = lean_ctor_get(x_335, 0); +x_339 = lean_ctor_get(x_337, 0); lean_inc(x_339); -lean_dec(x_335); -x_340 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_334); -if (lean_obj_tag(x_340) == 0) -{ -uint8_t x_341; -lean_dec(x_339); -x_341 = !lean_is_exclusive(x_340); -if (x_341 == 0) -{ +lean_dec(x_337); +x_340 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_340, 0, x_339); return x_340; } +} else { -lean_object* x_342; lean_object* x_343; -x_342 = lean_ctor_get(x_340, 0); -lean_inc(x_342); -lean_dec(x_340); -x_343 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_343, 0, x_342); -return x_343; +lean_object* x_341; lean_object* x_342; +x_341 = lean_ctor_get(x_337, 0); +lean_inc(x_341); +lean_dec(x_337); +x_342 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_336); +if (lean_obj_tag(x_342) == 0) +{ +uint8_t x_343; +lean_dec(x_341); +x_343 = !lean_is_exclusive(x_342); +if (x_343 == 0) +{ +return x_342; +} +else +{ +lean_object* x_344; lean_object* x_345; +x_344 = lean_ctor_get(x_342, 0); +lean_inc(x_344); +lean_dec(x_342); +x_345 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_345, 0, x_344); +return x_345; } } else { -uint8_t x_344; -x_344 = !lean_is_exclusive(x_340); -if (x_344 == 0) +uint8_t x_346; +x_346 = !lean_is_exclusive(x_342); +if (x_346 == 0) { -lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; -x_345 = lean_ctor_get(x_340, 0); -x_346 = lean_ctor_get(x_339, 0); -lean_inc(x_346); -x_347 = lean_ctor_get(x_345, 0); -lean_inc(x_347); -x_348 = l_Lean_Parser_orelseInfo(x_346, x_347); -x_349 = lean_ctor_get(x_339, 1); +lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; +x_347 = lean_ctor_get(x_342, 0); +x_348 = lean_ctor_get(x_341, 0); +lean_inc(x_348); +x_349 = lean_ctor_get(x_347, 0); lean_inc(x_349); -lean_dec(x_339); -x_350 = lean_ctor_get(x_345, 1); -lean_inc(x_350); -lean_dec(x_345); -x_351 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); -lean_closure_set(x_351, 0, x_349); -lean_closure_set(x_351, 1, x_350); -x_352 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_352, 0, x_348); -lean_ctor_set(x_352, 1, x_351); -lean_ctor_set(x_340, 0, x_352); -return x_340; +x_350 = l_Lean_Parser_orelseInfo(x_348, x_349); +x_351 = lean_ctor_get(x_341, 1); +lean_inc(x_351); +lean_dec(x_341); +x_352 = lean_ctor_get(x_347, 1); +lean_inc(x_352); +lean_dec(x_347); +x_353 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); +lean_closure_set(x_353, 0, x_351); +lean_closure_set(x_353, 1, x_352); +x_354 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_354, 0, x_350); +lean_ctor_set(x_354, 1, x_353); +lean_ctor_set(x_342, 0, x_354); +return x_342; } else { -lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; -x_353 = lean_ctor_get(x_340, 0); -lean_inc(x_353); -lean_dec(x_340); -x_354 = lean_ctor_get(x_339, 0); -lean_inc(x_354); -x_355 = lean_ctor_get(x_353, 0); +lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; +x_355 = lean_ctor_get(x_342, 0); lean_inc(x_355); -x_356 = l_Lean_Parser_orelseInfo(x_354, x_355); -x_357 = lean_ctor_get(x_339, 1); +lean_dec(x_342); +x_356 = lean_ctor_get(x_341, 0); +lean_inc(x_356); +x_357 = lean_ctor_get(x_355, 0); lean_inc(x_357); -lean_dec(x_339); -x_358 = lean_ctor_get(x_353, 1); -lean_inc(x_358); -lean_dec(x_353); -x_359 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); -lean_closure_set(x_359, 0, x_357); -lean_closure_set(x_359, 1, x_358); -x_360 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_360, 0, x_356); -lean_ctor_set(x_360, 1, x_359); -x_361 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_361, 0, x_360); -return x_361; +x_358 = l_Lean_Parser_orelseInfo(x_356, x_357); +x_359 = lean_ctor_get(x_341, 1); +lean_inc(x_359); +lean_dec(x_341); +x_360 = lean_ctor_get(x_355, 1); +lean_inc(x_360); +lean_dec(x_355); +x_361 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); +lean_closure_set(x_361, 0, x_359); +lean_closure_set(x_361, 1, x_360); +x_362 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_362, 0, x_358); +lean_ctor_set(x_362, 1, x_361); +x_363 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_363, 0, x_362); +return x_363; } } } } case 2: { -lean_object* x_362; lean_object* x_363; -x_362 = lean_ctor_get(x_3, 0); -lean_inc(x_362); +lean_object* x_364; lean_object* x_365; +x_364 = lean_ctor_get(x_3, 0); +lean_inc(x_364); lean_dec(x_3); -x_363 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_362); -if (lean_obj_tag(x_363) == 0) +x_365 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_364); +if (lean_obj_tag(x_365) == 0) { -uint8_t x_364; -x_364 = !lean_is_exclusive(x_363); -if (x_364 == 0) +uint8_t x_366; +x_366 = !lean_is_exclusive(x_365); +if (x_366 == 0) { -return x_363; +return x_365; } else { -lean_object* x_365; lean_object* x_366; -x_365 = lean_ctor_get(x_363, 0); -lean_inc(x_365); -lean_dec(x_363); -x_366 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_366, 0, x_365); -return x_366; +lean_object* x_367; lean_object* x_368; +x_367 = lean_ctor_get(x_365, 0); +lean_inc(x_367); +lean_dec(x_365); +x_368 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_368, 0, x_367); +return x_368; } } else { -uint8_t x_367; -x_367 = !lean_is_exclusive(x_363); -if (x_367 == 0) +uint8_t x_369; +x_369 = !lean_is_exclusive(x_365); +if (x_369 == 0) { -lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; -x_368 = lean_ctor_get(x_363, 0); -x_369 = lean_ctor_get(x_368, 0); -lean_inc(x_369); -x_370 = l_Lean_Parser_optionaInfo(x_369); -x_371 = lean_ctor_get(x_368, 1); +lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; +x_370 = lean_ctor_get(x_365, 0); +x_371 = lean_ctor_get(x_370, 0); lean_inc(x_371); -lean_dec(x_368); -x_372 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); -lean_closure_set(x_372, 0, x_371); -x_373 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_373, 0, x_370); -lean_ctor_set(x_373, 1, x_372); -lean_ctor_set(x_363, 0, x_373); -return x_363; +x_372 = l_Lean_Parser_optionaInfo(x_371); +x_373 = lean_ctor_get(x_370, 1); +lean_inc(x_373); +lean_dec(x_370); +x_374 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); +lean_closure_set(x_374, 0, x_373); +x_375 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_375, 0, x_372); +lean_ctor_set(x_375, 1, x_374); +lean_ctor_set(x_365, 0, x_375); +return x_365; } else { -lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; -x_374 = lean_ctor_get(x_363, 0); -lean_inc(x_374); -lean_dec(x_363); -x_375 = lean_ctor_get(x_374, 0); -lean_inc(x_375); -x_376 = l_Lean_Parser_optionaInfo(x_375); -x_377 = lean_ctor_get(x_374, 1); +lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; +x_376 = lean_ctor_get(x_365, 0); +lean_inc(x_376); +lean_dec(x_365); +x_377 = lean_ctor_get(x_376, 0); lean_inc(x_377); -lean_dec(x_374); -x_378 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); -lean_closure_set(x_378, 0, x_377); -x_379 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_379, 0, x_376); -lean_ctor_set(x_379, 1, x_378); -x_380 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_380, 0, x_379); -return x_380; +x_378 = l_Lean_Parser_optionaInfo(x_377); +x_379 = lean_ctor_get(x_376, 1); +lean_inc(x_379); +lean_dec(x_376); +x_380 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); +lean_closure_set(x_380, 0, x_379); +x_381 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_381, 0, x_378); +lean_ctor_set(x_381, 1, x_380); +x_382 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_382, 0, x_381); +return x_382; } } } case 3: { -lean_object* x_381; lean_object* x_382; -x_381 = lean_ctor_get(x_3, 0); -lean_inc(x_381); +lean_object* x_383; lean_object* x_384; +x_383 = lean_ctor_get(x_3, 0); +lean_inc(x_383); lean_dec(x_3); -x_382 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_381); -if (lean_obj_tag(x_382) == 0) +x_384 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_383); +if (lean_obj_tag(x_384) == 0) { -uint8_t x_383; -x_383 = !lean_is_exclusive(x_382); -if (x_383 == 0) +uint8_t x_385; +x_385 = !lean_is_exclusive(x_384); +if (x_385 == 0) { -return x_382; +return x_384; } else { -lean_object* x_384; lean_object* x_385; -x_384 = lean_ctor_get(x_382, 0); -lean_inc(x_384); -lean_dec(x_382); -x_385 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_385, 0, x_384); -return x_385; +lean_object* x_386; lean_object* x_387; +x_386 = lean_ctor_get(x_384, 0); +lean_inc(x_386); +lean_dec(x_384); +x_387 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_387, 0, x_386); +return x_387; } } else { -uint8_t x_386; -x_386 = !lean_is_exclusive(x_382); -if (x_386 == 0) -{ -lean_object* x_387; uint8_t x_388; -x_387 = lean_ctor_get(x_382, 0); -x_388 = !lean_is_exclusive(x_387); +uint8_t x_388; +x_388 = !lean_is_exclusive(x_384); if (x_388 == 0) { -lean_object* x_389; lean_object* x_390; -x_389 = lean_ctor_get(x_387, 1); -x_390 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_390, 0, x_389); -lean_ctor_set(x_387, 1, x_390); -return x_382; +lean_object* x_389; uint8_t x_390; +x_389 = lean_ctor_get(x_384, 0); +x_390 = !lean_is_exclusive(x_389); +if (x_390 == 0) +{ +lean_object* x_391; lean_object* x_392; +x_391 = lean_ctor_get(x_389, 1); +x_392 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); +lean_closure_set(x_392, 0, x_391); +lean_ctor_set(x_389, 1, x_392); +return x_384; } else { -lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; -x_391 = lean_ctor_get(x_387, 0); -x_392 = lean_ctor_get(x_387, 1); -lean_inc(x_392); -lean_inc(x_391); -lean_dec(x_387); -x_393 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_393, 0, x_392); -x_394 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_394, 0, x_391); -lean_ctor_set(x_394, 1, x_393); -lean_ctor_set(x_382, 0, x_394); -return x_382; +lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; +x_393 = lean_ctor_get(x_389, 0); +x_394 = lean_ctor_get(x_389, 1); +lean_inc(x_394); +lean_inc(x_393); +lean_dec(x_389); +x_395 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); +lean_closure_set(x_395, 0, x_394); +x_396 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_396, 0, x_393); +lean_ctor_set(x_396, 1, x_395); +lean_ctor_set(x_384, 0, x_396); +return x_384; } } else { -lean_object* x_395; lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; -x_395 = lean_ctor_get(x_382, 0); -lean_inc(x_395); -lean_dec(x_382); -x_396 = lean_ctor_get(x_395, 0); -lean_inc(x_396); -x_397 = lean_ctor_get(x_395, 1); +lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; +x_397 = lean_ctor_get(x_384, 0); lean_inc(x_397); -if (lean_is_exclusive(x_395)) { - lean_ctor_release(x_395, 0); - lean_ctor_release(x_395, 1); - x_398 = x_395; +lean_dec(x_384); +x_398 = lean_ctor_get(x_397, 0); +lean_inc(x_398); +x_399 = lean_ctor_get(x_397, 1); +lean_inc(x_399); +if (lean_is_exclusive(x_397)) { + lean_ctor_release(x_397, 0); + lean_ctor_release(x_397, 1); + x_400 = x_397; } else { - lean_dec_ref(x_395); - x_398 = lean_box(0); + lean_dec_ref(x_397); + x_400 = lean_box(0); } -x_399 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_399, 0, x_397); -if (lean_is_scalar(x_398)) { - x_400 = lean_alloc_ctor(0, 2, 0); +x_401 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); +lean_closure_set(x_401, 0, x_399); +if (lean_is_scalar(x_400)) { + x_402 = lean_alloc_ctor(0, 2, 0); } else { - x_400 = x_398; + x_402 = x_400; } -lean_ctor_set(x_400, 0, x_396); -lean_ctor_set(x_400, 1, x_399); -x_401 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_401, 0, x_400); -return x_401; +lean_ctor_set(x_402, 0, x_398); +lean_ctor_set(x_402, 1, x_401); +x_403 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_403, 0, x_402); +return x_403; } } } case 4: { -lean_object* x_402; lean_object* x_403; -x_402 = lean_ctor_get(x_3, 0); -lean_inc(x_402); +lean_object* x_404; lean_object* x_405; +x_404 = lean_ctor_get(x_3, 0); +lean_inc(x_404); lean_dec(x_3); -x_403 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_402); -if (lean_obj_tag(x_403) == 0) +x_405 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_404); +if (lean_obj_tag(x_405) == 0) { -uint8_t x_404; -x_404 = !lean_is_exclusive(x_403); -if (x_404 == 0) +uint8_t x_406; +x_406 = !lean_is_exclusive(x_405); +if (x_406 == 0) { -return x_403; +return x_405; } else { -lean_object* x_405; lean_object* x_406; -x_405 = lean_ctor_get(x_403, 0); -lean_inc(x_405); -lean_dec(x_403); -x_406 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_406, 0, x_405); -return x_406; +lean_object* x_407; lean_object* x_408; +x_407 = lean_ctor_get(x_405, 0); +lean_inc(x_407); +lean_dec(x_405); +x_408 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_408, 0, x_407); +return x_408; } } else { -uint8_t x_407; -x_407 = !lean_is_exclusive(x_403); -if (x_407 == 0) -{ -lean_object* x_408; uint8_t x_409; -x_408 = lean_ctor_get(x_403, 0); -x_409 = !lean_is_exclusive(x_408); +uint8_t x_409; +x_409 = !lean_is_exclusive(x_405); if (x_409 == 0) { -lean_object* x_410; lean_object* x_411; -x_410 = lean_ctor_get(x_408, 1); -x_411 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_411, 0, x_410); -lean_ctor_set(x_408, 1, x_411); -return x_403; +lean_object* x_410; uint8_t x_411; +x_410 = lean_ctor_get(x_405, 0); +x_411 = !lean_is_exclusive(x_410); +if (x_411 == 0) +{ +lean_object* x_412; lean_object* x_413; +x_412 = lean_ctor_get(x_410, 1); +x_413 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); +lean_closure_set(x_413, 0, x_412); +lean_ctor_set(x_410, 1, x_413); +return x_405; } else { -lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; -x_412 = lean_ctor_get(x_408, 0); -x_413 = lean_ctor_get(x_408, 1); -lean_inc(x_413); -lean_inc(x_412); -lean_dec(x_408); -x_414 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_414, 0, x_413); -x_415 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_415, 0, x_412); -lean_ctor_set(x_415, 1, x_414); -lean_ctor_set(x_403, 0, x_415); -return x_403; +lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; +x_414 = lean_ctor_get(x_410, 0); +x_415 = lean_ctor_get(x_410, 1); +lean_inc(x_415); +lean_inc(x_414); +lean_dec(x_410); +x_416 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); +lean_closure_set(x_416, 0, x_415); +x_417 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_417, 0, x_414); +lean_ctor_set(x_417, 1, x_416); +lean_ctor_set(x_405, 0, x_417); +return x_405; } } else { -lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; -x_416 = lean_ctor_get(x_403, 0); -lean_inc(x_416); -lean_dec(x_403); -x_417 = lean_ctor_get(x_416, 0); -lean_inc(x_417); -x_418 = lean_ctor_get(x_416, 1); +lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; +x_418 = lean_ctor_get(x_405, 0); lean_inc(x_418); -if (lean_is_exclusive(x_416)) { - lean_ctor_release(x_416, 0); - lean_ctor_release(x_416, 1); - x_419 = x_416; +lean_dec(x_405); +x_419 = lean_ctor_get(x_418, 0); +lean_inc(x_419); +x_420 = lean_ctor_get(x_418, 1); +lean_inc(x_420); +if (lean_is_exclusive(x_418)) { + lean_ctor_release(x_418, 0); + lean_ctor_release(x_418, 1); + x_421 = x_418; } else { - lean_dec_ref(x_416); - x_419 = lean_box(0); + lean_dec_ref(x_418); + x_421 = lean_box(0); } -x_420 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_420, 0, x_418); -if (lean_is_scalar(x_419)) { - x_421 = lean_alloc_ctor(0, 2, 0); +x_422 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); +lean_closure_set(x_422, 0, x_420); +if (lean_is_scalar(x_421)) { + x_423 = lean_alloc_ctor(0, 2, 0); } else { - x_421 = x_419; + x_423 = x_421; } -lean_ctor_set(x_421, 0, x_417); -lean_ctor_set(x_421, 1, x_420); -x_422 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_422, 0, x_421); -return x_422; +lean_ctor_set(x_423, 0, x_419); +lean_ctor_set(x_423, 1, x_422); +x_424 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_424, 0, x_423); +return x_424; } } } case 5: { -lean_object* x_423; lean_object* x_424; -x_423 = lean_ctor_get(x_3, 0); -lean_inc(x_423); +lean_object* x_425; lean_object* x_426; +x_425 = lean_ctor_get(x_3, 0); +lean_inc(x_425); lean_dec(x_3); -x_424 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_423); -if (lean_obj_tag(x_424) == 0) +x_426 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_425); +if (lean_obj_tag(x_426) == 0) { -uint8_t x_425; -x_425 = !lean_is_exclusive(x_424); -if (x_425 == 0) +uint8_t x_427; +x_427 = !lean_is_exclusive(x_426); +if (x_427 == 0) { -return x_424; +return x_426; } else { -lean_object* x_426; lean_object* x_427; -x_426 = lean_ctor_get(x_424, 0); -lean_inc(x_426); -lean_dec(x_424); -x_427 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_427, 0, x_426); -return x_427; +lean_object* x_428; lean_object* x_429; +x_428 = lean_ctor_get(x_426, 0); +lean_inc(x_428); +lean_dec(x_426); +x_429 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_429, 0, x_428); +return x_429; } } else { -uint8_t x_428; -x_428 = !lean_is_exclusive(x_424); -if (x_428 == 0) +uint8_t x_430; +x_430 = !lean_is_exclusive(x_426); +if (x_430 == 0) { -lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; -x_429 = lean_ctor_get(x_424, 0); -x_430 = lean_ctor_get(x_429, 0); -lean_inc(x_430); -x_431 = l_Lean_Parser_noFirstTokenInfo(x_430); -x_432 = lean_ctor_get(x_429, 1); +lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; lean_object* x_437; +x_431 = lean_ctor_get(x_426, 0); +x_432 = lean_ctor_get(x_431, 0); lean_inc(x_432); -lean_dec(x_429); -x_433 = lean_box(x_2); -x_434 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); -lean_closure_set(x_434, 0, x_433); -lean_closure_set(x_434, 1, x_432); -x_435 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_435, 0, x_431); -lean_ctor_set(x_435, 1, x_434); -lean_ctor_set(x_424, 0, x_435); -return x_424; +x_433 = l_Lean_Parser_noFirstTokenInfo(x_432); +x_434 = lean_ctor_get(x_431, 1); +lean_inc(x_434); +lean_dec(x_431); +x_435 = lean_box(x_2); +x_436 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); +lean_closure_set(x_436, 0, x_435); +lean_closure_set(x_436, 1, x_434); +x_437 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_437, 0, x_433); +lean_ctor_set(x_437, 1, x_436); +lean_ctor_set(x_426, 0, x_437); +return x_426; } else { -lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; -x_436 = lean_ctor_get(x_424, 0); -lean_inc(x_436); -lean_dec(x_424); -x_437 = lean_ctor_get(x_436, 0); -lean_inc(x_437); -x_438 = l_Lean_Parser_noFirstTokenInfo(x_437); -x_439 = lean_ctor_get(x_436, 1); +lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; +x_438 = lean_ctor_get(x_426, 0); +lean_inc(x_438); +lean_dec(x_426); +x_439 = lean_ctor_get(x_438, 0); lean_inc(x_439); -lean_dec(x_436); -x_440 = lean_box(x_2); -x_441 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); -lean_closure_set(x_441, 0, x_440); -lean_closure_set(x_441, 1, x_439); -x_442 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_442, 0, x_438); -lean_ctor_set(x_442, 1, x_441); -x_443 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_443, 0, x_442); -return x_443; +x_440 = l_Lean_Parser_noFirstTokenInfo(x_439); +x_441 = lean_ctor_get(x_438, 1); +lean_inc(x_441); +lean_dec(x_438); +x_442 = lean_box(x_2); +x_443 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); +lean_closure_set(x_443, 0, x_442); +lean_closure_set(x_443, 1, x_441); +x_444 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_444, 0, x_440); +lean_ctor_set(x_444, 1, x_443); +x_445 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_445, 0, x_444); +return x_445; } } } case 6: { -lean_object* x_444; lean_object* x_445; -x_444 = lean_ctor_get(x_3, 0); -lean_inc(x_444); +lean_object* x_446; lean_object* x_447; +x_446 = lean_ctor_get(x_3, 0); +lean_inc(x_446); lean_dec(x_3); -x_445 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_444); -if (lean_obj_tag(x_445) == 0) +x_447 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_446); +if (lean_obj_tag(x_447) == 0) { -uint8_t x_446; -x_446 = !lean_is_exclusive(x_445); -if (x_446 == 0) +uint8_t x_448; +x_448 = !lean_is_exclusive(x_447); +if (x_448 == 0) { -return x_445; +return x_447; } else { -lean_object* x_447; lean_object* x_448; -x_447 = lean_ctor_get(x_445, 0); -lean_inc(x_447); -lean_dec(x_445); -x_448 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_448, 0, x_447); -return x_448; +lean_object* x_449; lean_object* x_450; +x_449 = lean_ctor_get(x_447, 0); +lean_inc(x_449); +lean_dec(x_447); +x_450 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_450, 0, x_449); +return x_450; } } else { -uint8_t x_449; -x_449 = !lean_is_exclusive(x_445); -if (x_449 == 0) -{ -lean_object* x_450; uint8_t x_451; -x_450 = lean_ctor_get(x_445, 0); -x_451 = !lean_is_exclusive(x_450); +uint8_t x_451; +x_451 = !lean_is_exclusive(x_447); if (x_451 == 0) { -lean_object* x_452; uint8_t x_453; lean_object* x_454; lean_object* x_455; lean_object* x_456; -x_452 = lean_ctor_get(x_450, 1); -x_453 = 0; -x_454 = lean_box(x_2); -x_455 = lean_box(x_453); -x_456 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); -lean_closure_set(x_456, 0, x_454); -lean_closure_set(x_456, 1, x_452); -lean_closure_set(x_456, 2, x_455); -lean_ctor_set(x_450, 1, x_456); -return x_445; +lean_object* x_452; uint8_t x_453; +x_452 = lean_ctor_get(x_447, 0); +x_453 = !lean_is_exclusive(x_452); +if (x_453 == 0) +{ +lean_object* x_454; uint8_t x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; +x_454 = lean_ctor_get(x_452, 1); +x_455 = 0; +x_456 = lean_box(x_2); +x_457 = lean_box(x_455); +x_458 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_458, 0, x_456); +lean_closure_set(x_458, 1, x_454); +lean_closure_set(x_458, 2, x_457); +lean_ctor_set(x_452, 1, x_458); +return x_447; } else { -lean_object* x_457; lean_object* x_458; uint8_t x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; -x_457 = lean_ctor_get(x_450, 0); -x_458 = lean_ctor_get(x_450, 1); -lean_inc(x_458); -lean_inc(x_457); -lean_dec(x_450); -x_459 = 0; -x_460 = lean_box(x_2); -x_461 = lean_box(x_459); -x_462 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); -lean_closure_set(x_462, 0, x_460); -lean_closure_set(x_462, 1, x_458); -lean_closure_set(x_462, 2, x_461); -x_463 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_463, 0, x_457); -lean_ctor_set(x_463, 1, x_462); -lean_ctor_set(x_445, 0, x_463); -return x_445; +lean_object* x_459; lean_object* x_460; uint8_t x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; lean_object* x_465; +x_459 = lean_ctor_get(x_452, 0); +x_460 = lean_ctor_get(x_452, 1); +lean_inc(x_460); +lean_inc(x_459); +lean_dec(x_452); +x_461 = 0; +x_462 = lean_box(x_2); +x_463 = lean_box(x_461); +x_464 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_464, 0, x_462); +lean_closure_set(x_464, 1, x_460); +lean_closure_set(x_464, 2, x_463); +x_465 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_465, 0, x_459); +lean_ctor_set(x_465, 1, x_464); +lean_ctor_set(x_447, 0, x_465); +return x_447; } } else { -lean_object* x_464; lean_object* x_465; lean_object* x_466; lean_object* x_467; uint8_t x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; -x_464 = lean_ctor_get(x_445, 0); -lean_inc(x_464); -lean_dec(x_445); -x_465 = lean_ctor_get(x_464, 0); -lean_inc(x_465); -x_466 = lean_ctor_get(x_464, 1); +lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; uint8_t x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; +x_466 = lean_ctor_get(x_447, 0); lean_inc(x_466); -if (lean_is_exclusive(x_464)) { - lean_ctor_release(x_464, 0); - lean_ctor_release(x_464, 1); - x_467 = x_464; +lean_dec(x_447); +x_467 = lean_ctor_get(x_466, 0); +lean_inc(x_467); +x_468 = lean_ctor_get(x_466, 1); +lean_inc(x_468); +if (lean_is_exclusive(x_466)) { + lean_ctor_release(x_466, 0); + lean_ctor_release(x_466, 1); + x_469 = x_466; } else { - lean_dec_ref(x_464); - x_467 = lean_box(0); + lean_dec_ref(x_466); + x_469 = lean_box(0); } -x_468 = 0; -x_469 = lean_box(x_2); -x_470 = lean_box(x_468); -x_471 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); -lean_closure_set(x_471, 0, x_469); -lean_closure_set(x_471, 1, x_466); -lean_closure_set(x_471, 2, x_470); -if (lean_is_scalar(x_467)) { - x_472 = lean_alloc_ctor(0, 2, 0); +x_470 = 0; +x_471 = lean_box(x_2); +x_472 = lean_box(x_470); +x_473 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_473, 0, x_471); +lean_closure_set(x_473, 1, x_468); +lean_closure_set(x_473, 2, x_472); +if (lean_is_scalar(x_469)) { + x_474 = lean_alloc_ctor(0, 2, 0); } else { - x_472 = x_467; + x_474 = x_469; } -lean_ctor_set(x_472, 0, x_465); -lean_ctor_set(x_472, 1, x_471); -x_473 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_473, 0, x_472); -return x_473; +lean_ctor_set(x_474, 0, x_467); +lean_ctor_set(x_474, 1, x_473); +x_475 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_475, 0, x_474); +return x_475; } } } case 7: { -lean_object* x_474; lean_object* x_475; lean_object* x_476; -x_474 = lean_ctor_get(x_3, 0); -lean_inc(x_474); -x_475 = lean_ctor_get(x_3, 1); -lean_inc(x_475); +lean_object* x_476; lean_object* x_477; lean_object* x_478; +x_476 = lean_ctor_get(x_3, 0); +lean_inc(x_476); +x_477 = lean_ctor_get(x_3, 1); +lean_inc(x_477); lean_dec(x_3); lean_inc(x_1); -x_476 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_474); -if (lean_obj_tag(x_476) == 0) +x_478 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_476); +if (lean_obj_tag(x_478) == 0) { -uint8_t x_477; -lean_dec(x_475); +uint8_t x_479; +lean_dec(x_477); lean_dec(x_1); -x_477 = !lean_is_exclusive(x_476); -if (x_477 == 0) +x_479 = !lean_is_exclusive(x_478); +if (x_479 == 0) { -return x_476; -} -else -{ -lean_object* x_478; lean_object* x_479; -x_478 = lean_ctor_get(x_476, 0); -lean_inc(x_478); -lean_dec(x_476); -x_479 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_479, 0, x_478); -return x_479; -} +return x_478; } else { lean_object* x_480; lean_object* x_481; -x_480 = lean_ctor_get(x_476, 0); +x_480 = lean_ctor_get(x_478, 0); lean_inc(x_480); -lean_dec(x_476); -x_481 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_475); -if (lean_obj_tag(x_481) == 0) -{ -uint8_t x_482; -lean_dec(x_480); -x_482 = !lean_is_exclusive(x_481); -if (x_482 == 0) -{ +lean_dec(x_478); +x_481 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_481, 0, x_480); return x_481; } +} else { -lean_object* x_483; lean_object* x_484; -x_483 = lean_ctor_get(x_481, 0); -lean_inc(x_483); -lean_dec(x_481); -x_484 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_484, 0, x_483); -return x_484; +lean_object* x_482; lean_object* x_483; +x_482 = lean_ctor_get(x_478, 0); +lean_inc(x_482); +lean_dec(x_478); +x_483 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_477); +if (lean_obj_tag(x_483) == 0) +{ +uint8_t x_484; +lean_dec(x_482); +x_484 = !lean_is_exclusive(x_483); +if (x_484 == 0) +{ +return x_483; +} +else +{ +lean_object* x_485; lean_object* x_486; +x_485 = lean_ctor_get(x_483, 0); +lean_inc(x_485); +lean_dec(x_483); +x_486 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_486, 0, x_485); +return x_486; } } else { -uint8_t x_485; -x_485 = !lean_is_exclusive(x_481); -if (x_485 == 0) +uint8_t x_487; +x_487 = !lean_is_exclusive(x_483); +if (x_487 == 0) { -lean_object* x_486; lean_object* x_487; lean_object* x_488; lean_object* x_489; lean_object* x_490; lean_object* x_491; uint8_t x_492; lean_object* x_493; lean_object* x_494; lean_object* x_495; lean_object* x_496; -x_486 = lean_ctor_get(x_481, 0); -x_487 = lean_ctor_get(x_480, 0); -lean_inc(x_487); -x_488 = lean_ctor_get(x_486, 0); -lean_inc(x_488); -x_489 = l_Lean_Parser_sepByInfo(x_487, x_488); -x_490 = lean_ctor_get(x_480, 1); +lean_object* x_488; lean_object* x_489; lean_object* x_490; lean_object* x_491; lean_object* x_492; lean_object* x_493; uint8_t x_494; lean_object* x_495; lean_object* x_496; lean_object* x_497; lean_object* x_498; +x_488 = lean_ctor_get(x_483, 0); +x_489 = lean_ctor_get(x_482, 0); +lean_inc(x_489); +x_490 = lean_ctor_get(x_488, 0); lean_inc(x_490); -lean_dec(x_480); -x_491 = lean_ctor_get(x_486, 1); -lean_inc(x_491); -lean_dec(x_486); -x_492 = 0; -x_493 = lean_box(x_2); -x_494 = lean_box(x_492); -x_495 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); -lean_closure_set(x_495, 0, x_493); -lean_closure_set(x_495, 1, x_494); -lean_closure_set(x_495, 2, x_490); -lean_closure_set(x_495, 3, x_491); -x_496 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_496, 0, x_489); -lean_ctor_set(x_496, 1, x_495); -lean_ctor_set(x_481, 0, x_496); -return x_481; +x_491 = l_Lean_Parser_sepByInfo(x_489, x_490); +x_492 = lean_ctor_get(x_482, 1); +lean_inc(x_492); +lean_dec(x_482); +x_493 = lean_ctor_get(x_488, 1); +lean_inc(x_493); +lean_dec(x_488); +x_494 = 0; +x_495 = lean_box(x_2); +x_496 = lean_box(x_494); +x_497 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); +lean_closure_set(x_497, 0, x_495); +lean_closure_set(x_497, 1, x_496); +lean_closure_set(x_497, 2, x_492); +lean_closure_set(x_497, 3, x_493); +x_498 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_498, 0, x_491); +lean_ctor_set(x_498, 1, x_497); +lean_ctor_set(x_483, 0, x_498); +return x_483; } else { -lean_object* x_497; lean_object* x_498; lean_object* x_499; lean_object* x_500; lean_object* x_501; lean_object* x_502; uint8_t x_503; lean_object* x_504; lean_object* x_505; lean_object* x_506; lean_object* x_507; lean_object* x_508; -x_497 = lean_ctor_get(x_481, 0); -lean_inc(x_497); -lean_dec(x_481); -x_498 = lean_ctor_get(x_480, 0); -lean_inc(x_498); -x_499 = lean_ctor_get(x_497, 0); +lean_object* x_499; lean_object* x_500; lean_object* x_501; lean_object* x_502; lean_object* x_503; lean_object* x_504; uint8_t x_505; lean_object* x_506; lean_object* x_507; lean_object* x_508; lean_object* x_509; lean_object* x_510; +x_499 = lean_ctor_get(x_483, 0); lean_inc(x_499); -x_500 = l_Lean_Parser_sepByInfo(x_498, x_499); -x_501 = lean_ctor_get(x_480, 1); +lean_dec(x_483); +x_500 = lean_ctor_get(x_482, 0); +lean_inc(x_500); +x_501 = lean_ctor_get(x_499, 0); lean_inc(x_501); -lean_dec(x_480); -x_502 = lean_ctor_get(x_497, 1); -lean_inc(x_502); -lean_dec(x_497); -x_503 = 0; -x_504 = lean_box(x_2); -x_505 = lean_box(x_503); -x_506 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); -lean_closure_set(x_506, 0, x_504); -lean_closure_set(x_506, 1, x_505); -lean_closure_set(x_506, 2, x_501); -lean_closure_set(x_506, 3, x_502); -x_507 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_507, 0, x_500); -lean_ctor_set(x_507, 1, x_506); -x_508 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_508, 0, x_507); -return x_508; +x_502 = l_Lean_Parser_sepByInfo(x_500, x_501); +x_503 = lean_ctor_get(x_482, 1); +lean_inc(x_503); +lean_dec(x_482); +x_504 = lean_ctor_get(x_499, 1); +lean_inc(x_504); +lean_dec(x_499); +x_505 = 0; +x_506 = lean_box(x_2); +x_507 = lean_box(x_505); +x_508 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); +lean_closure_set(x_508, 0, x_506); +lean_closure_set(x_508, 1, x_507); +lean_closure_set(x_508, 2, x_503); +lean_closure_set(x_508, 3, x_504); +x_509 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_509, 0, x_502); +lean_ctor_set(x_509, 1, x_508); +x_510 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_510, 0, x_509); +return x_510; } } } } case 8: { -lean_object* x_509; lean_object* x_510; lean_object* x_511; -x_509 = lean_ctor_get(x_3, 0); -lean_inc(x_509); -x_510 = lean_ctor_get(x_3, 1); -lean_inc(x_510); +lean_object* x_511; lean_object* x_512; lean_object* x_513; +x_511 = lean_ctor_get(x_3, 0); +lean_inc(x_511); +x_512 = lean_ctor_get(x_3, 1); +lean_inc(x_512); lean_dec(x_3); lean_inc(x_1); -x_511 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_509); -if (lean_obj_tag(x_511) == 0) +x_513 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_511); +if (lean_obj_tag(x_513) == 0) { -uint8_t x_512; -lean_dec(x_510); +uint8_t x_514; +lean_dec(x_512); lean_dec(x_1); -x_512 = !lean_is_exclusive(x_511); -if (x_512 == 0) +x_514 = !lean_is_exclusive(x_513); +if (x_514 == 0) { -return x_511; -} -else -{ -lean_object* x_513; lean_object* x_514; -x_513 = lean_ctor_get(x_511, 0); -lean_inc(x_513); -lean_dec(x_511); -x_514 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_514, 0, x_513); -return x_514; -} +return x_513; } else { lean_object* x_515; lean_object* x_516; -x_515 = lean_ctor_get(x_511, 0); +x_515 = lean_ctor_get(x_513, 0); lean_inc(x_515); -lean_dec(x_511); -x_516 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_510); -if (lean_obj_tag(x_516) == 0) -{ -uint8_t x_517; -lean_dec(x_515); -x_517 = !lean_is_exclusive(x_516); -if (x_517 == 0) -{ +lean_dec(x_513); +x_516 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_516, 0, x_515); return x_516; } +} else { -lean_object* x_518; lean_object* x_519; -x_518 = lean_ctor_get(x_516, 0); -lean_inc(x_518); -lean_dec(x_516); -x_519 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_519, 0, x_518); -return x_519; +lean_object* x_517; lean_object* x_518; +x_517 = lean_ctor_get(x_513, 0); +lean_inc(x_517); +lean_dec(x_513); +x_518 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_512); +if (lean_obj_tag(x_518) == 0) +{ +uint8_t x_519; +lean_dec(x_517); +x_519 = !lean_is_exclusive(x_518); +if (x_519 == 0) +{ +return x_518; +} +else +{ +lean_object* x_520; lean_object* x_521; +x_520 = lean_ctor_get(x_518, 0); +lean_inc(x_520); +lean_dec(x_518); +x_521 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_521, 0, x_520); +return x_521; } } else { -uint8_t x_520; -x_520 = !lean_is_exclusive(x_516); -if (x_520 == 0) +uint8_t x_522; +x_522 = !lean_is_exclusive(x_518); +if (x_522 == 0) { -lean_object* x_521; lean_object* x_522; lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; uint8_t x_527; lean_object* x_528; lean_object* x_529; lean_object* x_530; lean_object* x_531; -x_521 = lean_ctor_get(x_516, 0); -x_522 = lean_ctor_get(x_515, 0); -lean_inc(x_522); -x_523 = lean_ctor_get(x_521, 0); -lean_inc(x_523); -x_524 = l_Lean_Parser_sepBy1Info(x_522, x_523); -x_525 = lean_ctor_get(x_515, 1); +lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; lean_object* x_527; lean_object* x_528; uint8_t x_529; lean_object* x_530; lean_object* x_531; lean_object* x_532; lean_object* x_533; lean_object* x_534; +x_523 = lean_ctor_get(x_518, 0); +x_524 = lean_ctor_get(x_517, 0); +lean_inc(x_524); +x_525 = lean_ctor_get(x_523, 0); lean_inc(x_525); -lean_dec(x_515); -x_526 = lean_ctor_get(x_521, 1); -lean_inc(x_526); -lean_dec(x_521); -x_527 = 0; -x_528 = lean_box(x_2); -x_529 = lean_box(x_527); -x_530 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_530, 0, x_528); -lean_closure_set(x_530, 1, x_529); -lean_closure_set(x_530, 2, x_525); -lean_closure_set(x_530, 3, x_526); -x_531 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_531, 0, x_524); -lean_ctor_set(x_531, 1, x_530); -lean_ctor_set(x_516, 0, x_531); -return x_516; +x_526 = l_Lean_Parser_sepBy1Info(x_524, x_525); +x_527 = lean_ctor_get(x_517, 1); +lean_inc(x_527); +lean_dec(x_517); +x_528 = lean_ctor_get(x_523, 1); +lean_inc(x_528); +lean_dec(x_523); +x_529 = 0; +x_530 = lean_box(x_2); +x_531 = lean_box(x_529); +x_532 = lean_box(x_529); +x_533 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); +lean_closure_set(x_533, 0, x_530); +lean_closure_set(x_533, 1, x_531); +lean_closure_set(x_533, 2, x_527); +lean_closure_set(x_533, 3, x_528); +lean_closure_set(x_533, 4, x_532); +x_534 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_534, 0, x_526); +lean_ctor_set(x_534, 1, x_533); +lean_ctor_set(x_518, 0, x_534); +return x_518; } else { -lean_object* x_532; lean_object* x_533; lean_object* x_534; lean_object* x_535; lean_object* x_536; lean_object* x_537; uint8_t x_538; lean_object* x_539; lean_object* x_540; lean_object* x_541; lean_object* x_542; lean_object* x_543; -x_532 = lean_ctor_get(x_516, 0); -lean_inc(x_532); -lean_dec(x_516); -x_533 = lean_ctor_get(x_515, 0); -lean_inc(x_533); -x_534 = lean_ctor_get(x_532, 0); -lean_inc(x_534); -x_535 = l_Lean_Parser_sepBy1Info(x_533, x_534); -x_536 = lean_ctor_get(x_515, 1); +lean_object* x_535; lean_object* x_536; lean_object* x_537; lean_object* x_538; lean_object* x_539; lean_object* x_540; uint8_t x_541; lean_object* x_542; lean_object* x_543; lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; +x_535 = lean_ctor_get(x_518, 0); +lean_inc(x_535); +lean_dec(x_518); +x_536 = lean_ctor_get(x_517, 0); lean_inc(x_536); -lean_dec(x_515); -x_537 = lean_ctor_get(x_532, 1); +x_537 = lean_ctor_get(x_535, 0); lean_inc(x_537); -lean_dec(x_532); -x_538 = 0; -x_539 = lean_box(x_2); -x_540 = lean_box(x_538); -x_541 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_541, 0, x_539); -lean_closure_set(x_541, 1, x_540); -lean_closure_set(x_541, 2, x_536); -lean_closure_set(x_541, 3, x_537); -x_542 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_542, 0, x_535); -lean_ctor_set(x_542, 1, x_541); -x_543 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_543, 0, x_542); -return x_543; +x_538 = l_Lean_Parser_sepBy1Info(x_536, x_537); +x_539 = lean_ctor_get(x_517, 1); +lean_inc(x_539); +lean_dec(x_517); +x_540 = lean_ctor_get(x_535, 1); +lean_inc(x_540); +lean_dec(x_535); +x_541 = 0; +x_542 = lean_box(x_2); +x_543 = lean_box(x_541); +x_544 = lean_box(x_541); +x_545 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); +lean_closure_set(x_545, 0, x_542); +lean_closure_set(x_545, 1, x_543); +lean_closure_set(x_545, 2, x_539); +lean_closure_set(x_545, 3, x_540); +lean_closure_set(x_545, 4, x_544); +x_546 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_546, 0, x_538); +lean_ctor_set(x_546, 1, x_545); +x_547 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_547, 0, x_546); +return x_547; } } } } case 9: { -lean_object* x_544; lean_object* x_545; lean_object* x_546; -x_544 = lean_ctor_get(x_3, 0); -lean_inc(x_544); -x_545 = lean_ctor_get(x_3, 1); -lean_inc(x_545); -lean_dec(x_3); -x_546 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_545); -if (lean_obj_tag(x_546) == 0) -{ -uint8_t x_547; -lean_dec(x_544); -x_547 = !lean_is_exclusive(x_546); -if (x_547 == 0) -{ -return x_546; -} -else -{ -lean_object* x_548; lean_object* x_549; -x_548 = lean_ctor_get(x_546, 0); +lean_object* x_548; lean_object* x_549; lean_object* x_550; +x_548 = lean_ctor_get(x_3, 0); lean_inc(x_548); -lean_dec(x_546); -x_549 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_549, 0, x_548); -return x_549; -} +x_549 = lean_ctor_get(x_3, 1); +lean_inc(x_549); +lean_dec(x_3); +x_550 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_549); +if (lean_obj_tag(x_550) == 0) +{ +uint8_t x_551; +lean_dec(x_548); +x_551 = !lean_is_exclusive(x_550); +if (x_551 == 0) +{ +return x_550; } else { -uint8_t x_550; -x_550 = !lean_is_exclusive(x_546); -if (x_550 == 0) -{ -lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; lean_object* x_555; lean_object* x_556; -x_551 = lean_ctor_get(x_546, 0); -x_552 = lean_ctor_get(x_551, 0); +lean_object* x_552; lean_object* x_553; +x_552 = lean_ctor_get(x_550, 0); lean_inc(x_552); -lean_inc(x_544); -x_553 = l_Lean_Parser_nodeInfo(x_544, x_552); -x_554 = lean_ctor_get(x_551, 1); -lean_inc(x_554); -lean_dec(x_551); -x_555 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_555, 0, x_544); -lean_closure_set(x_555, 1, x_554); -x_556 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_556, 0, x_553); -lean_ctor_set(x_556, 1, x_555); -lean_ctor_set(x_546, 0, x_556); -return x_546; +lean_dec(x_550); +x_553 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_553, 0, x_552); +return x_553; +} } else { -lean_object* x_557; lean_object* x_558; lean_object* x_559; lean_object* x_560; lean_object* x_561; lean_object* x_562; lean_object* x_563; -x_557 = lean_ctor_get(x_546, 0); -lean_inc(x_557); -lean_dec(x_546); -x_558 = lean_ctor_get(x_557, 0); +uint8_t x_554; +x_554 = !lean_is_exclusive(x_550); +if (x_554 == 0) +{ +lean_object* x_555; lean_object* x_556; lean_object* x_557; lean_object* x_558; lean_object* x_559; lean_object* x_560; +x_555 = lean_ctor_get(x_550, 0); +x_556 = lean_ctor_get(x_555, 0); +lean_inc(x_556); +lean_inc(x_548); +x_557 = l_Lean_Parser_nodeInfo(x_548, x_556); +x_558 = lean_ctor_get(x_555, 1); lean_inc(x_558); -lean_inc(x_544); -x_559 = l_Lean_Parser_nodeInfo(x_544, x_558); -x_560 = lean_ctor_get(x_557, 1); -lean_inc(x_560); -lean_dec(x_557); -x_561 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_561, 0, x_544); -lean_closure_set(x_561, 1, x_560); -x_562 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_562, 0, x_559); -lean_ctor_set(x_562, 1, x_561); -x_563 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_563, 0, x_562); -return x_563; +lean_dec(x_555); +x_559 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_559, 0, x_548); +lean_closure_set(x_559, 1, x_558); +x_560 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_560, 0, x_557); +lean_ctor_set(x_560, 1, x_559); +lean_ctor_set(x_550, 0, x_560); +return x_550; +} +else +{ +lean_object* x_561; lean_object* x_562; lean_object* x_563; lean_object* x_564; lean_object* x_565; lean_object* x_566; lean_object* x_567; +x_561 = lean_ctor_get(x_550, 0); +lean_inc(x_561); +lean_dec(x_550); +x_562 = lean_ctor_get(x_561, 0); +lean_inc(x_562); +lean_inc(x_548); +x_563 = l_Lean_Parser_nodeInfo(x_548, x_562); +x_564 = lean_ctor_get(x_561, 1); +lean_inc(x_564); +lean_dec(x_561); +x_565 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_565, 0, x_548); +lean_closure_set(x_565, 1, x_564); +x_566 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_566, 0, x_563); +lean_ctor_set(x_566, 1, x_565); +x_567 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_567, 0, x_566); +return x_567; } } } case 10: { -lean_object* x_564; lean_object* x_565; lean_object* x_566; lean_object* x_567; lean_object* x_568; lean_object* x_569; lean_object* x_570; +lean_object* x_568; lean_object* x_569; lean_object* x_570; lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; lean_dec(x_1); -x_564 = lean_ctor_get(x_3, 0); -lean_inc(x_564); -x_565 = lean_ctor_get(x_3, 1); -lean_inc(x_565); +x_568 = lean_ctor_get(x_3, 0); +lean_inc(x_568); +x_569 = lean_ctor_get(x_3, 1); +lean_inc(x_569); lean_dec(x_3); -x_566 = l_String_trim(x_564); -lean_dec(x_564); -lean_inc(x_566); -x_567 = l_Lean_Parser_symbolInfo(x_566, x_565); -x_568 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); -lean_closure_set(x_568, 0, x_566); -x_569 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_569, 0, x_567); -lean_ctor_set(x_569, 1, x_568); -x_570 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_570, 0, x_569); -return x_570; +x_570 = l_String_trim(x_568); +lean_dec(x_568); +lean_inc(x_570); +x_571 = l_Lean_Parser_symbolInfo(x_570, x_569); +x_572 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); +lean_closure_set(x_572, 0, x_570); +x_573 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_573, 0, x_571); +lean_ctor_set(x_573, 1, x_572); +x_574 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_574, 0, x_573); +return x_574; } case 12: { -lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; lean_object* x_575; +lean_object* x_575; lean_object* x_576; lean_object* x_577; lean_object* x_578; lean_object* x_579; lean_dec(x_3); lean_dec(x_1); -x_571 = lean_box(x_2); -x_572 = lean_alloc_closure((void*)(l_Lean_Parser_numLitFn___boxed), 2, 1); -lean_closure_set(x_572, 0, x_571); -x_573 = l_Lean_Parser_numLit___closed__1; -x_574 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_574, 0, x_573); -lean_ctor_set(x_574, 1, x_572); -x_575 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_575, 0, x_574); -return x_575; +x_575 = lean_box(x_2); +x_576 = lean_alloc_closure((void*)(l_Lean_Parser_numLitFn___boxed), 2, 1); +lean_closure_set(x_576, 0, x_575); +x_577 = l_Lean_Parser_numLit___closed__1; +x_578 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_578, 0, x_577); +lean_ctor_set(x_578, 1, x_576); +x_579 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_579, 0, x_578); +return x_579; } case 13: { -lean_object* x_576; lean_object* x_577; lean_object* x_578; lean_object* x_579; lean_object* x_580; +lean_object* x_580; lean_object* x_581; lean_object* x_582; lean_object* x_583; lean_object* x_584; lean_dec(x_3); lean_dec(x_1); -x_576 = lean_box(x_2); -x_577 = lean_alloc_closure((void*)(l_Lean_Parser_strLitFn___boxed), 2, 1); -lean_closure_set(x_577, 0, x_576); -x_578 = l_Lean_Parser_strLit___closed__1; -x_579 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_579, 0, x_578); -lean_ctor_set(x_579, 1, x_577); -x_580 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_580, 0, x_579); -return x_580; +x_580 = lean_box(x_2); +x_581 = lean_alloc_closure((void*)(l_Lean_Parser_strLitFn___boxed), 2, 1); +lean_closure_set(x_581, 0, x_580); +x_582 = l_Lean_Parser_strLit___closed__1; +x_583 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_583, 0, x_582); +lean_ctor_set(x_583, 1, x_581); +x_584 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_584, 0, x_583); +return x_584; } case 14: { -lean_object* x_581; lean_object* x_582; lean_object* x_583; lean_object* x_584; lean_object* x_585; +lean_object* x_585; lean_object* x_586; lean_object* x_587; lean_object* x_588; lean_object* x_589; lean_dec(x_3); lean_dec(x_1); -x_581 = lean_box(x_2); -x_582 = lean_alloc_closure((void*)(l_Lean_Parser_charLitFn___boxed), 2, 1); -lean_closure_set(x_582, 0, x_581); -x_583 = l_Lean_Parser_charLit___closed__1; -x_584 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_584, 0, x_583); -lean_ctor_set(x_584, 1, x_582); -x_585 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_585, 0, x_584); -return x_585; +x_585 = lean_box(x_2); +x_586 = lean_alloc_closure((void*)(l_Lean_Parser_charLitFn___boxed), 2, 1); +lean_closure_set(x_586, 0, x_585); +x_587 = l_Lean_Parser_charLit___closed__1; +x_588 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_588, 0, x_587); +lean_ctor_set(x_588, 1, x_586); +x_589 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_589, 0, x_588); +return x_589; } case 15: { -lean_object* x_586; lean_object* x_587; lean_object* x_588; lean_object* x_589; lean_object* x_590; +lean_object* x_590; lean_object* x_591; lean_object* x_592; lean_object* x_593; lean_object* x_594; lean_dec(x_3); lean_dec(x_1); -x_586 = lean_box(x_2); -x_587 = lean_alloc_closure((void*)(l_Lean_Parser_identFn___boxed), 2, 1); -lean_closure_set(x_587, 0, x_586); -x_588 = l_Lean_Parser_identNoAntiquot___closed__1; -x_589 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_589, 0, x_588); -lean_ctor_set(x_589, 1, x_587); -x_590 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_590, 0, x_589); -return x_590; +x_590 = lean_box(x_2); +x_591 = lean_alloc_closure((void*)(l_Lean_Parser_identFn___boxed), 2, 1); +lean_closure_set(x_591, 0, x_590); +x_592 = l_Lean_Parser_identNoAntiquot___closed__1; +x_593 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_593, 0, x_592); +lean_ctor_set(x_593, 1, x_591); +x_594 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_594, 0, x_593); +return x_594; } case 16: { -lean_object* x_591; +lean_object* x_595; lean_dec(x_1); -x_591 = l_Lean_Parser_compileParserDescr___main___closed__1; -return x_591; +x_595 = l_Lean_Parser_compileParserDescr___main___closed__1; +return x_595; } default: { -lean_object* x_592; lean_object* x_593; lean_object* x_594; -x_592 = lean_ctor_get(x_3, 0); -lean_inc(x_592); -x_593 = lean_ctor_get(x_3, 1); -lean_inc(x_593); +lean_object* x_596; lean_object* x_597; lean_object* x_598; +x_596 = lean_ctor_get(x_3, 0); +lean_inc(x_596); +x_597 = lean_ctor_get(x_3, 1); +lean_inc(x_597); lean_dec(x_3); -x_594 = l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1(x_1, x_592); -if (lean_obj_tag(x_594) == 0) +x_598 = l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1(x_1, x_596); +if (lean_obj_tag(x_598) == 0) { -lean_object* x_595; -lean_dec(x_593); -x_595 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_592); -return x_595; +lean_object* x_599; +lean_dec(x_597); +x_599 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_596); +return x_599; } else { -lean_object* x_596; lean_object* x_597; -lean_dec(x_594); -x_596 = l_Lean_Parser_categoryParser(x_2, x_592, x_593); -x_597 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_597, 0, x_596); -return x_597; +lean_object* x_600; lean_object* x_601; +lean_dec(x_598); +x_600 = l_Lean_Parser_categoryParser(x_2, x_596, x_597); +x_601 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_601, 0, x_600); +return x_601; } } } diff --git a/stage0/stdlib/Init/Lean/Parser/Tactic.c b/stage0/stdlib/Init/Lean/Parser/Tactic.c index 93e9cb3c9f..a5a47f8596 100644 --- a/stage0/stdlib/Init/Lean/Parser/Tactic.c +++ b/stage0/stdlib/Init/Lean/Parser/Tactic.c @@ -21,12 +21,13 @@ lean_object* l_Lean_Parser_Tactic_orelse___closed__2; lean_object* l_Lean_Parser_Tactic_intros___closed__7; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_tacticStxQuot___closed__4; +lean_object* l_Lean_Parser_Term_tacticStxQuot___closed__7; +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4; extern lean_object* l_Lean_Parser_manyAux___main___closed__1; extern lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; lean_object* l_Lean_Parser_Term_tacticStxQuot___closed__5; lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_have___elambda__1___closed__7; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__7; lean_object* l_Lean_Parser_Tactic_apply___closed__2; lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__1; lean_object* l_Lean_Parser_sepByInfo(lean_object*, lean_object*); @@ -40,10 +41,10 @@ lean_object* l_Lean_Parser_Tactic_orelse___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__2; extern lean_object* l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___boxed(lean_object*); +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__1; +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_seq; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_intro___closed__4; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__3; lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -53,7 +54,6 @@ lean_object* l_Lean_Parser_Term_tacticBlock___closed__3; lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__7; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_nestedTacticBlock(lean_object*); lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__6; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__4; extern lean_object* l_Lean_Parser_Term_have___closed__3; lean_object* l_Lean_Parser_ParserState_pushSyntax(lean_object*, lean_object*); @@ -77,6 +77,7 @@ lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__9; lean_object* l_Lean_Parser_Term_tacticBlock___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_addBuiltinParser(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__3; lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*); @@ -120,6 +121,7 @@ lean_object* l_Lean_Parser_nodeInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_seq___closed__3; lean_object* l_Lean_Parser_Tactic_assumption___closed__1; lean_object* l_Lean_Parser_Tactic_apply___closed__3; +lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; lean_object* l_Lean_Parser_noFirstTokenInfo(lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolInfo(lean_object*, uint8_t); @@ -164,14 +166,17 @@ lean_object* l_Lean_Parser_registerBuiltinParserAttribute(lean_object*, lean_obj lean_object* l_Lean_Parser_Term_tacticBlock___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock; extern lean_object* l_Lean_Parser_Term_explicitUniv___closed__4; +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_tacticBlock___closed__2; +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_apply; lean_object* l_Lean_Parser_Tactic_assumption___closed__5; lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7; lean_object* l_Lean_Parser_ParserState_popSyntax(lean_object*); extern lean_object* l_Lean_Parser_Level_paren___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot___closed__1; @@ -184,14 +189,14 @@ lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elamb lean_object* l_Lean_Parser_categoryParserFn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_intros___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot___closed__2; +lean_object* l_Lean_Parser_sepBy1Info(lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tacticStxQuot___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__5; extern lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__4; lean_object* l_Lean_Parser_Tactic_underscoreFn(uint8_t, lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__2; lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__1; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Tactic_underscoreFn___rarg___closed__3; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2; lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParser(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__4; @@ -204,7 +209,6 @@ lean_object* l_Lean_Parser_Tactic_orelse___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__4; lean_object* l_Lean_Parser_Tactic_assumption___closed__3; lean_object* l_Lean_Parser_Term_tacticBlock___closed__4; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__4; lean_object* l_Lean_Parser_Term_tacticBlock___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__8; lean_object* l_Lean_Parser_Term_tacticBlock; @@ -213,18 +217,17 @@ lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__3; lean_object* l_Lean_Parser_Tactic_intro___closed__6; lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__4; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_intros; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__5; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1(lean_object*); -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__6; +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_String_trim(lean_object*); extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__8; -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__5; lean_object* l_Lean_Parser_Tactic_apply___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_assumption(lean_object*); extern lean_object* l_Lean_Parser_Term_typeAscription___closed__2; +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_seq___closed__2; lean_object* l_Lean_Parser_Tactic_apply___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__2; @@ -265,6 +268,7 @@ lean_object* l_Lean_Parser_Tactic_seq___elambda__1(lean_object*, lean_object*, l lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tacticStxQuot___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_seq___closed__4; extern lean_object* l_Lean_Parser_Level_paren___closed__1; uint8_t lean_string_dec_eq(lean_object*, lean_object*); @@ -618,142 +622,200 @@ x_1 = l_Lean_Parser_Tactic_ident_x27___closed__3; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -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; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -x_11 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; -x_12 = lean_unsigned_to_nat(0u); -lean_inc(x_6); -x_13 = l_Lean_Parser_categoryParserFn(x_11, x_12, x_6, x_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_25; lean_object* x_26; -lean_dec(x_10); +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_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_15 = lean_ctor_get(x_13, 0); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +x_12 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; +x_13 = lean_unsigned_to_nat(0u); +lean_inc(x_7); +x_14 = l_Lean_Parser_categoryParserFn(x_12, x_13, x_7, x_8); +x_15 = lean_ctor_get(x_14, 3); lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_inc(x_6); -x_25 = l_Lean_Parser_tokenFn(x_6, x_13); -x_26 = lean_ctor_get(x_25, 3); -lean_inc(x_26); -if (lean_obj_tag(x_26) == 0) +if (lean_obj_tag(x_15) == 0) { -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_25, 0); -lean_inc(x_27); -x_28 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_27); -lean_dec(x_27); -if (lean_obj_tag(x_28) == 2) -{ -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_28, 1); -lean_inc(x_29); -lean_dec(x_28); -x_30 = l_Lean_Parser_Term_have___elambda__1___closed__7; -x_31 = lean_string_dec_eq(x_29, x_30); -lean_dec(x_29); -if (x_31 == 0) -{ -lean_object* x_32; lean_object* x_33; -x_32 = l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_17); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); -x_18 = x_33; -goto block_24; -} -else -{ -x_18 = x_25; -goto block_24; -} -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_28); -x_34 = l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_17); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); -x_18 = x_35; -goto block_24; -} -} -else -{ -lean_object* x_36; lean_object* x_37; -lean_dec(x_26); -x_36 = l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_17); -x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); -x_18 = x_37; -goto block_24; -} -block_24: -{ -lean_object* x_19; -x_19 = lean_ctor_get(x_18, 3); -lean_inc(x_19); -if (lean_obj_tag(x_19) == 0) -{ -lean_dec(x_17); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_33; lean_object* x_34; +lean_dec(x_11); +lean_dec(x_10); +x_16 = lean_ctor_get(x_14, 0); +lean_inc(x_16); +x_17 = lean_array_get_size(x_16); lean_dec(x_16); +x_18 = lean_ctor_get(x_14, 1); +lean_inc(x_18); +lean_inc(x_7); +x_33 = l_Lean_Parser_tokenFn(x_7, x_14); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +if (lean_obj_tag(x_34) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_18; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_33, 0); +lean_inc(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +lean_dec(x_35); +if (lean_obj_tag(x_36) == 2) +{ +lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_37 = lean_ctor_get(x_36, 1); +lean_inc(x_37); +lean_dec(x_36); +x_38 = l_Lean_Parser_Term_have___elambda__1___closed__7; +x_39 = lean_string_dec_eq(x_37, x_38); +lean_dec(x_37); +if (x_39 == 0) +{ +lean_object* x_40; lean_object* x_41; +x_40 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_18); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_40, x_18); +x_19 = x_41; +goto block_32; +} +else +{ +x_19 = x_33; +goto block_32; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_36); +x_42 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_18); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_42, x_18); +x_19 = x_43; +goto block_32; +} +} +else +{ +lean_object* x_44; lean_object* x_45; +lean_dec(x_34); +x_44 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_18); +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_44, x_18); +x_19 = x_45; +goto block_32; +} +block_32: +{ +lean_object* x_20; +x_20 = lean_ctor_get(x_19, 3); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) +{ +lean_dec(x_18); +lean_dec(x_17); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_19; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_19); -lean_dec(x_6); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); -lean_dec(x_16); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; -} -} +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_dec(x_20); +lean_dec(x_7); +x_22 = l_Lean_Parser_ParserState_restore(x_19, x_17, x_18); +lean_dec(x_17); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_array_get_size(x_23); +lean_dec(x_23); +x_25 = lean_nat_sub(x_24, x_3); +lean_dec(x_24); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_dec_eq(x_25, x_26); +lean_dec(x_25); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_22, x_28, x_3); +return x_29; } else { -lean_dec(x_14); -lean_dec(x_6); if (x_4 == 0) { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_dec(x_10); -lean_dec(x_9); -x_38 = lean_box(0); -x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); -return x_41; +lean_object* x_30; lean_object* x_31; +x_30 = l_Lean_nullKind; +x_31 = l_Lean_Parser_ParserState_mkNode(x_22, x_30, x_3); +return x_31; } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); -lean_dec(x_9); -x_43 = l_Lean_nullKind; -x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); -return x_44; +lean_dec(x_3); +return x_22; +} +} +} +} +} +else +{ +lean_dec(x_15); +lean_dec(x_7); +if (x_5 == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +lean_dec(x_11); +lean_dec(x_10); +x_46 = lean_box(0); +x_47 = l_Lean_Parser_ParserState_pushSyntax(x_14, x_46); +x_48 = l_Lean_nullKind; +x_49 = l_Lean_Parser_ParserState_mkNode(x_47, x_48, x_3); +return x_49; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_50 = l_Lean_Parser_ParserState_restore(x_14, x_10, x_11); +lean_dec(x_10); +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_array_get_size(x_51); +lean_dec(x_51); +x_53 = lean_nat_sub(x_52, x_3); +lean_dec(x_52); +x_54 = lean_unsigned_to_nat(2u); +x_55 = lean_nat_dec_eq(x_53, x_54); +lean_dec(x_53); +if (x_55 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_50, x_56, x_3); +return x_57; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_58; lean_object* x_59; +x_58 = l_Lean_nullKind; +x_59 = l_Lean_Parser_ParserState_mkNode(x_50, x_58, x_3); +return x_59; +} +else +{ +lean_object* x_60; +lean_dec(x_3); +x_60 = l_Lean_Parser_ParserState_popSyntax(x_50); +return x_60; +} +} } } } @@ -761,14 +823,15 @@ return x_44; lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; +lean_object* x_6; lean_object* x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; 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 = 1; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +x_8 = 0; +x_9 = 1; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_9, x_3, x_4, x_5); +return x_10; } } lean_object* _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__1() { @@ -962,19 +1025,21 @@ x_1 = l_Lean_Parser_Tactic_seq___closed__6; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_12 = lean_unbox(x_5); lean_dec(x_5); -return x_11; +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +lean_dec(x_6); +return x_13; } } lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -3485,7 +3550,20 @@ x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); return x_6; } } -lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__1() { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tacticStxQuot___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +x_9 = 0; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(x_1, x_2, x_8, x_3, x_9, x_4, x_5, x_6); +return x_10; +} +} +lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__1() { _start: { lean_object* x_1; @@ -3493,17 +3571,17 @@ x_1 = lean_mk_string("stxQuot"); return x_1; } } -lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2() { +lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__2; -x_2 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__1; +x_2 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__3() { +lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__3() { _start: { lean_object* x_1; @@ -3511,224 +3589,216 @@ x_1 = lean_mk_string("`(tactic|"); return x_1; } } -lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__4() { +lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__3; +x_1 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__3; x_2 = l_String_trim(x_1); return x_2; } } -lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__5() { +lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Char_HasRepr___closed__1; -x_2 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__4; +x_2 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4; x_3 = lean_string_append(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__6() { +lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__5; +x_1 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__5; x_2 = l_Char_HasRepr___closed__1; x_3 = lean_string_append(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__7() { +lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__6; +x_2 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__6; 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_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_38; lean_object* x_39; lean_object* x_40; -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_38 = lean_ctor_get(x_2, 1); -lean_inc(x_38); -lean_inc(x_1); -x_39 = l_Lean_Parser_tokenFn(x_1, x_2); -x_40 = lean_ctor_get(x_39, 3); -lean_inc(x_40); -if (lean_obj_tag(x_40) == 0) -{ -lean_object* x_41; lean_object* x_42; -x_41 = lean_ctor_get(x_39, 0); +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_39; lean_object* x_40; lean_object* x_41; +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_39 = lean_ctor_get(x_3, 1); +lean_inc(x_39); +lean_inc(x_2); +x_40 = l_Lean_Parser_tokenFn(x_2, x_3); +x_41 = lean_ctor_get(x_40, 3); lean_inc(x_41); -x_42 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_41); -lean_dec(x_41); -if (lean_obj_tag(x_42) == 2) +if (lean_obj_tag(x_41) == 0) { -lean_object* x_43; lean_object* x_44; uint8_t x_45; -x_43 = lean_ctor_get(x_42, 1); -lean_inc(x_43); +lean_object* x_42; lean_object* x_43; +x_42 = lean_ctor_get(x_40, 0); +lean_inc(x_42); +x_43 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_42); lean_dec(x_42); -x_44 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__4; -x_45 = lean_string_dec_eq(x_43, x_44); +if (lean_obj_tag(x_43) == 2) +{ +lean_object* x_44; lean_object* x_45; uint8_t x_46; +x_44 = lean_ctor_get(x_43, 1); +lean_inc(x_44); lean_dec(x_43); -if (x_45 == 0) +x_45 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4; +x_46 = lean_string_dec_eq(x_44, x_45); +lean_dec(x_44); +if (x_46 == 0) { -lean_object* x_46; lean_object* x_47; -x_46 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__7; -x_47 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_46, x_38); -x_5 = x_47; -goto block_37; +lean_object* x_47; lean_object* x_48; +x_47 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7; +x_48 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_47, x_39); +x_6 = x_48; +goto block_38; } else { -lean_dec(x_38); -x_5 = x_39; -goto block_37; +lean_dec(x_39); +x_6 = x_40; +goto block_38; } } else { -lean_object* x_48; lean_object* x_49; -lean_dec(x_42); -x_48 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__7; -x_49 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_48, x_38); -x_5 = x_49; -goto block_37; +lean_object* x_49; lean_object* x_50; +lean_dec(x_43); +x_49 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7; +x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_49, x_39); +x_6 = x_50; +goto block_38; } } else { -lean_object* x_50; lean_object* x_51; -lean_dec(x_40); -x_50 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__7; -x_51 = l_Lean_Parser_ParserState_mkErrorsAt(x_39, x_50, x_38); -x_5 = x_51; -goto block_37; +lean_object* x_51; lean_object* x_52; +lean_dec(x_41); +x_51 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7; +x_52 = l_Lean_Parser_ParserState_mkErrorsAt(x_40, x_51, x_39); +x_6 = x_52; +goto block_38; } -block_37: +block_38: { -lean_object* x_6; -x_6 = lean_ctor_get(x_5, 3); -lean_inc(x_6); -if (lean_obj_tag(x_6) == 0) +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_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -x_7 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; -x_8 = lean_unsigned_to_nat(0u); -lean_inc(x_1); -x_9 = l_Lean_Parser_categoryParserFn(x_7, x_8, x_1, x_5); -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_object* x_13; -x_11 = lean_ctor_get(x_9, 1); +uint8_t x_8; uint8_t x_9; lean_object* x_10; lean_object* x_11; +x_8 = 0; +x_9 = 1; +lean_inc(x_2); +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tacticStxQuot___elambda__1___spec__1(x_8, x_9, x_9, x_1, x_2, x_6); +x_11 = lean_ctor_get(x_10, 3); lean_inc(x_11); -x_12 = l_Lean_Parser_tokenFn(x_1, x_9); -x_13 = lean_ctor_get(x_12, 3); -lean_inc(x_13); -if (lean_obj_tag(x_13) == 0) +if (lean_obj_tag(x_11) == 0) { -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_12, 0); +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +x_13 = l_Lean_Parser_tokenFn(x_2, x_10); +x_14 = lean_ctor_get(x_13, 3); lean_inc(x_14); -x_15 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_14); -lean_dec(x_14); -if (lean_obj_tag(x_15) == 2) +if (lean_obj_tag(x_14) == 0) { -lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_16 = lean_ctor_get(x_15, 1); -lean_inc(x_16); +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 0); +lean_inc(x_15); +x_16 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_15); lean_dec(x_15); -x_17 = l_Lean_Parser_Level_paren___elambda__1___closed__8; -x_18 = lean_string_dec_eq(x_16, x_17); +if (lean_obj_tag(x_16) == 2) +{ +lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_17 = lean_ctor_get(x_16, 1); +lean_inc(x_17); lean_dec(x_16); -if (x_18 == 0) +x_18 = l_Lean_Parser_Level_paren___elambda__1___closed__8; +x_19 = lean_string_dec_eq(x_17, x_18); +lean_dec(x_17); +if (x_19 == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = l_Lean_Parser_Level_paren___elambda__1___closed__11; -x_20 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_19, x_11); -x_21 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2; -x_22 = l_Lean_Parser_ParserState_mkNode(x_20, x_21, x_4); -return x_22; +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_20 = l_Lean_Parser_Level_paren___elambda__1___closed__11; +x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12); +x_22 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_5); +return x_23; } else { -lean_object* x_23; lean_object* x_24; +lean_object* x_24; lean_object* x_25; +lean_dec(x_12); +x_24 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2; +x_25 = l_Lean_Parser_ParserState_mkNode(x_13, x_24, x_5); +return x_25; +} +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_dec(x_16); +x_26 = l_Lean_Parser_Level_paren___elambda__1___closed__11; +x_27 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_26, x_12); +x_28 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_5); +return x_29; +} +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_14); +x_30 = l_Lean_Parser_Level_paren___elambda__1___closed__11; +x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_30, x_12); +x_32 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2; +x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_5); +return x_33; +} +} +else +{ +lean_object* x_34; lean_object* x_35; lean_dec(x_11); -x_23 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2; -x_24 = l_Lean_Parser_ParserState_mkNode(x_12, x_23, x_4); -return x_24; +lean_dec(x_2); +x_34 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_10, x_34, x_5); +return x_35; } } else { -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; -lean_dec(x_15); -x_25 = l_Lean_Parser_Level_paren___elambda__1___closed__11; -x_26 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_25, x_11); -x_27 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2; -x_28 = l_Lean_Parser_ParserState_mkNode(x_26, x_27, x_4); -return x_28; +lean_object* x_36; lean_object* x_37; +lean_dec(x_7); +lean_dec(x_2); +x_36 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2; +x_37 = l_Lean_Parser_ParserState_mkNode(x_6, x_36, x_5); +return x_37; } } -else -{ -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -lean_dec(x_13); -x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__11; -x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_12, x_29, x_11); -x_31 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2; -x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_4); -return x_32; -} -} -else -{ -lean_object* x_33; lean_object* x_34; -lean_dec(x_10); -lean_dec(x_1); -x_33 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_9, x_33, x_4); -return x_34; -} -} -else -{ -lean_object* x_35; lean_object* x_36; -lean_dec(x_6); -lean_dec(x_1); -x_35 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2; -x_36 = l_Lean_Parser_ParserState_mkNode(x_5, x_35, x_4); -return x_36; -} -} -} -} -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg), 2, 0); -return x_2; } } lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__4; +x_1 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4; x_2 = l_Lean_Parser_Level_paren___closed__1; x_3 = l_Lean_Parser_symbolInfo(x_1, x_2); return x_3; @@ -3741,8 +3811,8 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_seq___closed__1; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Level_paren___closed__4; -x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); +x_3 = l_Lean_Parser_Term_have___closed__3; +x_4 = l_Lean_Parser_sepBy1Info(x_2, x_3); return x_4; } } @@ -3750,8 +3820,8 @@ lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_tacticStxQuot___closed__1; -x_2 = l_Lean_Parser_Term_tacticStxQuot___closed__2; +x_1 = l_Lean_Parser_Term_tacticStxQuot___closed__2; +x_2 = l_Lean_Parser_Level_paren___closed__4; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } @@ -3760,26 +3830,36 @@ lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2; +x_1 = l_Lean_Parser_Term_tacticStxQuot___closed__1; x_2 = l_Lean_Parser_Term_tacticStxQuot___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; } } lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___closed__5() { _start: { -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_tacticStxQuot___elambda__1___boxed), 1, 0); -return x_1; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2; +x_2 = l_Lean_Parser_Term_tacticStxQuot___closed__4; +x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); +return x_3; } } lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___closed__6() { _start: { +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_tacticStxQuot___elambda__1___boxed), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Term_tacticStxQuot___closed__7() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_tacticStxQuot___closed__4; -x_2 = l_Lean_Parser_Term_tacticStxQuot___closed__5; +x_1 = l_Lean_Parser_Term_tacticStxQuot___closed__5; +x_2 = l_Lean_Parser_Term_tacticStxQuot___closed__6; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -3790,17 +3870,32 @@ lean_object* _init_l_Lean_Parser_Term_tacticStxQuot() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Term_tacticStxQuot___closed__6; +x_1 = l_Lean_Parser_Term_tacticStxQuot___closed__7; return x_1; } } -lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___boxed(lean_object* x_1) { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tacticStxQuot___elambda__1___spec__1___boxed(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_2; -x_2 = l_Lean_Parser_Term_tacticStxQuot___elambda__1(x_1); +uint8_t x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_unbox(x_1); lean_dec(x_1); -return x_2; +x_8 = lean_unbox(x_2); +lean_dec(x_2); +x_9 = lean_unbox(x_3); +lean_dec(x_3); +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tacticStxQuot___elambda__1___spec__1(x_7, x_8, x_9, x_4, x_5, x_6); +lean_dec(x_4); +return x_10; +} +} +lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Parser_Term_tacticStxQuot___elambda__1(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; } } lean_object* _init_l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot___closed__1() { @@ -4160,20 +4255,20 @@ lean_mark_persistent(l_Lean_Parser_Term_tacticBlock); res = l___regBuiltinParser_Lean_Parser_Term_tacticBlock(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__1 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__1(); -lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__1); -l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2(); -lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__2); -l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__3 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__3(); -lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__3); -l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__4 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__4(); -lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__4); -l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__5 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__5(); -lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__5); -l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__6 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__6(); -lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__6); -l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__7 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__7(); -lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___rarg___closed__7); +l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__1 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__1(); +lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__1); +l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2(); +lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__2); +l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__3 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__3(); +lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__3); +l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4(); +lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4); +l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__5 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__5(); +lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__5); +l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__6 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__6(); +lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__6); +l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7 = _init_l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7(); +lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7); l_Lean_Parser_Term_tacticStxQuot___closed__1 = _init_l_Lean_Parser_Term_tacticStxQuot___closed__1(); lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___closed__1); l_Lean_Parser_Term_tacticStxQuot___closed__2 = _init_l_Lean_Parser_Term_tacticStxQuot___closed__2(); @@ -4186,6 +4281,8 @@ l_Lean_Parser_Term_tacticStxQuot___closed__5 = _init_l_Lean_Parser_Term_tacticSt lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___closed__5); l_Lean_Parser_Term_tacticStxQuot___closed__6 = _init_l_Lean_Parser_Term_tacticStxQuot___closed__6(); lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___closed__6); +l_Lean_Parser_Term_tacticStxQuot___closed__7 = _init_l_Lean_Parser_Term_tacticStxQuot___closed__7(); +lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot___closed__7); l_Lean_Parser_Term_tacticStxQuot = _init_l_Lean_Parser_Term_tacticStxQuot(); lean_mark_persistent(l_Lean_Parser_Term_tacticStxQuot); l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot___closed__1 = _init_l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot___closed__1(); diff --git a/stage0/stdlib/Init/Lean/Parser/Term.c b/stage0/stdlib/Init/Lean/Parser/Term.c index ddae7e0691..9f22f01755 100644 --- a/stage0/stdlib/Init/Lean/Parser/Term.c +++ b/stage0/stdlib/Init/Lean/Parser/Term.c @@ -46,7 +46,7 @@ lean_object* l_Lean_Parser_Term_if___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_subst; lean_object* l_Lean_Parser_Term_quotedName___closed__4; lean_object* l_Lean_Parser_Term_andthen___elambda__1___closed__2; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__3; lean_object* l_Lean_Parser_Term_app___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_bindOp___elambda__1(lean_object*, lean_object*, lean_object*); @@ -92,14 +92,14 @@ lean_object* l_Lean_Parser_ParserState_mkError(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_optType___closed__2; lean_object* l_Lean_Parser_Term_sort___elambda__1___closed__8; lean_object* l___regBuiltinParser_Lean_Parser_Term_dollarProj(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_binderType___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_Term_borrowed___closed__4; lean_object* l_Lean_Parser_Term_bracktedBinder(uint8_t); lean_object* l_Lean_Parser_Term_mapRev___elambda__1___closed__3; lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_Parser_sepByInfo(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_explicit___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Term_ge(lean_object*); lean_object* l_Lean_Parser_Term_nomatch___elambda__1___closed__3; @@ -235,7 +235,7 @@ lean_object* l_Lean_Parser_Term_if___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_parenSpecial___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_seqLeft___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_subst___elambda__1___closed__1; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_match___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_show___elambda__1___closed__2; @@ -281,7 +281,7 @@ lean_object* l_Lean_Parser_Term_subtype___closed__1; lean_object* l_Lean_Parser_Term_anonymousCtor___closed__4; lean_object* l_Lean_Parser_Term_or___closed__2; lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__6; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_fromTerm___elambda__1___closed__2; extern lean_object* l_Lean_formatDataValue___closed__1; @@ -305,11 +305,11 @@ lean_object* l_Lean_Parser_Term_heq___closed__2; lean_object* l_Lean_Parser_Term_do___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_andM___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_seq___elambda__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_letEqns___closed__5; lean_object* l_Lean_Parser_Term_namedArgument___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_namedArgument___closed__3; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_do(lean_object*); lean_object* l_Lean_Parser_Term_num___elambda__1___closed__2; extern lean_object* l_Lean_Parser_Level_num___elambda__1___closed__1; @@ -529,7 +529,7 @@ lean_object* l_Lean_Parser_Term_str; lean_object* l_Lean_Parser_Term_binderTactic___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_depArrow___closed__8; lean_object* l_Lean_Parser_Term_dollarProj___elambda__1___closed__3; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Term_sorry(lean_object*); lean_object* l_Lean_Parser_Term_nomatch___closed__4; @@ -564,7 +564,7 @@ lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_suffices___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_add___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_have___elambda__1___closed__6; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_seqRight___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Term_id(lean_object*); lean_object* l_Lean_Parser_Term_doElem___closed__3; @@ -631,7 +631,7 @@ lean_object* lean_array_fget(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_letIdLhs___closed__5; lean_object* l_Lean_Parser_Term_emptyC___elambda__1___closed__1; lean_object* l_Lean_Parser_manyAux___main(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_match___elambda__1___closed__14; lean_object* l_Lean_Parser_Term_mapConstRev___closed__3; lean_object* l_Lean_Parser_Term_match___closed__6; @@ -738,7 +738,7 @@ lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_mul___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_add___elambda__1___closed__4; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_forall___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_beq; lean_object* l_Lean_Parser_Term_prop___closed__2; lean_object* l_Lean_Parser_Term_let___elambda__1___closed__3; @@ -899,7 +899,7 @@ lean_object* l_Lean_Parser_Term_have___closed__6; lean_object* l_Lean_Parser_Term_mod___closed__3; lean_object* l_Lean_Parser_Term_id___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_tparser_x21___elambda__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_bnot___elambda__1___closed__8; lean_object* l_Lean_Parser_strAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_fun___elambda__1(lean_object*, lean_object*, lean_object*); @@ -907,7 +907,7 @@ lean_object* l_Lean_Parser_Term_fromTerm___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_letEqns___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_forall___elambda__1___closed__9; lean_object* l_Lean_Parser_Term_cdot___closed__5; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_num___closed__1; lean_object* l_Lean_Parser_orelseInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_dollarSymbol___elambda__1___rarg(lean_object*, lean_object*); @@ -1009,7 +1009,7 @@ lean_object* l_Lean_Parser_Term_implicitBinder(uint8_t); lean_object* l___regBuiltinParser_Lean_Parser_Term_seqLeft(lean_object*); lean_object* l_Lean_Parser_Term_orM___closed__3; lean_object* l_Lean_Parser_Term_tparser_x21___elambda__1___closed__7; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_namedPattern___closed__6; lean_object* l_Lean_Parser_Term_match__syntax___elambda__1(lean_object*, lean_object*, lean_object*); @@ -1148,6 +1148,7 @@ lean_object* l_Lean_Parser_Term_map___closed__3; lean_object* l_Lean_Parser_Term_borrowed___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__11; +lean_object* l_Lean_Parser_ParserState_popSyntax(lean_object*); lean_object* l_Lean_Parser_Term_parser_x21; lean_object* l_Lean_Parser_Term_mapConstRev___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_inaccessible___elambda__1___closed__9; @@ -1186,7 +1187,7 @@ lean_object* l_Lean_Parser_Term_sort___closed__5; lean_object* l_Lean_Parser_Term_optType___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_sorry___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__12; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__12; lean_object* l___regBuiltinParser_Lean_Parser_Term_beq(lean_object*); lean_object* l_Lean_Parser_Term_tparser_x21___closed__5; @@ -1318,7 +1319,7 @@ lean_object* l_Lean_Parser_Term_bindOp; lean_object* l_Lean_Parser_Term_simpleBinder; lean_object* l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_bor___elambda__1___closed__3; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_div___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_doExpr___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_let___closed__5; @@ -1514,7 +1515,7 @@ lean_object* l_Lean_Parser_Term_fromTerm___closed__6; lean_object* l_Lean_Parser_Term_type; lean_object* l_Lean_Parser_Term_pow___closed__1; lean_object* l_Lean_Parser_Term_binderType___closed__4; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_let___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_bne___closed__2; lean_object* l_Lean_Parser_strLitFn___rarg(lean_object*, lean_object*); @@ -1642,7 +1643,7 @@ lean_object* l_Lean_Parser_Term_parser_x21___closed__4; lean_object* l_Lean_Parser_Term_orelse___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_div(lean_object*); lean_object* l_Lean_Parser_Term_subtype___closed__9; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_where___closed__1; lean_object* l_Lean_Parser_Term_namedPattern___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_le___elambda__1(lean_object*, lean_object*, lean_object*); @@ -1692,7 +1693,7 @@ lean_object* l_Lean_Parser_Term_structInstSource___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_structInstField___closed__3; lean_object* l_Lean_Parser_Term_parser_x21___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__12; -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_seqRight___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_match(lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_depArrow(lean_object*); @@ -1705,7 +1706,7 @@ lean_object* l_Lean_Parser_Term_optIdent___elambda__1(lean_object*, lean_object* lean_object* l_Lean_Parser_Term_gt___closed__1; lean_object* l_Lean_Parser_Term_ge; lean_object* l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__3; -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_have___closed__5; lean_object* l___regBuiltinParser_Lean_Parser_Term_where(lean_object*); lean_object* l_Lean_Parser_Term_depArrow___elambda__1(lean_object*, lean_object*, lean_object*); @@ -2267,157 +2268,215 @@ lean_ctor_set(x_3, 1, x_1); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -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; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -x_11 = l_Lean_Parser_regBuiltinLevelParserAttr___closed__4; -x_12 = lean_unsigned_to_nat(0u); -lean_inc(x_6); -x_13 = l_Lean_Parser_categoryParserFn(x_11, x_12, x_6, x_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_25; lean_object* x_26; -lean_dec(x_10); +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_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_15 = lean_ctor_get(x_13, 0); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +x_12 = l_Lean_Parser_regBuiltinLevelParserAttr___closed__4; +x_13 = lean_unsigned_to_nat(0u); +lean_inc(x_7); +x_14 = l_Lean_Parser_categoryParserFn(x_12, x_13, x_7, x_8); +x_15 = lean_ctor_get(x_14, 3); lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_inc(x_6); -x_25 = l_Lean_Parser_tokenFn(x_6, x_13); -x_26 = lean_ctor_get(x_25, 3); -lean_inc(x_26); -if (lean_obj_tag(x_26) == 0) +if (lean_obj_tag(x_15) == 0) { -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_25, 0); -lean_inc(x_27); -x_28 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_27); -lean_dec(x_27); -if (lean_obj_tag(x_28) == 2) -{ -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_28, 1); -lean_inc(x_29); -lean_dec(x_28); -x_30 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; -x_31 = lean_string_dec_eq(x_29, x_30); -lean_dec(x_29); -if (x_31 == 0) -{ -lean_object* x_32; lean_object* x_33; -x_32 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); -x_18 = x_33; -goto block_24; -} -else -{ -x_18 = x_25; -goto block_24; -} -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_28); -x_34 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); -x_18 = x_35; -goto block_24; -} -} -else -{ -lean_object* x_36; lean_object* x_37; -lean_dec(x_26); -x_36 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); -x_18 = x_37; -goto block_24; -} -block_24: -{ -lean_object* x_19; -x_19 = lean_ctor_get(x_18, 3); -lean_inc(x_19); -if (lean_obj_tag(x_19) == 0) -{ -lean_dec(x_17); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_33; lean_object* x_34; +lean_dec(x_11); +lean_dec(x_10); +x_16 = lean_ctor_get(x_14, 0); +lean_inc(x_16); +x_17 = lean_array_get_size(x_16); lean_dec(x_16); +x_18 = lean_ctor_get(x_14, 1); +lean_inc(x_18); +lean_inc(x_7); +x_33 = l_Lean_Parser_tokenFn(x_7, x_14); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +if (lean_obj_tag(x_34) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_18; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_33, 0); +lean_inc(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +lean_dec(x_35); +if (lean_obj_tag(x_36) == 2) +{ +lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_37 = lean_ctor_get(x_36, 1); +lean_inc(x_37); +lean_dec(x_36); +x_38 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; +x_39 = lean_string_dec_eq(x_37, x_38); +lean_dec(x_37); +if (x_39 == 0) +{ +lean_object* x_40; lean_object* x_41; +x_40 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_40, x_18); +x_19 = x_41; +goto block_32; +} +else +{ +x_19 = x_33; +goto block_32; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_36); +x_42 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_42, x_18); +x_19 = x_43; +goto block_32; +} +} +else +{ +lean_object* x_44; lean_object* x_45; +lean_dec(x_34); +x_44 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_44, x_18); +x_19 = x_45; +goto block_32; +} +block_32: +{ +lean_object* x_20; +x_20 = lean_ctor_get(x_19, 3); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) +{ +lean_dec(x_18); +lean_dec(x_17); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_19; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_19); -lean_dec(x_6); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); -lean_dec(x_16); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; -} -} +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_dec(x_20); +lean_dec(x_7); +x_22 = l_Lean_Parser_ParserState_restore(x_19, x_17, x_18); +lean_dec(x_17); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_array_get_size(x_23); +lean_dec(x_23); +x_25 = lean_nat_sub(x_24, x_3); +lean_dec(x_24); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_dec_eq(x_25, x_26); +lean_dec(x_25); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_22, x_28, x_3); +return x_29; } else { -lean_dec(x_14); -lean_dec(x_6); if (x_4 == 0) { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_dec(x_10); -lean_dec(x_9); -x_38 = lean_box(0); -x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); -return x_41; +lean_object* x_30; lean_object* x_31; +x_30 = l_Lean_nullKind; +x_31 = l_Lean_Parser_ParserState_mkNode(x_22, x_30, x_3); +return x_31; } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); -lean_dec(x_9); -x_43 = l_Lean_nullKind; -x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); -return x_44; +lean_dec(x_3); +return x_22; } } } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +} +else +{ +lean_dec(x_15); +lean_dec(x_7); +if (x_5 == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +lean_dec(x_11); +lean_dec(x_10); +x_46 = lean_box(0); +x_47 = l_Lean_Parser_ParserState_pushSyntax(x_14, x_46); +x_48 = l_Lean_nullKind; +x_49 = l_Lean_Parser_ParserState_mkNode(x_47, x_48, x_3); +return x_49; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_50 = l_Lean_Parser_ParserState_restore(x_14, x_10, x_11); +lean_dec(x_10); +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_array_get_size(x_51); +lean_dec(x_51); +x_53 = lean_nat_sub(x_52, x_3); +lean_dec(x_52); +x_54 = lean_unsigned_to_nat(2u); +x_55 = lean_nat_dec_eq(x_53, x_54); +lean_dec(x_53); +if (x_55 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_50, x_56, x_3); +return x_57; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_58; lean_object* x_59; +x_58 = l_Lean_nullKind; +x_59 = l_Lean_Parser_ParserState_mkNode(x_50, x_58, x_3); +return x_59; +} +else +{ +lean_object* x_60; +lean_dec(x_3); +x_60 = l_Lean_Parser_ParserState_popSyntax(x_50); +return x_60; +} +} +} +} +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; -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 = 0; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +x_9 = 0; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2(x_1, x_2, x_8, x_3, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_explicitUniv___elambda__1___closed__1() { @@ -2705,7 +2764,7 @@ uint8_t x_22; uint8_t x_23; lean_object* x_24; lean_object* x_25; x_22 = 0; x_23 = 0; lean_inc(x_2); -x_24 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1(x_22, x_23, x_1, x_2, x_20); +x_24 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1(x_22, x_23, x_23, x_1, x_2, x_20); lean_dec(x_1); x_25 = lean_ctor_get(x_24, 3); lean_inc(x_25); @@ -2941,32 +3000,36 @@ x_1 = l_Lean_Parser_Term_explicitUniv___closed__11; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_12 = lean_unbox(x_5); lean_dec(x_5); -return x_11; +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +lean_dec(x_6); +return x_13; } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1___boxed(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: { -uint8_t x_6; uint8_t x_7; lean_object* x_8; -x_6 = lean_unbox(x_1); +uint8_t x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = lean_unbox(x_2); +x_8 = lean_unbox(x_2); lean_dec(x_2); -x_8 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); +x_9 = lean_unbox(x_3); lean_dec(x_3); -return x_8; +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__1(x_7, x_8, x_9, x_4, x_5, x_6); +lean_dec(x_4); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_namedPattern___elambda__1___closed__1() { @@ -6363,157 +6426,215 @@ x_1 = l_Lean_Parser_Term_typeAscription___closed__7; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -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; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -x_11 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4; -x_12 = lean_unsigned_to_nat(0u); -lean_inc(x_6); -x_13 = l_Lean_Parser_categoryParserFn(x_11, x_12, x_6, x_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_25; lean_object* x_26; -lean_dec(x_10); +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_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_15 = lean_ctor_get(x_13, 0); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +x_12 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4; +x_13 = lean_unsigned_to_nat(0u); +lean_inc(x_7); +x_14 = l_Lean_Parser_categoryParserFn(x_12, x_13, x_7, x_8); +x_15 = lean_ctor_get(x_14, 3); lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_inc(x_6); -x_25 = l_Lean_Parser_tokenFn(x_6, x_13); -x_26 = lean_ctor_get(x_25, 3); -lean_inc(x_26); -if (lean_obj_tag(x_26) == 0) +if (lean_obj_tag(x_15) == 0) { -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_25, 0); -lean_inc(x_27); -x_28 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_27); -lean_dec(x_27); -if (lean_obj_tag(x_28) == 2) -{ -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_28, 1); -lean_inc(x_29); -lean_dec(x_28); -x_30 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; -x_31 = lean_string_dec_eq(x_29, x_30); -lean_dec(x_29); -if (x_31 == 0) -{ -lean_object* x_32; lean_object* x_33; -x_32 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); -x_18 = x_33; -goto block_24; -} -else -{ -x_18 = x_25; -goto block_24; -} -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_28); -x_34 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); -x_18 = x_35; -goto block_24; -} -} -else -{ -lean_object* x_36; lean_object* x_37; -lean_dec(x_26); -x_36 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); -x_18 = x_37; -goto block_24; -} -block_24: -{ -lean_object* x_19; -x_19 = lean_ctor_get(x_18, 3); -lean_inc(x_19); -if (lean_obj_tag(x_19) == 0) -{ -lean_dec(x_17); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_33; lean_object* x_34; +lean_dec(x_11); +lean_dec(x_10); +x_16 = lean_ctor_get(x_14, 0); +lean_inc(x_16); +x_17 = lean_array_get_size(x_16); lean_dec(x_16); +x_18 = lean_ctor_get(x_14, 1); +lean_inc(x_18); +lean_inc(x_7); +x_33 = l_Lean_Parser_tokenFn(x_7, x_14); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +if (lean_obj_tag(x_34) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_18; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_33, 0); +lean_inc(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +lean_dec(x_35); +if (lean_obj_tag(x_36) == 2) +{ +lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_37 = lean_ctor_get(x_36, 1); +lean_inc(x_37); +lean_dec(x_36); +x_38 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; +x_39 = lean_string_dec_eq(x_37, x_38); +lean_dec(x_37); +if (x_39 == 0) +{ +lean_object* x_40; lean_object* x_41; +x_40 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_40, x_18); +x_19 = x_41; +goto block_32; +} +else +{ +x_19 = x_33; +goto block_32; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_36); +x_42 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_42, x_18); +x_19 = x_43; +goto block_32; +} +} +else +{ +lean_object* x_44; lean_object* x_45; +lean_dec(x_34); +x_44 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_44, x_18); +x_19 = x_45; +goto block_32; +} +block_32: +{ +lean_object* x_20; +x_20 = lean_ctor_get(x_19, 3); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) +{ +lean_dec(x_18); +lean_dec(x_17); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_19; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_19); -lean_dec(x_6); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); -lean_dec(x_16); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; -} -} +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_dec(x_20); +lean_dec(x_7); +x_22 = l_Lean_Parser_ParserState_restore(x_19, x_17, x_18); +lean_dec(x_17); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_array_get_size(x_23); +lean_dec(x_23); +x_25 = lean_nat_sub(x_24, x_3); +lean_dec(x_24); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_dec_eq(x_25, x_26); +lean_dec(x_25); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_22, x_28, x_3); +return x_29; } else { -lean_dec(x_14); -lean_dec(x_6); if (x_4 == 0) { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_dec(x_10); -lean_dec(x_9); -x_38 = lean_box(0); -x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); -return x_41; +lean_object* x_30; lean_object* x_31; +x_30 = l_Lean_nullKind; +x_31 = l_Lean_Parser_ParserState_mkNode(x_22, x_30, x_3); +return x_31; } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); -lean_dec(x_9); -x_43 = l_Lean_nullKind; -x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); -return x_44; +lean_dec(x_3); +return x_22; } } } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +} +else +{ +lean_dec(x_15); +lean_dec(x_7); +if (x_5 == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +lean_dec(x_11); +lean_dec(x_10); +x_46 = lean_box(0); +x_47 = l_Lean_Parser_ParserState_pushSyntax(x_14, x_46); +x_48 = l_Lean_nullKind; +x_49 = l_Lean_Parser_ParserState_mkNode(x_47, x_48, x_3); +return x_49; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_50 = l_Lean_Parser_ParserState_restore(x_14, x_10, x_11); +lean_dec(x_10); +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_array_get_size(x_51); +lean_dec(x_51); +x_53 = lean_nat_sub(x_52, x_3); +lean_dec(x_52); +x_54 = lean_unsigned_to_nat(2u); +x_55 = lean_nat_dec_eq(x_53, x_54); +lean_dec(x_53); +if (x_55 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_50, x_56, x_3); +return x_57; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_58; lean_object* x_59; +x_58 = l_Lean_nullKind; +x_59 = l_Lean_Parser_ParserState_mkNode(x_50, x_58, x_3); +return x_59; +} +else +{ +lean_object* x_60; +lean_dec(x_3); +x_60 = l_Lean_Parser_ParserState_popSyntax(x_50); +return x_60; +} +} +} +} +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; -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 = 0; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +x_9 = 0; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_1, x_2, x_8, x_3, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_tupleTail___elambda__1___closed__1() { @@ -6677,7 +6798,7 @@ if (lean_obj_tag(x_18) == 0) uint8_t x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; x_19 = 0; x_20 = 0; -x_21 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_19, x_20, x_1, x_2, x_17); +x_21 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_19, x_20, x_20, x_1, x_2, x_17); lean_dec(x_1); x_22 = l_Lean_Parser_Term_tupleTail___elambda__1___closed__2; x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_16); @@ -6774,32 +6895,36 @@ x_1 = l_Lean_Parser_Term_tupleTail___closed__6; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_12 = lean_unbox(x_5); lean_dec(x_5); -return x_11; +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +lean_dec(x_6); +return x_13; } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1___boxed(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: { -uint8_t x_6; uint8_t x_7; lean_object* x_8; -x_6 = lean_unbox(x_1); +uint8_t x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = lean_unbox(x_2); +x_8 = lean_unbox(x_2); lean_dec(x_2); -x_8 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); +x_9 = lean_unbox(x_3); lean_dec(x_3); -return x_8; +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_7, x_8, x_9, x_4, x_5, x_6); +lean_dec(x_4); +return x_10; } } lean_object* l_Lean_Parser_Term_parenSpecial___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { @@ -7395,14 +7520,15 @@ return x_6; lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_anonymousCtor___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; +lean_object* x_6; lean_object* x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; 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 = 1; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +x_8 = 0; +x_9 = 1; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_tupleTail___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_9, x_3, x_4, x_5); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__1() { @@ -12163,182 +12289,240 @@ x_1 = l_Lean_Parser_Term_structInstSource___closed__7; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_44; lean_object* x_45; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -lean_inc(x_6); -lean_inc(x_5); -x_44 = l_Lean_Parser_Term_structInstField___elambda__1(x_5, x_6, x_7); -x_45 = lean_ctor_get(x_44, 3); -lean_inc(x_45); -if (lean_obj_tag(x_45) == 0) -{ -x_11 = x_44; -goto block_43; -} -else -{ -lean_object* x_46; lean_object* x_47; uint8_t x_48; -x_46 = lean_ctor_get(x_45, 0); -lean_inc(x_46); -lean_dec(x_45); -x_47 = lean_ctor_get(x_44, 1); -lean_inc(x_47); -x_48 = lean_nat_dec_eq(x_47, x_10); -lean_dec(x_47); -if (x_48 == 0) -{ -lean_dec(x_46); -x_11 = x_44; -goto block_43; -} -else -{ -lean_object* x_49; lean_object* x_50; lean_object* x_51; -lean_inc(x_10); -x_49 = l_Lean_Parser_ParserState_restore(x_44, x_9, x_10); -lean_inc(x_6); -lean_inc(x_5); -x_50 = l_Lean_Parser_Term_structInstSource___elambda__1(x_5, x_6, x_49); -x_51 = l_Lean_Parser_mergeOrElseErrors(x_50, x_46, x_10); -x_11 = x_51; -goto block_43; -} -} -block_43: -{ -lean_object* x_12; -x_12 = lean_ctor_get(x_11, 3); -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_23; lean_object* x_24; -lean_dec(x_10); +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_60; lean_object* x_61; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_13 = lean_ctor_get(x_11, 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); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +lean_inc(x_7); lean_inc(x_6); -x_23 = l_Lean_Parser_tokenFn(x_6, x_11); -x_24 = lean_ctor_get(x_23, 3); -lean_inc(x_24); -if (lean_obj_tag(x_24) == 0) +x_60 = l_Lean_Parser_Term_structInstField___elambda__1(x_6, x_7, x_8); +x_61 = lean_ctor_get(x_60, 3); +lean_inc(x_61); +if (lean_obj_tag(x_61) == 0) { -lean_object* x_25; lean_object* x_26; -x_25 = lean_ctor_get(x_23, 0); -lean_inc(x_25); -x_26 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_25); -lean_dec(x_25); -if (lean_obj_tag(x_26) == 2) -{ -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_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___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_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); -x_16 = x_31; -goto block_22; +x_12 = x_60; +goto block_59; } else { -x_16 = x_23; -goto block_22; -} +lean_object* x_62; lean_object* x_63; uint8_t x_64; +x_62 = lean_ctor_get(x_61, 0); +lean_inc(x_62); +lean_dec(x_61); +x_63 = lean_ctor_get(x_60, 1); +lean_inc(x_63); +x_64 = lean_nat_dec_eq(x_63, x_11); +lean_dec(x_63); +if (x_64 == 0) +{ +lean_dec(x_62); +x_12 = x_60; +goto block_59; } else { -lean_object* x_32; lean_object* x_33; -lean_dec(x_26); -x_32 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); -x_16 = x_33; -goto block_22; +lean_object* x_65; lean_object* x_66; lean_object* x_67; +lean_inc(x_11); +x_65 = l_Lean_Parser_ParserState_restore(x_60, x_10, x_11); +lean_inc(x_7); +lean_inc(x_6); +x_66 = l_Lean_Parser_Term_structInstSource___elambda__1(x_6, x_7, x_65); +x_67 = l_Lean_Parser_mergeOrElseErrors(x_66, x_62, x_11); +x_12 = x_67; +goto block_59; } } -else +block_59: { -lean_object* x_34; lean_object* x_35; -lean_dec(x_24); -x_34 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; -lean_inc(x_15); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); -x_16 = x_35; -goto block_22; -} -block_22: +lean_object* x_13; +x_13 = lean_ctor_get(x_12, 3); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 0) { -lean_object* x_17; -x_17 = lean_ctor_get(x_16, 3); -lean_inc(x_17); -if (lean_obj_tag(x_17) == 0) -{ -lean_dec(x_15); +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_31; lean_object* x_32; +lean_dec(x_11); +lean_dec(x_10); +x_14 = lean_ctor_get(x_12, 0); +lean_inc(x_14); +x_15 = lean_array_get_size(x_14); lean_dec(x_14); +x_16 = lean_ctor_get(x_12, 1); +lean_inc(x_16); +lean_inc(x_7); +x_31 = l_Lean_Parser_tokenFn(x_7, x_12); +x_32 = lean_ctor_get(x_31, 3); +lean_inc(x_32); +if (lean_obj_tag(x_32) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_16; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_31, 0); +lean_inc(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +lean_dec(x_33); +if (lean_obj_tag(x_34) == 2) +{ +lean_object* x_35; lean_object* x_36; uint8_t x_37; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__1; +x_37 = lean_string_dec_eq(x_35, x_36); +lean_dec(x_35); +if (x_37 == 0) +{ +lean_object* x_38; lean_object* x_39; +x_38 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_38, x_16); +x_17 = x_39; +goto block_30; +} +else +{ +x_17 = x_31; +goto block_30; +} +} +else +{ +lean_object* x_40; lean_object* x_41; +lean_dec(x_34); +x_40 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_40, x_16); +x_17 = x_41; +goto block_30; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_32); +x_42 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__4; +lean_inc(x_16); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_42, x_16); +x_17 = x_43; +goto block_30; +} +block_30: +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +lean_dec(x_16); +lean_dec(x_15); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_17; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_19; lean_object* x_20; lean_object* x_21; -lean_dec(x_17); +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +lean_dec(x_18); +lean_dec(x_7); lean_dec(x_6); -lean_dec(x_5); -x_19 = l_Lean_Parser_ParserState_restore(x_16, x_14, x_15); -lean_dec(x_14); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_3); -return x_21; -} -} +x_20 = l_Lean_Parser_ParserState_restore(x_17, x_15, x_16); +lean_dec(x_15); +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_array_get_size(x_21); +lean_dec(x_21); +x_23 = lean_nat_sub(x_22, x_3); +lean_dec(x_22); +x_24 = lean_unsigned_to_nat(1u); +x_25 = lean_nat_dec_eq(x_23, x_24); +lean_dec(x_23); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = l_Lean_nullKind; +x_27 = l_Lean_Parser_ParserState_mkNode(x_20, x_26, x_3); +return x_27; } else { -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); if (x_4 == 0) { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -lean_dec(x_10); -lean_dec(x_9); -x_36 = lean_box(0); -x_37 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_36); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_3); -return x_39; +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_20, x_28, x_3); +return x_29; } else { -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); -lean_dec(x_9); -x_41 = l_Lean_nullKind; -x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_3); -return x_42; +lean_dec(x_3); +return x_20; +} +} +} +} +} +else +{ +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_6); +if (x_5 == 0) +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +lean_dec(x_11); +lean_dec(x_10); +x_44 = lean_box(0); +x_45 = l_Lean_Parser_ParserState_pushSyntax(x_12, x_44); +x_46 = l_Lean_nullKind; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_3); +return x_47; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_48 = l_Lean_Parser_ParserState_restore(x_12, x_10, x_11); +lean_dec(x_10); +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_array_get_size(x_49); +lean_dec(x_49); +x_51 = lean_nat_sub(x_50, x_3); +lean_dec(x_50); +x_52 = lean_unsigned_to_nat(2u); +x_53 = lean_nat_dec_eq(x_51, x_52); +lean_dec(x_51); +if (x_53 == 0) +{ +lean_object* x_54; lean_object* x_55; +x_54 = l_Lean_nullKind; +x_55 = l_Lean_Parser_ParserState_mkNode(x_48, x_54, x_3); +return x_55; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_48, x_56, x_3); +return x_57; +} +else +{ +lean_object* x_58; +lean_dec(x_3); +x_58 = l_Lean_Parser_ParserState_popSyntax(x_48); +return x_58; +} +} } } } @@ -12347,14 +12531,15 @@ return x_42; lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_structInst___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; +lean_object* x_6; lean_object* x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; 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 = 1; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +x_8 = 0; +x_9 = 1; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_9, x_3, x_4, x_5); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_structInst___elambda__1___closed__1() { @@ -13088,18 +13273,20 @@ x_1 = l_Lean_Parser_Term_structInst___closed__13; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); -return x_11; +x_12 = lean_unbox(x_5); +lean_dec(x_5); +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_structInst___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +return x_13; } } lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_structInst___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -14061,142 +14248,200 @@ lean_ctor_set(x_3, 1, x_1); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -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; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -x_11 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4; -x_12 = lean_unsigned_to_nat(0u); -lean_inc(x_6); -x_13 = l_Lean_Parser_categoryParserFn(x_11, x_12, x_6, x_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_25; lean_object* x_26; -lean_dec(x_10); +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_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_15 = lean_ctor_get(x_13, 0); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +x_12 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4; +x_13 = lean_unsigned_to_nat(0u); +lean_inc(x_7); +x_14 = l_Lean_Parser_categoryParserFn(x_12, x_13, x_7, x_8); +x_15 = lean_ctor_get(x_14, 3); lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_inc(x_6); -x_25 = l_Lean_Parser_tokenFn(x_6, x_13); -x_26 = lean_ctor_get(x_25, 3); -lean_inc(x_26); -if (lean_obj_tag(x_26) == 0) +if (lean_obj_tag(x_15) == 0) { -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_25, 0); -lean_inc(x_27); -x_28 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_27); -lean_dec(x_27); -if (lean_obj_tag(x_28) == 2) -{ -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_28, 1); -lean_inc(x_29); -lean_dec(x_28); -x_30 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___closed__1; -x_31 = lean_string_dec_eq(x_29, x_30); -lean_dec(x_29); -if (x_31 == 0) -{ -lean_object* x_32; lean_object* x_33; -x_32 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); -x_18 = x_33; -goto block_24; -} -else -{ -x_18 = x_25; -goto block_24; -} -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_28); -x_34 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); -x_18 = x_35; -goto block_24; -} -} -else -{ -lean_object* x_36; lean_object* x_37; -lean_dec(x_26); -x_36 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___closed__4; -lean_inc(x_17); -x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); -x_18 = x_37; -goto block_24; -} -block_24: -{ -lean_object* x_19; -x_19 = lean_ctor_get(x_18, 3); -lean_inc(x_19); -if (lean_obj_tag(x_19) == 0) -{ -lean_dec(x_17); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_33; lean_object* x_34; +lean_dec(x_11); +lean_dec(x_10); +x_16 = lean_ctor_get(x_14, 0); +lean_inc(x_16); +x_17 = lean_array_get_size(x_16); lean_dec(x_16); +x_18 = lean_ctor_get(x_14, 1); +lean_inc(x_18); +lean_inc(x_7); +x_33 = l_Lean_Parser_tokenFn(x_7, x_14); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +if (lean_obj_tag(x_34) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_18; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_33, 0); +lean_inc(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +lean_dec(x_35); +if (lean_obj_tag(x_36) == 2) +{ +lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_37 = lean_ctor_get(x_36, 1); +lean_inc(x_37); +lean_dec(x_36); +x_38 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___closed__1; +x_39 = lean_string_dec_eq(x_37, x_38); +lean_dec(x_37); +if (x_39 == 0) +{ +lean_object* x_40; lean_object* x_41; +x_40 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_40, x_18); +x_19 = x_41; +goto block_32; +} +else +{ +x_19 = x_33; +goto block_32; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_36); +x_42 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_42, x_18); +x_19 = x_43; +goto block_32; +} +} +else +{ +lean_object* x_44; lean_object* x_45; +lean_dec(x_34); +x_44 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2___closed__4; +lean_inc(x_18); +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_33, x_44, x_18); +x_19 = x_45; +goto block_32; +} +block_32: +{ +lean_object* x_20; +x_20 = lean_ctor_get(x_19, 3); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) +{ +lean_dec(x_18); +lean_dec(x_17); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_19; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_19); -lean_dec(x_6); -x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); -lean_dec(x_16); -x_22 = l_Lean_nullKind; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); -return x_23; -} -} +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_dec(x_20); +lean_dec(x_7); +x_22 = l_Lean_Parser_ParserState_restore(x_19, x_17, x_18); +lean_dec(x_17); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_array_get_size(x_23); +lean_dec(x_23); +x_25 = lean_nat_sub(x_24, x_3); +lean_dec(x_24); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_dec_eq(x_25, x_26); +lean_dec(x_25); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_22, x_28, x_3); +return x_29; } else { -lean_dec(x_14); -lean_dec(x_6); if (x_4 == 0) { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_dec(x_10); -lean_dec(x_9); -x_38 = lean_box(0); -x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); -x_40 = l_Lean_nullKind; -x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); -return x_41; +lean_object* x_30; lean_object* x_31; +x_30 = l_Lean_nullKind; +x_31 = l_Lean_Parser_ParserState_mkNode(x_22, x_30, x_3); +return x_31; } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); -lean_dec(x_9); -x_43 = l_Lean_nullKind; -x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); -return x_44; +lean_dec(x_3); +return x_22; +} +} +} +} +} +else +{ +lean_dec(x_15); +lean_dec(x_7); +if (x_5 == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +lean_dec(x_11); +lean_dec(x_10); +x_46 = lean_box(0); +x_47 = l_Lean_Parser_ParserState_pushSyntax(x_14, x_46); +x_48 = l_Lean_nullKind; +x_49 = l_Lean_Parser_ParserState_mkNode(x_47, x_48, x_3); +return x_49; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_50 = l_Lean_Parser_ParserState_restore(x_14, x_10, x_11); +lean_dec(x_10); +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_array_get_size(x_51); +lean_dec(x_51); +x_53 = lean_nat_sub(x_52, x_3); +lean_dec(x_52); +x_54 = lean_unsigned_to_nat(2u); +x_55 = lean_nat_dec_eq(x_53, x_54); +lean_dec(x_53); +if (x_55 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_50, x_56, x_3); +return x_57; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_58; lean_object* x_59; +x_58 = l_Lean_nullKind; +x_59 = l_Lean_Parser_ParserState_mkNode(x_50, x_58, x_3); +return x_59; +} +else +{ +lean_object* x_60; +lean_dec(x_3); +x_60 = l_Lean_Parser_ParserState_popSyntax(x_50); +return x_60; +} +} } } } @@ -14204,14 +14449,15 @@ return x_44; lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_listLit___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; +lean_object* x_6; lean_object* x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; 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 = 1; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +x_8 = 0; +x_9 = 1; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_9, x_3, x_4, x_5); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_listLit___elambda__1___closed__1() { @@ -14675,19 +14921,21 @@ x_1 = l_Lean_Parser_Term_listLit___closed__10; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_12 = lean_unbox(x_5); lean_dec(x_5); -return x_11; +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +lean_dec(x_6); +return x_13; } } lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_listLit___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -19333,7 +19581,7 @@ uint8_t x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; x_19 = 0; x_20 = 0; lean_inc(x_2); -x_21 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_19, x_20, x_1, x_2, x_17); +x_21 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_19, x_20, x_20, x_1, x_2, x_17); lean_dec(x_1); x_22 = lean_ctor_get(x_21, 3); lean_inc(x_22); @@ -20114,7 +20362,7 @@ uint8_t x_54; uint8_t x_55; lean_object* x_56; lean_object* x_57; x_54 = 0; x_55 = 0; lean_inc(x_2); -x_56 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_54, x_55, x_1, x_2, x_52); +x_56 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tupleTail___elambda__1___spec__1(x_54, x_55, x_55, x_1, x_2, x_52); x_57 = lean_ctor_get(x_56, 3); lean_inc(x_57); if (lean_obj_tag(x_57) == 0) @@ -27363,158 +27611,216 @@ x_1 = l_Lean_Parser_Term_doElem___closed__5; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -lean_inc(x_6); -lean_inc(x_5); -x_11 = l_Lean_Parser_Term_doElem___elambda__1(x_5, x_6, x_7); -x_12 = lean_ctor_get(x_11, 3); -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_23; lean_object* x_24; -lean_dec(x_10); +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_13 = lean_ctor_get(x_11, 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); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +lean_inc(x_7); lean_inc(x_6); -x_23 = l_Lean_Parser_tokenFn(x_6, x_11); -x_24 = lean_ctor_get(x_23, 3); -lean_inc(x_24); -if (lean_obj_tag(x_24) == 0) +x_12 = l_Lean_Parser_Term_doElem___elambda__1(x_6, x_7, x_8); +x_13 = lean_ctor_get(x_12, 3); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 0) { -lean_object* x_25; lean_object* x_26; -x_25 = lean_ctor_get(x_23, 0); -lean_inc(x_25); -x_26 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_25); -lean_dec(x_25); -if (lean_obj_tag(x_26) == 2) -{ -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_Lean_Parser_Term_have___elambda__1___closed__7; -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_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_15); -x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_15); -x_16 = x_31; -goto block_22; -} -else -{ -x_16 = x_23; -goto block_22; -} -} -else -{ -lean_object* x_32; lean_object* x_33; -lean_dec(x_26); -x_32 = l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_15); -x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_32, x_15); -x_16 = x_33; -goto block_22; -} -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_24); -x_34 = l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_15); -x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_34, x_15); -x_16 = x_35; -goto block_22; -} -block_22: -{ -lean_object* x_17; -x_17 = lean_ctor_get(x_16, 3); -lean_inc(x_17); -if (lean_obj_tag(x_17) == 0) -{ -lean_dec(x_15); +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_31; lean_object* x_32; +lean_dec(x_11); +lean_dec(x_10); +x_14 = lean_ctor_get(x_12, 0); +lean_inc(x_14); +x_15 = lean_array_get_size(x_14); lean_dec(x_14); +x_16 = lean_ctor_get(x_12, 1); +lean_inc(x_16); +lean_inc(x_7); +x_31 = l_Lean_Parser_tokenFn(x_7, x_12); +x_32 = lean_ctor_get(x_31, 3); +lean_inc(x_32); +if (lean_obj_tag(x_32) == 0) { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_16; -x_4 = _tmp_3; -x_7 = _tmp_6; +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_31, 0); +lean_inc(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +lean_dec(x_33); +if (lean_obj_tag(x_34) == 2) +{ +lean_object* x_35; lean_object* x_36; uint8_t x_37; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_Parser_Term_have___elambda__1___closed__7; +x_37 = lean_string_dec_eq(x_35, x_36); +lean_dec(x_35); +if (x_37 == 0) +{ +lean_object* x_38; lean_object* x_39; +x_38 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_16); +x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_38, x_16); +x_17 = x_39; +goto block_30; +} +else +{ +x_17 = x_31; +goto block_30; +} +} +else +{ +lean_object* x_40; lean_object* x_41; +lean_dec(x_34); +x_40 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_16); +x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_40, x_16); +x_17 = x_41; +goto block_30; +} +} +else +{ +lean_object* x_42; lean_object* x_43; +lean_dec(x_32); +x_42 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_16); +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_31, x_42, x_16); +x_17 = x_43; +goto block_30; +} +block_30: +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +lean_dec(x_16); +lean_dec(x_15); +{ +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_17; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_19; lean_object* x_20; lean_object* x_21; -lean_dec(x_17); +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +lean_dec(x_18); +lean_dec(x_7); lean_dec(x_6); -lean_dec(x_5); -x_19 = l_Lean_Parser_ParserState_restore(x_16, x_14, x_15); -lean_dec(x_14); -x_20 = l_Lean_nullKind; -x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_3); -return x_21; -} -} +x_20 = l_Lean_Parser_ParserState_restore(x_17, x_15, x_16); +lean_dec(x_15); +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_array_get_size(x_21); +lean_dec(x_21); +x_23 = lean_nat_sub(x_22, x_3); +lean_dec(x_22); +x_24 = lean_unsigned_to_nat(1u); +x_25 = lean_nat_dec_eq(x_23, x_24); +lean_dec(x_23); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = l_Lean_nullKind; +x_27 = l_Lean_Parser_ParserState_mkNode(x_20, x_26, x_3); +return x_27; } else { -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); if (x_4 == 0) { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -lean_dec(x_10); -lean_dec(x_9); -x_36 = lean_box(0); -x_37 = l_Lean_Parser_ParserState_pushSyntax(x_11, x_36); -x_38 = l_Lean_nullKind; -x_39 = l_Lean_Parser_ParserState_mkNode(x_37, x_38, x_3); -return x_39; +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_20, x_28, x_3); +return x_29; } else { -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); -lean_dec(x_9); -x_41 = l_Lean_nullKind; -x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_3); -return x_42; +lean_dec(x_3); +return x_20; } } } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +} +else +{ +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_6); +if (x_5 == 0) +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +lean_dec(x_11); +lean_dec(x_10); +x_44 = lean_box(0); +x_45 = l_Lean_Parser_ParserState_pushSyntax(x_12, x_44); +x_46 = l_Lean_nullKind; +x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_3); +return x_47; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_48 = l_Lean_Parser_ParserState_restore(x_12, x_10, x_11); +lean_dec(x_10); +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_array_get_size(x_49); +lean_dec(x_49); +x_51 = lean_nat_sub(x_50, x_3); +lean_dec(x_50); +x_52 = lean_unsigned_to_nat(2u); +x_53 = lean_nat_dec_eq(x_51, x_52); +lean_dec(x_51); +if (x_53 == 0) +{ +lean_object* x_54; lean_object* x_55; +x_54 = l_Lean_nullKind; +x_55 = l_Lean_Parser_ParserState_mkNode(x_48, x_54, x_3); +return x_55; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_nullKind; +x_57 = l_Lean_Parser_ParserState_mkNode(x_48, x_56, x_3); +return x_57; +} +else +{ +lean_object* x_58; +lean_dec(x_3); +x_58 = l_Lean_Parser_ParserState_popSyntax(x_48); +return x_58; +} +} +} +} +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; -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 = 0; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +x_9 = 0; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(x_1, x_2, x_8, x_3, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_doSeq___elambda__1___closed__1() { @@ -27614,7 +27920,7 @@ x_16 = lean_array_get_size(x_15); lean_dec(x_15); x_17 = 0; x_18 = 0; -x_19 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(x_17, x_18, x_1, x_2, x_14); +x_19 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(x_17, x_18, x_18, x_1, x_2, x_14); x_20 = l_Lean_Parser_Term_doSeq___elambda__1___closed__2; x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_16); x_22 = l_Lean_Parser_mergeOrElseErrors(x_21, x_11, x_8); @@ -27686,30 +27992,34 @@ x_1 = l_Lean_Parser_Term_doSeq___closed__5; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); -return x_11; +x_12 = lean_unbox(x_5); +lean_dec(x_5); +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +return x_13; } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1___boxed(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: { -uint8_t x_6; uint8_t x_7; lean_object* x_8; -x_6 = lean_unbox(x_1); +uint8_t x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = lean_unbox(x_2); +x_8 = lean_unbox(x_2); lean_dec(x_2); -x_8 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); -return x_8; +x_9 = lean_unbox(x_3); +lean_dec(x_3); +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_doSeq___elambda__1___spec__1(x_7, x_8, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_bracketedDoSeq___elambda__1___closed__1() { @@ -31723,230 +32033,287 @@ lean_ctor_set(x_3, 1, x_1); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -x_11 = lean_unsigned_to_nat(0u); -lean_inc(x_6); -x_12 = l_Lean_Parser_Term_letDecl___elambda__1(x_11, x_6, x_7); -x_13 = lean_ctor_get(x_12, 3); -lean_inc(x_13); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_25; lean_object* x_42; lean_object* x_43; -lean_dec(x_10); +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_array_get_size(x_9); lean_dec(x_9); -x_14 = lean_ctor_get(x_12, 0); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +x_12 = lean_unsigned_to_nat(0u); +lean_inc(x_7); +x_13 = l_Lean_Parser_Term_letDecl___elambda__1(x_12, x_7, x_8); +x_14 = lean_ctor_get(x_13, 3); lean_inc(x_14); -x_15 = lean_array_get_size(x_14); -lean_dec(x_14); -x_16 = lean_ctor_get(x_12, 1); -lean_inc(x_16); -lean_inc(x_6); -x_42 = l_Lean_Parser_tokenFn(x_6, x_12); -x_43 = lean_ctor_get(x_42, 3); -lean_inc(x_43); -if (lean_obj_tag(x_43) == 0) +if (lean_obj_tag(x_14) == 0) { -lean_object* x_44; lean_object* x_45; -x_44 = lean_ctor_get(x_42, 0); -lean_inc(x_44); -x_45 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_44); -lean_dec(x_44); -if (lean_obj_tag(x_45) == 2) -{ -lean_object* x_46; lean_object* x_47; uint8_t x_48; -x_46 = lean_ctor_get(x_45, 1); -lean_inc(x_46); -lean_dec(x_45); -x_47 = l_Lean_Parser_Term_have___elambda__1___closed__7; -x_48 = lean_string_dec_eq(x_46, x_47); -lean_dec(x_46); -if (x_48 == 0) -{ -lean_object* x_49; lean_object* x_50; -x_49 = l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_16); -x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_42, x_49, x_16); -x_25 = x_50; -goto block_41; -} -else -{ -x_25 = x_42; -goto block_41; -} -} -else +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_32; lean_object* x_49; lean_object* x_50; +lean_dec(x_11); +lean_dec(x_10); +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 = lean_ctor_get(x_13, 1); +lean_inc(x_17); +lean_inc(x_7); +x_49 = l_Lean_Parser_tokenFn(x_7, x_13); +x_50 = lean_ctor_get(x_49, 3); +lean_inc(x_50); +if (lean_obj_tag(x_50) == 0) { lean_object* x_51; lean_object* x_52; -lean_dec(x_45); -x_51 = l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_16); -x_52 = l_Lean_Parser_ParserState_mkErrorsAt(x_42, x_51, x_16); -x_25 = x_52; -goto block_41; +x_51 = lean_ctor_get(x_49, 0); +lean_inc(x_51); +x_52 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_51); +lean_dec(x_51); +if (lean_obj_tag(x_52) == 2) +{ +lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_53 = lean_ctor_get(x_52, 1); +lean_inc(x_53); +lean_dec(x_52); +x_54 = l_Lean_Parser_Term_have___elambda__1___closed__7; +x_55 = lean_string_dec_eq(x_53, x_54); +lean_dec(x_53); +if (x_55 == 0) +{ +lean_object* x_56; lean_object* x_57; +x_56 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_17); +x_57 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_56, x_17); +x_32 = x_57; +goto block_48; +} +else +{ +x_32 = x_49; +goto block_48; } } else { -lean_object* x_53; lean_object* x_54; -lean_dec(x_43); -x_53 = l_Lean_Parser_Term_have___elambda__1___closed__10; -lean_inc(x_16); -x_54 = l_Lean_Parser_ParserState_mkErrorsAt(x_42, x_53, x_16); -x_25 = x_54; -goto block_41; +lean_object* x_58; lean_object* x_59; +lean_dec(x_52); +x_58 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_17); +x_59 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_58, x_17); +x_32 = x_59; +goto block_48; } -block_24: +} +else { -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = l_Lean_nullKind; -lean_inc(x_15); -x_19 = l_Lean_Parser_ParserState_mkNode(x_17, x_18, x_15); -x_20 = lean_ctor_get(x_19, 3); -lean_inc(x_20); -if (lean_obj_tag(x_20) == 0) +lean_object* x_60; lean_object* x_61; +lean_dec(x_50); +x_60 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_17); +x_61 = l_Lean_Parser_ParserState_mkErrorsAt(x_49, x_60, x_17); +x_32 = x_61; +goto block_48; +} +block_31: { +lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_19 = l_Lean_nullKind; +lean_inc(x_16); +x_20 = l_Lean_Parser_ParserState_mkNode(x_18, x_19, x_16); +x_21 = lean_ctor_get(x_20, 3); +lean_inc(x_21); +if (lean_obj_tag(x_21) == 0) +{ +lean_dec(x_17); lean_dec(x_16); -lean_dec(x_15); { -uint8_t _tmp_3 = x_2; -lean_object* _tmp_6 = x_19; -x_4 = _tmp_3; -x_7 = _tmp_6; +uint8_t _tmp_4 = x_2; +lean_object* _tmp_7 = x_20; +x_5 = _tmp_4; +x_8 = _tmp_7; } goto _start; } else { -lean_object* x_22; lean_object* x_23; -lean_dec(x_20); -lean_dec(x_6); -x_22 = l_Lean_Parser_ParserState_restore(x_19, x_15, x_16); -lean_dec(x_15); -x_23 = l_Lean_Parser_ParserState_mkNode(x_22, x_18, x_3); +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; +lean_dec(x_21); +lean_dec(x_7); +x_23 = l_Lean_Parser_ParserState_restore(x_20, x_16, x_17); +lean_dec(x_16); +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_array_get_size(x_24); +lean_dec(x_24); +x_26 = lean_nat_sub(x_25, x_3); +lean_dec(x_25); +x_27 = lean_unsigned_to_nat(1u); +x_28 = lean_nat_dec_eq(x_26, x_27); +lean_dec(x_26); +if (x_28 == 0) +{ +lean_object* x_29; +x_29 = l_Lean_Parser_ParserState_mkNode(x_23, x_19, x_3); +return x_29; +} +else +{ +if (x_4 == 0) +{ +lean_object* x_30; +x_30 = l_Lean_Parser_ParserState_mkNode(x_23, x_19, x_3); +return x_30; +} +else +{ +lean_dec(x_3); return x_23; } } -block_41: -{ -lean_object* x_26; -x_26 = lean_ctor_get(x_25, 3); -lean_inc(x_26); -if (lean_obj_tag(x_26) == 0) -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_25, 1); -lean_inc(x_27); -lean_inc(x_6); -x_28 = l_Lean_Parser_tokenFn(x_6, x_25); -x_29 = lean_ctor_get(x_28, 3); -lean_inc(x_29); -if (lean_obj_tag(x_29) == 0) -{ -lean_object* x_30; lean_object* x_31; -x_30 = lean_ctor_get(x_28, 0); -lean_inc(x_30); -x_31 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_30); -lean_dec(x_30); -if (lean_obj_tag(x_31) == 2) -{ -lean_object* x_32; lean_object* x_33; uint8_t x_34; -x_32 = lean_ctor_get(x_31, 1); -lean_inc(x_32); -lean_dec(x_31); -x_33 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__2; -x_34 = lean_string_dec_eq(x_32, x_33); -lean_dec(x_32); -if (x_34 == 0) -{ -lean_object* x_35; lean_object* x_36; -x_35 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__5; -x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_35, x_27); -x_17 = x_36; -goto block_24; -} -else -{ -lean_dec(x_27); -x_17 = x_28; -goto block_24; } } -else +block_48: +{ +lean_object* x_33; +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; +x_34 = lean_ctor_get(x_32, 1); +lean_inc(x_34); +lean_inc(x_7); +x_35 = l_Lean_Parser_tokenFn(x_7, x_32); +x_36 = lean_ctor_get(x_35, 3); +lean_inc(x_36); +if (lean_obj_tag(x_36) == 0) { lean_object* x_37; lean_object* x_38; -lean_dec(x_31); -x_37 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__5; -x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_37, x_27); -x_17 = x_38; -goto block_24; +x_37 = lean_ctor_get(x_35, 0); +lean_inc(x_37); +x_38 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_37); +lean_dec(x_37); +if (lean_obj_tag(x_38) == 2) +{ +lean_object* x_39; lean_object* x_40; uint8_t x_41; +x_39 = lean_ctor_get(x_38, 1); +lean_inc(x_39); +lean_dec(x_38); +x_40 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__2; +x_41 = lean_string_dec_eq(x_39, x_40); +lean_dec(x_39); +if (x_41 == 0) +{ +lean_object* x_42; lean_object* x_43; +x_42 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__5; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_35, x_42, x_34); +x_18 = x_43; +goto block_31; +} +else +{ +lean_dec(x_34); +x_18 = x_35; +goto block_31; } } else { -lean_object* x_39; lean_object* x_40; -lean_dec(x_29); -x_39 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__5; -x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_28, x_39, x_27); -x_17 = x_40; -goto block_24; +lean_object* x_44; lean_object* x_45; +lean_dec(x_38); +x_44 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__5; +x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_35, x_44, x_34); +x_18 = x_45; +goto block_31; } } else { -lean_dec(x_26); -x_17 = x_25; -goto block_24; +lean_object* x_46; lean_object* x_47; +lean_dec(x_36); +x_46 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__5; +x_47 = l_Lean_Parser_ParserState_mkErrorsAt(x_35, x_46, x_34); +x_18 = x_47; +goto block_31; +} +} +else +{ +lean_dec(x_33); +x_18 = x_32; +goto block_31; } } } else { -lean_dec(x_13); -lean_dec(x_6); +lean_dec(x_14); +lean_dec(x_7); +if (x_5 == 0) +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +lean_dec(x_11); +lean_dec(x_10); +x_62 = lean_box(0); +x_63 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_62); +x_64 = l_Lean_nullKind; +x_65 = l_Lean_Parser_ParserState_mkNode(x_63, x_64, x_3); +return x_65; +} +else +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; uint8_t x_71; +x_66 = l_Lean_Parser_ParserState_restore(x_13, x_10, x_11); +lean_dec(x_10); +x_67 = lean_ctor_get(x_66, 0); +lean_inc(x_67); +x_68 = lean_array_get_size(x_67); +lean_dec(x_67); +x_69 = lean_nat_sub(x_68, x_3); +lean_dec(x_68); +x_70 = lean_unsigned_to_nat(2u); +x_71 = lean_nat_dec_eq(x_69, x_70); +lean_dec(x_69); +if (x_71 == 0) +{ +lean_object* x_72; lean_object* x_73; +x_72 = l_Lean_nullKind; +x_73 = l_Lean_Parser_ParserState_mkNode(x_66, x_72, x_3); +return x_73; +} +else +{ if (x_4 == 0) { -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; -lean_dec(x_10); -lean_dec(x_9); -x_55 = lean_box(0); -x_56 = l_Lean_Parser_ParserState_pushSyntax(x_12, x_55); -x_57 = l_Lean_nullKind; -x_58 = l_Lean_Parser_ParserState_mkNode(x_56, x_57, x_3); -return x_58; +lean_object* x_74; lean_object* x_75; +x_74 = l_Lean_nullKind; +x_75 = l_Lean_Parser_ParserState_mkNode(x_66, x_74, x_3); +return x_75; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_59 = l_Lean_Parser_ParserState_restore(x_12, x_9, x_10); -lean_dec(x_9); -x_60 = l_Lean_nullKind; -x_61 = l_Lean_Parser_ParserState_mkNode(x_59, x_60, x_3); -return x_61; +lean_object* x_76; +lean_dec(x_3); +x_76 = l_Lean_Parser_ParserState_popSyntax(x_66); +return x_76; } } } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; -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 = 0; -x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); -return x_9; +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +x_9 = 0; +x_10 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2(x_1, x_2, x_8, x_3, x_9, x_4, x_5, x_6); +return x_10; } } lean_object* _init_l_Lean_Parser_Term_where___elambda__1___closed__1() { @@ -32023,7 +32390,7 @@ uint8_t x_20; uint8_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x lean_dec(x_8); x_20 = 1; x_21 = 0; -x_22 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(x_20, x_21, x_1, x_2, x_9); +x_22 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(x_20, x_21, x_21, x_1, x_2, x_9); lean_dec(x_1); x_23 = l_Lean_Parser_Term_where___elambda__1___closed__2; x_24 = l_Lean_Parser_ParserState_mkNode(x_22, x_23, x_5); @@ -32179,32 +32546,36 @@ x_1 = l_Lean_Parser_Term_where___closed__10; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___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, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___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, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = lean_unbox(x_4); +x_11 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +x_12 = lean_unbox(x_5); lean_dec(x_5); -return x_11; +x_13 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2(x_9, x_10, x_3, x_11, x_12, x_6, x_7, x_8); +lean_dec(x_6); +return x_13; } } -lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1___boxed(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: { -uint8_t x_6; uint8_t x_7; lean_object* x_8; -x_6 = lean_unbox(x_1); +uint8_t x_7; uint8_t x_8; uint8_t x_9; lean_object* x_10; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = lean_unbox(x_2); +x_8 = lean_unbox(x_2); lean_dec(x_2); -x_8 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); +x_9 = lean_unbox(x_3); lean_dec(x_3); -return x_8; +x_10 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(x_7, x_8, x_9, x_4, x_5, x_6); +lean_dec(x_4); +return x_10; } } lean_object* l___regBuiltinParser_Lean_Parser_Term_where(lean_object* x_1) {