max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

chore: update stage0

Browse source
This commit is contained in:
Leonardo de Moura 2020-01-20 10:23:05 -08:00
parent f20d4aaa83
commit ffa2bf2d20
15 changed files with 983 additions and 713 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
stage0/src/Init/Lean/Elab/Tactic/Basic.lean
View file

@ -284,7 +284,7 @@ adaptExpander $ fun stx => match_syntax stx with
@[builtinTactic repeat] def evalRepeat : Tactic :=
adaptExpander $ fun stx => match_syntax stx with
| `(tactic| repeat $t) => `(tactic| try (($t); repeat $t)) -- TODO: remove parens around $t
| `(tactic| repeat $t) => `(tactic| try ($t; repeat $t))
| _ => throwUnsupportedSyntax
@[builtinTactic «assumption»] def evalAssumption : Tactic :=

13
stage0/src/Init/Lean/Parser/Parser.lean
View file

@ -1821,6 +1821,16 @@ private def noImmediateColon {k : ParserKind} : Parser k :=
private def pushNone {k : ParserKind} : Parser k :=
{ fn := fun a c s => s.pushSyntax mkNullNode }
/-
We support two kinds of antiquotations: `$id` and `$(t)`, where `id` is a term identifier and `t` is a term.
TODO: we are making both cases look like syntax terms. Reason: the current expander expects a term.
We should remove this hack and modify the expander. This hack is bad since it relies on how we define `id` and `paren` in
the term parser at `Term.lean`. -/
private def antiquotId {k} : Parser k := node `Lean.Parser.Term.id (identNoAntiquot >> pushNone)
private def antiquotNestedExpr {k} : Parser k := node `Lean.Parser.Term.paren ("(" >> node nullKind (termParser >> pushNone) >> ")")
private def antiquotExpr {k} : Parser k := antiquotId <|> antiquotNestedExpr
/--
Define parser for `$e` (if anonymous == true) and `$e:name`. Both
forms can also be used with an appended `*` to turn them into an
@ -1833,8 +1843,7 @@ let nameP := checkNoWsBefore ("no space before ':" ++ name ++ "'") >> symbolAux
-- antiquotation kind via `noImmediateColon`
let nameP := if anonymous then nameP <|> noImmediateColon >> pushNone >> pushNone else nameP;
node kind $ try $ dollarSymbol >> checkNoWsBefore "no space before" >>
-- use high precedence so that `$(x).y` is parsed as a projection of an antiquotation
termParser (appPrec + 1) >>
antiquotExpr >>
nameP >> optional "*"
def ident {k : ParserKind} : Parser k :=

42
stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c
View file

@ -422,6 +422,7 @@ lean_object* l_Lean_Elab_Term_elabShow___lambda__1___closed__2;
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBind(lean_object*);
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__3;
lean_object* l_Lean_Elab_Term_elabParserMacro(lean_object*, lean_object*, lean_object*, lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_object* l_Lean_Elab_Term_elabSubtype___lambda__1___closed__10;
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__3;
lean_object* l_Lean_Elab_Term_elabShow(lean_object*, lean_object*, lean_object*, lean_object*);
@ -443,7 +444,6 @@ lean_object* l_Lean_Elab_Term_elabLE___closed__4;
lean_object* l_Lean_Elab_Term_elabOrM___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Term_elabIff___closed__1;
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__3;
extern lean_object* l_Lean_Parser_Term_paren___elambda__1___closed__1;
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDollarProj___closed__3;
lean_object* l_Lean_Elab_Term_elabSubtype___closed__1;
lean_object* lean_panic_fn(lean_object*, lean_object*);
@ -1448,7 +1448,7 @@ x_116 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_117 = lean_array_push(x_116, x_115);
x_118 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_119 = lean_array_push(x_117, x_118);
x_120 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_120 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_121 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_121, 0, x_120);
lean_ctor_set(x_121, 1, x_119);
@ -1535,7 +1535,7 @@ x_167 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_168 = lean_array_push(x_167, x_166);
x_169 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_170 = lean_array_push(x_168, x_169);
x_171 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_171 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_172 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_172, 0, x_171);
lean_ctor_set(x_172, 1, x_170);
@ -1892,7 +1892,7 @@ x_40 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_41 = lean_array_push(x_40, x_39);
x_42 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_43 = lean_array_push(x_41, x_42);
x_44 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_44 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_45 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_45, 0, x_44);
lean_ctor_set(x_45, 1, x_43);
@ -1974,7 +1974,7 @@ x_89 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_90 = lean_array_push(x_89, x_88);
x_91 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_92 = lean_array_push(x_90, x_91);
x_93 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_93 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_94 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_94, 0, x_93);
lean_ctor_set(x_94, 1, x_92);
@ -2142,7 +2142,7 @@ x_162 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_163 = lean_array_push(x_162, x_161);
x_164 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_165 = lean_array_push(x_163, x_164);
x_166 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_166 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_167 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_167, 0, x_166);
lean_ctor_set(x_167, 1, x_165);
@ -2232,7 +2232,7 @@ x_215 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_216 = lean_array_push(x_215, x_214);
x_217 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_218 = lean_array_push(x_216, x_217);
x_219 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_219 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_220 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_220, 0, x_219);
lean_ctor_set(x_220, 1, x_218);
@ -2939,7 +2939,7 @@ x_31 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_32 = lean_array_push(x_31, x_30);
x_33 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_34 = lean_array_push(x_32, x_33);
x_35 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_35 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_36 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_36, 0, x_35);
lean_ctor_set(x_36, 1, x_34);
@ -3008,7 +3008,7 @@ x_71 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_72 = lean_array_push(x_71, x_70);
x_73 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_74 = lean_array_push(x_72, x_73);
x_75 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_75 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_76 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_76, 0, x_75);
lean_ctor_set(x_76, 1, x_74);
@ -3284,7 +3284,7 @@ x_43 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_44 = lean_array_push(x_43, x_42);
x_45 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_46 = lean_array_push(x_44, x_45);
x_47 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_47 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_48 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_48, 0, x_47);
lean_ctor_set(x_48, 1, x_46);
@ -3358,7 +3358,7 @@ x_87 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_88 = lean_array_push(x_87, x_86);
x_89 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_90 = lean_array_push(x_88, x_89);
x_91 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_91 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_92 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_92, 0, x_91);
lean_ctor_set(x_92, 1, x_90);
@ -3474,7 +3474,7 @@ x_146 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_147 = lean_array_push(x_146, x_145);
x_148 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_149 = lean_array_push(x_147, x_148);
x_150 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_150 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_151 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_151, 0, x_150);
lean_ctor_set(x_151, 1, x_149);
@ -3548,7 +3548,7 @@ x_190 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_191 = lean_array_push(x_190, x_189);
x_192 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_193 = lean_array_push(x_191, x_192);
x_194 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_194 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_195 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_195, 0, x_194);
lean_ctor_set(x_195, 1, x_193);
@ -3699,7 +3699,7 @@ x_260 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_261 = lean_array_push(x_260, x_259);
x_262 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_263 = lean_array_push(x_261, x_262);
x_264 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_264 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_265 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_265, 0, x_264);
lean_ctor_set(x_265, 1, x_263);
@ -3766,7 +3766,7 @@ x_299 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_300 = lean_array_push(x_299, x_298);
x_301 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_302 = lean_array_push(x_300, x_301);
x_303 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_303 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_304 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_304, 0, x_303);
lean_ctor_set(x_304, 1, x_302);
@ -3877,7 +3877,7 @@ x_355 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_356 = lean_array_push(x_355, x_354);
x_357 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_358 = lean_array_push(x_356, x_357);
x_359 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_359 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_360 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_360, 0, x_359);
lean_ctor_set(x_360, 1, x_358);
@ -3944,7 +3944,7 @@ x_394 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_395 = lean_array_push(x_394, x_393);
x_396 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_397 = lean_array_push(x_395, x_396);
x_398 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_398 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_399 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_399, 0, x_398);
lean_ctor_set(x_399, 1, x_397);
@ -4799,7 +4799,7 @@ x_88 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_89 = lean_array_push(x_88, x_87);
x_90 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_91 = lean_array_push(x_89, x_90);
x_92 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_92 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_93 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_93, 0, x_92);
lean_ctor_set(x_93, 1, x_91);
@ -4887,7 +4887,7 @@ x_135 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_136 = lean_array_push(x_135, x_134);
x_137 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_138 = lean_array_push(x_136, x_137);
x_139 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_139 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_140 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_140, 0, x_139);
lean_ctor_set(x_140, 1, x_138);
@ -4980,7 +4980,7 @@ x_184 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_185 = lean_array_push(x_184, x_183);
x_186 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_187 = lean_array_push(x_185, x_186);
x_188 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_188 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_189 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_189, 0, x_188);
lean_ctor_set(x_189, 1, x_187);
@ -5086,7 +5086,7 @@ x_241 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_242 = lean_array_push(x_241, x_240);
x_243 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_244 = lean_array_push(x_242, x_243);
x_245 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_245 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_246 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_246, 0, x_245);
lean_ctor_set(x_246, 1, x_244);

4
stage0/stdlib/Init/Lean/Elab/Level.c
View file

@ -75,6 +75,7 @@ lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog___lambda__4(lean_object*, lea
lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog;
extern lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__1;
lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog___closed__7;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__3;
lean_object* l_Lean_Elab_mkMessage___at_Lean_Elab_Level_elabLevel___main___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog___closed__5;
lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog___lambda__3___boxed(lean_object*, lean_object*, lean_object*);
@ -93,7 +94,6 @@ lean_object* l_Lean_mkLevelParam(lean_object*);
lean_object* l___private_Init_Data_Array_Basic_4__foldrRangeMAux___main___at_Lean_Elab_Level_elabLevel___main___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_throwError___at_Lean_Elab_Level_elabLevel___main___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__4;
lean_object* lean_name_mk_numeral(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Level_elabLevel___main___closed__4;
lean_object* l_Lean_Elab_getPos___at_Lean_Elab_Level_elabLevel___main___spec__3___boxed(lean_object*, lean_object*, lean_object*);
@ -1018,7 +1018,7 @@ _start:
lean_object* x_4; lean_object* x_5; uint8_t x_6;
lean_inc(x_1);
x_4 = l_Lean_Syntax_getKind(x_1);
x_5 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_5 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_6 = lean_name_eq(x_4, x_5);
if (x_6 == 0)
{

36
stage0/stdlib/Init/Lean/Elab/Quotation.c
View file

@ -384,10 +384,10 @@ lean_object* l_List_map___main___at___private_Init_Lean_Elab_Quotation_15__oldRu
extern lean_object* l_Lean_Parser_Term_str___elambda__1___closed__2;
extern lean_object* l_Lean_Syntax_inhabited;
lean_object* l___private_Init_Lean_Elab_Quotation_2__quoteList___main(lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
lean_object* l___private_Init_Lean_Elab_Quotation_9__compileStxMatch___main___closed__14;
extern lean_object* l_Lean_mkAppStx___closed__5;
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__44;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__3;
lean_object* l_Lean_Parser_Error_toString(lean_object*);
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__8;
lean_object* l___private_Init_Lean_Elab_Quotation_9__compileStxMatch___main___closed__28;
@ -396,6 +396,7 @@ extern lean_object* l_Lean_Parser_Term_letPatDecl___elambda__1___closed__2;
lean_object* l_List_foldl___main___at___private_Init_Lean_Elab_Quotation_14__toPreterm___main___spec__4(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Term_getLCtx(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__17;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_object* l_Lean_Syntax_setArg(lean_object*, lean_object*, lean_object*);
lean_object* l_List_head_x21___at___private_Init_Lean_Elab_Quotation_7__getHeadInfo___spec__1(lean_object*);
lean_object* lean_expand_stx_quot(lean_object*, lean_object*);
@ -411,7 +412,6 @@ lean_object* l_Lean_Syntax_getKind(lean_object*);
lean_object* lean_expand_match_syntax(lean_object*, lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_Term_match__syntax___elambda__1___closed__2;
lean_object* l_List_mapM___main___at___private_Init_Lean_Elab_Quotation_9__compileStxMatch___main___spec__5(lean_object*, lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_Term_paren___elambda__1___closed__1;
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__20;
lean_object* l_ReaderT_bind___at___private_Init_Lean_Elab_Quotation_8__explodeHeadPat___spec__1(lean_object*, lean_object*);
lean_object* lean_panic_fn(lean_object*, lean_object*);
@ -3212,7 +3212,7 @@ x_311 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_312 = lean_array_push(x_311, x_310);
x_313 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_314 = lean_array_push(x_312, x_313);
x_315 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_315 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_316 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_316, 0, x_315);
lean_ctor_set(x_316, 1, x_314);
@ -3344,7 +3344,7 @@ x_386 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_387 = lean_array_push(x_386, x_385);
x_388 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_389 = lean_array_push(x_387, x_388);
x_390 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_390 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_391 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_391, 0, x_390);
lean_ctor_set(x_391, 1, x_389);
@ -3519,7 +3519,7 @@ x_480 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_481 = lean_array_push(x_480, x_479);
x_482 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_483 = lean_array_push(x_481, x_482);
x_484 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_484 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_485 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_485, 0, x_484);
lean_ctor_set(x_485, 1, x_483);
@ -3988,7 +3988,7 @@ x_70 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_71 = lean_array_push(x_70, x_69);
x_72 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_73 = lean_array_push(x_71, x_72);
x_74 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_74 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_75 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_75, 0, x_74);
lean_ctor_set(x_75, 1, x_73);
@ -4109,7 +4109,7 @@ x_139 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_140 = lean_array_push(x_139, x_138);
x_141 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_142 = lean_array_push(x_140, x_141);
x_143 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_143 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_144 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_144, 0, x_143);
lean_ctor_set(x_144, 1, x_142);
@ -5278,7 +5278,7 @@ x_45 = lean_box(0);
x_46 = lean_name_eq(x_44, x_45);
lean_dec(x_44);
x_47 = l_Lean_Syntax_getArg(x_14, x_13);
x_48 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_48 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_inc(x_47);
x_49 = l_Lean_Syntax_isOfKind(x_47, x_48);
x_50 = l_Lean_Elab_Term_isAntiquotSplice(x_14);
@ -9220,7 +9220,7 @@ x_642 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_643 = lean_array_push(x_642, x_641);
x_644 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_645 = lean_array_push(x_643, x_644);
x_646 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_646 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_647 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_647, 0, x_646);
lean_ctor_set(x_647, 1, x_645);
@ -9577,7 +9577,7 @@ x_828 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
x_829 = lean_array_push(x_828, x_827);
x_830 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_831 = lean_array_push(x_829, x_830);
x_832 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_832 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_833 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_833, 0, x_832);
lean_ctor_set(x_833, 1, x_831);
@ -10087,7 +10087,7 @@ x_1035 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43
x_1036 = lean_array_push(x_1035, x_1034);
x_1037 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__55;
x_1038 = lean_array_push(x_1036, x_1037);
x_1039 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_1039 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_1040 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_1040, 0, x_1039);
lean_ctor_set(x_1040, 1, x_1038);
@ -10697,7 +10697,7 @@ lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint
x_19 = l_Lean_Syntax_inhabited;
x_20 = lean_unsigned_to_nat(1u);
x_21 = lean_array_get(x_19, x_4, x_20);
x_22 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_22 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_inc(x_21);
x_23 = l_Lean_Syntax_isOfKind(x_21, x_22);
if (x_23 == 0)
@ -11263,7 +11263,7 @@ lean_object* _init_l___private_Init_Lean_Elab_Quotation_12__letBindRhss___main__
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_2 = l___private_Init_Lean_Elab_Quotation_12__letBindRhss___main___closed__6;
x_3 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_3, 0, x_1);
@ -14618,7 +14618,7 @@ x_163 = lean_string_dec_eq(x_119, x_162);
if (x_163 == 0)
{
lean_object* x_164; uint8_t x_165;
x_164 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_164 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_165 = lean_string_dec_eq(x_119, x_164);
if (x_165 == 0)
{
@ -16853,7 +16853,7 @@ x_790 = lean_string_dec_eq(x_119, x_789);
if (x_790 == 0)
{
lean_object* x_791; uint8_t x_792;
x_791 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_791 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_792 = lean_string_dec_eq(x_119, x_791);
if (x_792 == 0)
{
@ -18633,7 +18633,7 @@ x_1266 = lean_string_dec_eq(x_119, x_1265);
if (x_1266 == 0)
{
lean_object* x_1267; uint8_t x_1268;
x_1267 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_1267 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_1268 = lean_string_dec_eq(x_119, x_1267);
if (x_1268 == 0)
{
@ -20447,7 +20447,7 @@ x_1748 = lean_string_dec_eq(x_119, x_1747);
if (x_1748 == 0)
{
lean_object* x_1749; uint8_t x_1750;
x_1749 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_1749 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_1750 = lean_string_dec_eq(x_119, x_1749);
if (x_1750 == 0)
{
@ -22294,7 +22294,7 @@ x_2237 = lean_string_dec_eq(x_119, x_2236);
if (x_2237 == 0)
{
lean_object* x_2238; uint8_t x_2239;
x_2238 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_2238 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_2239 = lean_string_dec_eq(x_119, x_2238);
if (x_2239 == 0)
{

212
stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c
View file

@ -13385,36 +13385,24 @@ return x_3;
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Option_HasRepr___rarg___closed__3;
x_3 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_3, 0, x_1);
lean_ctor_set(x_3, 1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__6() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string(";");
return x_1;
}
}
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__7() {
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__6;
x_2 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__5;
x_3 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_3, 0, x_1);
lean_ctor_set(x_3, 1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__8() {
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
@ -13426,43 +13414,55 @@ lean_ctor_set(x_3, 1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__9() {
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__8() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Array_empty___closed__1;
x_2 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__8;
x_2 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__7;
x_3 = lean_array_push(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__9() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Option_HasRepr___rarg___closed__3;
x_3 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_3, 0, x_1);
lean_ctor_set(x_3, 1, x_2);
return x_3;
}
}
lean_object* l_Lean_Elab_Tactic_evalRepeat___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
uint8_t x_4; lean_object* x_69; uint8_t x_70;
x_69 = l_Lean_Parser_Tactic_repeat___elambda__1___closed__2;
uint8_t x_4; lean_object* x_63; uint8_t x_64;
x_63 = l_Lean_Parser_Tactic_repeat___elambda__1___closed__2;
lean_inc(x_1);
x_70 = l_Lean_Syntax_isOfKind(x_1, x_69);
if (x_70 == 0)
x_64 = l_Lean_Syntax_isOfKind(x_1, x_63);
if (x_64 == 0)
{
uint8_t x_71;
x_71 = 0;
x_4 = x_71;
goto block_68;
uint8_t x_65;
x_65 = 0;
x_4 = x_65;
goto block_62;
}
else
{
lean_object* x_72; lean_object* x_73; lean_object* x_74; uint8_t x_75;
x_72 = l_Lean_Syntax_getArgs(x_1);
x_73 = lean_array_get_size(x_72);
lean_dec(x_72);
x_74 = lean_unsigned_to_nat(2u);
x_75 = lean_nat_dec_eq(x_73, x_74);
lean_dec(x_73);
x_4 = x_75;
goto block_68;
lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t x_69;
x_66 = l_Lean_Syntax_getArgs(x_1);
x_67 = lean_array_get_size(x_66);
lean_dec(x_66);
x_68 = lean_unsigned_to_nat(2u);
x_69 = lean_nat_dec_eq(x_67, x_68);
lean_dec(x_67);
x_4 = x_69;
goto block_62;
}
block_68:
block_62:
{
uint8_t x_5;
x_5 = l_coeDecidableEq(x_4);
@ -13484,102 +13484,92 @@ lean_dec(x_2);
x_10 = !lean_is_exclusive(x_9);
if (x_10 == 0)
{
lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38;
lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35;
x_11 = lean_ctor_get(x_9, 0);
lean_dec(x_11);
x_12 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__4;
x_12 = l_Array_empty___closed__1;
lean_inc(x_8);
x_13 = lean_array_push(x_12, x_8);
x_14 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__5;
x_14 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__6;
x_15 = lean_array_push(x_13, x_14);
x_16 = l_Lean_Parser_Tactic_paren___elambda__1___closed__1;
x_17 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_17, 0, x_16);
lean_ctor_set(x_17, 1, x_15);
x_18 = l_Array_empty___closed__1;
x_19 = lean_array_push(x_18, x_17);
x_20 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__7;
x_21 = lean_array_push(x_19, x_20);
x_22 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__9;
x_23 = lean_array_push(x_22, x_8);
x_24 = l_Lean_Parser_Tactic_repeat___elambda__1___closed__2;
x_16 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__8;
x_17 = lean_array_push(x_16, x_8);
x_18 = l_Lean_Parser_Tactic_repeat___elambda__1___closed__2;
x_19 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_19, 0, x_18);
lean_ctor_set(x_19, 1, x_17);
x_20 = lean_array_push(x_15, x_19);
x_21 = l_Lean_nullKind___closed__2;
x_22 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_22, 0, x_21);
lean_ctor_set(x_22, 1, x_20);
x_23 = lean_array_push(x_12, x_22);
x_24 = l_Lean_Parser_Tactic_seq___elambda__1___closed__3;
x_25 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_25, 0, x_24);
lean_ctor_set(x_25, 1, x_23);
x_26 = lean_array_push(x_21, x_25);
x_27 = l_Lean_nullKind___closed__2;
x_28 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_28, 0, x_27);
lean_ctor_set(x_28, 1, x_26);
x_29 = lean_array_push(x_18, x_28);
x_30 = l_Lean_Parser_Tactic_seq___elambda__1___closed__3;
x_26 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__4;
x_27 = lean_array_push(x_26, x_25);
x_28 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__9;
x_29 = lean_array_push(x_27, x_28);
x_30 = l_Lean_Parser_Tactic_paren___elambda__1___closed__1;
x_31 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_31, 0, x_30);
lean_ctor_set(x_31, 1, x_29);
x_32 = lean_array_push(x_12, x_31);
x_33 = lean_array_push(x_32, x_14);
x_34 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_34, 0, x_16);
lean_ctor_set(x_34, 1, x_33);
x_35 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__2;
x_36 = lean_array_push(x_35, x_34);
x_37 = l_Lean_Parser_Tactic_try___elambda__1___closed__2;
x_38 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_38, 0, x_37);
lean_ctor_set(x_38, 1, x_36);
lean_ctor_set(x_9, 0, x_38);
x_32 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__2;
x_33 = lean_array_push(x_32, x_31);
x_34 = l_Lean_Parser_Tactic_try___elambda__1___closed__2;
x_35 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_35, 0, x_34);
lean_ctor_set(x_35, 1, x_33);
lean_ctor_set(x_9, 0, x_35);
return x_9;
}
else
{
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; 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; 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_object* x_65; lean_object* x_66; lean_object* x_67;
x_39 = lean_ctor_get(x_9, 1);
lean_inc(x_39);
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; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; 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;
x_36 = lean_ctor_get(x_9, 1);
lean_inc(x_36);
lean_dec(x_9);
x_40 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__4;
x_37 = l_Array_empty___closed__1;
lean_inc(x_8);
x_41 = lean_array_push(x_40, x_8);
x_42 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__5;
x_43 = lean_array_push(x_41, x_42);
x_44 = l_Lean_Parser_Tactic_paren___elambda__1___closed__1;
x_45 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_45, 0, x_44);
lean_ctor_set(x_45, 1, x_43);
x_46 = l_Array_empty___closed__1;
x_47 = lean_array_push(x_46, x_45);
x_48 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__7;
x_49 = lean_array_push(x_47, x_48);
x_50 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__9;
x_51 = lean_array_push(x_50, x_8);
x_52 = l_Lean_Parser_Tactic_repeat___elambda__1___closed__2;
x_53 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_53, 0, x_52);
lean_ctor_set(x_53, 1, x_51);
x_54 = lean_array_push(x_49, x_53);
x_55 = l_Lean_nullKind___closed__2;
x_38 = lean_array_push(x_37, x_8);
x_39 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__6;
x_40 = lean_array_push(x_38, x_39);
x_41 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__8;
x_42 = lean_array_push(x_41, x_8);
x_43 = l_Lean_Parser_Tactic_repeat___elambda__1___closed__2;
x_44 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_44, 0, x_43);
lean_ctor_set(x_44, 1, x_42);
x_45 = lean_array_push(x_40, x_44);
x_46 = l_Lean_nullKind___closed__2;
x_47 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_47, 0, x_46);
lean_ctor_set(x_47, 1, x_45);
x_48 = lean_array_push(x_37, x_47);
x_49 = l_Lean_Parser_Tactic_seq___elambda__1___closed__3;
x_50 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_50, 0, x_49);
lean_ctor_set(x_50, 1, x_48);
x_51 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__4;
x_52 = lean_array_push(x_51, x_50);
x_53 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__9;
x_54 = lean_array_push(x_52, x_53);
x_55 = l_Lean_Parser_Tactic_paren___elambda__1___closed__1;
x_56 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_56, 0, x_55);
lean_ctor_set(x_56, 1, x_54);
x_57 = lean_array_push(x_46, x_56);
x_58 = l_Lean_Parser_Tactic_seq___elambda__1___closed__3;
x_59 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_59, 0, x_58);
lean_ctor_set(x_59, 1, x_57);
x_60 = lean_array_push(x_40, x_59);
x_61 = lean_array_push(x_60, x_42);
x_62 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_62, 0, x_44);
lean_ctor_set(x_62, 1, x_61);
x_63 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__2;
x_64 = lean_array_push(x_63, x_62);
x_65 = l_Lean_Parser_Tactic_try___elambda__1___closed__2;
x_66 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_66, 0, x_65);
lean_ctor_set(x_66, 1, x_64);
x_67 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_67, 0, x_66);
lean_ctor_set(x_67, 1, x_39);
return x_67;
x_57 = l_Lean_Elab_Tactic_evalRepeat___lambda__1___closed__2;
x_58 = lean_array_push(x_57, x_56);
x_59 = l_Lean_Parser_Tactic_try___elambda__1___closed__2;
x_60 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_60, 0, x_59);
lean_ctor_set(x_60, 1, x_58);
x_61 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_61, 0, x_60);
lean_ctor_set(x_61, 1, x_36);
return x_61;
}
}
}

6
stage0/stdlib/Init/Lean/Elab/Term.c
View file

@ -544,6 +544,7 @@ lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__5;
lean_object* l_Lean_Elab_Term_getLCtx(lean_object*, lean_object*);
lean_object* l_PersistentArray_foldlMAux___main___at___private_Init_Lean_Elab_Term_3__fromMetaState___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_Term_9__mkPairsAux___main___closed__6;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_object* l_Lean_Elab_Term_traceAtCmdPos(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_Term_5__expandCDot___closed__2;
uint8_t l_HashMapImp_contains___at_Lean_Elab_Term_addBuiltinTermElab___spec__2(lean_object*, lean_object*);
@ -579,7 +580,6 @@ lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr(lean_object*);
lean_object* l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Term_decLevel___closed__3;
extern lean_object* l_Lean_Parser_Term_paren___elambda__1___closed__1;
lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1___closed__1;
lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Term_elabTermAux___main___spec__1(lean_object*, lean_object*);
lean_object* lean_panic_fn(lean_object*, lean_object*);
@ -17921,7 +17921,7 @@ lean_object* l_Lean_Elab_Term_elabParen(lean_object* x_1, lean_object* x_2, lean
_start:
{
uint8_t x_5; lean_object* x_145; uint8_t x_146;
x_145 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_145 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_inc(x_1);
x_146 = l_Lean_Syntax_isOfKind(x_1, x_145);
if (x_146 == 0)
@ -18507,7 +18507,7 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabParen(lean_object* x_1) {
_start:
{
lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5;
x_2 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabParen___closed__2;
x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabParen___closed__3;
x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1);

12
stage0/stdlib/Init/Lean/Elab/TermBinders.c
View file

@ -181,10 +181,10 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabForall___closed__1;
extern lean_object* l_Lean_Parser_Term_implicitBinder___elambda__1___closed__2;
lean_object* l_Lean_Elab_Term_elabArrow(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_TermBinders_10__expandFunBindersAux___main___closed__9;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
extern lean_object* l_Lean_Parser_Term_matchAlt___elambda__1___closed__2;
lean_object* l_Lean_Elab_Term_elabArrow___lambda__1___closed__5;
extern lean_object* l_Lean_mkAppStx___closed__5;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__3;
lean_object* l_Lean_Elab_Term_elabFun___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabForall___closed__3;
lean_object* l_Lean_Syntax_getNumArgs(lean_object*);
@ -5814,7 +5814,7 @@ x_480 = lean_string_dec_eq(x_19, x_479);
if (x_480 == 0)
{
lean_object* x_481; uint8_t x_482;
x_481 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_481 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_482 = lean_string_dec_eq(x_19, x_481);
if (x_482 == 0)
{
@ -8174,7 +8174,7 @@ x_1400 = lean_string_dec_eq(x_19, x_1399);
if (x_1400 == 0)
{
lean_object* x_1401; uint8_t x_1402;
x_1401 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_1401 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_1402 = lean_string_dec_eq(x_19, x_1401);
if (x_1402 == 0)
{
@ -9805,7 +9805,7 @@ x_1936 = lean_string_dec_eq(x_19, x_1935);
if (x_1936 == 0)
{
lean_object* x_1937; uint8_t x_1938;
x_1937 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_1937 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_1938 = lean_string_dec_eq(x_19, x_1937);
if (x_1938 == 0)
{
@ -11470,7 +11470,7 @@ x_2478 = lean_string_dec_eq(x_19, x_2477);
if (x_2478 == 0)
{
lean_object* x_2479; uint8_t x_2480;
x_2479 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_2479 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_2480 = lean_string_dec_eq(x_19, x_2479);
if (x_2480 == 0)
{
@ -13167,7 +13167,7 @@ x_3026 = lean_string_dec_eq(x_2791, x_3025);
if (x_3026 == 0)
{
lean_object* x_3027; uint8_t x_3028;
x_3027 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_3027 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3028 = lean_string_dec_eq(x_2791, x_3027);
if (x_3028 == 0)
{

96
stage0/stdlib/Init/Lean/Parser/Command.c
View file

@ -56,6 +56,7 @@ lean_object* l_Lean_Parser_ParserState_mkError(lean_object*, lean_object*);
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;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
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*);
lean_object* l_Lean_Parser_Term_stxQuot___closed__8;
@ -239,6 +240,7 @@ lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambd
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;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
lean_object* l_Lean_Parser_Command_section___elambda__1___closed__8;
lean_object* l_Lean_Parser_Command_declModifiers___closed__13;
lean_object* l_Lean_Parser_Command_universes___elambda__1___closed__5;
@ -419,7 +421,6 @@ lean_object* l_Lean_Parser_Command_declModifiers___closed__5;
lean_object* l_Lean_Parser_Command_structureTk___closed__1;
lean_object* l_Lean_Parser_Command_init__quot___closed__1;
lean_object* l_Lean_Parser_Command_inductive___elambda__1___closed__6;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__7;
lean_object* l_Lean_Parser_Command_universes___closed__1;
lean_object* lean_nat_sub(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__6;
@ -601,7 +602,6 @@ lean_object* l_Lean_Parser_Command_instance___elambda__1___closed__9;
lean_object* l_Lean_Parser_Command_partial___closed__1;
lean_object* l_Lean_Parser_Command_abbrev___elambda__1___closed__3;
lean_object* l_Lean_Parser_Command_private___elambda__1___closed__9;
extern lean_object* l_Lean_Parser_Term_explicitBinder___closed__1;
lean_object* l_Lean_Parser_Command_classInductive___closed__4;
lean_object* l_Lean_Parser_Command_constant___closed__5;
lean_object* l_Lean_Parser_Command_attributes___closed__1;
@ -679,7 +679,6 @@ lean_object* l_Lean_Parser_Command_structExplicitBinder___closed__5;
lean_object* l_Lean_Parser_Command_private___closed__2;
lean_object* l_Lean_Parser_Command_open___elambda__1___closed__1;
lean_object* l_Lean_Parser_Command_openRenaming___elambda__1___closed__4;
extern lean_object* l_Lean_Parser_Level_paren___closed__4;
lean_object* l_Lean_Parser_Command_set__option___elambda__1___closed__12;
lean_object* l_Lean_Parser_Command_declValSimple___closed__2;
lean_object* l_Lean_Parser_Command_attributes___closed__4;
@ -914,6 +913,7 @@ lean_object* l_Lean_Parser_Command_attrArg___closed__1;
lean_object* l_Lean_Parser_Command_partial___closed__2;
lean_object* l_Lean_Parser_Command_attribute___elambda__1___closed__2;
lean_object* l_Lean_Parser_Command_openHiding___closed__1;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
lean_object* l_Lean_Parser_Command_def___elambda__1___closed__7;
lean_object* l_Lean_Parser_Command_inductive___elambda__1___closed__2;
lean_object* l_Lean_Parser_Command_export___elambda__1___closed__2;
@ -944,6 +944,7 @@ lean_object* l_Lean_Parser_Command_attribute___elambda__1___closed__1;
lean_object* l_Lean_Parser_Command_axiom___closed__1;
lean_object* l_Lean_Parser_Command_exit___closed__3;
lean_object* l_Lean_Parser_Command_unsafe___elambda__1(lean_object*, lean_object*, lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
extern lean_object* l_Lean_Parser_Term_typeAscription___closed__2;
lean_object* l_Lean_Parser_Command_private___elambda__1___closed__7;
lean_object* l_Lean_Parser_Command_noncomputable___elambda__1___closed__6;
@ -1042,7 +1043,6 @@ lean_object* l_Lean_Parser_Command_axiom___elambda__1___closed__3;
lean_object* l_Lean_Parser_Command_openHiding___closed__6;
lean_object* l_Lean_Parser_Term_stxQuot___closed__1;
lean_object* l_Lean_Parser_Command_partial___elambda__1___closed__2;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__14;
lean_object* l_Lean_Parser_Command_attribute___elambda__1___closed__14;
lean_object* l_Lean_Parser_Command_attrArg___closed__3;
lean_object* l_Lean_Parser_Command_export___elambda__1___closed__6;
@ -1555,13 +1555,13 @@ lean_object* x_24; lean_object* x_25; uint8_t x_26;
x_24 = lean_ctor_get(x_23, 1);
lean_inc(x_24);
lean_dec(x_23);
x_25 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_25 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_26 = lean_string_dec_eq(x_24, x_25);
lean_dec(x_24);
if (x_26 == 0)
{
lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31;
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_27, x_19);
x_29 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2;
x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_16);
@ -1584,7 +1584,7 @@ else
{
lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39;
lean_dec(x_23);
x_35 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_35 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_35, x_19);
x_37 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2;
x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_16);
@ -1597,7 +1597,7 @@ else
{
lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44;
lean_dec(x_21);
x_40 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_40 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_40, x_19);
x_42 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2;
x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_16);
@ -1810,7 +1810,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_stxQuot___closed__3;
x_2 = l_Lean_Parser_Level_paren___closed__4;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
@ -10867,13 +10867,13 @@ lean_object* x_67; lean_object* x_68; uint8_t x_69;
x_67 = lean_ctor_get(x_66, 1);
lean_inc(x_67);
lean_dec(x_66);
x_68 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_68 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_69 = lean_string_dec_eq(x_67, x_68);
lean_dec(x_67);
if (x_69 == 0)
{
lean_object* x_70; lean_object* x_71;
x_70 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_70 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_7);
x_71 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_70, x_7);
x_31 = x_71;
@ -10889,7 +10889,7 @@ else
{
lean_object* x_72; lean_object* x_73;
lean_dec(x_66);
x_72 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_72 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_7);
x_73 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_72, x_7);
x_31 = x_73;
@ -10900,7 +10900,7 @@ else
{
lean_object* x_74; lean_object* x_75;
lean_dec(x_64);
x_74 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_74 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_7);
x_75 = l_Lean_Parser_ParserState_mkErrorsAt(x_63, x_74, x_7);
x_31 = x_75;
@ -10968,13 +10968,13 @@ lean_object* x_38; lean_object* x_39; uint8_t x_40;
x_38 = lean_ctor_get(x_37, 1);
lean_inc(x_38);
lean_dec(x_37);
x_39 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_39 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_40 = lean_string_dec_eq(x_38, x_39);
lean_dec(x_38);
if (x_40 == 0)
{
lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45;
x_41 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_41 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_42 = l_Lean_Parser_ParserState_mkErrorsAt(x_34, x_41, x_33);
x_43 = lean_ctor_get(x_42, 0);
lean_inc(x_43);
@ -11009,7 +11009,7 @@ else
{
lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53;
lean_dec(x_37);
x_49 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_49 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_50 = l_Lean_Parser_ParserState_mkErrorsAt(x_34, x_49, x_33);
x_51 = lean_ctor_get(x_50, 0);
lean_inc(x_51);
@ -11028,7 +11028,7 @@ else
{
lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58;
lean_dec(x_35);
x_54 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_54 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_55 = l_Lean_Parser_ParserState_mkErrorsAt(x_34, x_54, x_33);
x_56 = lean_ctor_get(x_55, 0);
lean_inc(x_56);
@ -11069,8 +11069,8 @@ lean_object* _init_l_Lean_Parser_Command_strictInferMod___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_2 = l_Lean_Parser_Level_paren___closed__4;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
@ -12735,13 +12735,13 @@ lean_object* x_107; lean_object* x_108; uint8_t x_109;
x_107 = lean_ctor_get(x_106, 1);
lean_inc(x_107);
lean_dec(x_106);
x_108 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_108 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_109 = lean_string_dec_eq(x_107, x_108);
lean_dec(x_107);
if (x_109 == 0)
{
lean_object* x_110; lean_object* x_111;
x_110 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_110 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_10);
x_111 = l_Lean_Parser_ParserState_mkErrorsAt(x_103, x_110, x_10);
x_76 = x_111;
@ -12757,7 +12757,7 @@ else
{
lean_object* x_112; lean_object* x_113;
lean_dec(x_106);
x_112 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_112 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_10);
x_113 = l_Lean_Parser_ParserState_mkErrorsAt(x_103, x_112, x_10);
x_76 = x_113;
@ -12768,7 +12768,7 @@ else
{
lean_object* x_114; lean_object* x_115;
lean_dec(x_104);
x_114 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_114 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_10);
x_115 = l_Lean_Parser_ParserState_mkErrorsAt(x_103, x_114, x_10);
x_76 = x_115;
@ -12800,13 +12800,13 @@ lean_object* x_26; lean_object* x_27; uint8_t x_28;
x_26 = lean_ctor_get(x_25, 1);
lean_inc(x_26);
lean_dec(x_25);
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_27 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_28 = lean_string_dec_eq(x_26, x_27);
lean_dec(x_26);
if (x_28 == 0)
{
lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33;
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_29, x_21);
x_31 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2;
x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_18);
@ -12829,7 +12829,7 @@ else
{
lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41;
lean_dec(x_25);
x_37 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_37 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_37, x_21);
x_39 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2;
x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_18);
@ -12842,7 +12842,7 @@ else
{
lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46;
lean_dec(x_23);
x_42 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_42 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_42, x_21);
x_44 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__2;
x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_18);
@ -13078,7 +13078,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Command_structExplicitBinder___closed__2;
x_2 = l_Lean_Parser_Level_paren___closed__4;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
@ -13119,7 +13119,7 @@ lean_object* _init_l_Lean_Parser_Command_structExplicitBinder___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_2 = l_Lean_Parser_Command_structExplicitBinder___closed__6;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
@ -22701,13 +22701,13 @@ lean_object* x_26; lean_object* x_27; uint8_t x_28;
x_26 = lean_ctor_get(x_25, 1);
lean_inc(x_26);
lean_dec(x_25);
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_27 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_28 = lean_string_dec_eq(x_26, x_27);
lean_dec(x_26);
if (x_28 == 0)
{
lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33;
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_29, x_21);
x_31 = l_Lean_Parser_Command_export___elambda__1___closed__2;
x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_18);
@ -22730,7 +22730,7 @@ else
{
lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41;
lean_dec(x_25);
x_37 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_37 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_37, x_21);
x_39 = l_Lean_Parser_Command_export___elambda__1___closed__2;
x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_18);
@ -22743,7 +22743,7 @@ else
{
lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46;
lean_dec(x_23);
x_42 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_42 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_42, x_21);
x_44 = l_Lean_Parser_Command_export___elambda__1___closed__2;
x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_18);
@ -22855,13 +22855,13 @@ lean_object* x_76; lean_object* x_77; uint8_t x_78;
x_76 = lean_ctor_get(x_75, 1);
lean_inc(x_76);
lean_dec(x_75);
x_77 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_77 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_78 = lean_string_dec_eq(x_76, x_77);
lean_dec(x_76);
if (x_78 == 0)
{
lean_object* x_79; lean_object* x_80;
x_79 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_79 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_80 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_79, x_71);
x_51 = x_80;
goto block_66;
@ -22877,7 +22877,7 @@ else
{
lean_object* x_81; lean_object* x_82;
lean_dec(x_75);
x_81 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_81 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_82 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_81, x_71);
x_51 = x_82;
goto block_66;
@ -22887,7 +22887,7 @@ else
{
lean_object* x_83; lean_object* x_84;
lean_dec(x_73);
x_83 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_83 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_84 = l_Lean_Parser_ParserState_mkErrorsAt(x_72, x_83, x_71);
x_51 = x_84;
goto block_66;
@ -22942,7 +22942,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Level_ident___elambda__1___closed__4;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Level_paren___closed__4;
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}
@ -22951,7 +22951,7 @@ lean_object* _init_l_Lean_Parser_Command_export___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_2 = l_Lean_Parser_Command_export___closed__2;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
@ -24649,13 +24649,13 @@ lean_object* x_83; lean_object* x_84; uint8_t x_85;
x_83 = lean_ctor_get(x_82, 1);
lean_inc(x_83);
lean_dec(x_82);
x_84 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_84 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_85 = lean_string_dec_eq(x_83, x_84);
lean_dec(x_83);
if (x_85 == 0)
{
lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90;
x_86 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_86 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_87 = l_Lean_Parser_ParserState_mkErrorsAt(x_79, x_86, x_78);
x_88 = lean_ctor_get(x_87, 0);
lean_inc(x_88);
@ -24690,7 +24690,7 @@ else
{
lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98;
lean_dec(x_82);
x_94 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_94 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_95 = l_Lean_Parser_ParserState_mkErrorsAt(x_79, x_94, x_78);
x_96 = lean_ctor_get(x_95, 0);
lean_inc(x_96);
@ -24709,7 +24709,7 @@ else
{
lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103;
lean_dec(x_80);
x_99 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_99 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_100 = l_Lean_Parser_ParserState_mkErrorsAt(x_79, x_99, x_78);
x_101 = lean_ctor_get(x_100, 0);
lean_inc(x_101);
@ -24766,13 +24766,13 @@ lean_object* x_27; lean_object* x_28; uint8_t x_29;
x_27 = lean_ctor_get(x_26, 1);
lean_inc(x_27);
lean_dec(x_26);
x_28 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_28 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
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; lean_object* x_32; lean_object* x_33; lean_object* x_34;
x_30 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_30 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_31 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_30, x_22);
x_32 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2;
x_33 = l_Lean_Parser_ParserState_mkNode(x_31, x_32, x_19);
@ -24795,7 +24795,7 @@ else
{
lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42;
lean_dec(x_26);
x_38 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_38 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_38, x_22);
x_40 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2;
x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_19);
@ -24808,7 +24808,7 @@ else
{
lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47;
lean_dec(x_24);
x_43 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_43 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_44 = l_Lean_Parser_ParserState_mkErrorsAt(x_23, x_43, x_22);
x_45 = l_Lean_Parser_Command_openOnly___elambda__1___closed__2;
x_46 = l_Lean_Parser_ParserState_mkNode(x_44, x_45, x_19);
@ -24925,7 +24925,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Level_ident___elambda__1___closed__4;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}

194
stage0/stdlib/Init/Lean/Parser/Level.c
View file

@ -18,6 +18,7 @@ extern lean_object* l_Lean_Parser_manyAux___main___closed__1;
lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__4;
lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*);
lean_object* l_Lean_Parser_regBuiltinLevelParserAttr___closed__1;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
lean_object* l_Lean_Parser_Level_ident___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Level_addLit___closed__2;
extern lean_object* l_Lean_nullKind;
@ -31,7 +32,6 @@ lean_object* l_Lean_Parser_Level_num___elambda__1___closed__4;
lean_object* l_Lean_Parser_Level_hole___closed__5;
lean_object* l_Lean_Parser_Level_hole___closed__3;
lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Level_max___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
extern lean_object* l_Prod_HasRepr___rarg___closed__1;
lean_object* l_Lean_Parser_regBuiltinLevelParserAttr___closed__2;
lean_object* l_Lean_Parser_Level_ident;
lean_object* l___regBuiltinParser_Lean_Parser_Level_num(lean_object*);
@ -54,8 +54,8 @@ lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__3;
lean_object* lean_string_append(lean_object*, lean_object*);
lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Level_paren___closed__5;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
lean_object* l_Lean_Parser_Level_paren___closed__3;
lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__12;
lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__2;
lean_object* l_Lean_Parser_Level_num___closed__1;
extern lean_object* l_Lean_mkAppStx___closed__4;
@ -81,7 +81,6 @@ lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__7;
lean_object* l_Lean_Parser_nonReservedSymbolInfo(lean_object*, uint8_t);
lean_object* l_Lean_Parser_Level_paren;
lean_object* l_Lean_Parser_Level_addLit___elambda__1___closed__2;
lean_object* l_Lean_Parser_Level_paren___closed__10;
lean_object* l_Lean_Parser_Level_num___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_levelParser___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Level_addLit___elambda__1___closed__4;
@ -117,10 +116,10 @@ lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__2;
lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__1;
lean_object* l_Lean_Parser_Level_ident___closed__2;
extern lean_object* l_Lean_Parser_appPrec;
extern lean_object* l_Option_HasRepr___rarg___closed__3;
lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__3;
lean_object* l_Lean_Parser_Level_max___closed__4;
lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__5;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__2;
lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__3;
lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_object*);
@ -139,6 +138,7 @@ lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__7;
lean_object* l___regBuiltinParser_Lean_Parser_Level_addLit(lean_object*);
lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__9;
lean_object* l___regBuiltinParser_Lean_Parser_Level_hole(lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
lean_object* l_Lean_Parser_Level_hole___closed__1;
extern lean_object* l_Lean_Level_LevelToFormat_Result_format___main___closed__3;
lean_object* l_String_trim(lean_object*);
@ -152,11 +152,9 @@ lean_object* l___regBuiltinParser_Lean_Parser_Level_ident(lean_object*);
lean_object* l_Lean_Parser_Level_addLit;
extern lean_object* l_Lean_Syntax_getKind___closed__3;
lean_object* l_Lean_Parser_mkAntiquot(uint8_t, lean_object*, lean_object*, uint8_t);
lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__13;
lean_object* l_Lean_Parser_Level_max___elambda__1___closed__5;
lean_object* l_Lean_Parser_Level_max___elambda__1___closed__7;
lean_object* l_Lean_Parser_Level_imax___elambda__1___closed__5;
lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__14;
lean_object* l_Lean_Parser_Level_max___elambda__1___closed__3;
lean_object* l_Lean_Parser_Level_imax___closed__1;
lean_object* l_Lean_Parser_Level_imax___closed__6;
@ -264,59 +262,65 @@ return x_3;
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__3() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string("paren");
return x_1;
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__2;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__2;
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_2 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__6() {
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__5() {
_start:
{
uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5;
x_1 = 0;
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_3 = l_Lean_Parser_Level_paren___elambda__1___closed__5;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_4 = 1;
x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4);
return x_5;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Char_HasRepr___closed__1;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_3 = lean_string_append(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Prod_HasRepr___rarg___closed__1;
x_2 = l_String_trim(x_1);
return x_2;
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__6;
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_Level_paren___elambda__1___closed__8() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Option_HasRepr___rarg___closed__3;
x_2 = l_String_trim(x_1);
return x_2;
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
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* _init_l_Lean_Parser_Level_paren___elambda__1___closed__9() {
@ -324,7 +328,7 @@ _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_Level_paren___elambda__1___closed__8;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_3 = lean_string_append(x_1, x_2);
return x_3;
}
@ -351,43 +355,11 @@ lean_ctor_set(x_3, 1, x_1);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__12() {
_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_Level_paren___elambda__1___closed__7;
x_3 = lean_string_append(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___elambda__1___closed__13() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__12;
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_Level_paren___elambda__1___closed__14() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__13;
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_Level_paren___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10;
x_4 = l_Lean_Parser_Level_paren___elambda__1___closed__6;
x_4 = l_Lean_Parser_Level_paren___elambda__1___closed__5;
x_5 = lean_ctor_get(x_4, 1);
lean_inc(x_5);
x_6 = lean_ctor_get(x_3, 0);
@ -452,13 +424,13 @@ lean_object* x_60; lean_object* x_61; uint8_t x_62;
x_60 = lean_ctor_get(x_59, 1);
lean_inc(x_60);
lean_dec(x_59);
x_61 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_61 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_62 = lean_string_dec_eq(x_60, x_61);
lean_dec(x_60);
if (x_62 == 0)
{
lean_object* x_63; lean_object* x_64;
x_63 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_63 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_63, x_8);
x_17 = x_64;
@ -474,7 +446,7 @@ else
{
lean_object* x_65; lean_object* x_66;
lean_dec(x_59);
x_65 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_65 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_65, x_8);
x_17 = x_66;
@ -485,7 +457,7 @@ else
{
lean_object* x_67; lean_object* x_68;
lean_dec(x_57);
x_67 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_67 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_68 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_67, x_8);
x_17 = x_68;
@ -526,15 +498,15 @@ lean_object* x_28; lean_object* x_29; uint8_t x_30;
x_28 = lean_ctor_get(x_27, 1);
lean_inc(x_28);
lean_dec(x_27);
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_29 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_30 = lean_string_dec_eq(x_28, x_29);
lean_dec(x_28);
if (x_30 == 0)
{
lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35;
x_31 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_31 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_31, x_23);
x_33 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_33 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_16);
x_35 = l_Lean_Parser_mergeOrElseErrors(x_34, x_11, x_8);
lean_dec(x_8);
@ -544,7 +516,7 @@ else
{
lean_object* x_36; lean_object* x_37; lean_object* x_38;
lean_dec(x_23);
x_36 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_36 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_37 = l_Lean_Parser_ParserState_mkNode(x_24, x_36, x_16);
x_38 = l_Lean_Parser_mergeOrElseErrors(x_37, x_11, x_8);
lean_dec(x_8);
@ -555,9 +527,9 @@ else
{
lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43;
lean_dec(x_27);
x_39 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_39 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_39, x_23);
x_41 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_41 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_16);
x_43 = l_Lean_Parser_mergeOrElseErrors(x_42, x_11, x_8);
lean_dec(x_8);
@ -568,9 +540,9 @@ else
{
lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48;
lean_dec(x_25);
x_44 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_44 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_44, x_23);
x_46 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_46 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_16);
x_48 = l_Lean_Parser_mergeOrElseErrors(x_47, x_11, x_8);
lean_dec(x_8);
@ -582,7 +554,7 @@ else
lean_object* x_49; lean_object* x_50; lean_object* x_51;
lean_dec(x_22);
lean_dec(x_2);
x_49 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_49 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_50 = l_Lean_Parser_ParserState_mkNode(x_21, x_49, x_16);
x_51 = l_Lean_Parser_mergeOrElseErrors(x_50, x_11, x_8);
lean_dec(x_8);
@ -594,7 +566,7 @@ else
lean_object* x_52; lean_object* x_53; lean_object* x_54;
lean_dec(x_18);
lean_dec(x_2);
x_52 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_52 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_53 = l_Lean_Parser_ParserState_mkNode(x_17, x_52, x_16);
x_54 = l_Lean_Parser_mergeOrElseErrors(x_53, x_11, x_8);
lean_dec(x_8);
@ -619,7 +591,7 @@ lean_object* _init_l_Lean_Parser_Level_paren___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_2 = l_Lean_Parser_Level_paren___closed__1;
x_3 = l_Lean_Parser_symbolInfo(x_1, x_2);
return x_3;
@ -639,58 +611,48 @@ return x_4;
lean_object* _init_l_Lean_Parser_Level_paren___closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_3 = l_Lean_Parser_symbolInfo(x_2, x_1);
return x_3;
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Level_paren___closed__3;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Level_paren___closed__3;
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);
return x_4;
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___closed__2;
x_2 = l_Lean_Parser_Level_paren___closed__4;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___closed__2;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_2 = l_Lean_Parser_Level_paren___closed__5;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
x_3 = l_Lean_Parser_nodeInfo(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_2 = l_Lean_Parser_Level_paren___closed__6;
x_3 = l_Lean_Parser_nodeInfo(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___closed__8() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__6;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__5;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Level_paren___closed__7;
x_3 = l_Lean_Parser_Level_paren___closed__6;
x_4 = l_Lean_Parser_orelseInfo(x_2, x_3);
return x_4;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___closed__9() {
lean_object* _init_l_Lean_Parser_Level_paren___closed__8() {
_start:
{
lean_object* x_1;
@ -698,12 +660,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Level_paren___elambda__1), 3, 0);
return x_1;
}
}
lean_object* _init_l_Lean_Parser_Level_paren___closed__10() {
lean_object* _init_l_Lean_Parser_Level_paren___closed__9() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Level_paren___closed__8;
x_2 = l_Lean_Parser_Level_paren___closed__9;
x_1 = l_Lean_Parser_Level_paren___closed__7;
x_2 = l_Lean_Parser_Level_paren___closed__8;
x_3 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_3, 0, x_1);
lean_ctor_set(x_3, 1, x_2);
@ -714,7 +676,7 @@ lean_object* _init_l_Lean_Parser_Level_paren() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Parser_Level_paren___closed__10;
x_1 = l_Lean_Parser_Level_paren___closed__9;
return x_1;
}
}
@ -724,7 +686,7 @@ _start:
uint8_t x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6;
x_2 = 0;
x_3 = l_Lean_Parser_regBuiltinLevelParserAttr___closed__4;
x_4 = l_Lean_Parser_Level_paren___elambda__1___closed__4;
x_4 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_5 = l_Lean_Parser_Level_paren;
x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1);
return x_6;
@ -2313,12 +2275,6 @@ l_Lean_Parser_Level_paren___elambda__1___closed__10 = _init_l_Lean_Parser_Level_
lean_mark_persistent(l_Lean_Parser_Level_paren___elambda__1___closed__10);
l_Lean_Parser_Level_paren___elambda__1___closed__11 = _init_l_Lean_Parser_Level_paren___elambda__1___closed__11();
lean_mark_persistent(l_Lean_Parser_Level_paren___elambda__1___closed__11);
l_Lean_Parser_Level_paren___elambda__1___closed__12 = _init_l_Lean_Parser_Level_paren___elambda__1___closed__12();
lean_mark_persistent(l_Lean_Parser_Level_paren___elambda__1___closed__12);
l_Lean_Parser_Level_paren___elambda__1___closed__13 = _init_l_Lean_Parser_Level_paren___elambda__1___closed__13();
lean_mark_persistent(l_Lean_Parser_Level_paren___elambda__1___closed__13);
l_Lean_Parser_Level_paren___elambda__1___closed__14 = _init_l_Lean_Parser_Level_paren___elambda__1___closed__14();
lean_mark_persistent(l_Lean_Parser_Level_paren___elambda__1___closed__14);
l_Lean_Parser_Level_paren___closed__1 = _init_l_Lean_Parser_Level_paren___closed__1();
lean_mark_persistent(l_Lean_Parser_Level_paren___closed__1);
l_Lean_Parser_Level_paren___closed__2 = _init_l_Lean_Parser_Level_paren___closed__2();
@ -2337,8 +2293,6 @@ l_Lean_Parser_Level_paren___closed__8 = _init_l_Lean_Parser_Level_paren___closed
lean_mark_persistent(l_Lean_Parser_Level_paren___closed__8);
l_Lean_Parser_Level_paren___closed__9 = _init_l_Lean_Parser_Level_paren___closed__9();
lean_mark_persistent(l_Lean_Parser_Level_paren___closed__9);
l_Lean_Parser_Level_paren___closed__10 = _init_l_Lean_Parser_Level_paren___closed__10();
lean_mark_persistent(l_Lean_Parser_Level_paren___closed__10);
l_Lean_Parser_Level_paren = _init_l_Lean_Parser_Level_paren();
lean_mark_persistent(l_Lean_Parser_Level_paren);
res = l___regBuiltinParser_Lean_Parser_Level_paren(lean_io_mk_world());

690
stage0/stdlib/Init/Lean/Parser/Parser.c
View file

@ -14,6 +14,7 @@
extern "C" {
#endif
lean_object* l_Lean_Parser_declareBuiltinParser___closed__9;
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1(uint8_t);
lean_object* l_Lean_Parser_nonReservedSymbol___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_List_reverse___rarg(lean_object*);
lean_object* l_Lean_Parser_optionalFn___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
@ -46,6 +47,7 @@ uint8_t l_Lean_Parser_checkTailWs(lean_object*);
lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_foldArgsM___spec__1___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_mkParserExtension___closed__1;
lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_hexNumberFn___spec__1(lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr(uint8_t);
lean_object* l_Lean_Parser_try(uint8_t, lean_object*);
lean_object* l_Lean_Parser_unicodeSymbolInfo___elambda__1___boxed(lean_object*);
lean_object* l_Lean_Parser_prattParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*);
@ -58,6 +60,7 @@ lean_object* l_Lean_Parser_ParserState_mkError(lean_object*, lean_object*);
lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_octalNumberFn___spec__3(lean_object*, lean_object*);
lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_mkParserContext(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
lean_object* l_Lean_Parser_hashAndthen___boxed(lean_object*);
lean_object* l_Lean_Parser_declareBuiltinParser___closed__8;
lean_object* l_Lean_Parser_optional___boxed(lean_object*, lean_object*);
@ -112,6 +115,7 @@ lean_object* l_Lean_Parser_unicodeSymbolInfo___elambda__2(lean_object*, lean_obj
lean_object* l_Lean_Syntax_foldSepArgs___rarg___boxed(lean_object*, lean_object*, lean_object*);
uint8_t l_Lean_Name_quickLt(lean_object*, lean_object*);
uint8_t lean_name_eq(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr___boxed(lean_object*);
lean_object* l_Lean_Parser_charLit(uint8_t);
lean_object* l_Lean_Parser_hexNumberFn___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_trailingLoop___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
@ -139,6 +143,7 @@ lean_object* l___private_Init_Lean_Parser_Parser_6__updateCache(lean_object*, le
lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_19__ParserAttribute_add___spec__3___boxed(lean_object*, lean_object*);
lean_object* l_Array_iterateMAux___main___at_Lean_Parser_SyntaxNodeKindSet_insert___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_ParserState_next(lean_object*, lean_object*, lean_object*);
extern lean_object* l_Prod_HasRepr___rarg___closed__1;
lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_addParser(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_categoryParserFnRef;
@ -146,6 +151,7 @@ lean_object* l_Lean_Parser_optionalFn___boxed(lean_object*);
lean_object* l_Lean_Parser_InputContext_inhabited;
lean_object* l_Lean_Parser_parserExtension___elambda__3___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Error_HasToString___closed__1;
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___boxed(lean_object*);
lean_object* l_Lean_Parser_ParserExtensionState_inhabited___closed__1;
lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(lean_object*, lean_object*, lean_object*);
size_t l_USize_sub(size_t, size_t);
@ -225,12 +231,15 @@ lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7(lean
lean_object* l_Lean_Parser_mkAtomicInfo(lean_object*);
lean_object* l_Lean_Parser_quotedSymbolFn___rarg___closed__1;
lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_binNumberFn___spec__1___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
lean_object* lean_string_utf8_extract(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_parserExtension___elambda__4___rarg(lean_object*);
lean_object* l_Lean_Parser_declareBuiltinParser___closed__1;
uint8_t l_Char_isWhitespace(uint32_t);
extern lean_object* l_String_splitAux___main___closed__1;
lean_object* l_Lean_Parser_categoryParserFnImpl(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1(uint8_t);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__3;
lean_object* l_Lean_Parser_withPosition(uint8_t, lean_object*);
lean_object* l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_9__addParserCategoryCore___spec__1___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_mkAntiquot___closed__11;
@ -286,6 +295,7 @@ lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_binNumberFn___spe
lean_object* l_Lean_Parser_pushLeading___closed__1;
lean_object* l_Array_anyRangeMAux___main___at_Lean_Parser_mkParserExtension___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_charLitFn___rarg___closed__1;
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1___boxed(lean_object*);
lean_object* l_PersistentHashMap_foldlMAux___main___at_Lean_Parser_getSyntaxNodeKinds___spec__2(lean_object*, lean_object*);
lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_forSepArgsM___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_ident___closed__1;
@ -331,12 +341,14 @@ lean_object* l_Lean_Parser_rawIdentFn(lean_object*, lean_object*);
lean_object* l_Lean_Parser_takeUntilFn___main___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_indexed(lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_11__ParserExtension_mkInitial(lean_object*);
extern lean_object* l_Lean_mkTermIdFromIdent___closed__2;
lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepArgs___spec__1(lean_object*);
lean_object* l_Lean_Parser_unicodeSymbolFn___rarg___closed__1;
lean_object* lean_string_utf8_next(lean_object*, lean_object*);
extern lean_object* l_Lean_mkAttributeImplOfConstant___closed__1;
lean_object* l_Lean_Parser_mkAntiquot___closed__5;
lean_object* l_Lean_Parser_TokenConfig_HasToString;
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__7;
lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_binNumberFn___spec__3(lean_object*, lean_object*);
lean_object* l_Lean_Parser_fieldIdx___boxed(lean_object*);
lean_object* l_Lean_Parser_setCategoryParserFnRef(lean_object*);
@ -345,7 +357,6 @@ extern lean_object* l_Lean_registerTagAttribute___lambda__4___closed__3;
lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_longestMatchFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_throwUnknownParserCategory(lean_object*);
lean_object* l_Lean_Parser_mkAntiquot___closed__15;
lean_object* l_Lean_Parser_decimalNumberFn(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_throwUnknownParserCategory___rarg___closed__1;
lean_object* l_Lean_Parser_unquotedSymbol___boxed(lean_object*);
@ -462,7 +473,10 @@ lean_object* l_Lean_Parser_checkColGe___lambda__1(lean_object*, lean_object*, le
lean_object* l_Lean_Parser_node___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_sepBy(uint8_t, lean_object*, lean_object*, uint8_t);
lean_object* l_Lean_Syntax_foldArgsM(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId___boxed(lean_object*);
lean_object* l_Array_shrink___main___rarg(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1___boxed(lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1(uint8_t);
lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__2___rarg(lean_object*, lean_object*);
lean_object* l_Lean_Parser_fieldIdx___closed__3;
lean_object* l_Lean_Parser_trailingLoop___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
@ -531,6 +545,7 @@ lean_object* l_Lean_Parser_nonReservedSymbol___lambda__1(lean_object*, lean_obje
lean_object* l___private_Init_Lean_Parser_Parser_20__registerParserAttributeImplBuilder___lambda__1(lean_object*);
lean_object* l_Lean_Parser_addToken(lean_object*, lean_object*);
lean_object* l_Lean_Parser_longestMatchFnAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId(uint8_t);
lean_object* l_Nat_repr(lean_object*);
lean_object* l_Lean_Parser_categoryParserOfStack(uint8_t, lean_object*, lean_object*);
extern lean_object* l_Char_HasRepr___closed__1;
@ -612,6 +627,7 @@ uint32_t lean_string_utf8_get(lean_object*, lean_object*);
lean_object* l_Lean_Parser_declareBuiltinParser___closed__7;
lean_object* l_Lean_Parser_parserExtension___elambda__2(lean_object*);
lean_object* l_Lean_Parser_mkAntiquot___closed__13;
extern lean_object* l_Lean_mkAppStx___closed__6;
extern lean_object* l_Lean_Options_empty;
extern lean_object* l_IO_Error_Inhabited___closed__1;
lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_octalNumberFn___spec__1(lean_object*, lean_object*, lean_object*);
@ -694,6 +710,7 @@ lean_object* l_Lean_Parser_declareBuiltinParser___closed__6;
lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_quotedSymbolFn___spec__1(uint32_t, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_rawIdent___boxed(lean_object*);
lean_object* l_Lean_Parser_mkAntiquot___elambda__1___boxed(lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr(uint8_t);
lean_object* l___private_Init_Lean_Parser_Parser_13__addTokenConfig___closed__1;
uint8_t l_Lean_isIdEndEscape(uint32_t);
lean_object* l_Lean_Parser_addBuiltinLeadingParser(lean_object*, lean_object*, lean_object*, lean_object*);
@ -701,6 +718,7 @@ lean_object* l_Lean_Syntax_foldSepArgsM___rarg(lean_object*, lean_object*, lean_
lean_object* l_Lean_Parser_mkParserExtension___closed__7;
lean_object* l_Lean_Parser_dollarSymbol___elambda__1___rarg___closed__1;
lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__1;
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_PersistentEnvExtension_addEntry___rarg(lean_object*, lean_object*, lean_object*);
size_t l_USize_land(size_t, size_t);
lean_object* l_Lean_Parser_parserExtension___elambda__4___boxed(lean_object*, lean_object*);
@ -709,6 +727,7 @@ lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lea
lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_mkParserExtension___spec__3___closed__1;
lean_object* l_Lean_Parser_mkAntiquot___elambda__2(uint8_t);
extern lean_object* l_Lean_registerTagAttribute___lambda__4___closed__2;
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_toTrailing(lean_object*, lean_object*);
lean_object* l_Lean_Parser_categoryParserOfStack___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_categoryParserFn(lean_object*, lean_object*, lean_object*, lean_object*);
@ -746,6 +765,7 @@ lean_object* l_Lean_Parser_appPrec;
lean_object* l_Lean_Parser_checkColGeFn(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_registerParserCategory(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*);
lean_object* l_Lean_Parser_charLitFnAux___boxed(lean_object*, lean_object*, lean_object*);
extern lean_object* l_Option_HasRepr___rarg___closed__3;
lean_object* l_Lean_Parser_prattParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_tryFn___boxed(lean_object*);
lean_object* l_Array_foldSepByM___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
@ -773,7 +793,7 @@ lean_object* l_Lean_Parser_numLit(uint8_t);
lean_object* l_Lean_Parser_leadingParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_hexDigitFn(lean_object*, lean_object*);
lean_object* l_Lean_Parser_mkCategoryParserFnRef___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_mkAntiquot___closed__16;
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
lean_object* l_Lean_Parser_FirstTokens_HasToString___closed__1;
lean_object* l_Lean_Parser_FirstTokens_HasToString;
lean_object* l_Lean_Parser_pushLeading;
@ -782,12 +802,14 @@ lean_object* l_Lean_Parser_Error_toString(lean_object*);
lean_object* l_Lean_Parser_categoryParserOfStackFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_symbolNoWsFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_mkAntiquot___elambda__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__2___rarg___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_longestMatchStep___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepBy___spec__1(lean_object*);
lean_object* l_Lean_Parser_string2basic___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_ParserState_keepNewError___boxed(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_object* l_Lean_Parser_rawIdent___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_14__addTrailingParserAux(lean_object*, lean_object*);
lean_object* lean_environment_main_module(lean_object*);
@ -882,6 +904,7 @@ extern lean_object* l_Lean_registerEnvExtensionUnsafe___rarg___closed__2;
lean_object* l_Lean_Parser_fieldIdxFn___boxed(lean_object*, lean_object*);
uint8_t l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_9__addParserCategoryCore___spec__2(lean_object*, size_t, lean_object*);
lean_object* l_Lean_Parser_orelse___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___boxed(lean_object*);
lean_object* l_Lean_Parser_dollarSymbol___elambda__1(uint8_t, lean_object*);
lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_toTrailing___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
@ -902,6 +925,7 @@ lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lea
lean_object* l_Lean_Parser_rawCh___elambda__1___boxed(lean_object*);
lean_object* l_Lean_Parser_numberFnAux___closed__1;
lean_object* l_Lean_Parser_categoryParserFnExtension___elambda__1___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
lean_object* l_Lean_Parser_nonReservedSymbolInfo___closed__1;
lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_foldArgsM___spec__1(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_forSepArgsM___boxed(lean_object*);
@ -936,6 +960,7 @@ lean_object* l___private_Init_Lean_Parser_Parser_5__tokenFnAux(lean_object*, lea
lean_object* l_Lean_Parser_checkWsBeforeFn___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_optionalFn(uint8_t);
lean_object* l___private_Init_Lean_Parser_Parser_8__throwParserCategoryAlreadyDefined___rarg___closed__1;
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
lean_object* lean_array_pop(lean_object*);
lean_object* l_Lean_Parser_TokenMap_insert___rarg(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_quotedSymbolFn___rarg___boxed(lean_object*, lean_object*, lean_object*);
@ -949,6 +974,7 @@ lean_object* l_Lean_Syntax_isNone___boxed(lean_object*);
lean_object* l_Lean_Parser_currLbp(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_mkParserOfConstant(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_takeWhile1Fn(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__4;
lean_object* l_List_foldl___main___at___private_Init_Lean_Parser_Parser_14__addTrailingParserAux___spec__1(lean_object*, lean_object*, lean_object*);
uint8_t l_PersistentHashMap_containsAux___main___at_Lean_Parser_mkFreshKindAux___main___spec__2(lean_object*, size_t, lean_object*);
lean_object* lean_io_initializing(lean_object*);
@ -35868,6 +35894,368 @@ x_3 = l___private_Init_Lean_Parser_Parser_22__pushNone(x_2);
return x_3;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9;
x_5 = lean_ctor_get(x_4, 0);
lean_inc(x_5);
x_6 = lean_array_get_size(x_5);
lean_dec(x_5);
x_7 = lean_apply_3(x_1, x_2, x_3, x_4);
x_8 = l_Lean_mkTermIdFromIdent___closed__2;
x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_6);
return x_9;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1(uint8_t x_1) {
_start:
{
lean_object* x_2;
x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1___rarg), 4, 0);
return x_2;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId(uint8_t x_1) {
_start:
{
lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; 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_2 = lean_box(x_1);
x_3 = lean_alloc_closure((void*)(l_Lean_Parser_identFn___boxed), 2, 1);
lean_closure_set(x_3, 0, x_2);
x_4 = l___private_Init_Lean_Parser_Parser_22__pushNone(x_1);
x_5 = lean_ctor_get(x_4, 0);
lean_inc(x_5);
lean_dec(x_4);
x_6 = l_Lean_Parser_identNoAntiquot___closed__1;
x_7 = l_Lean_Parser_andthenInfo(x_6, x_5);
x_8 = lean_box(x_1);
x_9 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_22__pushNone___elambda__1___boxed), 3, 1);
lean_closure_set(x_9, 0, x_8);
x_10 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_10, 0, x_3);
lean_closure_set(x_10, 1, x_9);
x_11 = l_Lean_mkTermIdFromIdent___closed__2;
x_12 = l_Lean_Parser_nodeInfo(x_11, x_7);
x_13 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1___rarg), 4, 1);
lean_closure_set(x_13, 0, x_10);
x_14 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_14, 0, x_12);
lean_ctor_set(x_14, 1, x_13);
return x_14;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1___boxed(lean_object* x_1) {
_start:
{
uint8_t x_2; lean_object* x_3;
x_2 = lean_unbox(x_1);
lean_dec(x_1);
x_3 = l___private_Init_Lean_Parser_Parser_23__antiquotId___elambda__1(x_2);
return x_3;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_23__antiquotId___boxed(lean_object* x_1) {
_start:
{
uint8_t x_2; lean_object* x_3;
x_2 = lean_unbox(x_1);
lean_dec(x_1);
x_3 = l___private_Init_Lean_Parser_Parser_23__antiquotId(x_2);
return x_3;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string("paren");
return x_1;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_mkAppStx___closed__6;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9;
x_5 = lean_ctor_get(x_4, 0);
lean_inc(x_5);
x_6 = lean_array_get_size(x_5);
lean_dec(x_5);
x_7 = lean_apply_3(x_1, x_2, x_3, x_4);
x_8 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_6);
return x_9;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1(uint8_t x_1) {
_start:
{
lean_object* x_2;
x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg), 4, 0);
return x_2;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Prod_HasRepr___rarg___closed__1;
x_2 = l_String_trim(x_1);
return x_2;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_3 = l_Lean_Parser_symbolInfo(x_2, x_1);
return x_3;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1);
lean_closure_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4;
x_2 = lean_unsigned_to_nat(0u);
x_3 = lean_alloc_closure((void*)(l_Lean_Parser_categoryParser___elambda__1___rarg___boxed), 5, 2);
lean_closure_set(x_3, 0, x_1);
lean_closure_set(x_3, 1, x_2);
return x_3;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Option_HasRepr___rarg___closed__3;
x_2 = l_String_trim(x_1);
return x_2;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_3 = l_Lean_Parser_symbolInfo(x_2, x_1);
return x_3;
}
}
lean_object* _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1);
lean_closure_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr(uint8_t x_1) {
_start:
{
lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; 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; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27;
x_2 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4;
x_3 = lean_unsigned_to_nat(0u);
x_4 = l_Lean_Parser_categoryParser(x_1, x_2, x_3);
x_5 = l___private_Init_Lean_Parser_Parser_22__pushNone(x_1);
x_6 = lean_ctor_get(x_4, 0);
lean_inc(x_6);
lean_dec(x_4);
x_7 = lean_ctor_get(x_5, 0);
lean_inc(x_7);
lean_dec(x_5);
x_8 = l_Lean_Parser_andthenInfo(x_6, x_7);
x_9 = lean_box(x_1);
x_10 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_22__pushNone___elambda__1___boxed), 3, 1);
lean_closure_set(x_10, 0, x_9);
x_11 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__4;
x_12 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_12, 0, x_11);
lean_closure_set(x_12, 1, x_10);
x_13 = l_Lean_nullKind;
x_14 = l_Lean_Parser_nodeInfo(x_13, x_8);
x_15 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2);
lean_closure_set(x_15, 0, x_13);
lean_closure_set(x_15, 1, x_12);
x_16 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_17 = l_Lean_Parser_andthenInfo(x_14, x_16);
x_18 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__7;
x_19 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_19, 0, x_15);
lean_closure_set(x_19, 1, x_18);
x_20 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_21 = l_Lean_Parser_andthenInfo(x_20, x_17);
x_22 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__3;
x_23 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_23, 0, x_22);
lean_closure_set(x_23, 1, x_19);
x_24 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_25 = l_Lean_Parser_nodeInfo(x_24, x_21);
x_26 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg), 4, 1);
lean_closure_set(x_26, 0, x_23);
x_27 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_27, 0, x_25);
lean_ctor_set(x_27, 1, x_26);
return x_27;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___boxed(lean_object* x_1) {
_start:
{
uint8_t x_2; lean_object* x_3;
x_2 = lean_unbox(x_1);
lean_dec(x_1);
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1(x_2);
return x_3;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___boxed(lean_object* x_1) {
_start:
{
uint8_t x_2; lean_object* x_3;
x_2 = lean_unbox(x_1);
lean_dec(x_1);
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr(x_2);
return x_3;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; 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 = lean_ctor_get(x_5, 1);
lean_inc(x_8);
lean_inc(x_4);
lean_inc(x_3);
x_9 = lean_apply_3(x_1, x_3, x_4, x_5);
x_10 = lean_ctor_get(x_9, 3);
lean_inc(x_10);
if (lean_obj_tag(x_10) == 0)
{
lean_dec(x_8);
lean_dec(x_7);
lean_dec(x_4);
lean_dec(x_3);
lean_dec(x_2);
return x_9;
}
else
{
lean_object* x_11; lean_object* x_12; uint8_t x_13;
x_11 = lean_ctor_get(x_10, 0);
lean_inc(x_11);
lean_dec(x_10);
x_12 = lean_ctor_get(x_9, 1);
lean_inc(x_12);
x_13 = lean_nat_dec_eq(x_12, x_8);
lean_dec(x_12);
if (x_13 == 0)
{
lean_dec(x_11);
lean_dec(x_8);
lean_dec(x_7);
lean_dec(x_4);
lean_dec(x_3);
lean_dec(x_2);
return x_9;
}
else
{
lean_object* x_14; lean_object* x_15; lean_object* x_16;
lean_inc(x_8);
x_14 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8);
lean_dec(x_7);
x_15 = lean_apply_3(x_2, x_3, x_4, x_14);
x_16 = l_Lean_Parser_mergeOrElseErrors(x_15, x_11, x_8);
lean_dec(x_8);
return x_16;
}
}
}
}
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1(uint8_t x_1) {
_start:
{
lean_object* x_2;
x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1___rarg), 5, 0);
return x_2;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr(uint8_t x_1) {
_start:
{
lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10;
x_2 = l___private_Init_Lean_Parser_Parser_23__antiquotId(x_1);
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr(x_1);
x_4 = lean_ctor_get(x_2, 0);
lean_inc(x_4);
x_5 = lean_ctor_get(x_3, 0);
lean_inc(x_5);
x_6 = l_Lean_Parser_orelseInfo(x_4, x_5);
x_7 = lean_ctor_get(x_2, 1);
lean_inc(x_7);
lean_dec(x_2);
x_8 = lean_ctor_get(x_3, 1);
lean_inc(x_8);
lean_dec(x_3);
x_9 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1___rarg), 5, 2);
lean_closure_set(x_9, 0, x_7);
lean_closure_set(x_9, 1, x_8);
x_10 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_10, 0, x_6);
lean_ctor_set(x_10, 1, x_9);
return x_10;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1___boxed(lean_object* x_1) {
_start:
{
uint8_t x_2; lean_object* x_3;
x_2 = lean_unbox(x_1);
lean_dec(x_1);
x_3 = l___private_Init_Lean_Parser_Parser_25__antiquotExpr___elambda__1(x_2);
return x_3;
}
}
lean_object* l___private_Init_Lean_Parser_Parser_25__antiquotExpr___boxed(lean_object* x_1) {
_start:
{
uint8_t x_2; lean_object* x_3;
x_2 = lean_unbox(x_1);
lean_dec(x_1);
x_3 = l___private_Init_Lean_Parser_Parser_25__antiquotExpr(x_2);
return x_3;
}
}
lean_object* l_Lean_Parser_mkAntiquot___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
@ -35968,38 +36356,38 @@ return x_2;
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_appPrec;
x_2 = lean_unsigned_to_nat(1u);
x_3 = lean_nat_add(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__8() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string("*");
return x_1;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__9() {
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__8() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_mkAntiquot___closed__8;
x_1 = l_Lean_Parser_mkAntiquot___closed__7;
x_2 = l_String_trim(x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__9() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Parser_mkAntiquot___closed__8;
x_3 = l_Lean_Parser_symbolInfo(x_2, x_1);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__10() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Parser_mkAntiquot___closed__9;
x_3 = l_Lean_Parser_symbolInfo(x_2, x_1);
return x_3;
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_mkAntiquot___closed__8;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1);
lean_closure_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__11() {
@ -36007,8 +36395,7 @@ _start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_mkAntiquot___closed__9;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1);
lean_closure_set(x_2, 0, x_1);
x_2 = l_Lean_Parser_optionaInfo(x_1);
return x_2;
}
}
@ -36017,33 +36404,12 @@ _start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_mkAntiquot___closed__10;
x_2 = l_Lean_Parser_optionaInfo(x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__13() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_mkAntiquot___closed__11;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1);
lean_closure_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__14() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4;
x_2 = l_Lean_Parser_mkAntiquot___closed__7;
x_3 = lean_alloc_closure((void*)(l_Lean_Parser_categoryParser___elambda__1___rarg___boxed), 5, 2);
lean_closure_set(x_3, 0, x_1);
lean_closure_set(x_3, 1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__15() {
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__13() {
_start:
{
lean_object* x_1;
@ -36051,11 +36417,11 @@ x_1 = lean_mk_string("no space before");
return x_1;
}
}
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__16() {
lean_object* _init_l_Lean_Parser_mkAntiquot___closed__14() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_mkAntiquot___closed__15;
x_1 = l_Lean_Parser_mkAntiquot___closed__13;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_checkNoWsBefore___elambda__1___rarg___boxed), 4, 1);
lean_closure_set(x_2, 0, x_1);
return x_2;
@ -36064,7 +36430,7 @@ return x_2;
lean_object* l_Lean_Parser_mkAntiquot(uint8_t x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29;
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28;
x_5 = l_Lean_Parser_mkAntiquot___closed__3;
x_6 = lean_string_append(x_5, x_2);
x_7 = l_Char_HasRepr___closed__1;
@ -36089,137 +36455,135 @@ x_20 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_20, 0, x_19);
lean_closure_set(x_20, 1, x_16);
x_21 = l_Lean_Parser_dollarSymbol(x_1);
x_22 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4;
x_23 = l_Lean_Parser_mkAntiquot___closed__7;
x_24 = l_Lean_Parser_categoryParser(x_1, x_22, x_23);
x_25 = lean_ctor_get(x_24, 0);
x_22 = l___private_Init_Lean_Parser_Parser_25__antiquotExpr(x_1);
x_23 = lean_ctor_get(x_22, 0);
lean_inc(x_23);
x_24 = lean_ctor_get(x_22, 1);
lean_inc(x_24);
lean_dec(x_22);
x_25 = lean_ctor_get(x_21, 0);
lean_inc(x_25);
lean_dec(x_24);
x_26 = lean_ctor_get(x_21, 0);
lean_inc(x_26);
lean_dec(x_21);
x_27 = lean_box(x_1);
x_28 = lean_alloc_closure((void*)(l_Lean_Parser_dollarSymbol___elambda__1___boxed), 2, 1);
lean_closure_set(x_28, 0, x_27);
x_26 = lean_box(x_1);
x_27 = lean_alloc_closure((void*)(l_Lean_Parser_dollarSymbol___elambda__1___boxed), 2, 1);
lean_closure_set(x_27, 0, x_26);
if (lean_obj_tag(x_3) == 0)
{
lean_object* x_79;
x_79 = lean_box(0);
x_29 = x_79;
goto block_78;
lean_object* x_76;
x_76 = lean_box(0);
x_28 = x_76;
goto block_75;
}
else
{
lean_object* x_80;
x_80 = lean_ctor_get(x_3, 0);
lean_inc(x_80);
lean_object* x_77;
x_77 = lean_ctor_get(x_3, 0);
lean_inc(x_77);
lean_dec(x_3);
x_29 = x_80;
goto block_78;
x_28 = x_77;
goto block_75;
}
block_78:
block_75:
{
lean_object* x_30; lean_object* x_31;
x_30 = l_Lean_Parser_mkAntiquot___closed__2;
x_31 = l_Lean_Name_append___main(x_29, x_30);
lean_dec(x_29);
lean_object* x_29; lean_object* x_30;
x_29 = l_Lean_Parser_mkAntiquot___closed__2;
x_30 = l_Lean_Name_append___main(x_28, x_29);
lean_dec(x_28);
if (x_4 == 0)
{
lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_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; lean_object* x_46; lean_object* x_47;
x_32 = l_Lean_Parser_mkAntiquot___closed__12;
x_33 = l_Lean_Parser_andthenInfo(x_18, x_32);
x_34 = l_Lean_Parser_mkAntiquot___closed__13;
x_35 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_35, 0, x_20);
lean_closure_set(x_35, 1, x_34);
x_36 = l_Lean_Parser_andthenInfo(x_25, x_33);
x_37 = l_Lean_Parser_mkAntiquot___closed__14;
x_38 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_38, 0, x_37);
lean_closure_set(x_38, 1, x_35);
x_39 = l_Lean_Parser_andthenInfo(x_17, x_36);
x_40 = l_Lean_Parser_mkAntiquot___closed__16;
lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; 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_31 = l_Lean_Parser_mkAntiquot___closed__11;
x_32 = l_Lean_Parser_andthenInfo(x_18, x_31);
x_33 = l_Lean_Parser_mkAntiquot___closed__12;
x_34 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_34, 0, x_20);
lean_closure_set(x_34, 1, x_33);
x_35 = l_Lean_Parser_andthenInfo(x_23, x_32);
x_36 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_36, 0, x_24);
lean_closure_set(x_36, 1, x_34);
x_37 = l_Lean_Parser_andthenInfo(x_17, x_35);
x_38 = l_Lean_Parser_mkAntiquot___closed__14;
x_39 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_39, 0, x_38);
lean_closure_set(x_39, 1, x_36);
x_40 = l_Lean_Parser_andthenInfo(x_25, x_37);
x_41 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_41, 0, x_40);
lean_closure_set(x_41, 1, x_38);
x_42 = l_Lean_Parser_andthenInfo(x_26, x_39);
x_43 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_43, 0, x_28);
lean_closure_set(x_43, 1, x_41);
x_44 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1);
lean_closure_set(x_44, 0, x_43);
lean_inc(x_31);
x_45 = l_Lean_Parser_nodeInfo(x_31, x_42);
x_46 = lean_alloc_closure((void*)(l_Lean_Parser_mkAntiquot___elambda__1___rarg), 5, 2);
lean_closure_set(x_46, 0, x_31);
lean_closure_set(x_46, 1, x_44);
x_47 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_47, 0, x_45);
lean_ctor_set(x_47, 1, x_46);
return x_47;
lean_closure_set(x_41, 0, x_27);
lean_closure_set(x_41, 1, x_39);
x_42 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1);
lean_closure_set(x_42, 0, x_41);
lean_inc(x_30);
x_43 = l_Lean_Parser_nodeInfo(x_30, x_40);
x_44 = lean_alloc_closure((void*)(l_Lean_Parser_mkAntiquot___elambda__1___rarg), 5, 2);
lean_closure_set(x_44, 0, x_30);
lean_closure_set(x_44, 1, x_42);
x_45 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_45, 0, x_43);
lean_ctor_set(x_45, 1, x_44);
return x_45;
}
else
{
lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; 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_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77;
x_48 = l___private_Init_Lean_Parser_Parser_21__noImmediateColon(x_1);
x_49 = l___private_Init_Lean_Parser_Parser_22__pushNone(x_1);
x_50 = lean_ctor_get(x_49, 0);
lean_inc(x_50);
lean_dec(x_49);
lean_inc(x_50);
x_51 = l_Lean_Parser_andthenInfo(x_50, x_50);
x_52 = lean_box(x_1);
x_53 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_22__pushNone___elambda__1___boxed), 3, 1);
lean_closure_set(x_53, 0, x_52);
lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; 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_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74;
x_46 = l___private_Init_Lean_Parser_Parser_21__noImmediateColon(x_1);
x_47 = l___private_Init_Lean_Parser_Parser_22__pushNone(x_1);
x_48 = lean_ctor_get(x_47, 0);
lean_inc(x_48);
lean_dec(x_47);
lean_inc(x_48);
x_49 = l_Lean_Parser_andthenInfo(x_48, x_48);
x_50 = lean_box(x_1);
x_51 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_22__pushNone___elambda__1___boxed), 3, 1);
lean_closure_set(x_51, 0, x_50);
lean_inc(x_51);
x_52 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_52, 0, x_51);
lean_closure_set(x_52, 1, x_51);
x_53 = lean_ctor_get(x_46, 0);
lean_inc(x_53);
x_54 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_54, 0, x_53);
lean_closure_set(x_54, 1, x_53);
x_55 = lean_ctor_get(x_48, 0);
lean_inc(x_55);
lean_dec(x_48);
x_56 = l_Lean_Parser_andthenInfo(x_55, x_51);
x_57 = lean_box(x_1);
x_58 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_21__noImmediateColon___elambda__1___boxed), 2, 1);
lean_closure_set(x_58, 0, x_57);
x_59 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_59, 0, x_58);
lean_closure_set(x_59, 1, x_54);
x_60 = l_Lean_Parser_orelseInfo(x_18, x_56);
x_61 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2);
lean_closure_set(x_61, 0, x_20);
lean_closure_set(x_61, 1, x_59);
lean_dec(x_46);
x_54 = l_Lean_Parser_andthenInfo(x_53, x_49);
x_55 = lean_box(x_1);
x_56 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_21__noImmediateColon___elambda__1___boxed), 2, 1);
lean_closure_set(x_56, 0, x_55);
x_57 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_57, 0, x_56);
lean_closure_set(x_57, 1, x_52);
x_58 = l_Lean_Parser_orelseInfo(x_18, x_54);
x_59 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2);
lean_closure_set(x_59, 0, x_20);
lean_closure_set(x_59, 1, x_57);
x_60 = l_Lean_Parser_mkAntiquot___closed__11;
x_61 = l_Lean_Parser_andthenInfo(x_58, x_60);
x_62 = l_Lean_Parser_mkAntiquot___closed__12;
x_63 = l_Lean_Parser_andthenInfo(x_60, x_62);
x_64 = l_Lean_Parser_mkAntiquot___closed__13;
x_63 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_63, 0, x_59);
lean_closure_set(x_63, 1, x_62);
x_64 = l_Lean_Parser_andthenInfo(x_23, x_61);
x_65 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_65, 0, x_61);
lean_closure_set(x_65, 1, x_64);
x_66 = l_Lean_Parser_andthenInfo(x_25, x_63);
lean_closure_set(x_65, 0, x_24);
lean_closure_set(x_65, 1, x_63);
x_66 = l_Lean_Parser_andthenInfo(x_17, x_64);
x_67 = l_Lean_Parser_mkAntiquot___closed__14;
x_68 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_68, 0, x_67);
lean_closure_set(x_68, 1, x_65);
x_69 = l_Lean_Parser_andthenInfo(x_17, x_66);
x_70 = l_Lean_Parser_mkAntiquot___closed__16;
x_71 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
x_69 = l_Lean_Parser_andthenInfo(x_25, x_66);
x_70 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_70, 0, x_27);
lean_closure_set(x_70, 1, x_68);
x_71 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1);
lean_closure_set(x_71, 0, x_70);
lean_closure_set(x_71, 1, x_68);
x_72 = l_Lean_Parser_andthenInfo(x_26, x_69);
x_73 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_73, 0, x_28);
lean_inc(x_30);
x_72 = l_Lean_Parser_nodeInfo(x_30, x_69);
x_73 = lean_alloc_closure((void*)(l_Lean_Parser_mkAntiquot___elambda__2___rarg), 5, 2);
lean_closure_set(x_73, 0, x_30);
lean_closure_set(x_73, 1, x_71);
x_74 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1);
lean_closure_set(x_74, 0, x_73);
lean_inc(x_31);
x_75 = l_Lean_Parser_nodeInfo(x_31, x_72);
x_76 = lean_alloc_closure((void*)(l_Lean_Parser_mkAntiquot___elambda__2___rarg), 5, 2);
lean_closure_set(x_76, 0, x_31);
lean_closure_set(x_76, 1, x_74);
x_77 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_77, 0, x_75);
lean_ctor_set(x_77, 1, x_76);
return x_77;
x_74 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_74, 0, x_72);
lean_ctor_set(x_74, 1, x_73);
return x_74;
}
}
}
@ -38155,6 +38519,24 @@ l_Lean_Parser_dollarSymbol___closed__2 = _init_l_Lean_Parser_dollarSymbol___clos
lean_mark_persistent(l_Lean_Parser_dollarSymbol___closed__2);
l___private_Init_Lean_Parser_Parser_21__noImmediateColon___elambda__1___rarg___closed__1 = _init_l___private_Init_Lean_Parser_Parser_21__noImmediateColon___elambda__1___rarg___closed__1();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_21__noImmediateColon___elambda__1___rarg___closed__1);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__3 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__3();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__3);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__4 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__4();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__4);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6);
l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__7 = _init_l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__7();
lean_mark_persistent(l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__7);
l_Lean_Parser_mkAntiquot___closed__1 = _init_l_Lean_Parser_mkAntiquot___closed__1();
lean_mark_persistent(l_Lean_Parser_mkAntiquot___closed__1);
l_Lean_Parser_mkAntiquot___closed__2 = _init_l_Lean_Parser_mkAntiquot___closed__2();
@ -38183,10 +38565,6 @@ l_Lean_Parser_mkAntiquot___closed__13 = _init_l_Lean_Parser_mkAntiquot___closed_
lean_mark_persistent(l_Lean_Parser_mkAntiquot___closed__13);
l_Lean_Parser_mkAntiquot___closed__14 = _init_l_Lean_Parser_mkAntiquot___closed__14();
lean_mark_persistent(l_Lean_Parser_mkAntiquot___closed__14);
l_Lean_Parser_mkAntiquot___closed__15 = _init_l_Lean_Parser_mkAntiquot___closed__15();
lean_mark_persistent(l_Lean_Parser_mkAntiquot___closed__15);
l_Lean_Parser_mkAntiquot___closed__16 = _init_l_Lean_Parser_mkAntiquot___closed__16();
lean_mark_persistent(l_Lean_Parser_mkAntiquot___closed__16);
l_Lean_Parser_ident___closed__1 = _init_l_Lean_Parser_ident___closed__1();
lean_mark_persistent(l_Lean_Parser_ident___closed__1);
l_Lean_Parser_fieldIdxFn___closed__1 = _init_l_Lean_Parser_fieldIdxFn___closed__1();

70
stage0/stdlib/Init/Lean/Parser/Syntax.c
View file

@ -43,6 +43,7 @@ lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*);
lean_object* l_Lean_Parser_ParserState_mkError(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Command_mixfix;
lean_object* l_Lean_Parser_Command_mixfixSymbol___elambda__1(lean_object*, lean_object*, lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
lean_object* l_Lean_Parser_Syntax_lookahead___closed__4;
lean_object* l_Lean_Parser_Command_macroArgType___closed__4;
lean_object* l_Lean_Parser_Syntax_num___closed__5;
@ -142,6 +143,7 @@ lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Syntax_sepBy___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Command_infixr___elambda__1___closed__6;
extern lean_object* l_Lean_Parser_Term_listLit___closed__4;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
lean_object* l_Lean_Parser_Command_macroTailDefault___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_maxPrec___elambda__1___closed__2;
lean_object* l_Lean_Parser_Syntax_sepBy___elambda__1___closed__3;
@ -256,7 +258,6 @@ lean_object* l_Lean_Parser_Command_mixfixSymbol___closed__4;
lean_object* l_Lean_Parser_Command_strLitPrec___elambda__1___closed__2;
lean_object* l_Lean_Parser_quotedSymbol(uint8_t);
lean_object* l_Lean_Parser_Syntax_num___elambda__1___closed__1;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__7;
lean_object* lean_nat_sub(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Syntax_sepBy1___closed__2;
lean_object* l_Lean_Parser_precedence___elambda__1(lean_object*, lean_object*, lean_object*);
@ -327,7 +328,6 @@ lean_object* l_Lean_Parser_Command_infixl___elambda__1___closed__6;
lean_object* l_Lean_Parser_checkNoWsBeforeFn(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Syntax_cat;
lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_macro__rules___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_mkAntiquot___closed__10;
lean_object* l_Lean_Parser_Syntax_optional___elambda__1___closed__4;
lean_object* l_Lean_Parser_orelseInfo(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Syntax_char___closed__4;
@ -363,7 +363,6 @@ lean_object* l_Lean_Parser_Command_infixr___closed__5;
lean_object* l_Lean_Parser_maxPrec___elambda__1___closed__3;
lean_object* l_Lean_Parser_Command_infixr___closed__3;
lean_object* l_Lean_Parser_Command_identPrec___elambda__1___closed__1;
extern lean_object* l_Lean_Parser_Term_explicitBinder___closed__1;
lean_object* l_Lean_Parser_Command_macroTail___closed__4;
lean_object* l_Lean_Parser_Syntax_lookahead___elambda__1___closed__6;
lean_object* l_Lean_Parser_registerBuiltinParserAttribute(lean_object*, lean_object*, uint8_t, lean_object*);
@ -406,7 +405,6 @@ lean_object* l_Lean_Parser_Syntax_atom___closed__4;
lean_object* l___regBuiltinParser_Lean_Parser_Syntax_sepBy(lean_object*);
lean_object* l_Lean_Parser_Syntax_atom;
lean_object* l_Lean_Parser_Syntax_sepBy___elambda__1___closed__8;
extern lean_object* l_Lean_Parser_Level_paren___closed__4;
lean_object* l_Lean_Parser_Command_macroTailCommand___closed__1;
lean_object* l_Lean_Parser_Command_identPrec___closed__4;
lean_object* l_Lean_Parser_Command_syntax___closed__1;
@ -450,11 +448,11 @@ lean_object* l_Lean_Parser_Syntax_paren___closed__2;
lean_object* l_Lean_Parser_Command_mixfixKind___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Syntax_many1___closed__5;
extern lean_object* l_Lean_Parser_Term_haveAssign___closed__1;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
lean_object* l___regBuiltinParser_Lean_Parser_Syntax_num(lean_object*);
lean_object* l_Lean_Parser_Command_macro___closed__6;
lean_object* l_Lean_Parser_optPrecedence___closed__3;
lean_object* l_Lean_Parser_Command_infix___closed__5;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__3;
lean_object* l_Lean_Parser_Syntax_atom___elambda__1___closed__4;
lean_object* l_Lean_Parser_Command_macro;
lean_object* l_Lean_Parser_Command_syntax___closed__6;
@ -546,6 +544,7 @@ lean_object* l_Lean_Parser_Command_macroArg___elambda__1(lean_object*, lean_obje
lean_object* l_Lean_Parser_regBuiltinSyntaxParserAttr(lean_object*);
lean_object* l_Lean_Parser_Command_infixl___closed__1;
lean_object* l_Lean_Parser_maxPrec___elambda__1___closed__1;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
lean_object* l_Lean_Parser_Command_syntax___closed__11;
lean_object* l_Lean_Parser_precedenceLit___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Syntax_atom___elambda__1___closed__1;
@ -567,6 +566,7 @@ lean_object* l_Lean_Parser_Command_macroTailTactic___elambda__1(lean_object*, le
lean_object* l_Lean_Parser_Command_syntax___elambda__1___closed__8;
lean_object* l_Lean_Parser_Command_mixfixKind___closed__3;
lean_object* l_Lean_Parser_Command_infixr___elambda__1___closed__1;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
extern lean_object* l_Lean_Parser_Term_typeAscription___closed__2;
lean_object* l_Lean_Parser_Syntax_paren___closed__7;
extern lean_object* l_Lean_Parser_Tactic_try___elambda__1___closed__6;
@ -615,13 +615,13 @@ lean_object* l_Lean_Parser_Command_notation___elambda__1___closed__5;
lean_object* l_Lean_Parser_Syntax_lookahead;
lean_object* l_Lean_Parser_Command_infix___elambda__1___closed__3;
lean_object* l_Lean_Parser_Command_macro__rules___closed__2;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__14;
lean_object* l_Lean_Parser_Command_syntax___closed__9;
lean_object* l_Lean_Parser_Command_macroTailDefault___closed__2;
lean_object* l_Lean_Parser_Syntax_atom___closed__2;
lean_object* l_Lean_Parser_precedence___closed__2;
lean_object* l_Lean_Parser_Syntax_char___elambda__1(lean_object*, lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__4;
extern lean_object* l_Lean_Parser_mkAntiquot___closed__8;
lean_object* l_Lean_Parser_Command_infixr___closed__4;
lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_macro__rules___spec__1(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Syntax_try___elambda__1___closed__3;
@ -1556,7 +1556,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Syntax_paren___elambda__1___closed__2;
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
@ -1576,7 +1576,7 @@ _start:
{
uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5;
x_1 = 0;
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3 = l_Lean_Parser_Syntax_paren___elambda__1___closed__4;
x_4 = 1;
x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4);
@ -1655,13 +1655,13 @@ lean_object* x_71; lean_object* x_72; uint8_t x_73;
x_71 = lean_ctor_get(x_70, 1);
lean_inc(x_71);
lean_dec(x_70);
x_72 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_72 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_73 = lean_string_dec_eq(x_71, x_72);
lean_dec(x_71);
if (x_73 == 0)
{
lean_object* x_74; lean_object* x_75;
x_74 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_74 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_75 = l_Lean_Parser_ParserState_mkErrorsAt(x_67, x_74, x_8);
x_49 = x_75;
@ -1677,7 +1677,7 @@ else
{
lean_object* x_76; lean_object* x_77;
lean_dec(x_70);
x_76 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_76 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_77 = l_Lean_Parser_ParserState_mkErrorsAt(x_67, x_76, x_8);
x_49 = x_77;
@ -1688,7 +1688,7 @@ else
{
lean_object* x_78; lean_object* x_79;
lean_dec(x_68);
x_78 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_78 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_79 = l_Lean_Parser_ParserState_mkErrorsAt(x_67, x_78, x_8);
x_49 = x_79;
@ -1720,13 +1720,13 @@ lean_object* x_24; lean_object* x_25; uint8_t x_26;
x_24 = lean_ctor_get(x_23, 1);
lean_inc(x_24);
lean_dec(x_23);
x_25 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_25 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_26 = lean_string_dec_eq(x_24, x_25);
lean_dec(x_24);
if (x_26 == 0)
{
lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31;
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_27, x_19);
x_29 = l_Lean_Parser_Syntax_paren___elambda__1___closed__3;
x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_16);
@ -1749,7 +1749,7 @@ else
{
lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39;
lean_dec(x_23);
x_35 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_35 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_35, x_19);
x_37 = l_Lean_Parser_Syntax_paren___elambda__1___closed__3;
x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_16);
@ -1762,7 +1762,7 @@ else
{
lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44;
lean_dec(x_21);
x_40 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_40 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_40, x_19);
x_42 = l_Lean_Parser_Syntax_paren___elambda__1___closed__3;
x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_16);
@ -1859,7 +1859,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Syntax_paren___closed__1;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Level_paren___closed__4;
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}
@ -1868,7 +1868,7 @@ lean_object* _init_l_Lean_Parser_Syntax_paren___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_2 = l_Lean_Parser_Syntax_paren___closed__2;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
@ -4385,7 +4385,7 @@ _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_mkAntiquot___closed__9;
x_2 = l_Lean_Parser_mkAntiquot___closed__8;
x_3 = lean_string_append(x_1, x_2);
return x_3;
}
@ -4446,7 +4446,7 @@ lean_object* x_13; lean_object* x_14; uint8_t x_15;
x_13 = lean_ctor_get(x_12, 1);
lean_inc(x_13);
lean_dec(x_12);
x_14 = l_Lean_Parser_mkAntiquot___closed__9;
x_14 = l_Lean_Parser_mkAntiquot___closed__8;
x_15 = lean_string_dec_eq(x_13, x_14);
lean_dec(x_13);
if (x_15 == 0)
@ -4506,7 +4506,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_epsilonInfo;
x_2 = l_Lean_Parser_mkAntiquot___closed__10;
x_2 = l_Lean_Parser_mkAntiquot___closed__9;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
@ -11823,13 +11823,13 @@ lean_object* x_15; lean_object* x_16; uint8_t x_17;
x_15 = lean_ctor_get(x_14, 1);
lean_inc(x_15);
lean_dec(x_14);
x_16 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_16 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_17 = lean_string_dec_eq(x_15, x_16);
lean_dec(x_15);
if (x_17 == 0)
{
lean_object* x_18; lean_object* x_19;
x_18 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_18 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_18, x_10);
return x_19;
}
@ -11843,7 +11843,7 @@ else
{
lean_object* x_20; lean_object* x_21;
lean_dec(x_14);
x_20 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_20 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_20, x_10);
return x_21;
}
@ -11852,7 +11852,7 @@ else
{
lean_object* x_22; lean_object* x_23;
lean_dec(x_12);
x_22 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_22 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_23 = l_Lean_Parser_ParserState_mkErrorsAt(x_11, x_22, x_10);
return x_23;
}
@ -12252,13 +12252,13 @@ lean_object* x_11; lean_object* x_12; uint8_t x_13;
x_11 = lean_ctor_get(x_10, 1);
lean_inc(x_11);
lean_dec(x_10);
x_12 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_12 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_13 = lean_string_dec_eq(x_11, x_12);
lean_dec(x_11);
if (x_13 == 0)
{
lean_object* x_14; lean_object* x_15;
x_14 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_14 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_15 = l_Lean_Parser_ParserState_mkErrorsAt(x_7, x_14, x_6);
return x_15;
}
@ -12272,7 +12272,7 @@ else
{
lean_object* x_16; lean_object* x_17;
lean_dec(x_10);
x_16 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_16 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_17 = l_Lean_Parser_ParserState_mkErrorsAt(x_7, x_16, x_6);
return x_17;
}
@ -12281,7 +12281,7 @@ else
{
lean_object* x_18; lean_object* x_19;
lean_dec(x_8);
x_18 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_18 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_19 = l_Lean_Parser_ParserState_mkErrorsAt(x_7, x_18, x_6);
return x_19;
}
@ -12584,7 +12584,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Term_stxQuot___closed__2;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Level_paren___closed__4;
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}
@ -12762,13 +12762,13 @@ 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);
x_18 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_18 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_19 = lean_string_dec_eq(x_17, x_18);
lean_dec(x_17);
if (x_19 == 0)
{
lean_object* x_20; lean_object* x_21;
x_20 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_20 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_21 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_20, x_12);
return x_21;
}
@ -12782,7 +12782,7 @@ else
{
lean_object* x_22; lean_object* x_23;
lean_dec(x_16);
x_22 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_22 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_23 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_22, x_12);
return x_23;
}
@ -12791,7 +12791,7 @@ else
{
lean_object* x_24; lean_object* x_25;
lean_dec(x_14);
x_24 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_24 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_25 = l_Lean_Parser_ParserState_mkErrorsAt(x_13, x_24, x_12);
return x_25;
}
@ -13041,7 +13041,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Command_macroTailDefault___closed__2;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Level_paren___closed__4;
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}

44
stage0/stdlib/Init/Lean/Parser/Tactic.c
View file

@ -38,6 +38,7 @@ 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_Tactic_apply___closed__2;
lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__1;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
lean_object* l_Lean_Parser_Tactic_repeat___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Tactic_allGoals___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14;
@ -107,6 +108,7 @@ lean_object* lean_string_append(lean_object*, lean_object*);
lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*);
lean_object* l___regBuiltinParser_Lean_Parser_Tactic_nestedTacticBlockCurly(lean_object*);
lean_object* l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
lean_object* l_Lean_Parser_Tactic_intros___closed__5;
lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__2;
lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
@ -173,7 +175,6 @@ lean_object* l_Lean_Parser_Tactic_allGoals___elambda__1___closed__5;
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;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__7;
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*);
@ -232,7 +233,6 @@ lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__8;
lean_object* l_Lean_Parser_Tactic_intro___closed__7;
lean_object* l_Lean_Parser_Tactic_repeat___elambda__1___closed__8;
lean_object* l_Lean_Parser_Tactic_exact___elambda__1___closed__5;
extern lean_object* l_Lean_Parser_Term_explicitBinder___closed__1;
lean_object* l_Lean_Parser_registerBuiltinParserAttribute(lean_object*, lean_object*, uint8_t, lean_object*);
lean_object* l_Lean_Parser_Term_tacticBlock___elambda__1___closed__3;
lean_object* l_Lean_Parser_Tactic_nestedTacticBlock;
@ -264,7 +264,6 @@ lean_object* l_Lean_Parser_Tactic_paren___closed__2;
lean_object* l_Lean_Parser_ParserState_popSyntax(lean_object*);
lean_object* l_Lean_Parser_Tactic_paren___elambda__1___closed__2;
lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__1;
extern lean_object* l_Lean_Parser_Level_paren___closed__4;
lean_object* l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot___closed__1;
extern lean_object* l_Lean_Parser_Term_seq___elambda__1___closed__1;
lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__1;
@ -287,11 +286,11 @@ lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__4;
lean_object* l_Lean_Parser_Tactic_refine___closed__1;
lean_object* l_Lean_Parser_Tactic_paren___closed__4;
lean_object* l_Lean_Parser_Tactic_repeat___closed__6;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__2;
lean_object* l_Lean_Parser_Tactic_refine___closed__2;
lean_object* l___regBuiltinParser_Lean_Parser_Tactic_exact(lean_object*);
lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__1;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__3;
lean_object* l_Lean_Parser_Tactic_case___closed__3;
lean_object* l_Lean_Parser_Tactic_try___closed__1;
lean_object* l_Lean_Parser_Tactic_repeat___elambda__1___closed__1;
@ -334,6 +333,7 @@ lean_object* l_Lean_Parser_Tactic_traceState___elambda__1___closed__3;
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;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__5;
lean_object* l_Lean_Parser_Tactic_case___closed__7;
lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1(lean_object*, lean_object*, lean_object*);
@ -345,6 +345,7 @@ lean_object* l_Lean_Parser_Tactic_nonEmptySeq___elambda__1(lean_object*, lean_ob
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__8;
lean_object* l_Lean_Parser_Tactic_apply___closed__1;
lean_object* l___regBuiltinParser_Lean_Parser_Tactic_assumption(lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
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_try___elambda__1___closed__6;
@ -368,7 +369,6 @@ lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__3;
lean_object* l_Lean_Parser_Tactic_allGoals___closed__4;
lean_object* l_Lean_Parser_Tactic_intro___closed__1;
lean_object* l_Lean_Parser_Tactic_exact___elambda__1___closed__3;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__14;
lean_object* l_Lean_Parser_Tactic_intro___closed__3;
lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__4;
lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__2;
@ -4201,7 +4201,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2;
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
@ -4221,7 +4221,7 @@ _start:
{
uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5;
x_1 = 0;
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3 = l_Lean_Parser_Tactic_paren___elambda__1___closed__2;
x_4 = 1;
x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4);
@ -4300,13 +4300,13 @@ lean_object* x_58; lean_object* x_59; uint8_t x_60;
x_58 = lean_ctor_get(x_57, 1);
lean_inc(x_58);
lean_dec(x_57);
x_59 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_59 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_60 = lean_string_dec_eq(x_58, x_59);
lean_dec(x_58);
if (x_60 == 0)
{
lean_object* x_61; lean_object* x_62;
x_61 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_61 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_62 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_61, x_8);
x_17 = x_62;
@ -4322,7 +4322,7 @@ else
{
lean_object* x_63; lean_object* x_64;
lean_dec(x_57);
x_63 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_63 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_63, x_8);
x_17 = x_64;
@ -4333,7 +4333,7 @@ else
{
lean_object* x_65; lean_object* x_66;
lean_dec(x_55);
x_65 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_65 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_65, x_8);
x_17 = x_66;
@ -4373,13 +4373,13 @@ lean_object* x_26; lean_object* x_27; uint8_t x_28;
x_26 = lean_ctor_get(x_25, 1);
lean_inc(x_26);
lean_dec(x_25);
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_27 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_28 = lean_string_dec_eq(x_26, x_27);
lean_dec(x_26);
if (x_28 == 0)
{
lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33;
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_29, x_21);
x_31 = l_Lean_Parser_Tactic_paren___elambda__1___closed__1;
x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_16);
@ -4402,7 +4402,7 @@ else
{
lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41;
lean_dec(x_25);
x_37 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_37 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_37, x_21);
x_39 = l_Lean_Parser_Tactic_paren___elambda__1___closed__1;
x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_16);
@ -4415,7 +4415,7 @@ else
{
lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46;
lean_dec(x_23);
x_42 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_42 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_42, x_21);
x_44 = l_Lean_Parser_Tactic_paren___elambda__1___closed__1;
x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_16);
@ -4460,7 +4460,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Tactic_nonEmptySeq;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Level_paren___closed__4;
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}
@ -4469,7 +4469,7 @@ lean_object* _init_l_Lean_Parser_Tactic_paren___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_2 = l_Lean_Parser_Tactic_paren___closed__1;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
@ -6106,13 +6106,13 @@ 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);
x_18 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_18 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_19 = lean_string_dec_eq(x_17, x_18);
lean_dec(x_17);
if (x_19 == 0)
{
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_20 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
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);
@ -6131,7 +6131,7 @@ 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_26 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
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);
@ -6142,7 +6142,7 @@ 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_30 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
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);
@ -6186,7 +6186,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Tactic_seq___closed__2;
x_2 = l_Lean_Parser_Level_paren___closed__4;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}

246
stage0/stdlib/Init/Lean/Parser/Term.c
View file

@ -92,6 +92,7 @@ lean_object* l_Lean_Parser_Term_sort___elambda__1___closed__8;
lean_object* l___regBuiltinParser_Lean_Parser_Term_dollarProj(lean_object*);
lean_object* l_Lean_Parser_darrow___elambda__1___boxed(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*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
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);
@ -151,6 +152,7 @@ lean_object* l_Lean_Parser_Term_subtype___closed__6;
lean_object* l_Lean_Parser_Term_proj___elambda__1___closed__7;
lean_object* l___regBuiltinParser_Lean_Parser_Term_append(lean_object*);
lean_object* l_Lean_Parser_Term_nomatch___elambda__1___closed__5;
lean_object* l_Lean_Parser_Term_proj___closed__10;
lean_object* l_Lean_Parser_Term_haveAssign___closed__2;
lean_object* l_Lean_Parser_Term_forall___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Term_structInstSource___elambda__1(lean_object*, lean_object*, lean_object*);
@ -240,7 +242,6 @@ lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__7;
lean_object* l_Lean_Parser_Term_show___elambda__1___closed__2;
lean_object* l_Lean_Parser_Term_cdot___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Term_andM___closed__2;
lean_object* l_Lean_Parser_Term_paren___elambda__1___closed__3;
lean_object* l_Lean_Parser_Term_doId___closed__5;
lean_object* l_Lean_Parser_Term_doPat___elambda__1___closed__2;
lean_object* l_Lean_Parser_Term_instBinder___elambda__1(lean_object*, lean_object*, lean_object*);
@ -389,6 +390,7 @@ lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__7;
lean_object* l_Lean_Parser_Term_hole___closed__5;
lean_object* l_Lean_Parser_Term_gt___elambda__1___closed__2;
lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__4;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
lean_object* l_Lean_Parser_Term_optType___closed__1;
lean_object* l_Lean_Parser_Term_match__syntax___closed__5;
lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__5;
@ -399,6 +401,7 @@ lean_object* l_Lean_Parser_Term_binderType___elambda__2___rarg(lean_object*, lea
lean_object* l_Lean_Parser_Term_and;
lean_object* l_Lean_Parser_Term_gt___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Term_bracketedDoSeq___elambda__1(lean_object*, lean_object*, lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__3;
lean_object* l_Lean_Parser_Term_suffices___elambda__1___closed__3;
lean_object* l_Lean_Parser_Term_parenSpecial___closed__1;
lean_object* l_Lean_Parser_Term_not___elambda__1___closed__5;
@ -421,7 +424,6 @@ lean_object* l_Lean_Parser_Term_bracktedBinder___elambda__1(lean_object*, lean_o
lean_object* l_Lean_Parser_Term_forall___elambda__1___closed__13;
lean_object* l_Lean_Parser_Term_anonymousCtor___closed__9;
lean_object* l_Lean_Parser_Term_sorry___closed__1;
lean_object* l_Lean_Parser_Term_explicitBinder___closed__10;
lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__3;
lean_object* l_Lean_Parser_Term_ge___elambda__1___closed__4;
lean_object* l_Lean_Parser_Term_simpleBinder___closed__3;
@ -552,6 +554,7 @@ lean_object* l_Lean_Syntax_isSimpleTermId_x3f(lean_object*);
lean_object* l_Lean_Parser_Term_prop___elambda__1___closed__9;
lean_object* l_Lean_Parser_Term_doSeq___closed__4;
extern lean_object* l_Lean_Parser_unicodeSymbolFn___rarg___closed__1;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__7;
lean_object* l_Lean_Parser_Term_listLit___closed__6;
lean_object* l_Lean_Parser_Term_proj___elambda__1___closed__2;
lean_object* l_Lean_Parser_Term_paren___closed__1;
@ -694,7 +697,6 @@ lean_object* l_Lean_Parser_Term_nomatch___elambda__1___closed__2;
lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Term_ge___elambda__1___closed__5;
lean_object* l_Lean_Parser_Term_have___closed__11;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__7;
lean_object* l_Lean_Parser_Term_doSeq___closed__1;
lean_object* l_Lean_Parser_Term_or___elambda__1___closed__1;
lean_object* l_Lean_Parser_Term_namedPattern___elambda__1___closed__7;
@ -1164,10 +1166,8 @@ lean_object* l_Lean_Parser_Term_structInstField;
lean_object* l_Lean_Parser_Term_iff___elambda__1___closed__4;
lean_object* l_Lean_Parser_Term_borrowed___elambda__1___closed__9;
lean_object* l_Lean_Parser_Term_typeAscription___closed__3;
extern lean_object* l_Lean_Parser_Level_paren___closed__4;
lean_object* l_Lean_Parser_Term_have___closed__10;
lean_object* l_Lean_Parser_Term_arrayRef___closed__6;
extern lean_object* l_Lean_Parser_mkAntiquot___closed__7;
lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__15;
lean_object* l_Lean_Parser_Term_borrowed___closed__7;
lean_object* l_Lean_Parser_Term_doLet___closed__5;
@ -1319,6 +1319,7 @@ lean_object* l_Lean_Parser_Term_emptyC___elambda__1___closed__8;
lean_object* l_Lean_Parser_Term_modN___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Term_map___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l___regBuiltinParser_Lean_Parser_Term_le(lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
lean_object* l_Lean_Parser_Term_seqRight;
lean_object* l_Lean_Parser_Term_bindOp;
lean_object* l_Lean_Parser_Term_simpleBinder;
@ -1332,7 +1333,6 @@ lean_object* l_Lean_Parser_Term_sub___closed__2;
lean_object* l___regBuiltinParser_Lean_Parser_Term_proj(lean_object*);
extern lean_object* l_PersistentArray_Stats_toString___closed__4;
lean_object* l___regBuiltinParser_Lean_Parser_Term_band(lean_object*);
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__3;
lean_object* l_Lean_Parser_Term_uminus___elambda__1___closed__6;
lean_object* l_Lean_Parser_Term_bor___closed__2;
lean_object* l_Lean_Parser_Term_cdot___elambda__1___closed__4;
@ -1359,6 +1359,7 @@ lean_object* l_Lean_Parser_Term_or___closed__3;
lean_object* l_Lean_Parser_Term_inaccessible___elambda__1___closed__2;
lean_object* l_Lean_Parser_Term_binderDefault___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Term_nomatch___closed__2;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_object* l_Lean_Parser_Term_type___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l___regBuiltinParser_Lean_Parser_Term_not(lean_object*);
lean_object* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__7;
@ -1562,6 +1563,7 @@ lean_object* l_Lean_Parser_Term_arrayLit___elambda__1(lean_object*, lean_object*
lean_object* l_Lean_Parser_Term_and___elambda__1___closed__2;
lean_object* l_Lean_Parser_Term_match__syntax___elambda__1___closed__5;
lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__1;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
lean_object* l_Lean_Parser_Term_gt;
lean_object* l_Lean_Parser_Term_doExpr___elambda__1___closed__2;
lean_object* l_Lean_Parser_Term_tparser_x21___closed__2;
@ -1590,7 +1592,6 @@ lean_object* l_Lean_Parser_Term_haveAssign___closed__5;
lean_object* l_Lean_Parser_Term_letIdDecl___closed__1;
lean_object* l_Lean_Parser_Term_arrayLit___elambda__1___closed__8;
lean_object* l_Lean_Parser_Term_sorry___elambda__1___closed__7;
lean_object* l_Lean_Parser_Term_explicitBinder___closed__8;
lean_object* l_Lean_Parser_Term_matchAlt___closed__2;
lean_object* l_Lean_Parser_Term_parenSpecial___closed__2;
lean_object* l_Lean_Parser_Term_arrayLit___elambda__1___closed__4;
@ -1601,7 +1602,6 @@ lean_object* l___regBuiltinParser_Lean_Parser_Term_prop(lean_object*);
lean_object* l___regBuiltinParser_Lean_Parser_Term_antiquot(lean_object*);
lean_object* l_Lean_Parser_Term_doExpr___elambda__1___closed__4;
lean_object* l_Lean_Parser_Term_bindOp___elambda__1___closed__4;
lean_object* l_Lean_Parser_Term_explicitBinder___closed__9;
lean_object* l_Lean_Parser_Term_letEqns___closed__4;
lean_object* l_Lean_Parser_darrow___elambda__1(lean_object*);
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__8;
@ -1620,6 +1620,7 @@ lean_object* l_Lean_Parser_Term_proj___elambda__1___closed__6;
lean_object* l_Lean_Parser_Term_namedArgument___closed__6;
lean_object* l_Lean_Parser_Term_implicitBinder___closed__1;
lean_object* l_Lean_Parser_Term_tparser_x21___closed__4;
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
lean_object* l_Lean_Parser_Term_doExpr___elambda__1___closed__1;
lean_object* l_Lean_Parser_Term_typeAscription___closed__2;
lean_object* l_Lean_Parser_Term_seq___closed__3;
@ -1746,7 +1747,6 @@ lean_object* l_Lean_Parser_Term_beq___closed__1;
lean_object* l_Lean_Parser_Term_fun___closed__2;
lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__5;
lean_object* l_Lean_Parser_Term_structInstSource___elambda__1___closed__2;
extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__14;
lean_object* l___regBuiltinParser_Lean_Parser_Term_hole(lean_object*);
lean_object* l_Lean_Parser_Term_iff___closed__2;
lean_object* l_Lean_Parser_Term_if___elambda__1___closed__12;
@ -7507,30 +7507,20 @@ return x_1;
lean_object* _init_l_Lean_Parser_Term_paren___elambda__1___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_mkAppStx___closed__6;
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Term_paren___elambda__1___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_2 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_Term_paren___elambda__1___closed__3() {
lean_object* _init_l_Lean_Parser_Term_paren___elambda__1___closed__2() {
_start:
{
uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5;
x_1 = 0;
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__3;
x_3 = l_Lean_Parser_Term_paren___elambda__1___closed__2;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__1;
x_3 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_4 = 1;
x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4);
return x_5;
@ -7540,7 +7530,7 @@ lean_object* l_Lean_Parser_Term_paren___elambda__1(lean_object* x_1, lean_object
_start:
{
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;
x_4 = l_Lean_Parser_Term_paren___elambda__1___closed__3;
x_4 = l_Lean_Parser_Term_paren___elambda__1___closed__2;
x_5 = lean_ctor_get(x_4, 1);
lean_inc(x_5);
x_6 = lean_ctor_get(x_3, 0);
@ -7608,13 +7598,13 @@ lean_object* x_84; lean_object* x_85; uint8_t x_86;
x_84 = lean_ctor_get(x_83, 1);
lean_inc(x_84);
lean_dec(x_83);
x_85 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_85 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_86 = lean_string_dec_eq(x_84, x_85);
lean_dec(x_84);
if (x_86 == 0)
{
lean_object* x_87; lean_object* x_88;
x_87 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_87 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_88 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_87, x_8);
x_49 = x_88;
@ -7630,7 +7620,7 @@ else
{
lean_object* x_89; lean_object* x_90;
lean_dec(x_83);
x_89 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_89 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_90 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_89, x_8);
x_49 = x_90;
@ -7641,7 +7631,7 @@ else
{
lean_object* x_91; lean_object* x_92;
lean_dec(x_81);
x_91 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_91 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_8);
x_92 = l_Lean_Parser_ParserState_mkErrorsAt(x_80, x_91, x_8);
x_49 = x_92;
@ -7673,15 +7663,15 @@ lean_object* x_24; lean_object* x_25; uint8_t x_26;
x_24 = lean_ctor_get(x_23, 1);
lean_inc(x_24);
lean_dec(x_23);
x_25 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_25 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_26 = lean_string_dec_eq(x_24, x_25);
lean_dec(x_24);
if (x_26 == 0)
{
lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31;
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_27 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_27, x_19);
x_29 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_29 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_16);
x_31 = l_Lean_Parser_mergeOrElseErrors(x_30, x_11, x_8);
lean_dec(x_8);
@ -7691,7 +7681,7 @@ else
{
lean_object* x_32; lean_object* x_33; lean_object* x_34;
lean_dec(x_19);
x_32 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_32 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_33 = l_Lean_Parser_ParserState_mkNode(x_20, x_32, x_16);
x_34 = l_Lean_Parser_mergeOrElseErrors(x_33, x_11, x_8);
lean_dec(x_8);
@ -7702,9 +7692,9 @@ else
{
lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39;
lean_dec(x_23);
x_35 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_35 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_35, x_19);
x_37 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_37 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_16);
x_39 = l_Lean_Parser_mergeOrElseErrors(x_38, x_11, x_8);
lean_dec(x_8);
@ -7715,9 +7705,9 @@ else
{
lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44;
lean_dec(x_21);
x_40 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_40 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_40, x_19);
x_42 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_42 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_16);
x_44 = l_Lean_Parser_mergeOrElseErrors(x_43, x_11, x_8);
lean_dec(x_8);
@ -7729,7 +7719,7 @@ else
lean_object* x_45; lean_object* x_46; lean_object* x_47;
lean_dec(x_18);
lean_dec(x_2);
x_45 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_45 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_46 = l_Lean_Parser_ParserState_mkNode(x_17, x_45, x_16);
x_47 = l_Lean_Parser_mergeOrElseErrors(x_46, x_11, x_8);
lean_dec(x_8);
@ -7835,7 +7825,7 @@ lean_object* x_76; lean_object* x_77; lean_object* x_78;
lean_dec(x_50);
lean_dec(x_2);
lean_dec(x_1);
x_76 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_76 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_77 = l_Lean_Parser_ParserState_mkNode(x_49, x_76, x_16);
x_78 = l_Lean_Parser_mergeOrElseErrors(x_77, x_11, x_8);
lean_dec(x_8);
@ -7874,7 +7864,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_paren___closed__2;
x_2 = l_Lean_Parser_Level_paren___closed__4;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
@ -7893,7 +7883,7 @@ lean_object* _init_l_Lean_Parser_Term_paren___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_2 = l_Lean_Parser_Term_paren___closed__4;
x_3 = l_Lean_Parser_nodeInfo(x_1, x_2);
return x_3;
@ -7903,7 +7893,7 @@ lean_object* _init_l_Lean_Parser_Term_paren___closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Term_paren___elambda__1___closed__3;
x_1 = l_Lean_Parser_Term_paren___elambda__1___closed__2;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Term_paren___closed__5;
@ -7945,7 +7935,7 @@ _start:
uint8_t x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6;
x_2 = 0;
x_3 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4;
x_4 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_4 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_5 = l_Lean_Parser_Term_paren;
x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1);
return x_6;
@ -16185,13 +16175,13 @@ lean_object* x_28; lean_object* x_29; uint8_t x_30;
x_28 = lean_ctor_get(x_27, 1);
lean_inc(x_28);
lean_dec(x_27);
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_29 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_30 = lean_string_dec_eq(x_28, x_29);
lean_dec(x_28);
if (x_30 == 0)
{
lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35;
x_31 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_31 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_31, x_23);
x_33 = l_Lean_Parser_Term_inaccessible___elambda__1___closed__2;
x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_16);
@ -16214,7 +16204,7 @@ else
{
lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43;
lean_dec(x_27);
x_39 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_39 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_39, x_23);
x_41 = l_Lean_Parser_Term_inaccessible___elambda__1___closed__2;
x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_16);
@ -16227,7 +16217,7 @@ else
{
lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48;
lean_dec(x_25);
x_44 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_44 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_44, x_23);
x_46 = l_Lean_Parser_Term_inaccessible___elambda__1___closed__2;
x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_16);
@ -16281,7 +16271,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Term_typeAscription___closed__2;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Level_paren___closed__4;
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}
@ -17390,26 +17380,6 @@ return x_17;
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_3 = l_Lean_Parser_symbolInfo(x_2, x_1);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1);
lean_closure_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__3() {
_start:
{
uint8_t x_1; lean_object* x_2; uint8_t x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6;
x_1 = 0;
x_2 = l_Lean_Parser_Term_binderIdent___closed__2;
@ -17423,7 +17393,7 @@ lean_closure_set(x_6, 2, x_5);
return x_6;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__4() {
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5;
@ -17437,7 +17407,7 @@ x_5 = l_Lean_Parser_orelseInfo(x_2, x_4);
return x_5;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__5() {
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
@ -17449,51 +17419,41 @@ lean_closure_set(x_3, 1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__6() {
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__4;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__2;
x_2 = l_Lean_Parser_optionaInfo(x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__7() {
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__5;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__3;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1);
lean_closure_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__8() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1);
lean_closure_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__9() {
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__6;
x_2 = l_Lean_Parser_Level_paren___closed__4;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__4;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__10() {
lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__7;
x_2 = l_Lean_Parser_Term_explicitBinder___closed__8;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__5;
x_2 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__7;
x_3 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_3, 0, x_1);
lean_closure_set(x_3, 1, x_2);
@ -17510,23 +17470,23 @@ lean_inc(x_3);
x_4 = l_Lean_Parser_Term_binderType(x_1);
x_5 = lean_ctor_get(x_4, 0);
lean_inc(x_5);
x_6 = l_Lean_Parser_Term_explicitBinder___closed__9;
x_6 = l_Lean_Parser_Term_explicitBinder___closed__6;
x_7 = l_Lean_Parser_andthenInfo(x_5, x_6);
x_8 = lean_ctor_get(x_4, 1);
lean_inc(x_8);
lean_dec(x_4);
x_9 = l_Lean_Parser_Term_explicitBinder___closed__10;
x_9 = l_Lean_Parser_Term_explicitBinder___closed__7;
x_10 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_10, 0, x_8);
lean_closure_set(x_10, 1, x_9);
x_11 = l_Lean_Parser_andthenInfo(x_3, x_7);
x_12 = l_Lean_Parser_Term_explicitBinder___closed__3;
x_12 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_13 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_13, 0, x_12);
lean_closure_set(x_13, 1, x_10);
x_14 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_14 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_15 = l_Lean_Parser_andthenInfo(x_14, x_11);
x_16 = l_Lean_Parser_Term_explicitBinder___closed__2;
x_16 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__3;
x_17 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_17, 0, x_16);
lean_closure_set(x_17, 1, x_13);
@ -17698,7 +17658,7 @@ x_10 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_10, 0, x_8);
lean_closure_set(x_10, 1, x_9);
x_11 = l_Lean_Parser_andthenInfo(x_3, x_7);
x_12 = l_Lean_Parser_Term_explicitBinder___closed__3;
x_12 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_13 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2);
lean_closure_set(x_13, 0, x_12);
lean_closure_set(x_13, 1, x_10);
@ -30087,13 +30047,13 @@ lean_object* x_90; lean_object* x_91; uint8_t x_92;
x_90 = lean_ctor_get(x_89, 1);
lean_inc(x_90);
lean_dec(x_89);
x_91 = l_Lean_Parser_Level_paren___elambda__1___closed__7;
x_91 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__1;
x_92 = lean_string_dec_eq(x_90, x_91);
lean_dec(x_90);
if (x_92 == 0)
{
lean_object* x_93; lean_object* x_94;
x_93 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_93 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_7);
x_94 = l_Lean_Parser_ParserState_mkErrorsAt(x_86, x_93, x_7);
x_49 = x_94;
@ -30109,7 +30069,7 @@ else
{
lean_object* x_95; lean_object* x_96;
lean_dec(x_89);
x_95 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_95 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_7);
x_96 = l_Lean_Parser_ParserState_mkErrorsAt(x_86, x_95, x_7);
x_49 = x_96;
@ -30120,7 +30080,7 @@ else
{
lean_object* x_97; lean_object* x_98;
lean_dec(x_87);
x_97 = l_Lean_Parser_Level_paren___elambda__1___closed__14;
x_97 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
lean_inc(x_7);
x_98 = l_Lean_Parser_ParserState_mkErrorsAt(x_86, x_97, x_7);
x_49 = x_98;
@ -30161,13 +30121,13 @@ lean_object* x_20; lean_object* x_21; uint8_t x_22;
x_20 = lean_ctor_get(x_19, 1);
lean_inc(x_20);
lean_dec(x_19);
x_21 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_21 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__5;
x_22 = lean_string_dec_eq(x_20, x_21);
lean_dec(x_20);
if (x_22 == 0)
{
lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26;
x_23 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_23 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_24 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_23, x_15);
x_25 = l_Lean_Parser_Term_namedArgument___elambda__1___closed__2;
x_26 = l_Lean_Parser_ParserState_mkNode(x_24, x_25, x_8);
@ -30186,7 +30146,7 @@ else
{
lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32;
lean_dec(x_19);
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_29 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_29, x_15);
x_31 = l_Lean_Parser_Term_namedArgument___elambda__1___closed__2;
x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_8);
@ -30197,7 +30157,7 @@ else
{
lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36;
lean_dec(x_17);
x_33 = l_Lean_Parser_Level_paren___elambda__1___closed__11;
x_33 = l_Lean_Parser_Level_paren___elambda__1___closed__8;
x_34 = l_Lean_Parser_ParserState_mkErrorsAt(x_16, x_33, x_15);
x_35 = l_Lean_Parser_Term_namedArgument___elambda__1___closed__2;
x_36 = l_Lean_Parser_ParserState_mkNode(x_34, x_35, x_8);
@ -30411,7 +30371,7 @@ lean_object* _init_l_Lean_Parser_Term_namedArgument___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_explicitBinder___closed__1;
x_1 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__2;
x_2 = l_Lean_Parser_Term_namedArgument___closed__1;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
@ -30435,7 +30395,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Term_namedArgument___closed__3;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Level_paren___closed__4;
x_3 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___closed__6;
x_4 = l_Lean_Parser_andthenInfo(x_2, x_3);
return x_4;
}
@ -31300,24 +31260,34 @@ return x_41;
lean_object* _init_l_Lean_Parser_Term_proj___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_mkAntiquot___closed__7;
x_2 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_appPrec;
x_2 = lean_unsigned_to_nat(1u);
x_3 = lean_nat_add(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Term_proj___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Parser_Term_proj___closed__1;
x_2 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
lean_object* _init_l_Lean_Parser_Term_proj___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_proj___elambda__1___closed__3;
x_2 = l_Lean_Parser_Term_proj___closed__1;
x_2 = l_Lean_Parser_Term_proj___closed__2;
x_3 = l_Lean_Parser_symbolNoWsInfo(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Term_proj___closed__3() {
lean_object* _init_l_Lean_Parser_Term_proj___closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
@ -31329,33 +31299,23 @@ x_4 = l_Lean_Parser_orelseInfo(x_2, x_3);
return x_4;
}
}
lean_object* _init_l_Lean_Parser_Term_proj___closed__4() {
lean_object* _init_l_Lean_Parser_Term_proj___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Term_namedArgument___elambda__1___closed__3;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
x_3 = l_Lean_Parser_Term_proj___closed__3;
x_3 = l_Lean_Parser_Term_proj___closed__4;
x_4 = l_Lean_Parser_orelseInfo(x_3, x_2);
return x_4;
}
}
lean_object* _init_l_Lean_Parser_Term_proj___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_proj___closed__2;
x_2 = l_Lean_Parser_Term_proj___closed__4;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Term_proj___closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_epsilonInfo;
x_1 = l_Lean_Parser_Term_proj___closed__3;
x_2 = l_Lean_Parser_Term_proj___closed__5;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
@ -31365,26 +31325,36 @@ lean_object* _init_l_Lean_Parser_Term_proj___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_proj___elambda__1___closed__2;
x_1 = l_Lean_Parser_epsilonInfo;
x_2 = l_Lean_Parser_Term_proj___closed__6;
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_proj___closed__8() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_proj___elambda__1___closed__2;
x_2 = l_Lean_Parser_Term_proj___closed__7;
x_3 = l_Lean_Parser_nodeInfo(x_1, x_2);
return x_3;
}
}
lean_object* _init_l_Lean_Parser_Term_proj___closed__9() {
_start:
{
lean_object* x_1;
x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_proj___elambda__1), 3, 0);
return x_1;
}
}
lean_object* _init_l_Lean_Parser_Term_proj___closed__9() {
lean_object* _init_l_Lean_Parser_Term_proj___closed__10() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_proj___closed__7;
x_2 = l_Lean_Parser_Term_proj___closed__8;
x_1 = l_Lean_Parser_Term_proj___closed__8;
x_2 = l_Lean_Parser_Term_proj___closed__9;
x_3 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_3, 0, x_1);
lean_ctor_set(x_3, 1, x_2);
@ -31395,7 +31365,7 @@ lean_object* _init_l_Lean_Parser_Term_proj() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Parser_Term_proj___closed__9;
x_1 = l_Lean_Parser_Term_proj___closed__10;
return x_1;
}
}
@ -31743,7 +31713,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_listLit___elambda__1___closed__5;
x_2 = l_Lean_Parser_Term_proj___closed__1;
x_2 = l_Lean_Parser_Term_proj___closed__2;
x_3 = l_Lean_Parser_symbolNoWsInfo(x_1, x_2);
return x_3;
}
@ -32364,7 +32334,7 @@ _start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Parser_Term_dollarProj___closed__1;
x_2 = l_Lean_Parser_Term_proj___closed__4;
x_2 = l_Lean_Parser_Term_proj___closed__5;
x_3 = l_Lean_Parser_andthenInfo(x_1, x_2);
return x_3;
}
@ -37856,8 +37826,6 @@ l_Lean_Parser_Term_paren___elambda__1___closed__1 = _init_l_Lean_Parser_Term_par
lean_mark_persistent(l_Lean_Parser_Term_paren___elambda__1___closed__1);
l_Lean_Parser_Term_paren___elambda__1___closed__2 = _init_l_Lean_Parser_Term_paren___elambda__1___closed__2();
lean_mark_persistent(l_Lean_Parser_Term_paren___elambda__1___closed__2);
l_Lean_Parser_Term_paren___elambda__1___closed__3 = _init_l_Lean_Parser_Term_paren___elambda__1___closed__3();
lean_mark_persistent(l_Lean_Parser_Term_paren___elambda__1___closed__3);
l_Lean_Parser_Term_paren___closed__1 = _init_l_Lean_Parser_Term_paren___closed__1();
lean_mark_persistent(l_Lean_Parser_Term_paren___closed__1);
l_Lean_Parser_Term_paren___closed__2 = _init_l_Lean_Parser_Term_paren___closed__2();
@ -38659,12 +38627,6 @@ l_Lean_Parser_Term_explicitBinder___closed__6 = _init_l_Lean_Parser_Term_explici
lean_mark_persistent(l_Lean_Parser_Term_explicitBinder___closed__6);
l_Lean_Parser_Term_explicitBinder___closed__7 = _init_l_Lean_Parser_Term_explicitBinder___closed__7();
lean_mark_persistent(l_Lean_Parser_Term_explicitBinder___closed__7);
l_Lean_Parser_Term_explicitBinder___closed__8 = _init_l_Lean_Parser_Term_explicitBinder___closed__8();
lean_mark_persistent(l_Lean_Parser_Term_explicitBinder___closed__8);
l_Lean_Parser_Term_explicitBinder___closed__9 = _init_l_Lean_Parser_Term_explicitBinder___closed__9();
lean_mark_persistent(l_Lean_Parser_Term_explicitBinder___closed__9);
l_Lean_Parser_Term_explicitBinder___closed__10 = _init_l_Lean_Parser_Term_explicitBinder___closed__10();
lean_mark_persistent(l_Lean_Parser_Term_explicitBinder___closed__10);
l_Lean_Parser_Term_implicitBinder___elambda__1___closed__1 = _init_l_Lean_Parser_Term_implicitBinder___elambda__1___closed__1();
lean_mark_persistent(l_Lean_Parser_Term_implicitBinder___elambda__1___closed__1);
l_Lean_Parser_Term_implicitBinder___elambda__1___closed__2 = _init_l_Lean_Parser_Term_implicitBinder___elambda__1___closed__2();
@ -39702,6 +39664,8 @@ l_Lean_Parser_Term_proj___closed__8 = _init_l_Lean_Parser_Term_proj___closed__8(
lean_mark_persistent(l_Lean_Parser_Term_proj___closed__8);
l_Lean_Parser_Term_proj___closed__9 = _init_l_Lean_Parser_Term_proj___closed__9();
lean_mark_persistent(l_Lean_Parser_Term_proj___closed__9);
l_Lean_Parser_Term_proj___closed__10 = _init_l_Lean_Parser_Term_proj___closed__10();
lean_mark_persistent(l_Lean_Parser_Term_proj___closed__10);
l_Lean_Parser_Term_proj = _init_l_Lean_Parser_Term_proj();
lean_mark_persistent(l_Lean_Parser_Term_proj);
res = l___regBuiltinParser_Lean_Parser_Term_proj(lean_io_mk_world());

29
stage0/stdlib/Init/Lean/Parser/Transform.c
View file

@ -27,18 +27,15 @@ extern lean_object* l_Array_forMAux___main___at_Lean_Environment_displayStats___
lean_object* lean_array_fget(lean_object*, lean_object*);
uint8_t lean_nat_dec_eq(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_removeParen___boxed(lean_object*);
lean_object* l_Lean_Syntax_removeParen___closed__1;
lean_object* lean_nat_sub(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_removeParen___closed__2;
lean_object* lean_array_get(lean_object*, lean_object*, lean_object*);
lean_object* lean_name_mk_string(lean_object*, lean_object*);
lean_object* l_Lean_SourceInfo_truncateTrailing(lean_object*);
extern lean_object* l_Lean_mkAppStx___closed__6;
lean_object* l_Lean_Syntax_manyToSepBy(lean_object*, lean_object*);
lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*);
extern lean_object* l_Option_HasRepr___rarg___closed__3;
extern lean_object* l_Lean_Syntax_inhabited;
lean_object* l_Lean_Syntax_getNumArgs(lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
lean_object* l_Lean_Syntax_removeParen(lean_object*);
uint8_t l_Lean_Syntax_isNone(lean_object*);
lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_manyToSepBy___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
@ -205,24 +202,6 @@ lean_dec(x_2);
return x_6;
}
}
lean_object* _init_l_Lean_Syntax_removeParen___closed__1() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string("paren");
return x_1;
}
}
lean_object* _init_l_Lean_Syntax_removeParen___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_mkAppStx___closed__6;
x_2 = l_Lean_Syntax_removeParen___closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
lean_object* l_Lean_Syntax_removeParen(lean_object* x_1) {
_start:
{
@ -231,7 +210,7 @@ if (lean_obj_tag(x_1) == 1)
lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5;
x_2 = lean_ctor_get(x_1, 0);
x_3 = lean_ctor_get(x_1, 1);
x_4 = l_Lean_Syntax_removeParen___closed__2;
x_4 = l___private_Init_Lean_Parser_Parser_24__antiquotNestedExpr___elambda__1___rarg___closed__2;
x_5 = lean_name_eq(x_2, x_4);
if (x_5 == 0)
{
@ -580,10 +559,6 @@ lean_dec_ref(res);
res = initialize_Init_Lean_Parser_Parser(lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Lean_Syntax_removeParen___closed__1 = _init_l_Lean_Syntax_removeParen___closed__1();
lean_mark_persistent(l_Lean_Syntax_removeParen___closed__1);
l_Lean_Syntax_removeParen___closed__2 = _init_l_Lean_Syntax_removeParen___closed__2();
lean_mark_persistent(l_Lean_Syntax_removeParen___closed__2);
return lean_mk_io_result(lean_box(0));
}
#ifdef __cplusplus