diff --git a/stage0/src/Init/Lean/Parser/Command.lean b/stage0/src/Init/Lean/Parser/Command.lean index 772561efc0..f83b716077 100644 --- a/stage0/src/Init/Lean/Parser/Command.lean +++ b/stage0/src/Init/Lean/Parser/Command.lean @@ -24,6 +24,14 @@ constant commandParserAttribute : ParserAttribute := arbitrary _ @[inline] def commandParser {k : ParserKind} (rbp : Nat := 0) : Parser k := { fn := fun _ => commandParserAttribute.runParserFn rbp } +/-- + Syntax quotation for terms and (lists of) commands. We prefer terms, so ambiguous quotations like + `($x $y) will be parsed as an application, not two commands. Use `($x:command $y:command) instead. + Multiple command will be put in a `null node, but a single command will not (so that you can directly + match against a quotation in a command kind's elaborator). -/ +@[builtinTermParser] def Term.stxQuot := parser! symbol "`(" appPrec >> (termParser <|> many1 commandParser true) >> ")" +@[builtinCommandParser] def Command.antiquot := (mkAntiquot "command" none true : Parser) + namespace Command def commentBody : Parser := { fn := rawFn (fun _ => finishCommentBlock 1) true } diff --git a/stage0/src/Init/Lean/Parser/Parser.lean b/stage0/src/Init/Lean/Parser/Parser.lean index aac14e5eb9..f359c070c3 100644 --- a/stage0/src/Init/Lean/Parser/Parser.lean +++ b/stage0/src/Init/Lean/Parser/Parser.lean @@ -423,15 +423,18 @@ fun a c s => { info := noFirstTokenInfo p.info, fn := manyFn p.fn } -@[inline] def many1Fn {k : ParserKind} (p : ParserFn k) : ParserFn k := +@[inline] def many1Fn {k : ParserKind} (p : ParserFn k) (unboxSingleton : Bool) : ParserFn k := fun a c s => let iniSz := s.stackSize; let s := andthenFn p (manyAux p) a c s; - s.mkNode nullKind iniSz + if s.stackSize - iniSz == 1 && unboxSingleton then + s + else + s.mkNode nullKind iniSz -@[inline] def many1 {k : ParserKind} (p : Parser k) : Parser k := +@[inline] def many1 {k : ParserKind} (p : Parser k) (unboxSingleton := false) : Parser k := { info := p.info, - fn := many1Fn p.fn } + fn := many1Fn p.fn unboxSingleton } @[specialize] private partial def sepByFnAux {k : ParserKind} (p : ParserFn k) (sep : ParserFn k) (allowTrailingSep : Bool) (iniSz : Nat) : Bool → ParserFn k | pOpt, a, c, s => diff --git a/stage0/src/Init/Lean/Parser/Term.lean b/stage0/src/Init/Lean/Parser/Term.lean index e24e5e93b8..b0f758de4f 100644 --- a/stage0/src/Init/Lean/Parser/Term.lean +++ b/stage0/src/Init/Lean/Parser/Term.lean @@ -81,7 +81,7 @@ def matchAlt := parser! " | " >> sepBy1 termParser ", " >> unicodeSymbol "⇒" " @[builtinTermParser] def «tparser!» := parser! "tparser! " >> termParser @[builtinTermParser] def borrowed := parser! symbol "@&" appPrec >> termParser (appPrec - 1) @[builtinTermParser] def quotedName := parser! symbol "`" appPrec >> rawIdent -@[builtinTermParser] def stxQuot := parser! symbol "`(" appPrec >> termParser >> ")" +-- NOTE: syntax quotations are defined in Init.Lean.Parser.Command @[builtinTermParser] def antiquot := (mkAntiquot "term" none true : Parser) @[builtinTermParser] def «match_syntax» := parser! "match_syntax" >> termParser >> " with " >> many1Indent matchAlt "'match_syntax' alternatives must be indented" diff --git a/stage0/stdlib/Init/Lean/Elab/Command.c b/stage0/stdlib/Init/Lean/Elab/Command.c index 62fd691302..d02b2fd656 100644 --- a/stage0/stdlib/Init/Lean/Elab/Command.c +++ b/stage0/stdlib/Init/Lean/Elab/Command.c @@ -215,7 +215,6 @@ lean_object* l_Lean_Elab_mkMessageCore(lean_object*, lean_object*, lean_object*, lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabVariables___closed__2; lean_object* l_Lean_Elab_Command_elabVariables___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_throwAlreadyDeclaredUniverseLevel___rarg___closed__5; -extern lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__1; lean_object* l_Lean_KernelException_toMessageData(lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__3; lean_object* l_Lean_Elab_Command_registerBuiltinCommandElabAttr___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); @@ -261,16 +260,17 @@ extern lean_object* l_PersistentArray_empty___closed__3; lean_object* l_Lean_Elab_mkMessageAt___at_Lean_Elab_Command_elabCommand___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabUniverses(lean_object*); extern lean_object* l_Lean_Parser_Command_namespace___elambda__1___closed__1; +extern lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; lean_object* l_Lean_Elab_Command_elabVariables___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Command_elabOpenHiding___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_throwAlreadyDeclaredUniverseLevel___rarg___closed__6; lean_object* l___private_Init_Lean_Elab_Command_12__checkAnonymousScope___boxed(lean_object*); lean_object* l_HashMapImp_moveEntries___main___at_Lean_Elab_Command_addBuiltinCommandElab___spec__13(lean_object*, lean_object*, lean_object*); +extern lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1; uint8_t l_Lean_Environment_contains(lean_object*, lean_object*); lean_object* l_PersistentHashMap_insertAux___main___at_Lean_Elab_Command_addBuiltinCommandElab___spec__8(lean_object*, size_t, size_t, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_getScopes(lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabUniverses___closed__2; -extern lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabExport(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_builtinCommandElabTable; lean_object* l_Lean_Elab_Command_elabCheck___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -3225,7 +3225,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__3; -x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__1; +x_2 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -3387,7 +3387,7 @@ return x_7; else { lean_object* x_8; lean_object* x_9; lean_object* x_10; -x_8 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_8 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; lean_inc(x_1); x_9 = l_Lean_Elab_syntaxNodeKindOfAttrParam(x_1, x_8, x_3); x_10 = l_IO_ofExcept___at___private_Init_Lean_Elab_Util_6__ElabAttribute_add___spec__1(x_9, x_5); @@ -3507,7 +3507,7 @@ goto block_22; else { lean_object* x_43; uint8_t x_44; -x_43 = l_Lean_Parser_Command_docComment___elambda__1___closed__1; +x_43 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1; x_44 = lean_string_dec_eq(x_34, x_43); lean_dec(x_34); if (x_44 == 0) @@ -3803,7 +3803,7 @@ _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Elab_Command_mkCommandElabAttribute___closed__2; -x_3 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_3 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_4 = l_Lean_Elab_Command_mkCommandElabAttribute___closed__3; x_5 = l_Lean_Parser_mkCommandParserAttribute___closed__4; x_6 = l_Lean_Elab_Command_builtinCommandElabTable; @@ -15132,7 +15132,7 @@ lean_object* _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabCheck___close _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Meta_check___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; diff --git a/stage0/stdlib/Init/Lean/Elab/DeclModifiers.c b/stage0/stdlib/Init/Lean/Elab/DeclModifiers.c index f249e0f6b6..f8eb9c7fcc 100644 --- a/stage0/stdlib/Init/Lean/Elab/DeclModifiers.c +++ b/stage0/stdlib/Init/Lean/Elab/DeclModifiers.c @@ -67,8 +67,8 @@ lean_object* l_Lean_Elab_Command_Visibility_hasToString___boxed(lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_Modifiers_hasToString___lambda__1(lean_object*); lean_object* l_Lean_Elab_throwError___at_Lean_Elab_Command_elabModifiers___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; lean_object* l_Function_comp___rarg(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__2; extern lean_object* l_Lean_Options_empty; extern lean_object* l_Lean_Parser_Command_attributes___elambda__1___closed__5; lean_object* l_Lean_Elab_Command_elabModifiers___closed__1; @@ -78,6 +78,7 @@ lean_object* l_Lean_Elab_Command_elabAttr___closed__6; lean_object* l_Lean_Elab_Command_elabAttrs(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabAttr___closed__1; lean_object* l_Lean_Elab_Command_elabAttr___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__5; lean_object* l_Lean_Elab_Command_Modifiers_hasToString___closed__2; lean_object* l_Lean_Elab_Command_Modifiers_hasFormat___closed__12; lean_object* l_Lean_Elab_Command_Attribute_hasFormat___closed__1; @@ -129,7 +130,6 @@ lean_object* l_Lean_Elab_throwError___at_Lean_Elab_Command_elabModifiers___spec_ lean_object* l_Lean_getAttributeImpl(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabModifiers___closed__5; extern lean_object* l_addParenHeuristic___closed__1; -extern lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__7; lean_object* l_Lean_Elab_Command_mkDeclName___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabModifiers___closed__3; uint8_t lean_nat_dec_lt(lean_object*, lean_object*); @@ -568,7 +568,7 @@ lean_object* _init_l_Lean_Elab_Command_Modifiers_hasFormat___closed__14() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__7; +x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__5; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -1495,7 +1495,7 @@ lean_object* _init_l_Lean_Elab_Command_elabModifiers___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_mkProtectedExtension___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; diff --git a/stage0/stdlib/Init/Lean/Elab/Declaration.c b/stage0/stdlib/Init/Lean/Elab/Declaration.c index 2923771c00..88e6297efa 100644 --- a/stage0/stdlib/Init/Lean/Elab/Declaration.c +++ b/stage0/stdlib/Init/Lean/Elab/Declaration.c @@ -81,7 +81,7 @@ lean_object* l_Lean_Elab_Command_elabClassInductive(lean_object*, lean_object*, lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_modifyScope___at_Lean_Elab_Command_elabAxiom___spec__4(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_namespace___elambda__1___closed__1; -extern lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__2; +extern lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; lean_object* l_Lean_Elab_Command_elabConstant___closed__7; lean_object* l_Lean_Elab_Command_modifyScope___at_Lean_Elab_Command_elabAxiom___spec__3(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_hole___elambda__1___closed__1; @@ -4393,7 +4393,7 @@ lean_object* _init_l_Lean_Elab_Command_elabDeclaration___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Meta_registerInstanceAttr___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; diff --git a/stage0/stdlib/Init/Lean/Parser/Command.c b/stage0/stdlib/Init/Lean/Parser/Command.c index 1dd1bb354c..5cba7f6a85 100644 --- a/stage0/stdlib/Init/Lean/Parser/Command.c +++ b/stage0/stdlib/Init/Lean/Parser/Command.c @@ -72,6 +72,7 @@ lean_object* l___regBuiltinParser_Lean_Parser_Command_variable(lean_object*); lean_object* l_Lean_Parser_Command_visibility; lean_object* l_Lean_Parser_Command_inductive___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Term_stxQuot___closed__8; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_declId___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_structImplicitBinder___closed__2; lean_object* l_Lean_Parser_Command_extends___elambda__1___closed__7; @@ -107,6 +108,7 @@ lean_object* l_Lean_Parser_Command_mixfix___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_resolve__name___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_protected___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_set__option___elambda__1___closed__6; +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_stxQuot___elambda__1___spec__1(uint8_t, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_haveAssign___closed__2; lean_object* l_Lean_Parser_Command_structExplicitBinder___closed__11; lean_object* l_Lean_Parser_Command_declId___elambda__1___closed__3; @@ -119,7 +121,6 @@ lean_object* l_Lean_Parser_Command_elab___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_classInductive___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_openHiding; extern lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__16; -lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__11; lean_object* l_Lean_Parser_Command_declModifiers___closed__8; lean_object* l_Lean_Parser_Command_def___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_infixr___elambda__1(lean_object*, lean_object*, lean_object*); @@ -153,6 +154,7 @@ lean_object* l_Lean_Parser_Command_attributes___closed__7; lean_object* l_Lean_Parser_Command_section___closed__5; lean_object* l_Lean_Parser_Command_openSimple___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_extends___elambda__1___closed__1; +lean_object* l_Lean_Parser_Command_antiquot___closed__1; lean_object* l_Lean_Parser_Command_prefix___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_exit___closed__1; lean_object* l_Lean_Parser_Command_identPrec___elambda__1(lean_object*, lean_object*, lean_object*); @@ -222,6 +224,7 @@ lean_object* l_Lean_Parser_Command_structureTk___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_check___closed__5; lean_object* l_Lean_Parser_Command_def___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_attrArg___elambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_classInductive___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_exit___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__3; @@ -236,6 +239,7 @@ lean_object* l_Lean_Parser_Command_classInductive___elambda__1___closed__3; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_inductive___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_declId___closed__4; lean_object* l_Lean_Parser_Command_end; +lean_object* l_Lean_Parser_Command_antiquot; lean_object* l_Lean_Parser_Command_def___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_openHiding___closed__7; lean_object* l_Lean_Parser_Command_instance___elambda__1___closed__3; @@ -269,6 +273,7 @@ lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_attributes___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_init__quot___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_infixr___elambda__1___closed__6; +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Term_listLit___closed__4; lean_object* l_Lean_Parser_Command_section___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_quotedSymbolPrec___closed__7; @@ -331,8 +336,10 @@ lean_object* l_Lean_Parser_Command_mixfix___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_constant___closed__7; lean_object* l_Lean_Parser_Command_def___closed__6; lean_object* l_Lean_Parser_Command_strictInferMod___closed__4; +lean_object* l_Lean_Parser_Term_stxQuot___closed__6; lean_object* l___regBuiltinParser_Lean_Parser_Command_reserve(lean_object*); lean_object* l_Lean_Parser_Command_declSig___closed__1; +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_declId___closed__3; lean_object* l_Lean_Parser_Command_namespace___closed__3; lean_object* l_Lean_Parser_Command_openHiding___closed__3; @@ -356,6 +363,7 @@ lean_object* l_Lean_Parser_Command_open___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_extends___closed__5; lean_object* l_Lean_Parser_Command_postfix___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_private___closed__5; +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_resolve__name___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_variables___closed__6; lean_object* l_Lean_Parser_Command_attribute___elambda__1___closed__7; @@ -379,7 +387,9 @@ lean_object* l_Lean_Parser_Command_unsafe; lean_object* l_Lean_Parser_Command_structure___closed__6; lean_object* l_Lean_Parser_Command_mixfix___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_check___elambda__1___closed__2; +lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__3; lean_object* l_Lean_Parser_Command_attrInstance___closed__2; +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_universe___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_variables___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_elab; @@ -479,6 +489,7 @@ lean_object* l_Lean_Parser_Command_exit___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_attribute___closed__3; lean_object* l_Lean_Parser_Command_infix___closed__1; lean_object* l_Lean_Parser_commandParser___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_postfix___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_abbrev___elambda__1___closed__1; lean_object* l_Lean_Parser_quotedSymbol(uint8_t); @@ -489,6 +500,7 @@ lean_object* l_Lean_Parser_mkCommandParserAttribute___closed__4; 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; lean_object* l_Lean_Parser_Command_attributes___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_declModifiers___closed__14; @@ -624,6 +636,7 @@ lean_object* l_Lean_Parser_Command_mixfixSymbol___closed__2; lean_object* l_Lean_Parser_Command_unsafe___elambda__1___closed__7; extern lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__13; lean_object* l_Lean_Parser_Command_openRenaming___closed__5; +lean_object* l_Lean_Parser_Term_stxQuot; lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_declValSimple___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_variable___closed__4; @@ -634,6 +647,7 @@ lean_object* l_Lean_Parser_Command_partial___closed__3; lean_object* l_Lean_Parser_Command_structExplicitBinder___closed__2; lean_object* l_Lean_Parser_Command_precedence___closed__2; lean_object* l_Lean_Parser_Command_openRenaming___elambda__1___closed__1; +lean_object* l_Lean_Parser_Term_stxQuot___closed__2; lean_object* l_Lean_Parser_Command_infix___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_visibility___closed__3; lean_object* l_Lean_Parser_Command_unsafe___closed__1; @@ -643,11 +657,13 @@ lean_object* l_Lean_Parser_Command_precedence___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_classTk___closed__2; extern lean_object* l_Lean_Parser_Term_equation; lean_object* l_Lean_Parser_Command_variable___elambda__1___closed__9; +extern lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_set__option___closed__5; lean_object* l_Lean_Parser_Command_open___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_universe___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_namespace___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_declaration___closed__11; +lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; extern lean_object* l_Lean_Parser_Term_haveAssign___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_declVal___closed__2; lean_object* l_Lean_Parser_Command_elab___elambda__1___closed__2; @@ -658,7 +674,9 @@ lean_object* l_Lean_Parser_Command_reserve___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_open___closed__7; lean_object* l_Lean_Parser_Command_structCtor___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Command_universes(lean_object*); +lean_object* l_Lean_Parser_Term_stxQuot___closed__7; lean_object* l_Lean_Parser_Command_structInstBinder___closed__4; +lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1; lean_object* l_Lean_Parser_Command_inductive___closed__3; lean_object* l_Lean_Parser_Command_strictInferMod___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_section; @@ -813,6 +831,7 @@ lean_object* l_Lean_Parser_Term_optType___elambda__1(lean_object*, lean_object*, lean_object* l_Lean_Parser_Command_quotedSymbolPrec___closed__1; lean_object* l_Lean_Parser_Command_reserve___closed__4; extern lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__12; +lean_object* l_Lean_Parser_Term_stxQuot___closed__3; lean_object* l_Lean_Parser_Command_notation___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_declValEqns___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_noncomputable___closed__3; @@ -848,6 +867,7 @@ lean_object* l_Lean_Parser_Command_check___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_structCtor___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_unsafe___closed__3; lean_object* l_Lean_Parser_Command_set__option___closed__9; +lean_object* l_Lean_Parser_Term_stxQuot___closed__5; lean_object* l_Lean_Parser_Command_mixfix___closed__2; lean_object* l_Lean_Parser_Command_universe___elambda__1___closed__2; lean_object* l___private_Init_Lean_Parser_Parser_3__rawAux___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); @@ -961,6 +981,7 @@ lean_object* l_Lean_Parser_Command_notation___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_precedenceLit; lean_object* l_Lean_Parser_Command_infix___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_structExplicitBinder___closed__6; +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_stxQuot___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_declId___closed__7; lean_object* l_Lean_Parser_Command_openOnly___elambda__1___closed__3; lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Command_openRenaming___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1021,6 +1042,7 @@ lean_object* l_Lean_Parser_Command_postfix___closed__2; lean_object* l_Lean_Parser_Command_instance___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_noncomputable___closed__4; lean_object* l_Lean_Parser_Command_structInstBinder___elambda__1___closed__2; +lean_object* l___regBuiltinParser_Lean_Parser_Term_stxQuot(lean_object*); lean_object* l_Lean_Parser_Command_notation___closed__4; lean_object* l_Lean_Parser_Command_openOnly___closed__6; lean_object* l_Lean_Parser_Command_quotedSymbolPrec; @@ -1041,11 +1063,13 @@ lean_object* l_Lean_Parser_Command_attribute___elambda__1(lean_object*, lean_obj extern lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___elambda__1___spec__1___closed__1; lean_object* l_Lean_Parser_Command_structureTk___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_variable___closed__3; +extern lean_object* l_Lean_Parser_builtinTermParsingTable; lean_object* l_Lean_Parser_Command_check___closed__3; lean_object* l_Lean_Parser_Command_universes___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_openOnly___closed__2; lean_object* l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_notation___closed__9; +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_structureTk___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_section___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_openRenamingItem___elambda__1___closed__12; @@ -1132,6 +1156,7 @@ lean_object* l_Lean_Parser_Command_unsafe___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_strictInferMod___closed__2; lean_object* l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_classInductive___elambda__1___closed__4; +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_declValSimple___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_set__option___closed__2; lean_object* l_Lean_Parser_Command_init__quot___elambda__1___closed__6; @@ -1169,6 +1194,7 @@ lean_object* l_Lean_Parser_Command_attribute___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_init__quot___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_openRenaming___elambda__1___closed__6; lean_object* l___regBuiltinParser_Lean_Parser_Command_end(lean_object*); +lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot(lean_object*); lean_object* l_Lean_Parser_Command_openHiding___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_structCtor___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_infix___elambda__1___closed__7; @@ -1207,6 +1233,7 @@ lean_object* l_Lean_Parser_Command_declValSimple___closed__3; lean_object* l_Lean_Parser_Command_axiom___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_infix___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; @@ -1241,6 +1268,7 @@ lean_object* l_Lean_Parser_Command_axiom___elambda__1___closed__7; lean_object* l_Lean_Parser_ParserState_mkUnexpectedError(lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_optDeclSig___closed__2; lean_object* l_Lean_Parser_Command_declId___elambda__1___closed__1; +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_end___closed__1; lean_object* l_Lean_Parser_Command_init__quot___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_example___closed__4; @@ -1287,6 +1315,7 @@ lean_object* l___regBuiltinParser_Lean_Parser_Command_elab(lean_object*); lean_object* l_Lean_Parser_Command_constant___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_resolve__name___closed__4; lean_object* l_Lean_Parser_Command_structInstBinder___closed__7; +lean_object* l_Lean_Parser_Term_stxQuot___closed__4; lean_object* l_Lean_Parser_Command_universe___closed__5; lean_object* l_Lean_Parser_Command_openHiding___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_check___closed__4; @@ -1333,15 +1362,16 @@ lean_object* l_Lean_Parser_Command_declModifiers___closed__9; lean_object* l_Lean_Parser_Command_declaration___closed__14; lean_object* l_Lean_Parser_Command_example___closed__1; extern lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__6; +extern lean_object* l_Lean_Parser_Level_paren___closed__1; lean_object* l_Lean_Parser_Command_attribute___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_symbol___closed__1; lean_object* l_Lean_Parser_Command_attributes___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_end___closed__2; +lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_reserve___closed__3; lean_object* l_Lean_Parser_Command_init__quot___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_attribute___elambda__1___closed__5; uint8_t lean_string_dec_eq(lean_object*, lean_object*); -lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__10; lean_object* l_Lean_Parser_Command_protected___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_set__option; lean_object* l_Lean_Parser_Command_variable___elambda__1___closed__7; @@ -1353,6 +1383,7 @@ lean_object* l_Lean_Parser_Command_set__option___closed__11; lean_object* l_Lean_Parser_Command_open___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_theorem___closed__2; lean_object* l_Lean_Parser_Command_declId___elambda__1___closed__2; +extern lean_object* l_Lean_Parser_mkAntiquot___closed__1; lean_object* l_Lean_Parser_Command_constant; lean_object* _init_l_Lean_Parser_regBuiltinCommandParserAttr___closed__1() { _start: @@ -1497,6 +1528,683 @@ x_4 = l_Lean_Parser_commandParser(x_3, x_2); return x_4; } } +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_stxQuot___elambda__1___spec__1(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +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_ctor_get(x_4, 1); +lean_inc(x_7); +x_8 = l_Lean_Parser_commandParserAttribute; +x_9 = lean_unsigned_to_nat(0u); +lean_inc(x_3); +x_10 = l_Lean_Parser_ParserAttribute_runParserFn(x_8, x_9, x_3, x_4); +x_11 = lean_ctor_get(x_10, 3); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; uint8_t x_13; +lean_dec(x_6); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_7, x_12); +lean_dec(x_12); +lean_dec(x_7); +if (x_13 == 0) +{ +x_4 = x_10; +goto _start; +} +else +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_3); +x_15 = l_Lean_Parser_manyAux___main___closed__1; +x_16 = l_Lean_Parser_ParserState_mkUnexpectedError(x_10, x_15); +return x_16; +} +} +else +{ +lean_object* x_17; uint8_t x_18; +lean_dec(x_11); +lean_dec(x_3); +x_17 = lean_ctor_get(x_10, 1); +lean_inc(x_17); +x_18 = lean_nat_dec_eq(x_7, x_17); +lean_dec(x_17); +if (x_18 == 0) +{ +lean_dec(x_7); +lean_dec(x_6); +return x_10; +} +else +{ +lean_object* x_19; +x_19 = l_Lean_Parser_ParserState_restore(x_10, x_6, x_7); +lean_dec(x_6); +return x_19; +} +} +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("stxQuot"); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__2; +x_2 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___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_stxQuot___elambda__1___closed__4() { +_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_Term_stxQuot___elambda__1___closed__1; +x_3 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__3; +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_Term_stxQuot___elambda__1___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("`("); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__5; +x_2 = l_String_trim(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__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_Term_stxQuot___elambda__1___closed__6; +x_3 = lean_string_append(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__7; +x_2 = l_Char_HasRepr___closed__1; +x_3 = lean_string_append(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___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_Term_stxQuot___elambda__1___closed__8; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_Parser_Term_stxQuot___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_Term_stxQuot___elambda__1___closed__4; +x_5 = lean_ctor_get(x_4, 1); +lean_inc(x_5); +x_6 = lean_ctor_get(x_3, 0); +lean_inc(x_6); +x_7 = lean_array_get_size(x_6); +lean_dec(x_6); +x_8 = lean_ctor_get(x_3, 1); +lean_inc(x_8); +lean_inc(x_2); +lean_inc(x_1); +x_9 = lean_apply_3(x_5, x_1, x_2, x_3); +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_2); +lean_dec(x_1); +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_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_49; lean_object* x_91; lean_object* x_92; +lean_inc(x_8); +x_14 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); +lean_dec(x_7); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_array_get_size(x_15); +lean_dec(x_15); +lean_inc(x_2); +x_91 = l_Lean_Parser_tokenFn(x_2, x_14); +x_92 = lean_ctor_get(x_91, 3); +lean_inc(x_92); +if (lean_obj_tag(x_92) == 0) +{ +lean_object* x_93; lean_object* x_94; +x_93 = lean_ctor_get(x_91, 0); +lean_inc(x_93); +x_94 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_93); +lean_dec(x_93); +if (lean_obj_tag(x_94) == 2) +{ +lean_object* x_95; lean_object* x_96; uint8_t x_97; +x_95 = lean_ctor_get(x_94, 1); +lean_inc(x_95); +lean_dec(x_94); +x_96 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__6; +x_97 = lean_string_dec_eq(x_95, x_96); +lean_dec(x_95); +if (x_97 == 0) +{ +lean_object* x_98; lean_object* x_99; +x_98 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__9; +lean_inc(x_8); +x_99 = l_Lean_Parser_ParserState_mkErrorsAt(x_91, x_98, x_8); +x_49 = x_99; +goto block_90; +} +else +{ +x_49 = x_91; +goto block_90; +} +} +else +{ +lean_object* x_100; lean_object* x_101; +lean_dec(x_94); +x_100 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__9; +lean_inc(x_8); +x_101 = l_Lean_Parser_ParserState_mkErrorsAt(x_91, x_100, x_8); +x_49 = x_101; +goto block_90; +} +} +else +{ +lean_object* x_102; lean_object* x_103; +lean_dec(x_92); +x_102 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__9; +lean_inc(x_8); +x_103 = l_Lean_Parser_ParserState_mkErrorsAt(x_91, x_102, x_8); +x_49 = x_103; +goto block_90; +} +block_48: +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_19 = lean_ctor_get(x_17, 1); +lean_inc(x_19); +x_20 = l_Lean_Parser_tokenFn(x_2, x_17); +x_21 = lean_ctor_get(x_20, 3); +lean_inc(x_21); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; lean_object* x_23; +x_22 = lean_ctor_get(x_20, 0); +lean_inc(x_22); +x_23 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_22); +lean_dec(x_22); +if (lean_obj_tag(x_23) == 2) +{ +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_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_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); +x_31 = l_Lean_Parser_mergeOrElseErrors(x_30, x_11, x_8); +lean_dec(x_8); +return x_31; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; +lean_dec(x_19); +x_32 = l_Lean_Parser_Term_stxQuot___elambda__1___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); +return x_34; +} +} +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_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); +x_39 = l_Lean_Parser_mergeOrElseErrors(x_38, x_11, x_8); +lean_dec(x_8); +return x_39; +} +} +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_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); +x_44 = l_Lean_Parser_mergeOrElseErrors(x_43, x_11, x_8); +lean_dec(x_8); +return x_44; +} +} +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_stxQuot___elambda__1___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); +return x_47; +} +} +block_90: +{ +lean_object* x_50; +x_50 = lean_ctor_get(x_49, 3); +lean_inc(x_50); +if (lean_obj_tag(x_50) == 0) +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_51 = lean_ctor_get(x_49, 0); +lean_inc(x_51); +x_52 = lean_array_get_size(x_51); +lean_dec(x_51); +x_53 = lean_ctor_get(x_49, 1); +lean_inc(x_53); +x_54 = l_Lean_Parser_termParserAttribute; +x_55 = lean_unsigned_to_nat(0u); +lean_inc(x_2); +x_56 = l_Lean_Parser_ParserAttribute_runParserFn(x_54, x_55, x_2, x_49); +x_57 = lean_ctor_get(x_56, 3); +lean_inc(x_57); +if (lean_obj_tag(x_57) == 0) +{ +lean_dec(x_53); +lean_dec(x_52); +lean_dec(x_1); +x_17 = x_56; +goto block_48; +} +else +{ +lean_object* x_58; lean_object* x_59; uint8_t x_60; +x_58 = lean_ctor_get(x_57, 0); +lean_inc(x_58); +lean_dec(x_57); +x_59 = lean_ctor_get(x_56, 1); +lean_inc(x_59); +x_60 = lean_nat_dec_eq(x_59, x_53); +lean_dec(x_59); +if (x_60 == 0) +{ +lean_dec(x_58); +lean_dec(x_53); +lean_dec(x_52); +lean_dec(x_1); +x_17 = x_56; +goto block_48; +} +else +{ +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_inc(x_53); +x_61 = l_Lean_Parser_ParserState_restore(x_56, x_52, x_53); +lean_dec(x_52); +x_62 = lean_ctor_get(x_61, 0); +lean_inc(x_62); +x_63 = lean_array_get_size(x_62); +lean_dec(x_62); +x_64 = l_Lean_Parser_commandParserAttribute; +lean_inc(x_2); +x_65 = l_Lean_Parser_ParserAttribute_runParserFn(x_64, x_55, x_2, x_61); +x_66 = lean_ctor_get(x_65, 3); +lean_inc(x_66); +if (lean_obj_tag(x_66) == 0) +{ +uint8_t x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; uint8_t x_73; +x_67 = 0; +lean_inc(x_2); +x_68 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_stxQuot___elambda__1___spec__1(x_67, x_1, x_2, x_65); +lean_dec(x_1); +x_69 = lean_ctor_get(x_68, 0); +lean_inc(x_69); +x_70 = lean_array_get_size(x_69); +lean_dec(x_69); +x_71 = lean_nat_sub(x_70, x_63); +lean_dec(x_70); +x_72 = lean_unsigned_to_nat(1u); +x_73 = lean_nat_dec_eq(x_71, x_72); +lean_dec(x_71); +if (x_73 == 0) +{ +lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_74 = l_Lean_nullKind; +x_75 = l_Lean_Parser_ParserState_mkNode(x_68, x_74, x_63); +x_76 = l_Lean_Parser_mergeOrElseErrors(x_75, x_58, x_53); +lean_dec(x_53); +x_17 = x_76; +goto block_48; +} +else +{ +lean_object* x_77; +lean_dec(x_63); +x_77 = l_Lean_Parser_mergeOrElseErrors(x_68, x_58, x_53); +lean_dec(x_53); +x_17 = x_77; +goto block_48; +} +} +else +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; uint8_t x_82; +lean_dec(x_66); +lean_dec(x_1); +x_78 = lean_ctor_get(x_65, 0); +lean_inc(x_78); +x_79 = lean_array_get_size(x_78); +lean_dec(x_78); +x_80 = lean_nat_sub(x_79, x_63); +lean_dec(x_79); +x_81 = lean_unsigned_to_nat(1u); +x_82 = lean_nat_dec_eq(x_80, x_81); +lean_dec(x_80); +if (x_82 == 0) +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_83 = l_Lean_nullKind; +x_84 = l_Lean_Parser_ParserState_mkNode(x_65, x_83, x_63); +x_85 = l_Lean_Parser_mergeOrElseErrors(x_84, x_58, x_53); +lean_dec(x_53); +x_17 = x_85; +goto block_48; +} +else +{ +lean_object* x_86; +lean_dec(x_63); +x_86 = l_Lean_Parser_mergeOrElseErrors(x_65, x_58, x_53); +lean_dec(x_53); +x_17 = x_86; +goto block_48; +} +} +} +} +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; +lean_dec(x_50); +lean_dec(x_2); +lean_dec(x_1); +x_87 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; +x_88 = l_Lean_Parser_ParserState_mkNode(x_49, x_87, x_16); +x_89 = l_Lean_Parser_mergeOrElseErrors(x_88, x_11, x_8); +lean_dec(x_8); +return x_89; +} +} +} +} +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__6; +x_2 = l_Lean_Parser_Level_paren___closed__1; +x_3 = l_Lean_Parser_symbolInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Parser_inhabited___closed__1; +x_2 = l_Lean_Parser_orelseInfo(x_1, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_stxQuot___closed__2; +x_2 = l_Lean_Parser_Level_paren___closed__3; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_stxQuot___closed__1; +x_2 = l_Lean_Parser_Term_stxQuot___closed__3; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; +x_2 = l_Lean_Parser_Term_stxQuot___closed__4; +x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___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_stxQuot___elambda__1___closed__4; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Term_stxQuot___closed__5; +x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); +return x_4; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_stxQuot___elambda__1), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Term_stxQuot___closed__6; +x_2 = l_Lean_Parser_Term_stxQuot___closed__7; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Term_stxQuot() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Parser_Term_stxQuot___closed__8; +return x_1; +} +} +lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_stxQuot___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; lean_object* x_6; +x_5 = lean_unbox(x_1); +lean_dec(x_1); +x_6 = l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_stxQuot___elambda__1___spec__1(x_5, x_2, x_3, x_4); +lean_dec(x_2); +return x_6; +} +} +lean_object* l___regBuiltinParser_Lean_Parser_Term_stxQuot(lean_object* x_1) { +_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_builtinTermParsingTable; +x_4 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; +x_5 = l_Lean_Parser_Term_stxQuot; +x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); +return x_6; +} +} +lean_object* _init_l_Lean_Parser_Command_antiquot___closed__1() { +_start: +{ +lean_object* x_1; uint8_t x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; +x_1 = lean_box(0); +x_2 = 0; +x_3 = l_Lean_Parser_mkCommandParserAttribute___closed__4; +x_4 = 1; +x_5 = l_Lean_Parser_mkAntiquot(x_2, x_3, x_1, x_4); +return x_5; +} +} +lean_object* _init_l_Lean_Parser_Command_antiquot() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Parser_Command_antiquot___closed__1; +return x_1; +} +} +lean_object* _init_l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Command"); +return x_1; +} +} +lean_object* _init_l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_declareLeadingBuiltinParser___closed__1; +x_2 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; +x_2 = l_Lean_Parser_mkAntiquot___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot(lean_object* x_1) { +_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_builtinCommandParsingTable; +x_4 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__3; +x_5 = l_Lean_Parser_Command_antiquot; +x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); +return x_6; +} +} lean_object* l_Lean_Parser_Command_commentBody___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -1564,7 +2272,7 @@ lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__1() { _start: { lean_object* x_1; -x_1 = lean_mk_string("Command"); +x_1 = lean_mk_string("docComment"); return x_1; } } @@ -1572,7 +2280,7 @@ lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_declareLeadingBuiltinParser___closed__1; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -1581,44 +2289,26 @@ return x_3; lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("docComment"); -return x_1; -} -} -lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; -x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__5() { -_start: -{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; +x_1 = l_Lean_Parser_Command_docComment___elambda__1___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_Command_docComment___elambda__1___closed__6() { +lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__4() { _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_Command_docComment___elambda__1___closed__3; -x_3 = l_Lean_Parser_Command_docComment___elambda__1___closed__5; +x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__1; +x_3 = l_Lean_Parser_Command_docComment___elambda__1___closed__3; 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_Command_docComment___elambda__1___closed__7() { +lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__5() { _start: { lean_object* x_1; @@ -1626,41 +2316,41 @@ x_1 = lean_mk_string("/--"); return x_1; } } -lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__8() { +lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__7; +x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__5; x_2 = l_String_trim(x_1); return x_2; } } +lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__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_Command_docComment___elambda__1___closed__6; +x_3 = lean_string_append(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__7; +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_Command_docComment___elambda__1___closed__9() { _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_Command_docComment___elambda__1___closed__8; -x_3 = lean_string_append(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Command_docComment___elambda__1___closed__10() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__9; -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_Command_docComment___elambda__1___closed__11() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__10; +x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__8; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); @@ -1671,7 +2361,7 @@ lean_object* l_Lean_Parser_Command_docComment___elambda__1(lean_object* x_1, lea _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_Command_docComment___elambda__1___closed__6; +x_4 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); x_6 = lean_ctor_get(x_3, 0); @@ -1739,13 +2429,13 @@ lean_object* x_31; lean_object* x_32; uint8_t x_33; x_31 = lean_ctor_get(x_30, 1); lean_inc(x_31); lean_dec(x_30); -x_32 = l_Lean_Parser_Command_docComment___elambda__1___closed__8; +x_32 = l_Lean_Parser_Command_docComment___elambda__1___closed__6; x_33 = lean_string_dec_eq(x_31, x_32); lean_dec(x_31); if (x_33 == 0) { lean_object* x_34; lean_object* x_35; -x_34 = l_Lean_Parser_Command_docComment___elambda__1___closed__11; +x_34 = l_Lean_Parser_Command_docComment___elambda__1___closed__9; lean_inc(x_8); x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_27, x_34, x_8); x_17 = x_35; @@ -1761,7 +2451,7 @@ else { lean_object* x_36; lean_object* x_37; lean_dec(x_30); -x_36 = l_Lean_Parser_Command_docComment___elambda__1___closed__11; +x_36 = l_Lean_Parser_Command_docComment___elambda__1___closed__9; lean_inc(x_8); x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_27, x_36, x_8); x_17 = x_37; @@ -1772,7 +2462,7 @@ else { lean_object* x_38; lean_object* x_39; lean_dec(x_28); -x_38 = l_Lean_Parser_Command_docComment___elambda__1___closed__11; +x_38 = l_Lean_Parser_Command_docComment___elambda__1___closed__9; lean_inc(x_8); x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_27, x_38, x_8); x_17 = x_39; @@ -1789,7 +2479,7 @@ lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; x_19 = l_Lean_Parser_Command_commentBody___elambda__1(x_1, x_2, x_17); lean_dec(x_2); lean_dec(x_1); -x_20 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; +x_20 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_16); x_22 = l_Lean_Parser_mergeOrElseErrors(x_21, x_11, x_8); lean_dec(x_8); @@ -1801,7 +2491,7 @@ lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_dec(x_18); lean_dec(x_2); lean_dec(x_1); -x_23 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; +x_23 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; x_24 = l_Lean_Parser_ParserState_mkNode(x_17, x_23, x_16); x_25 = l_Lean_Parser_mergeOrElseErrors(x_24, x_11, x_8); lean_dec(x_8); @@ -1817,7 +2507,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__8; +x_2 = l_Lean_Parser_Command_docComment___elambda__1___closed__6; x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); return x_3; } @@ -1838,7 +2528,7 @@ lean_object* _init_l_Lean_Parser_Command_docComment___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; +x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; x_2 = l_Lean_Parser_Command_docComment___closed__2; x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); return x_3; @@ -1848,7 +2538,7 @@ lean_object* _init_l_Lean_Parser_Command_docComment___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__6; +x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); x_3 = l_Lean_Parser_Command_docComment___closed__3; @@ -2113,7 +2803,7 @@ lean_object* _init_l_Lean_Parser_Command_attrInstance___elambda__1___closed__2() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_attrInstance___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -2479,7 +3169,7 @@ lean_object* _init_l_Lean_Parser_Command_attributes___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_attributes___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -2912,7 +3602,7 @@ lean_object* _init_l_Lean_Parser_Command_private___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_private___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -3185,7 +3875,7 @@ lean_object* _init_l_Lean_Parser_Command_protected___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_protected___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -3556,7 +4246,7 @@ lean_object* _init_l_Lean_Parser_Command_noncomputable___elambda__1___closed__2( _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_noncomputable___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -3829,7 +4519,7 @@ lean_object* _init_l_Lean_Parser_Command_unsafe___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_unsafe___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -4102,7 +4792,7 @@ lean_object* _init_l_Lean_Parser_Command_partial___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_partial___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -4375,7 +5065,7 @@ lean_object* _init_l_Lean_Parser_Command_declModifiers___elambda__1___closed__2( _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_declModifiers___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -5192,7 +5882,7 @@ lean_object* _init_l_Lean_Parser_Command_declId___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_declId___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -5649,7 +6339,7 @@ lean_object* _init_l_Lean_Parser_Command_declSig___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_declSig___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -5846,7 +6536,7 @@ lean_object* _init_l_Lean_Parser_Command_optDeclSig___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_optDeclSig___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -6031,7 +6721,7 @@ lean_object* _init_l_Lean_Parser_Command_declValSimple___elambda__1___closed__2( _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_declValSimple___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -6518,7 +7208,7 @@ lean_object* _init_l_Lean_Parser_Command_declValEqns___elambda__1___closed__2() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_declValEqns___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -7137,7 +7827,7 @@ lean_object* _init_l_Lean_Parser_Command_abbrev___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_abbrev___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -7507,7 +8197,7 @@ lean_object* _init_l_Lean_Parser_Command_def___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_def___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -7851,7 +8541,7 @@ lean_object* _init_l_Lean_Parser_Command_theorem___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_theorem___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -8221,7 +8911,7 @@ lean_object* _init_l_Lean_Parser_Command_constant___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_constant___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -8648,7 +9338,7 @@ lean_object* _init_l_Lean_Parser_Command_instance___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_instance___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -9141,7 +9831,7 @@ lean_object* _init_l_Lean_Parser_Command_axiom___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_axiom___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -9478,7 +10168,7 @@ lean_object* _init_l_Lean_Parser_Command_example___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_example___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -9801,7 +10491,7 @@ lean_object* _init_l_Lean_Parser_Command_relaxedInferMod___elambda__1___closed__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_relaxedInferMod___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -10181,7 +10871,7 @@ lean_object* _init_l_Lean_Parser_Command_strictInferMod___elambda__1___closed__2 _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_strictInferMod___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -10659,7 +11349,7 @@ lean_object* _init_l_Lean_Parser_Command_introRule___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_introRule___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -11136,7 +11826,7 @@ lean_object* _init_l_Lean_Parser_Command_inductive___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_inductive___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -11532,7 +12222,7 @@ lean_object* _init_l_Lean_Parser_Command_classInductive___elambda__1___closed__2 _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_classInductive___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -12054,7 +12744,7 @@ lean_object* _init_l_Lean_Parser_Command_structExplicitBinder___elambda__1___clo _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_structExplicitBinder___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -12611,7 +13301,7 @@ lean_object* _init_l_Lean_Parser_Command_structImplicitBinder___elambda__1___clo _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_structImplicitBinder___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -13067,7 +13757,7 @@ lean_object* _init_l_Lean_Parser_Command_structInstBinder___elambda__1___closed_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_structInstBinder___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -13673,7 +14363,7 @@ lean_object* _init_l_Lean_Parser_Command_structFields___elambda__1___closed__2() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_structFields___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -13877,7 +14567,7 @@ lean_object* _init_l_Lean_Parser_Command_structCtor___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_structCtor___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -14260,7 +14950,7 @@ lean_object* _init_l_Lean_Parser_Command_structureTk___elambda__1___closed__2() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_structureTk___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -14533,7 +15223,7 @@ lean_object* _init_l_Lean_Parser_Command_classTk___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_classTk___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -14747,7 +15437,7 @@ lean_object* _init_l_Lean_Parser_Command_extends___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_extends___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -15052,7 +15742,7 @@ lean_object* _init_l_Lean_Parser_Command_structure___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_structure___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -15708,7 +16398,7 @@ lean_object* _init_l_Lean_Parser_Command_declaration___elambda__1___closed__2() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_declaration___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -16588,7 +17278,7 @@ lean_object* _init_l_Lean_Parser_Command_section___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_section___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -16967,7 +17657,7 @@ lean_object* _init_l_Lean_Parser_Command_namespace___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_namespace___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -17289,7 +17979,7 @@ lean_object* _init_l_Lean_Parser_Command_end___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_end___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -17657,7 +18347,7 @@ lean_object* _init_l_Lean_Parser_Command_variable___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_variable___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -17979,7 +18669,7 @@ lean_object* _init_l_Lean_Parser_Command_variables___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_variables___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -18333,7 +19023,7 @@ lean_object* _init_l_Lean_Parser_Command_universe___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_universe___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -18655,7 +19345,7 @@ lean_object* _init_l_Lean_Parser_Command_universes___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_universes___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -19009,7 +19699,7 @@ lean_object* _init_l_Lean_Parser_Command_check___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_check___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -19321,7 +20011,7 @@ lean_object* _init_l_Lean_Parser_Command_exit___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_exit___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -19606,7 +20296,7 @@ lean_object* _init_l_Lean_Parser_Command_resolve__name___elambda__1___closed__2( _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_resolve__name___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -19928,7 +20618,7 @@ lean_object* _init_l_Lean_Parser_Command_elab___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_elab___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -20240,7 +20930,7 @@ lean_object* _init_l_Lean_Parser_Command_init__quot___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_init__quot___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -20517,7 +21207,7 @@ lean_object* _init_l_Lean_Parser_Command_set__option___elambda__1___closed__2() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_set__option___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -21133,7 +21823,7 @@ lean_object* _init_l_Lean_Parser_Command_attribute___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_attribute___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -21900,7 +22590,7 @@ lean_object* _init_l_Lean_Parser_Command_export___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_export___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -22471,7 +23161,7 @@ lean_object* _init_l_Lean_Parser_Command_openHiding___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_openHiding___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -22931,7 +23621,7 @@ lean_object* _init_l_Lean_Parser_Command_openRenamingItem___elambda__1___closed_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_openRenamingItem___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -23413,7 +24103,7 @@ lean_object* _init_l_Lean_Parser_Command_openRenaming___elambda__1___closed__2() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_openRenaming___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -23876,7 +24566,7 @@ lean_object* _init_l_Lean_Parser_Command_openOnly___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_openOnly___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -24358,7 +25048,7 @@ lean_object* _init_l_Lean_Parser_Command_openSimple___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_openSimple___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -24550,7 +25240,7 @@ lean_object* _init_l_Lean_Parser_Command_open___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_open___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -25076,7 +25766,7 @@ lean_object* _init_l_Lean_Parser_Command_maxPrec___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_maxPrec___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -25325,7 +26015,7 @@ lean_object* _init_l_Lean_Parser_Command_precedence___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_precedence___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -25570,7 +26260,7 @@ lean_object* _init_l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -25928,7 +26618,7 @@ lean_object* _init_l_Lean_Parser_Command_prefix___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_prefix___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -26193,7 +26883,7 @@ lean_object* _init_l_Lean_Parser_Command_infix___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_infix___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -26458,7 +27148,7 @@ lean_object* _init_l_Lean_Parser_Command_infixl___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_infixl___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -26723,7 +27413,7 @@ lean_object* _init_l_Lean_Parser_Command_infixr___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_infixr___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -26988,7 +27678,7 @@ lean_object* _init_l_Lean_Parser_Command_postfix___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_postfix___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -27540,7 +28230,7 @@ lean_object* _init_l_Lean_Parser_Command_reserve___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_reserve___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -27970,7 +28660,7 @@ lean_object* _init_l_Lean_Parser_Command_mixfix___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_mixfix___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -28270,7 +28960,7 @@ lean_object* _init_l_Lean_Parser_Command_identPrec___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_identPrec___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -28616,7 +29306,7 @@ lean_object* _init_l_Lean_Parser_Command_notation___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Command_docComment___elambda__1___closed__2; +x_1 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; x_2 = l_Lean_Parser_Command_notation___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -29289,6 +29979,58 @@ if (lean_io_result_is_error(res)) return res; l_Lean_Parser_commandParserAttribute = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_Parser_commandParserAttribute); lean_dec_ref(res); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__1 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__1(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__1); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__2 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__2(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__2); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__3 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__3(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__3); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__4 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__4(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__4); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__5 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__5(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__5); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__6 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__6(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__6); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__7 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__7(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__7); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__8 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__8(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__8); +l_Lean_Parser_Term_stxQuot___elambda__1___closed__9 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__9(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__9); +l_Lean_Parser_Term_stxQuot___closed__1 = _init_l_Lean_Parser_Term_stxQuot___closed__1(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__1); +l_Lean_Parser_Term_stxQuot___closed__2 = _init_l_Lean_Parser_Term_stxQuot___closed__2(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__2); +l_Lean_Parser_Term_stxQuot___closed__3 = _init_l_Lean_Parser_Term_stxQuot___closed__3(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__3); +l_Lean_Parser_Term_stxQuot___closed__4 = _init_l_Lean_Parser_Term_stxQuot___closed__4(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__4); +l_Lean_Parser_Term_stxQuot___closed__5 = _init_l_Lean_Parser_Term_stxQuot___closed__5(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__5); +l_Lean_Parser_Term_stxQuot___closed__6 = _init_l_Lean_Parser_Term_stxQuot___closed__6(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__6); +l_Lean_Parser_Term_stxQuot___closed__7 = _init_l_Lean_Parser_Term_stxQuot___closed__7(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__7); +l_Lean_Parser_Term_stxQuot___closed__8 = _init_l_Lean_Parser_Term_stxQuot___closed__8(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__8); +l_Lean_Parser_Term_stxQuot = _init_l_Lean_Parser_Term_stxQuot(); +lean_mark_persistent(l_Lean_Parser_Term_stxQuot); +res = l___regBuiltinParser_Lean_Parser_Term_stxQuot(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Parser_Command_antiquot___closed__1 = _init_l_Lean_Parser_Command_antiquot___closed__1(); +lean_mark_persistent(l_Lean_Parser_Command_antiquot___closed__1); +l_Lean_Parser_Command_antiquot = _init_l_Lean_Parser_Command_antiquot(); +lean_mark_persistent(l_Lean_Parser_Command_antiquot); +l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1 = _init_l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1(); +lean_mark_persistent(l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__1); +l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2 = _init_l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2(); +lean_mark_persistent(l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2); +l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__3 = _init_l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__3(); +lean_mark_persistent(l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__3); +res = l___regBuiltinParser_Lean_Parser_Command_antiquot(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l_Lean_Parser_Command_commentBody___closed__1 = _init_l_Lean_Parser_Command_commentBody___closed__1(); lean_mark_persistent(l_Lean_Parser_Command_commentBody___closed__1); l_Lean_Parser_Command_commentBody___closed__2 = _init_l_Lean_Parser_Command_commentBody___closed__2(); @@ -29313,10 +30055,6 @@ l_Lean_Parser_Command_docComment___elambda__1___closed__8 = _init_l_Lean_Parser_ lean_mark_persistent(l_Lean_Parser_Command_docComment___elambda__1___closed__8); l_Lean_Parser_Command_docComment___elambda__1___closed__9 = _init_l_Lean_Parser_Command_docComment___elambda__1___closed__9(); lean_mark_persistent(l_Lean_Parser_Command_docComment___elambda__1___closed__9); -l_Lean_Parser_Command_docComment___elambda__1___closed__10 = _init_l_Lean_Parser_Command_docComment___elambda__1___closed__10(); -lean_mark_persistent(l_Lean_Parser_Command_docComment___elambda__1___closed__10); -l_Lean_Parser_Command_docComment___elambda__1___closed__11 = _init_l_Lean_Parser_Command_docComment___elambda__1___closed__11(); -lean_mark_persistent(l_Lean_Parser_Command_docComment___elambda__1___closed__11); l_Lean_Parser_Command_docComment___closed__1 = _init_l_Lean_Parser_Command_docComment___closed__1(); lean_mark_persistent(l_Lean_Parser_Command_docComment___closed__1); l_Lean_Parser_Command_docComment___closed__2 = _init_l_Lean_Parser_Command_docComment___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Parser/Parser.c b/stage0/stdlib/Init/Lean/Parser/Parser.c index 7d06fcdf00..f3220c55d0 100644 --- a/stage0/stdlib/Init/Lean/Parser/Parser.c +++ b/stage0/stdlib/Init/Lean/Parser/Parser.c @@ -85,7 +85,7 @@ extern lean_object* l_Lean_nullKind; lean_object* l_Lean_Parser_andthenAux(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_octalNumberFn___closed__1; -lean_object* l_Lean_Parser_many1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Parser_many1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_many(uint8_t, lean_object*); lean_object* l_Lean_Parser_mkTermParserAttribute___closed__2; lean_object* l_Lean_Parser_FirstTokens_toStr(lean_object*); @@ -312,7 +312,7 @@ lean_object* l_Lean_Parser_indexed___rarg(lean_object*, lean_object*, lean_objec uint8_t l_Lean_Parser_takeWhileFn___lambda__1(lean_object*, uint32_t); lean_object* l_Lean_Parser_andthenInfo___elambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__3; -lean_object* l_Lean_Parser_many1Fn(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_many1Fn(uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_TokenTableAttribute_inhabited___closed__3; lean_object* l_Lean_Parser_satisfyFn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_addBuiltinLeadingParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -1057,7 +1057,7 @@ lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_18__noImmediateColon___elambda__1(uint8_t, lean_object*); lean_object* l_Lean_Parser_ParserState_keepPrevError___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_many1Fn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_many1Fn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_beq___main___at_Lean_Parser_Error_toString___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Parser_TokenTableAttribute_inhabited___closed__1; @@ -1140,7 +1140,7 @@ lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___ra lean_object* l_Lean_Parser_many1Indent___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1Info___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strLit(uint8_t); -lean_object* l_Lean_Parser_many1(uint8_t, lean_object*); +lean_object* l_Lean_Parser_many1(uint8_t, lean_object*, uint8_t); lean_object* l_Lean_Parser_mkAtomicInfo___closed__2; lean_object* l_Lean_Parser_sepBy___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_trailingLoop___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -5111,94 +5111,158 @@ x_4 = l_Lean_Parser_many(x_3, x_2); return x_4; } } -lean_object* l_Lean_Parser_many1Fn(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_many1Fn(uint8_t x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -x_7 = lean_array_get_size(x_6); -lean_dec(x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); lean_inc(x_2); +lean_inc(x_5); lean_inc(x_4); -lean_inc(x_3); -x_8 = lean_apply_3(x_2, x_3, x_4, x_5); -x_9 = lean_ctor_get(x_8, 3); -lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) +x_9 = lean_apply_3(x_2, x_4, x_5, x_6); +x_10 = lean_ctor_get(x_9, 3); +lean_inc(x_10); +if (lean_obj_tag(x_10) == 0) { -lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_10 = l_Lean_Parser_manyAux___main(x_1, x_2, x_3, x_4, x_8); -x_11 = l_Lean_nullKind; -x_12 = l_Lean_Parser_ParserState_mkNode(x_10, x_11, x_7); -return x_12; +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_11 = l_Lean_Parser_manyAux___main(x_1, x_2, x_4, x_5, x_9); +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_array_get_size(x_12); +lean_dec(x_12); +x_14 = lean_nat_sub(x_13, x_8); +lean_dec(x_13); +x_15 = lean_unsigned_to_nat(1u); +x_16 = lean_nat_dec_eq(x_14, x_15); +lean_dec(x_14); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; +x_17 = l_Lean_nullKind; +x_18 = l_Lean_Parser_ParserState_mkNode(x_11, x_17, x_8); +return x_18; } else { -lean_object* x_13; lean_object* x_14; -lean_dec(x_9); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_13 = l_Lean_nullKind; -x_14 = l_Lean_Parser_ParserState_mkNode(x_8, x_13, x_7); -return x_14; -} -} -} -lean_object* l_Lean_Parser_many1Fn___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -uint8_t x_6; lean_object* x_7; -x_6 = lean_unbox(x_1); -lean_dec(x_1); -x_7 = l_Lean_Parser_many1Fn(x_6, x_2, x_3, x_4, x_5); -return x_7; -} -} -lean_object* l_Lean_Parser_many1(uint8_t x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; -x_3 = !lean_is_exclusive(x_2); if (x_3 == 0) { -lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_4 = lean_ctor_get(x_2, 1); -x_5 = lean_box(x_1); -x_6 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_6, 0, x_5); -lean_closure_set(x_6, 1, x_4); -lean_ctor_set(x_2, 1, x_6); -return x_2; +lean_object* x_19; lean_object* x_20; +x_19 = l_Lean_nullKind; +x_20 = l_Lean_Parser_ParserState_mkNode(x_11, x_19, x_8); +return x_20; } else { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_7 = lean_ctor_get(x_2, 0); -x_8 = lean_ctor_get(x_2, 1); -lean_inc(x_8); -lean_inc(x_7); -lean_dec(x_2); -x_9 = lean_box(x_1); -x_10 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_10, 0, x_9); -lean_closure_set(x_10, 1, x_8); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_7); -lean_ctor_set(x_11, 1, x_10); +lean_dec(x_8); return x_11; } } } -lean_object* l_Lean_Parser_many1___boxed(lean_object* x_1, lean_object* x_2) { +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +lean_dec(x_10); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +x_21 = lean_ctor_get(x_9, 0); +lean_inc(x_21); +x_22 = lean_array_get_size(x_21); +lean_dec(x_21); +x_23 = lean_nat_sub(x_22, x_8); +lean_dec(x_22); +x_24 = lean_unsigned_to_nat(1u); +x_25 = lean_nat_dec_eq(x_23, x_24); +lean_dec(x_23); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = l_Lean_nullKind; +x_27 = l_Lean_Parser_ParserState_mkNode(x_9, x_26, x_8); +return x_27; +} +else +{ +if (x_3 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_nullKind; +x_29 = l_Lean_Parser_ParserState_mkNode(x_9, x_28, x_8); +return x_29; +} +else +{ +lean_dec(x_8); +return x_9; +} +} +} +} +} +lean_object* l_Lean_Parser_many1Fn___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_3; lean_object* x_4; -x_3 = lean_unbox(x_1); +uint8_t x_7; uint8_t x_8; lean_object* x_9; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_4 = l_Lean_Parser_many1(x_3, x_2); -return x_4; +x_8 = lean_unbox(x_3); +lean_dec(x_3); +x_9 = l_Lean_Parser_many1Fn(x_7, x_2, x_8, x_4, x_5, x_6); +return x_9; +} +} +lean_object* l_Lean_Parser_many1(uint8_t x_1, lean_object* x_2, uint8_t x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_2); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_5 = lean_ctor_get(x_2, 1); +x_6 = lean_box(x_1); +x_7 = lean_box(x_3); +x_8 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_8, 0, x_6); +lean_closure_set(x_8, 1, x_5); +lean_closure_set(x_8, 2, x_7); +lean_ctor_set(x_2, 1, x_8); +return x_2; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_9 = lean_ctor_get(x_2, 0); +x_10 = lean_ctor_get(x_2, 1); +lean_inc(x_10); +lean_inc(x_9); +lean_dec(x_2); +x_11 = lean_box(x_1); +x_12 = lean_box(x_3); +x_13 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_13, 0, x_11); +lean_closure_set(x_13, 1, x_10); +lean_closure_set(x_13, 2, x_12); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_9); +lean_ctor_set(x_14, 1, x_13); +return x_14; +} +} +} +lean_object* l_Lean_Parser_many1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; uint8_t x_5; lean_object* x_6; +x_4 = lean_unbox(x_1); +lean_dec(x_1); +x_5 = lean_unbox(x_3); +lean_dec(x_3); +x_6 = l_Lean_Parser_many1(x_4, x_2, x_5); +return x_6; } } lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(uint8_t x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { @@ -30565,482 +30629,491 @@ x_150 = lean_ctor_get(x_145, 0); x_151 = !lean_is_exclusive(x_150); if (x_151 == 0) { -lean_object* x_152; lean_object* x_153; lean_object* x_154; +lean_object* x_152; uint8_t x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; x_152 = lean_ctor_get(x_150, 1); -x_153 = lean_box(x_2); -x_154 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_154, 0, x_153); -lean_closure_set(x_154, 1, x_152); -lean_ctor_set(x_150, 1, x_154); +x_153 = 0; +x_154 = lean_box(x_2); +x_155 = lean_box(x_153); +x_156 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_156, 0, x_154); +lean_closure_set(x_156, 1, x_152); +lean_closure_set(x_156, 2, x_155); +lean_ctor_set(x_150, 1, x_156); return x_145; } else { -lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; -x_155 = lean_ctor_get(x_150, 0); -x_156 = lean_ctor_get(x_150, 1); -lean_inc(x_156); -lean_inc(x_155); +lean_object* x_157; lean_object* x_158; uint8_t x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; +x_157 = lean_ctor_get(x_150, 0); +x_158 = lean_ctor_get(x_150, 1); +lean_inc(x_158); +lean_inc(x_157); lean_dec(x_150); -x_157 = lean_box(x_2); -x_158 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_158, 0, x_157); -lean_closure_set(x_158, 1, x_156); -x_159 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_159, 0, x_155); -lean_ctor_set(x_159, 1, x_158); -lean_ctor_set(x_145, 0, x_159); +x_159 = 0; +x_160 = lean_box(x_2); +x_161 = lean_box(x_159); +x_162 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_162, 0, x_160); +lean_closure_set(x_162, 1, x_158); +lean_closure_set(x_162, 2, x_161); +x_163 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_163, 0, x_157); +lean_ctor_set(x_163, 1, x_162); +lean_ctor_set(x_145, 0, x_163); return x_145; } } else { -lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; -x_160 = lean_ctor_get(x_145, 0); -lean_inc(x_160); +lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; uint8_t x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; +x_164 = lean_ctor_get(x_145, 0); +lean_inc(x_164); lean_dec(x_145); -x_161 = lean_ctor_get(x_160, 0); -lean_inc(x_161); -x_162 = lean_ctor_get(x_160, 1); -lean_inc(x_162); -if (lean_is_exclusive(x_160)) { - lean_ctor_release(x_160, 0); - lean_ctor_release(x_160, 1); - x_163 = x_160; +x_165 = lean_ctor_get(x_164, 0); +lean_inc(x_165); +x_166 = lean_ctor_get(x_164, 1); +lean_inc(x_166); +if (lean_is_exclusive(x_164)) { + lean_ctor_release(x_164, 0); + lean_ctor_release(x_164, 1); + x_167 = x_164; } else { - lean_dec_ref(x_160); - x_163 = lean_box(0); + lean_dec_ref(x_164); + x_167 = lean_box(0); } -x_164 = lean_box(x_2); -x_165 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_165, 0, x_164); -lean_closure_set(x_165, 1, x_162); -if (lean_is_scalar(x_163)) { - x_166 = lean_alloc_ctor(0, 2, 0); +x_168 = 0; +x_169 = lean_box(x_2); +x_170 = lean_box(x_168); +x_171 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_171, 0, x_169); +lean_closure_set(x_171, 1, x_166); +lean_closure_set(x_171, 2, x_170); +if (lean_is_scalar(x_167)) { + x_172 = lean_alloc_ctor(0, 2, 0); } else { - x_166 = x_163; + x_172 = x_167; } -lean_ctor_set(x_166, 0, x_161); -lean_ctor_set(x_166, 1, x_165); -x_167 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_167, 0, x_166); -return x_167; +lean_ctor_set(x_172, 0, x_165); +lean_ctor_set(x_172, 1, x_171); +x_173 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_173, 0, x_172); +return x_173; } } } case 7: { -lean_object* x_168; lean_object* x_169; lean_object* x_170; -x_168 = lean_ctor_get(x_3, 0); -lean_inc(x_168); -x_169 = lean_ctor_get(x_3, 1); -lean_inc(x_169); -lean_dec(x_3); -x_170 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_168); -if (lean_obj_tag(x_170) == 0) -{ -uint8_t x_171; -lean_dec(x_169); -x_171 = !lean_is_exclusive(x_170); -if (x_171 == 0) -{ -return x_170; -} -else -{ -lean_object* x_172; lean_object* x_173; -x_172 = lean_ctor_get(x_170, 0); -lean_inc(x_172); -lean_dec(x_170); -x_173 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_173, 0, x_172); -return x_173; -} -} -else -{ -lean_object* x_174; lean_object* x_175; -x_174 = lean_ctor_get(x_170, 0); +lean_object* x_174; lean_object* x_175; lean_object* x_176; +x_174 = lean_ctor_get(x_3, 0); lean_inc(x_174); -lean_dec(x_170); -x_175 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_169); -if (lean_obj_tag(x_175) == 0) +x_175 = lean_ctor_get(x_3, 1); +lean_inc(x_175); +lean_dec(x_3); +x_176 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_174); +if (lean_obj_tag(x_176) == 0) { -uint8_t x_176; -lean_dec(x_174); -x_176 = !lean_is_exclusive(x_175); -if (x_176 == 0) -{ -return x_175; -} -else -{ -lean_object* x_177; lean_object* x_178; -x_177 = lean_ctor_get(x_175, 0); -lean_inc(x_177); +uint8_t x_177; lean_dec(x_175); -x_178 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_178, 0, x_177); -return x_178; +x_177 = !lean_is_exclusive(x_176); +if (x_177 == 0) +{ +return x_176; +} +else +{ +lean_object* x_178; lean_object* x_179; +x_178 = lean_ctor_get(x_176, 0); +lean_inc(x_178); +lean_dec(x_176); +x_179 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_179, 0, x_178); +return x_179; } } else { -uint8_t x_179; -x_179 = !lean_is_exclusive(x_175); -if (x_179 == 0) +lean_object* x_180; lean_object* x_181; +x_180 = lean_ctor_get(x_176, 0); +lean_inc(x_180); +lean_dec(x_176); +x_181 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_175); +if (lean_obj_tag(x_181) == 0) { -lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; uint8_t x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; -x_180 = lean_ctor_get(x_175, 0); -x_181 = lean_ctor_get(x_174, 0); -lean_inc(x_181); -x_182 = lean_ctor_get(x_180, 0); -lean_inc(x_182); -x_183 = l_Lean_Parser_sepByInfo(x_181, x_182); -x_184 = lean_ctor_get(x_174, 1); -lean_inc(x_184); -lean_dec(x_174); -x_185 = lean_ctor_get(x_180, 1); -lean_inc(x_185); +uint8_t x_182; lean_dec(x_180); -x_186 = 0; -x_187 = lean_box(x_2); -x_188 = lean_box(x_186); -x_189 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); -lean_closure_set(x_189, 0, x_187); -lean_closure_set(x_189, 1, x_188); -lean_closure_set(x_189, 2, x_184); -lean_closure_set(x_189, 3, x_185); -x_190 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_190, 0, x_183); -lean_ctor_set(x_190, 1, x_189); -lean_ctor_set(x_175, 0, x_190); -return x_175; +x_182 = !lean_is_exclusive(x_181); +if (x_182 == 0) +{ +return x_181; } else { -lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; uint8_t x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; -x_191 = lean_ctor_get(x_175, 0); +lean_object* x_183; lean_object* x_184; +x_183 = lean_ctor_get(x_181, 0); +lean_inc(x_183); +lean_dec(x_181); +x_184 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_184, 0, x_183); +return x_184; +} +} +else +{ +uint8_t x_185; +x_185 = !lean_is_exclusive(x_181); +if (x_185 == 0) +{ +lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; uint8_t x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; +x_186 = lean_ctor_get(x_181, 0); +x_187 = lean_ctor_get(x_180, 0); +lean_inc(x_187); +x_188 = lean_ctor_get(x_186, 0); +lean_inc(x_188); +x_189 = l_Lean_Parser_sepByInfo(x_187, x_188); +x_190 = lean_ctor_get(x_180, 1); +lean_inc(x_190); +lean_dec(x_180); +x_191 = lean_ctor_get(x_186, 1); lean_inc(x_191); -lean_dec(x_175); -x_192 = lean_ctor_get(x_174, 0); -lean_inc(x_192); -x_193 = lean_ctor_get(x_191, 0); -lean_inc(x_193); -x_194 = l_Lean_Parser_sepByInfo(x_192, x_193); -x_195 = lean_ctor_get(x_174, 1); -lean_inc(x_195); -lean_dec(x_174); -x_196 = lean_ctor_get(x_191, 1); -lean_inc(x_196); -lean_dec(x_191); -x_197 = 0; -x_198 = lean_box(x_2); -x_199 = lean_box(x_197); -x_200 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); -lean_closure_set(x_200, 0, x_198); -lean_closure_set(x_200, 1, x_199); -lean_closure_set(x_200, 2, x_195); -lean_closure_set(x_200, 3, x_196); -x_201 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_201, 0, x_194); -lean_ctor_set(x_201, 1, x_200); -x_202 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_202, 0, x_201); -return x_202; +lean_dec(x_186); +x_192 = 0; +x_193 = lean_box(x_2); +x_194 = lean_box(x_192); +x_195 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); +lean_closure_set(x_195, 0, x_193); +lean_closure_set(x_195, 1, x_194); +lean_closure_set(x_195, 2, x_190); +lean_closure_set(x_195, 3, x_191); +x_196 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_196, 0, x_189); +lean_ctor_set(x_196, 1, x_195); +lean_ctor_set(x_181, 0, x_196); +return x_181; +} +else +{ +lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; uint8_t x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; +x_197 = lean_ctor_get(x_181, 0); +lean_inc(x_197); +lean_dec(x_181); +x_198 = lean_ctor_get(x_180, 0); +lean_inc(x_198); +x_199 = lean_ctor_get(x_197, 0); +lean_inc(x_199); +x_200 = l_Lean_Parser_sepByInfo(x_198, x_199); +x_201 = lean_ctor_get(x_180, 1); +lean_inc(x_201); +lean_dec(x_180); +x_202 = lean_ctor_get(x_197, 1); +lean_inc(x_202); +lean_dec(x_197); +x_203 = 0; +x_204 = lean_box(x_2); +x_205 = lean_box(x_203); +x_206 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); +lean_closure_set(x_206, 0, x_204); +lean_closure_set(x_206, 1, x_205); +lean_closure_set(x_206, 2, x_201); +lean_closure_set(x_206, 3, x_202); +x_207 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_207, 0, x_200); +lean_ctor_set(x_207, 1, x_206); +x_208 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_208, 0, x_207); +return x_208; } } } } case 8: { -lean_object* x_203; lean_object* x_204; lean_object* x_205; -x_203 = lean_ctor_get(x_3, 0); -lean_inc(x_203); -x_204 = lean_ctor_get(x_3, 1); -lean_inc(x_204); -lean_dec(x_3); -x_205 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_203); -if (lean_obj_tag(x_205) == 0) -{ -uint8_t x_206; -lean_dec(x_204); -x_206 = !lean_is_exclusive(x_205); -if (x_206 == 0) -{ -return x_205; -} -else -{ -lean_object* x_207; lean_object* x_208; -x_207 = lean_ctor_get(x_205, 0); -lean_inc(x_207); -lean_dec(x_205); -x_208 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_208, 0, x_207); -return x_208; -} -} -else -{ -lean_object* x_209; lean_object* x_210; -x_209 = lean_ctor_get(x_205, 0); +lean_object* x_209; lean_object* x_210; lean_object* x_211; +x_209 = lean_ctor_get(x_3, 0); lean_inc(x_209); -lean_dec(x_205); -x_210 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_204); -if (lean_obj_tag(x_210) == 0) +x_210 = lean_ctor_get(x_3, 1); +lean_inc(x_210); +lean_dec(x_3); +x_211 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_209); +if (lean_obj_tag(x_211) == 0) { -uint8_t x_211; -lean_dec(x_209); -x_211 = !lean_is_exclusive(x_210); -if (x_211 == 0) -{ -return x_210; -} -else -{ -lean_object* x_212; lean_object* x_213; -x_212 = lean_ctor_get(x_210, 0); -lean_inc(x_212); +uint8_t x_212; lean_dec(x_210); -x_213 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_213, 0, x_212); -return x_213; +x_212 = !lean_is_exclusive(x_211); +if (x_212 == 0) +{ +return x_211; +} +else +{ +lean_object* x_213; lean_object* x_214; +x_213 = lean_ctor_get(x_211, 0); +lean_inc(x_213); +lean_dec(x_211); +x_214 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_214, 0, x_213); +return x_214; } } else { -uint8_t x_214; -x_214 = !lean_is_exclusive(x_210); -if (x_214 == 0) +lean_object* x_215; lean_object* x_216; +x_215 = lean_ctor_get(x_211, 0); +lean_inc(x_215); +lean_dec(x_211); +x_216 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_210); +if (lean_obj_tag(x_216) == 0) { -lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; uint8_t x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; -x_215 = lean_ctor_get(x_210, 0); -x_216 = lean_ctor_get(x_209, 0); -lean_inc(x_216); -x_217 = lean_ctor_get(x_215, 0); -lean_inc(x_217); -x_218 = l_Lean_Parser_sepBy1Info(x_216, x_217); -x_219 = lean_ctor_get(x_209, 1); -lean_inc(x_219); -lean_dec(x_209); -x_220 = lean_ctor_get(x_215, 1); -lean_inc(x_220); +uint8_t x_217; lean_dec(x_215); -x_221 = 0; -x_222 = lean_box(x_2); -x_223 = lean_box(x_221); -x_224 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_224, 0, x_222); -lean_closure_set(x_224, 1, x_223); -lean_closure_set(x_224, 2, x_219); -lean_closure_set(x_224, 3, x_220); -x_225 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_225, 0, x_218); -lean_ctor_set(x_225, 1, x_224); -lean_ctor_set(x_210, 0, x_225); -return x_210; +x_217 = !lean_is_exclusive(x_216); +if (x_217 == 0) +{ +return x_216; } else { -lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; uint8_t x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; -x_226 = lean_ctor_get(x_210, 0); +lean_object* x_218; lean_object* x_219; +x_218 = lean_ctor_get(x_216, 0); +lean_inc(x_218); +lean_dec(x_216); +x_219 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_219, 0, x_218); +return x_219; +} +} +else +{ +uint8_t x_220; +x_220 = !lean_is_exclusive(x_216); +if (x_220 == 0) +{ +lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; uint8_t x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; +x_221 = lean_ctor_get(x_216, 0); +x_222 = lean_ctor_get(x_215, 0); +lean_inc(x_222); +x_223 = lean_ctor_get(x_221, 0); +lean_inc(x_223); +x_224 = l_Lean_Parser_sepBy1Info(x_222, x_223); +x_225 = lean_ctor_get(x_215, 1); +lean_inc(x_225); +lean_dec(x_215); +x_226 = lean_ctor_get(x_221, 1); lean_inc(x_226); -lean_dec(x_210); -x_227 = lean_ctor_get(x_209, 0); -lean_inc(x_227); -x_228 = lean_ctor_get(x_226, 0); -lean_inc(x_228); -x_229 = l_Lean_Parser_sepBy1Info(x_227, x_228); -x_230 = lean_ctor_get(x_209, 1); -lean_inc(x_230); -lean_dec(x_209); -x_231 = lean_ctor_get(x_226, 1); -lean_inc(x_231); -lean_dec(x_226); -x_232 = 0; -x_233 = lean_box(x_2); -x_234 = lean_box(x_232); -x_235 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_235, 0, x_233); -lean_closure_set(x_235, 1, x_234); -lean_closure_set(x_235, 2, x_230); -lean_closure_set(x_235, 3, x_231); -x_236 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_236, 0, x_229); -lean_ctor_set(x_236, 1, x_235); -x_237 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_237, 0, x_236); -return x_237; +lean_dec(x_221); +x_227 = 0; +x_228 = lean_box(x_2); +x_229 = lean_box(x_227); +x_230 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); +lean_closure_set(x_230, 0, x_228); +lean_closure_set(x_230, 1, x_229); +lean_closure_set(x_230, 2, x_225); +lean_closure_set(x_230, 3, x_226); +x_231 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_231, 0, x_224); +lean_ctor_set(x_231, 1, x_230); +lean_ctor_set(x_216, 0, x_231); +return x_216; +} +else +{ +lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; uint8_t x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; +x_232 = lean_ctor_get(x_216, 0); +lean_inc(x_232); +lean_dec(x_216); +x_233 = lean_ctor_get(x_215, 0); +lean_inc(x_233); +x_234 = lean_ctor_get(x_232, 0); +lean_inc(x_234); +x_235 = l_Lean_Parser_sepBy1Info(x_233, x_234); +x_236 = lean_ctor_get(x_215, 1); +lean_inc(x_236); +lean_dec(x_215); +x_237 = lean_ctor_get(x_232, 1); +lean_inc(x_237); +lean_dec(x_232); +x_238 = 0; +x_239 = lean_box(x_2); +x_240 = lean_box(x_238); +x_241 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); +lean_closure_set(x_241, 0, x_239); +lean_closure_set(x_241, 1, x_240); +lean_closure_set(x_241, 2, x_236); +lean_closure_set(x_241, 3, x_237); +x_242 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_242, 0, x_235); +lean_ctor_set(x_242, 1, x_241); +x_243 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_243, 0, x_242); +return x_243; } } } } case 9: { -lean_object* x_238; lean_object* x_239; lean_object* x_240; -x_238 = lean_ctor_get(x_3, 0); -lean_inc(x_238); -x_239 = lean_ctor_get(x_3, 1); -lean_inc(x_239); +lean_object* x_244; lean_object* x_245; lean_object* x_246; +x_244 = lean_ctor_get(x_3, 0); +lean_inc(x_244); +x_245 = lean_ctor_get(x_3, 1); +lean_inc(x_245); lean_dec(x_3); -x_240 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_239); -if (lean_obj_tag(x_240) == 0) +x_246 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_245); +if (lean_obj_tag(x_246) == 0) { -uint8_t x_241; -lean_dec(x_238); -x_241 = !lean_is_exclusive(x_240); -if (x_241 == 0) +uint8_t x_247; +lean_dec(x_244); +x_247 = !lean_is_exclusive(x_246); +if (x_247 == 0) { -return x_240; +return x_246; } else { -lean_object* x_242; lean_object* x_243; -x_242 = lean_ctor_get(x_240, 0); -lean_inc(x_242); -lean_dec(x_240); -x_243 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_243, 0, x_242); -return x_243; -} -} -else -{ -uint8_t x_244; -x_244 = !lean_is_exclusive(x_240); -if (x_244 == 0) -{ -lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; -x_245 = lean_ctor_get(x_240, 0); -x_246 = lean_ctor_get(x_245, 0); -lean_inc(x_246); -lean_inc(x_238); -x_247 = l_Lean_Parser_nodeInfo(x_238, x_246); -x_248 = lean_ctor_get(x_245, 1); +lean_object* x_248; lean_object* x_249; +x_248 = lean_ctor_get(x_246, 0); lean_inc(x_248); -lean_dec(x_245); -x_249 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_249, 0, x_238); -lean_closure_set(x_249, 1, x_248); -x_250 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_250, 0, x_247); -lean_ctor_set(x_250, 1, x_249); -lean_ctor_set(x_240, 0, x_250); -return x_240; +lean_dec(x_246); +x_249 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_249, 0, x_248); +return x_249; +} } else { -lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; -x_251 = lean_ctor_get(x_240, 0); -lean_inc(x_251); -lean_dec(x_240); +uint8_t x_250; +x_250 = !lean_is_exclusive(x_246); +if (x_250 == 0) +{ +lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; +x_251 = lean_ctor_get(x_246, 0); x_252 = lean_ctor_get(x_251, 0); lean_inc(x_252); -lean_inc(x_238); -x_253 = l_Lean_Parser_nodeInfo(x_238, x_252); +lean_inc(x_244); +x_253 = l_Lean_Parser_nodeInfo(x_244, x_252); x_254 = lean_ctor_get(x_251, 1); lean_inc(x_254); lean_dec(x_251); x_255 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_255, 0, x_238); +lean_closure_set(x_255, 0, x_244); lean_closure_set(x_255, 1, x_254); x_256 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_256, 0, x_253); lean_ctor_set(x_256, 1, x_255); -x_257 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_257, 0, x_256); -return x_257; +lean_ctor_set(x_246, 0, x_256); +return x_246; +} +else +{ +lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; +x_257 = lean_ctor_get(x_246, 0); +lean_inc(x_257); +lean_dec(x_246); +x_258 = lean_ctor_get(x_257, 0); +lean_inc(x_258); +lean_inc(x_244); +x_259 = l_Lean_Parser_nodeInfo(x_244, x_258); +x_260 = lean_ctor_get(x_257, 1); +lean_inc(x_260); +lean_dec(x_257); +x_261 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_261, 0, x_244); +lean_closure_set(x_261, 1, x_260); +x_262 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_262, 0, x_259); +lean_ctor_set(x_262, 1, x_261); +x_263 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_263, 0, x_262); +return x_263; } } } case 10: { -lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; -x_258 = lean_ctor_get(x_3, 0); -lean_inc(x_258); -x_259 = lean_ctor_get(x_3, 1); -lean_inc(x_259); +lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; +x_264 = lean_ctor_get(x_3, 0); +lean_inc(x_264); +x_265 = lean_ctor_get(x_3, 1); +lean_inc(x_265); lean_dec(x_3); -x_260 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_260, 0, x_259); -x_261 = l_String_trim(x_258); -lean_dec(x_258); -lean_inc(x_261); -x_262 = l_Lean_Parser_symbolInfo(x_261, x_260); -x_263 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); -lean_closure_set(x_263, 0, x_261); -x_264 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_264, 0, x_262); -lean_ctor_set(x_264, 1, x_263); -x_265 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_265, 0, x_264); -return x_265; +x_266 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_266, 0, x_265); +x_267 = l_String_trim(x_264); +lean_dec(x_264); +lean_inc(x_267); +x_268 = l_Lean_Parser_symbolInfo(x_267, x_266); +x_269 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); +lean_closure_set(x_269, 0, x_267); +x_270 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_270, 0, x_268); +lean_ctor_set(x_270, 1, x_269); +x_271 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_271, 0, x_270); +return x_271; } case 11: { -lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; -x_266 = lean_ctor_get(x_3, 0); -lean_inc(x_266); -x_267 = lean_ctor_get(x_3, 1); -lean_inc(x_267); -x_268 = lean_ctor_get(x_3, 2); -lean_inc(x_268); +lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; +x_272 = lean_ctor_get(x_3, 0); +lean_inc(x_272); +x_273 = lean_ctor_get(x_3, 1); +lean_inc(x_273); +x_274 = lean_ctor_get(x_3, 2); +lean_inc(x_274); lean_dec(x_3); -x_269 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_269, 0, x_268); -x_270 = l_String_trim(x_266); -lean_dec(x_266); -x_271 = l_String_trim(x_267); -lean_dec(x_267); -lean_inc(x_271); -lean_inc(x_270); -x_272 = l_Lean_Parser_unicodeSymbolInfo(x_270, x_271, x_269); -x_273 = lean_alloc_closure((void*)(l_Lean_Parser_unicodeSymbolFn___rarg___boxed), 5, 2); -lean_closure_set(x_273, 0, x_270); -lean_closure_set(x_273, 1, x_271); -x_274 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_274, 0, x_272); -lean_ctor_set(x_274, 1, x_273); x_275 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_275, 0, x_274); -return x_275; +x_276 = l_String_trim(x_272); +lean_dec(x_272); +x_277 = l_String_trim(x_273); +lean_dec(x_273); +lean_inc(x_277); +lean_inc(x_276); +x_278 = l_Lean_Parser_unicodeSymbolInfo(x_276, x_277, x_275); +x_279 = lean_alloc_closure((void*)(l_Lean_Parser_unicodeSymbolFn___rarg___boxed), 5, 2); +lean_closure_set(x_279, 0, x_276); +lean_closure_set(x_279, 1, x_277); +x_280 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_280, 0, x_278); +lean_ctor_set(x_280, 1, x_279); +x_281 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_281, 0, x_280); +return x_281; } default: { -lean_object* x_276; lean_object* x_277; lean_object* x_278; -x_276 = lean_ctor_get(x_3, 0); -lean_inc(x_276); -x_277 = lean_ctor_get(x_3, 1); -lean_inc(x_277); +lean_object* x_282; lean_object* x_283; lean_object* x_284; +x_282 = lean_ctor_get(x_3, 0); +lean_inc(x_282); +x_283 = lean_ctor_get(x_3, 1); +lean_inc(x_283); lean_dec(x_3); -x_278 = l_HashMapImp_find_x3f___at_Lean_Parser_compileParserDescr___main___spec__1(x_1, x_276); -if (lean_obj_tag(x_278) == 0) +x_284 = l_HashMapImp_find_x3f___at_Lean_Parser_compileParserDescr___main___spec__1(x_1, x_282); +if (lean_obj_tag(x_284) == 0) { -lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; -lean_dec(x_277); -x_279 = l_Lean_Name_toString___closed__1; -x_280 = l_Lean_Name_toStringWithSep___main(x_279, x_276); -x_281 = l_Lean_Parser_compileParserDescr___main___closed__1; -x_282 = lean_string_append(x_281, x_280); -lean_dec(x_280); -x_283 = l_Char_HasRepr___closed__1; -x_284 = lean_string_append(x_282, x_283); -x_285 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_285, 0, x_284); -return x_285; +lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; +lean_dec(x_283); +x_285 = l_Lean_Name_toString___closed__1; +x_286 = l_Lean_Name_toStringWithSep___main(x_285, x_282); +x_287 = l_Lean_Parser_compileParserDescr___main___closed__1; +x_288 = lean_string_append(x_287, x_286); +lean_dec(x_286); +x_289 = l_Char_HasRepr___closed__1; +x_290 = lean_string_append(x_288, x_289); +x_291 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_291, 0, x_290); +return x_291; } else { -lean_object* x_286; lean_object* x_287; lean_object* x_288; -lean_dec(x_276); -x_286 = lean_ctor_get(x_278, 0); -lean_inc(x_286); -lean_dec(x_278); -x_287 = l_Lean_Parser_ParserAttribute_mkParser(x_286, x_277); -x_288 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_288, 0, x_287); -return x_288; +lean_object* x_292; lean_object* x_293; lean_object* x_294; +lean_dec(x_282); +x_292 = lean_ctor_get(x_284, 0); +lean_inc(x_292); +lean_dec(x_284); +x_293 = l_Lean_Parser_ParserAttribute_mkParser(x_292, x_283); +x_294 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_294, 0, x_293); +return x_294; } } } @@ -31050,286 +31123,266 @@ else switch (lean_obj_tag(x_3)) { case 0: { -lean_object* x_289; lean_object* x_290; lean_object* x_291; -x_289 = lean_ctor_get(x_3, 0); -lean_inc(x_289); -x_290 = lean_ctor_get(x_3, 1); -lean_inc(x_290); -lean_dec(x_3); -x_291 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_289); -if (lean_obj_tag(x_291) == 0) -{ -uint8_t x_292; -lean_dec(x_290); -x_292 = !lean_is_exclusive(x_291); -if (x_292 == 0) -{ -return x_291; -} -else -{ -lean_object* x_293; lean_object* x_294; -x_293 = lean_ctor_get(x_291, 0); -lean_inc(x_293); -lean_dec(x_291); -x_294 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_294, 0, x_293); -return x_294; -} -} -else -{ -lean_object* x_295; lean_object* x_296; -x_295 = lean_ctor_get(x_291, 0); +lean_object* x_295; lean_object* x_296; lean_object* x_297; +x_295 = lean_ctor_get(x_3, 0); lean_inc(x_295); -lean_dec(x_291); -x_296 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_290); -if (lean_obj_tag(x_296) == 0) +x_296 = lean_ctor_get(x_3, 1); +lean_inc(x_296); +lean_dec(x_3); +x_297 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_295); +if (lean_obj_tag(x_297) == 0) { -uint8_t x_297; -lean_dec(x_295); -x_297 = !lean_is_exclusive(x_296); -if (x_297 == 0) -{ -return x_296; -} -else -{ -lean_object* x_298; lean_object* x_299; -x_298 = lean_ctor_get(x_296, 0); -lean_inc(x_298); +uint8_t x_298; lean_dec(x_296); -x_299 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_299, 0, x_298); -return x_299; +x_298 = !lean_is_exclusive(x_297); +if (x_298 == 0) +{ +return x_297; +} +else +{ +lean_object* x_299; lean_object* x_300; +x_299 = lean_ctor_get(x_297, 0); +lean_inc(x_299); +lean_dec(x_297); +x_300 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_300, 0, x_299); +return x_300; } } else { -uint8_t x_300; -x_300 = !lean_is_exclusive(x_296); -if (x_300 == 0) +lean_object* x_301; lean_object* x_302; +x_301 = lean_ctor_get(x_297, 0); +lean_inc(x_301); +lean_dec(x_297); +x_302 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_296); +if (lean_obj_tag(x_302) == 0) { -lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; -x_301 = lean_ctor_get(x_296, 0); -x_302 = lean_ctor_get(x_295, 0); -lean_inc(x_302); -x_303 = lean_ctor_get(x_301, 0); -lean_inc(x_303); -x_304 = l_Lean_Parser_andthenInfo(x_302, x_303); -x_305 = lean_ctor_get(x_295, 1); -lean_inc(x_305); -lean_dec(x_295); -x_306 = lean_ctor_get(x_301, 1); -lean_inc(x_306); +uint8_t x_303; lean_dec(x_301); -x_307 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); -lean_closure_set(x_307, 0, x_305); -lean_closure_set(x_307, 1, x_306); -x_308 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_308, 0, x_304); -lean_ctor_set(x_308, 1, x_307); -lean_ctor_set(x_296, 0, x_308); -return x_296; +x_303 = !lean_is_exclusive(x_302); +if (x_303 == 0) +{ +return x_302; } else { -lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; -x_309 = lean_ctor_get(x_296, 0); +lean_object* x_304; lean_object* x_305; +x_304 = lean_ctor_get(x_302, 0); +lean_inc(x_304); +lean_dec(x_302); +x_305 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_305, 0, x_304); +return x_305; +} +} +else +{ +uint8_t x_306; +x_306 = !lean_is_exclusive(x_302); +if (x_306 == 0) +{ +lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; lean_object* x_314; +x_307 = lean_ctor_get(x_302, 0); +x_308 = lean_ctor_get(x_301, 0); +lean_inc(x_308); +x_309 = lean_ctor_get(x_307, 0); lean_inc(x_309); -lean_dec(x_296); -x_310 = lean_ctor_get(x_295, 0); -lean_inc(x_310); -x_311 = lean_ctor_get(x_309, 0); +x_310 = l_Lean_Parser_andthenInfo(x_308, x_309); +x_311 = lean_ctor_get(x_301, 1); lean_inc(x_311); -x_312 = l_Lean_Parser_andthenInfo(x_310, x_311); -x_313 = lean_ctor_get(x_295, 1); -lean_inc(x_313); -lean_dec(x_295); -x_314 = lean_ctor_get(x_309, 1); -lean_inc(x_314); -lean_dec(x_309); -x_315 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); -lean_closure_set(x_315, 0, x_313); -lean_closure_set(x_315, 1, x_314); -x_316 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_316, 0, x_312); -lean_ctor_set(x_316, 1, x_315); -x_317 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_317, 0, x_316); -return x_317; +lean_dec(x_301); +x_312 = lean_ctor_get(x_307, 1); +lean_inc(x_312); +lean_dec(x_307); +x_313 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); +lean_closure_set(x_313, 0, x_311); +lean_closure_set(x_313, 1, x_312); +x_314 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_314, 0, x_310); +lean_ctor_set(x_314, 1, x_313); +lean_ctor_set(x_302, 0, x_314); +return x_302; +} +else +{ +lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; +x_315 = lean_ctor_get(x_302, 0); +lean_inc(x_315); +lean_dec(x_302); +x_316 = lean_ctor_get(x_301, 0); +lean_inc(x_316); +x_317 = lean_ctor_get(x_315, 0); +lean_inc(x_317); +x_318 = l_Lean_Parser_andthenInfo(x_316, x_317); +x_319 = lean_ctor_get(x_301, 1); +lean_inc(x_319); +lean_dec(x_301); +x_320 = lean_ctor_get(x_315, 1); +lean_inc(x_320); +lean_dec(x_315); +x_321 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); +lean_closure_set(x_321, 0, x_319); +lean_closure_set(x_321, 1, x_320); +x_322 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_322, 0, x_318); +lean_ctor_set(x_322, 1, x_321); +x_323 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_323, 0, x_322); +return x_323; } } } } case 1: { -lean_object* x_318; lean_object* x_319; lean_object* x_320; -x_318 = lean_ctor_get(x_3, 0); -lean_inc(x_318); -x_319 = lean_ctor_get(x_3, 1); -lean_inc(x_319); -lean_dec(x_3); -x_320 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_318); -if (lean_obj_tag(x_320) == 0) -{ -uint8_t x_321; -lean_dec(x_319); -x_321 = !lean_is_exclusive(x_320); -if (x_321 == 0) -{ -return x_320; -} -else -{ -lean_object* x_322; lean_object* x_323; -x_322 = lean_ctor_get(x_320, 0); -lean_inc(x_322); -lean_dec(x_320); -x_323 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_323, 0, x_322); -return x_323; -} -} -else -{ -lean_object* x_324; lean_object* x_325; -x_324 = lean_ctor_get(x_320, 0); +lean_object* x_324; lean_object* x_325; lean_object* x_326; +x_324 = lean_ctor_get(x_3, 0); lean_inc(x_324); -lean_dec(x_320); -x_325 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_319); -if (lean_obj_tag(x_325) == 0) +x_325 = lean_ctor_get(x_3, 1); +lean_inc(x_325); +lean_dec(x_3); +x_326 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_324); +if (lean_obj_tag(x_326) == 0) { -uint8_t x_326; -lean_dec(x_324); -x_326 = !lean_is_exclusive(x_325); -if (x_326 == 0) -{ -return x_325; -} -else -{ -lean_object* x_327; lean_object* x_328; -x_327 = lean_ctor_get(x_325, 0); -lean_inc(x_327); +uint8_t x_327; lean_dec(x_325); -x_328 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_328, 0, x_327); -return x_328; +x_327 = !lean_is_exclusive(x_326); +if (x_327 == 0) +{ +return x_326; +} +else +{ +lean_object* x_328; lean_object* x_329; +x_328 = lean_ctor_get(x_326, 0); +lean_inc(x_328); +lean_dec(x_326); +x_329 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_329, 0, x_328); +return x_329; } } else { -uint8_t x_329; -x_329 = !lean_is_exclusive(x_325); -if (x_329 == 0) +lean_object* x_330; lean_object* x_331; +x_330 = lean_ctor_get(x_326, 0); +lean_inc(x_330); +lean_dec(x_326); +x_331 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_325); +if (lean_obj_tag(x_331) == 0) { -lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; -x_330 = lean_ctor_get(x_325, 0); -x_331 = lean_ctor_get(x_324, 0); -lean_inc(x_331); -x_332 = lean_ctor_get(x_330, 0); -lean_inc(x_332); -x_333 = l_Lean_Parser_orelseInfo(x_331, x_332); -x_334 = lean_ctor_get(x_324, 1); -lean_inc(x_334); -lean_dec(x_324); -x_335 = lean_ctor_get(x_330, 1); -lean_inc(x_335); +uint8_t x_332; lean_dec(x_330); -x_336 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); -lean_closure_set(x_336, 0, x_334); -lean_closure_set(x_336, 1, x_335); -x_337 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_337, 0, x_333); -lean_ctor_set(x_337, 1, x_336); -lean_ctor_set(x_325, 0, x_337); -return x_325; +x_332 = !lean_is_exclusive(x_331); +if (x_332 == 0) +{ +return x_331; } else { -lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; -x_338 = lean_ctor_get(x_325, 0); +lean_object* x_333; lean_object* x_334; +x_333 = lean_ctor_get(x_331, 0); +lean_inc(x_333); +lean_dec(x_331); +x_334 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_334, 0, x_333); +return x_334; +} +} +else +{ +uint8_t x_335; +x_335 = !lean_is_exclusive(x_331); +if (x_335 == 0) +{ +lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; +x_336 = lean_ctor_get(x_331, 0); +x_337 = lean_ctor_get(x_330, 0); +lean_inc(x_337); +x_338 = lean_ctor_get(x_336, 0); lean_inc(x_338); -lean_dec(x_325); -x_339 = lean_ctor_get(x_324, 0); -lean_inc(x_339); -x_340 = lean_ctor_get(x_338, 0); +x_339 = l_Lean_Parser_orelseInfo(x_337, x_338); +x_340 = lean_ctor_get(x_330, 1); lean_inc(x_340); -x_341 = l_Lean_Parser_orelseInfo(x_339, x_340); -x_342 = lean_ctor_get(x_324, 1); -lean_inc(x_342); -lean_dec(x_324); -x_343 = lean_ctor_get(x_338, 1); -lean_inc(x_343); -lean_dec(x_338); -x_344 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); -lean_closure_set(x_344, 0, x_342); -lean_closure_set(x_344, 1, x_343); -x_345 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_345, 0, x_341); -lean_ctor_set(x_345, 1, x_344); -x_346 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_346, 0, x_345); -return x_346; +lean_dec(x_330); +x_341 = lean_ctor_get(x_336, 1); +lean_inc(x_341); +lean_dec(x_336); +x_342 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); +lean_closure_set(x_342, 0, x_340); +lean_closure_set(x_342, 1, x_341); +x_343 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_343, 0, x_339); +lean_ctor_set(x_343, 1, x_342); +lean_ctor_set(x_331, 0, x_343); +return x_331; +} +else +{ +lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; +x_344 = lean_ctor_get(x_331, 0); +lean_inc(x_344); +lean_dec(x_331); +x_345 = lean_ctor_get(x_330, 0); +lean_inc(x_345); +x_346 = lean_ctor_get(x_344, 0); +lean_inc(x_346); +x_347 = l_Lean_Parser_orelseInfo(x_345, x_346); +x_348 = lean_ctor_get(x_330, 1); +lean_inc(x_348); +lean_dec(x_330); +x_349 = lean_ctor_get(x_344, 1); +lean_inc(x_349); +lean_dec(x_344); +x_350 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); +lean_closure_set(x_350, 0, x_348); +lean_closure_set(x_350, 1, x_349); +x_351 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_351, 0, x_347); +lean_ctor_set(x_351, 1, x_350); +x_352 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_352, 0, x_351); +return x_352; } } } } case 2: { -lean_object* x_347; lean_object* x_348; -x_347 = lean_ctor_get(x_3, 0); -lean_inc(x_347); +lean_object* x_353; lean_object* x_354; +x_353 = lean_ctor_get(x_3, 0); +lean_inc(x_353); lean_dec(x_3); -x_348 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_347); -if (lean_obj_tag(x_348) == 0) +x_354 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_353); +if (lean_obj_tag(x_354) == 0) { -uint8_t x_349; -x_349 = !lean_is_exclusive(x_348); -if (x_349 == 0) +uint8_t x_355; +x_355 = !lean_is_exclusive(x_354); +if (x_355 == 0) { -return x_348; +return x_354; } else { -lean_object* x_350; lean_object* x_351; -x_350 = lean_ctor_get(x_348, 0); -lean_inc(x_350); -lean_dec(x_348); -x_351 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_351, 0, x_350); -return x_351; -} -} -else -{ -uint8_t x_352; -x_352 = !lean_is_exclusive(x_348); -if (x_352 == 0) -{ -lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; -x_353 = lean_ctor_get(x_348, 0); -x_354 = lean_ctor_get(x_353, 0); -lean_inc(x_354); -x_355 = l_Lean_Parser_optionaInfo(x_354); -x_356 = lean_ctor_get(x_353, 1); +lean_object* x_356; lean_object* x_357; +x_356 = lean_ctor_get(x_354, 0); lean_inc(x_356); -lean_dec(x_353); -x_357 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); -lean_closure_set(x_357, 0, x_356); -x_358 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_358, 0, x_355); -lean_ctor_set(x_358, 1, x_357); -lean_ctor_set(x_348, 0, x_358); -return x_348; +lean_dec(x_354); +x_357 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_357, 0, x_356); +return x_357; +} } else { -lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; -x_359 = lean_ctor_get(x_348, 0); -lean_inc(x_359); -lean_dec(x_348); +uint8_t x_358; +x_358 = !lean_is_exclusive(x_354); +if (x_358 == 0) +{ +lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; +x_359 = lean_ctor_get(x_354, 0); x_360 = lean_ctor_get(x_359, 0); lean_inc(x_360); x_361 = l_Lean_Parser_optionaInfo(x_360); @@ -31341,758 +31394,787 @@ lean_closure_set(x_363, 0, x_362); x_364 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_364, 0, x_361); lean_ctor_set(x_364, 1, x_363); -x_365 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_365, 0, x_364); -return x_365; +lean_ctor_set(x_354, 0, x_364); +return x_354; +} +else +{ +lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; +x_365 = lean_ctor_get(x_354, 0); +lean_inc(x_365); +lean_dec(x_354); +x_366 = lean_ctor_get(x_365, 0); +lean_inc(x_366); +x_367 = l_Lean_Parser_optionaInfo(x_366); +x_368 = lean_ctor_get(x_365, 1); +lean_inc(x_368); +lean_dec(x_365); +x_369 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); +lean_closure_set(x_369, 0, x_368); +x_370 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_370, 0, x_367); +lean_ctor_set(x_370, 1, x_369); +x_371 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_371, 0, x_370); +return x_371; } } } case 3: { -lean_object* x_366; lean_object* x_367; -x_366 = lean_ctor_get(x_3, 0); -lean_inc(x_366); +lean_object* x_372; lean_object* x_373; +x_372 = lean_ctor_get(x_3, 0); +lean_inc(x_372); lean_dec(x_3); -x_367 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_366); -if (lean_obj_tag(x_367) == 0) +x_373 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_372); +if (lean_obj_tag(x_373) == 0) { -uint8_t x_368; -x_368 = !lean_is_exclusive(x_367); -if (x_368 == 0) +uint8_t x_374; +x_374 = !lean_is_exclusive(x_373); +if (x_374 == 0) { -return x_367; +return x_373; } else { -lean_object* x_369; lean_object* x_370; -x_369 = lean_ctor_get(x_367, 0); -lean_inc(x_369); -lean_dec(x_367); -x_370 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_370, 0, x_369); -return x_370; +lean_object* x_375; lean_object* x_376; +x_375 = lean_ctor_get(x_373, 0); +lean_inc(x_375); +lean_dec(x_373); +x_376 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_376, 0, x_375); +return x_376; } } else { -uint8_t x_371; -x_371 = !lean_is_exclusive(x_367); -if (x_371 == 0) +uint8_t x_377; +x_377 = !lean_is_exclusive(x_373); +if (x_377 == 0) { -lean_object* x_372; uint8_t x_373; -x_372 = lean_ctor_get(x_367, 0); -x_373 = !lean_is_exclusive(x_372); -if (x_373 == 0) +lean_object* x_378; uint8_t x_379; +x_378 = lean_ctor_get(x_373, 0); +x_379 = !lean_is_exclusive(x_378); +if (x_379 == 0) { -lean_object* x_374; lean_object* x_375; -x_374 = lean_ctor_get(x_372, 1); -x_375 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_375, 0, x_374); -lean_ctor_set(x_372, 1, x_375); -return x_367; +lean_object* x_380; lean_object* x_381; +x_380 = lean_ctor_get(x_378, 1); +x_381 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); +lean_closure_set(x_381, 0, x_380); +lean_ctor_set(x_378, 1, x_381); +return x_373; } else { -lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; -x_376 = lean_ctor_get(x_372, 0); -x_377 = lean_ctor_get(x_372, 1); -lean_inc(x_377); -lean_inc(x_376); -lean_dec(x_372); -x_378 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_378, 0, x_377); -x_379 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_379, 0, x_376); -lean_ctor_set(x_379, 1, x_378); -lean_ctor_set(x_367, 0, x_379); -return x_367; -} -} -else -{ -lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; -x_380 = lean_ctor_get(x_367, 0); -lean_inc(x_380); -lean_dec(x_367); -x_381 = lean_ctor_get(x_380, 0); -lean_inc(x_381); -x_382 = lean_ctor_get(x_380, 1); +lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; +x_382 = lean_ctor_get(x_378, 0); +x_383 = lean_ctor_get(x_378, 1); +lean_inc(x_383); lean_inc(x_382); -if (lean_is_exclusive(x_380)) { - lean_ctor_release(x_380, 0); - lean_ctor_release(x_380, 1); - x_383 = x_380; -} else { - lean_dec_ref(x_380); - x_383 = lean_box(0); -} +lean_dec(x_378); x_384 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_384, 0, x_382); -if (lean_is_scalar(x_383)) { - x_385 = lean_alloc_ctor(0, 2, 0); -} else { - x_385 = x_383; -} -lean_ctor_set(x_385, 0, x_381); +lean_closure_set(x_384, 0, x_383); +x_385 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_385, 0, x_382); lean_ctor_set(x_385, 1, x_384); -x_386 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_386, 0, x_385); -return x_386; +lean_ctor_set(x_373, 0, x_385); +return x_373; +} +} +else +{ +lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; +x_386 = lean_ctor_get(x_373, 0); +lean_inc(x_386); +lean_dec(x_373); +x_387 = lean_ctor_get(x_386, 0); +lean_inc(x_387); +x_388 = lean_ctor_get(x_386, 1); +lean_inc(x_388); +if (lean_is_exclusive(x_386)) { + lean_ctor_release(x_386, 0); + lean_ctor_release(x_386, 1); + x_389 = x_386; +} else { + lean_dec_ref(x_386); + x_389 = lean_box(0); +} +x_390 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); +lean_closure_set(x_390, 0, x_388); +if (lean_is_scalar(x_389)) { + x_391 = lean_alloc_ctor(0, 2, 0); +} else { + x_391 = x_389; +} +lean_ctor_set(x_391, 0, x_387); +lean_ctor_set(x_391, 1, x_390); +x_392 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_392, 0, x_391); +return x_392; } } } case 4: { -lean_object* x_387; lean_object* x_388; -x_387 = lean_ctor_get(x_3, 0); -lean_inc(x_387); +lean_object* x_393; lean_object* x_394; +x_393 = lean_ctor_get(x_3, 0); +lean_inc(x_393); lean_dec(x_3); -x_388 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_387); -if (lean_obj_tag(x_388) == 0) +x_394 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_393); +if (lean_obj_tag(x_394) == 0) { -uint8_t x_389; -x_389 = !lean_is_exclusive(x_388); -if (x_389 == 0) +uint8_t x_395; +x_395 = !lean_is_exclusive(x_394); +if (x_395 == 0) { -return x_388; +return x_394; } else { -lean_object* x_390; lean_object* x_391; -x_390 = lean_ctor_get(x_388, 0); -lean_inc(x_390); -lean_dec(x_388); -x_391 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_391, 0, x_390); -return x_391; +lean_object* x_396; lean_object* x_397; +x_396 = lean_ctor_get(x_394, 0); +lean_inc(x_396); +lean_dec(x_394); +x_397 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_397, 0, x_396); +return x_397; } } else { -uint8_t x_392; -x_392 = !lean_is_exclusive(x_388); -if (x_392 == 0) +uint8_t x_398; +x_398 = !lean_is_exclusive(x_394); +if (x_398 == 0) { -lean_object* x_393; uint8_t x_394; -x_393 = lean_ctor_get(x_388, 0); -x_394 = !lean_is_exclusive(x_393); -if (x_394 == 0) +lean_object* x_399; uint8_t x_400; +x_399 = lean_ctor_get(x_394, 0); +x_400 = !lean_is_exclusive(x_399); +if (x_400 == 0) { -lean_object* x_395; lean_object* x_396; -x_395 = lean_ctor_get(x_393, 1); -x_396 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_396, 0, x_395); -lean_ctor_set(x_393, 1, x_396); -return x_388; +lean_object* x_401; lean_object* x_402; +x_401 = lean_ctor_get(x_399, 1); +x_402 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); +lean_closure_set(x_402, 0, x_401); +lean_ctor_set(x_399, 1, x_402); +return x_394; } else { -lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; -x_397 = lean_ctor_get(x_393, 0); -x_398 = lean_ctor_get(x_393, 1); -lean_inc(x_398); -lean_inc(x_397); -lean_dec(x_393); -x_399 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_399, 0, x_398); -x_400 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_400, 0, x_397); -lean_ctor_set(x_400, 1, x_399); -lean_ctor_set(x_388, 0, x_400); -return x_388; -} -} -else -{ -lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; -x_401 = lean_ctor_get(x_388, 0); -lean_inc(x_401); -lean_dec(x_388); -x_402 = lean_ctor_get(x_401, 0); -lean_inc(x_402); -x_403 = lean_ctor_get(x_401, 1); +lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; +x_403 = lean_ctor_get(x_399, 0); +x_404 = lean_ctor_get(x_399, 1); +lean_inc(x_404); lean_inc(x_403); -if (lean_is_exclusive(x_401)) { - lean_ctor_release(x_401, 0); - lean_ctor_release(x_401, 1); - x_404 = x_401; -} else { - lean_dec_ref(x_401); - x_404 = lean_box(0); -} +lean_dec(x_399); x_405 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_405, 0, x_403); -if (lean_is_scalar(x_404)) { - x_406 = lean_alloc_ctor(0, 2, 0); -} else { - x_406 = x_404; -} -lean_ctor_set(x_406, 0, x_402); +lean_closure_set(x_405, 0, x_404); +x_406 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_406, 0, x_403); lean_ctor_set(x_406, 1, x_405); -x_407 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_407, 0, x_406); -return x_407; +lean_ctor_set(x_394, 0, x_406); +return x_394; +} +} +else +{ +lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; +x_407 = lean_ctor_get(x_394, 0); +lean_inc(x_407); +lean_dec(x_394); +x_408 = lean_ctor_get(x_407, 0); +lean_inc(x_408); +x_409 = lean_ctor_get(x_407, 1); +lean_inc(x_409); +if (lean_is_exclusive(x_407)) { + lean_ctor_release(x_407, 0); + lean_ctor_release(x_407, 1); + x_410 = x_407; +} else { + lean_dec_ref(x_407); + x_410 = lean_box(0); +} +x_411 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); +lean_closure_set(x_411, 0, x_409); +if (lean_is_scalar(x_410)) { + x_412 = lean_alloc_ctor(0, 2, 0); +} else { + x_412 = x_410; +} +lean_ctor_set(x_412, 0, x_408); +lean_ctor_set(x_412, 1, x_411); +x_413 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_413, 0, x_412); +return x_413; } } } case 5: { -lean_object* x_408; lean_object* x_409; -x_408 = lean_ctor_get(x_3, 0); -lean_inc(x_408); +lean_object* x_414; lean_object* x_415; +x_414 = lean_ctor_get(x_3, 0); +lean_inc(x_414); lean_dec(x_3); -x_409 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_408); -if (lean_obj_tag(x_409) == 0) +x_415 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_414); +if (lean_obj_tag(x_415) == 0) { -uint8_t x_410; -x_410 = !lean_is_exclusive(x_409); -if (x_410 == 0) +uint8_t x_416; +x_416 = !lean_is_exclusive(x_415); +if (x_416 == 0) { -return x_409; +return x_415; } else { -lean_object* x_411; lean_object* x_412; -x_411 = lean_ctor_get(x_409, 0); -lean_inc(x_411); -lean_dec(x_409); -x_412 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_412, 0, x_411); -return x_412; -} -} -else -{ -uint8_t x_413; -x_413 = !lean_is_exclusive(x_409); -if (x_413 == 0) -{ -lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; -x_414 = lean_ctor_get(x_409, 0); -x_415 = lean_ctor_get(x_414, 0); -lean_inc(x_415); -x_416 = l_Lean_Parser_noFirstTokenInfo(x_415); -x_417 = lean_ctor_get(x_414, 1); +lean_object* x_417; lean_object* x_418; +x_417 = lean_ctor_get(x_415, 0); lean_inc(x_417); -lean_dec(x_414); -x_418 = lean_box(x_2); -x_419 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); -lean_closure_set(x_419, 0, x_418); -lean_closure_set(x_419, 1, x_417); -x_420 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_420, 0, x_416); -lean_ctor_set(x_420, 1, x_419); -lean_ctor_set(x_409, 0, x_420); -return x_409; +lean_dec(x_415); +x_418 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_418, 0, x_417); +return x_418; +} } else { -lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; -x_421 = lean_ctor_get(x_409, 0); +uint8_t x_419; +x_419 = !lean_is_exclusive(x_415); +if (x_419 == 0) +{ +lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; +x_420 = lean_ctor_get(x_415, 0); +x_421 = lean_ctor_get(x_420, 0); lean_inc(x_421); -lean_dec(x_409); -x_422 = lean_ctor_get(x_421, 0); -lean_inc(x_422); -x_423 = l_Lean_Parser_noFirstTokenInfo(x_422); -x_424 = lean_ctor_get(x_421, 1); -lean_inc(x_424); -lean_dec(x_421); -x_425 = lean_box(x_2); -x_426 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); -lean_closure_set(x_426, 0, x_425); -lean_closure_set(x_426, 1, x_424); -x_427 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_427, 0, x_423); -lean_ctor_set(x_427, 1, x_426); -x_428 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_428, 0, x_427); -return x_428; +x_422 = l_Lean_Parser_noFirstTokenInfo(x_421); +x_423 = lean_ctor_get(x_420, 1); +lean_inc(x_423); +lean_dec(x_420); +x_424 = lean_box(x_2); +x_425 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); +lean_closure_set(x_425, 0, x_424); +lean_closure_set(x_425, 1, x_423); +x_426 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_426, 0, x_422); +lean_ctor_set(x_426, 1, x_425); +lean_ctor_set(x_415, 0, x_426); +return x_415; +} +else +{ +lean_object* x_427; lean_object* x_428; lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; +x_427 = lean_ctor_get(x_415, 0); +lean_inc(x_427); +lean_dec(x_415); +x_428 = lean_ctor_get(x_427, 0); +lean_inc(x_428); +x_429 = l_Lean_Parser_noFirstTokenInfo(x_428); +x_430 = lean_ctor_get(x_427, 1); +lean_inc(x_430); +lean_dec(x_427); +x_431 = lean_box(x_2); +x_432 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); +lean_closure_set(x_432, 0, x_431); +lean_closure_set(x_432, 1, x_430); +x_433 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_433, 0, x_429); +lean_ctor_set(x_433, 1, x_432); +x_434 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_434, 0, x_433); +return x_434; } } } case 6: { -lean_object* x_429; lean_object* x_430; -x_429 = lean_ctor_get(x_3, 0); -lean_inc(x_429); +lean_object* x_435; lean_object* x_436; +x_435 = lean_ctor_get(x_3, 0); +lean_inc(x_435); lean_dec(x_3); -x_430 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_429); -if (lean_obj_tag(x_430) == 0) +x_436 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_435); +if (lean_obj_tag(x_436) == 0) { -uint8_t x_431; -x_431 = !lean_is_exclusive(x_430); -if (x_431 == 0) +uint8_t x_437; +x_437 = !lean_is_exclusive(x_436); +if (x_437 == 0) { -return x_430; +return x_436; } else { -lean_object* x_432; lean_object* x_433; -x_432 = lean_ctor_get(x_430, 0); -lean_inc(x_432); -lean_dec(x_430); -x_433 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_433, 0, x_432); -return x_433; +lean_object* x_438; lean_object* x_439; +x_438 = lean_ctor_get(x_436, 0); +lean_inc(x_438); +lean_dec(x_436); +x_439 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_439, 0, x_438); +return x_439; } } else { -uint8_t x_434; -x_434 = !lean_is_exclusive(x_430); -if (x_434 == 0) +uint8_t x_440; +x_440 = !lean_is_exclusive(x_436); +if (x_440 == 0) { -lean_object* x_435; uint8_t x_436; -x_435 = lean_ctor_get(x_430, 0); -x_436 = !lean_is_exclusive(x_435); -if (x_436 == 0) +lean_object* x_441; uint8_t x_442; +x_441 = lean_ctor_get(x_436, 0); +x_442 = !lean_is_exclusive(x_441); +if (x_442 == 0) { -lean_object* x_437; lean_object* x_438; lean_object* x_439; -x_437 = lean_ctor_get(x_435, 1); -x_438 = lean_box(x_2); -x_439 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_439, 0, x_438); -lean_closure_set(x_439, 1, x_437); -lean_ctor_set(x_435, 1, x_439); -return x_430; +lean_object* x_443; uint8_t x_444; lean_object* x_445; lean_object* x_446; lean_object* x_447; +x_443 = lean_ctor_get(x_441, 1); +x_444 = 0; +x_445 = lean_box(x_2); +x_446 = lean_box(x_444); +x_447 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_447, 0, x_445); +lean_closure_set(x_447, 1, x_443); +lean_closure_set(x_447, 2, x_446); +lean_ctor_set(x_441, 1, x_447); +return x_436; } else { -lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; -x_440 = lean_ctor_get(x_435, 0); -x_441 = lean_ctor_get(x_435, 1); -lean_inc(x_441); -lean_inc(x_440); -lean_dec(x_435); -x_442 = lean_box(x_2); -x_443 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_443, 0, x_442); -lean_closure_set(x_443, 1, x_441); -x_444 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_444, 0, x_440); -lean_ctor_set(x_444, 1, x_443); -lean_ctor_set(x_430, 0, x_444); -return x_430; +lean_object* x_448; lean_object* x_449; uint8_t x_450; lean_object* x_451; lean_object* x_452; lean_object* x_453; lean_object* x_454; +x_448 = lean_ctor_get(x_441, 0); +x_449 = lean_ctor_get(x_441, 1); +lean_inc(x_449); +lean_inc(x_448); +lean_dec(x_441); +x_450 = 0; +x_451 = lean_box(x_2); +x_452 = lean_box(x_450); +x_453 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_453, 0, x_451); +lean_closure_set(x_453, 1, x_449); +lean_closure_set(x_453, 2, x_452); +x_454 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_454, 0, x_448); +lean_ctor_set(x_454, 1, x_453); +lean_ctor_set(x_436, 0, x_454); +return x_436; } } else { -lean_object* x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; lean_object* x_452; -x_445 = lean_ctor_get(x_430, 0); -lean_inc(x_445); -lean_dec(x_430); -x_446 = lean_ctor_get(x_445, 0); -lean_inc(x_446); -x_447 = lean_ctor_get(x_445, 1); -lean_inc(x_447); -if (lean_is_exclusive(x_445)) { - lean_ctor_release(x_445, 0); - lean_ctor_release(x_445, 1); - x_448 = x_445; +lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; uint8_t x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; +x_455 = lean_ctor_get(x_436, 0); +lean_inc(x_455); +lean_dec(x_436); +x_456 = lean_ctor_get(x_455, 0); +lean_inc(x_456); +x_457 = lean_ctor_get(x_455, 1); +lean_inc(x_457); +if (lean_is_exclusive(x_455)) { + lean_ctor_release(x_455, 0); + lean_ctor_release(x_455, 1); + x_458 = x_455; } else { - lean_dec_ref(x_445); - x_448 = lean_box(0); + lean_dec_ref(x_455); + x_458 = lean_box(0); } -x_449 = lean_box(x_2); -x_450 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_450, 0, x_449); -lean_closure_set(x_450, 1, x_447); -if (lean_is_scalar(x_448)) { - x_451 = lean_alloc_ctor(0, 2, 0); +x_459 = 0; +x_460 = lean_box(x_2); +x_461 = lean_box(x_459); +x_462 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_462, 0, x_460); +lean_closure_set(x_462, 1, x_457); +lean_closure_set(x_462, 2, x_461); +if (lean_is_scalar(x_458)) { + x_463 = lean_alloc_ctor(0, 2, 0); } else { - x_451 = x_448; + x_463 = x_458; } -lean_ctor_set(x_451, 0, x_446); -lean_ctor_set(x_451, 1, x_450); -x_452 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_452, 0, x_451); -return x_452; +lean_ctor_set(x_463, 0, x_456); +lean_ctor_set(x_463, 1, x_462); +x_464 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_464, 0, x_463); +return x_464; } } } case 7: { -lean_object* x_453; lean_object* x_454; lean_object* x_455; -x_453 = lean_ctor_get(x_3, 0); -lean_inc(x_453); -x_454 = lean_ctor_get(x_3, 1); -lean_inc(x_454); -lean_dec(x_3); -x_455 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_453); -if (lean_obj_tag(x_455) == 0) -{ -uint8_t x_456; -lean_dec(x_454); -x_456 = !lean_is_exclusive(x_455); -if (x_456 == 0) -{ -return x_455; -} -else -{ -lean_object* x_457; lean_object* x_458; -x_457 = lean_ctor_get(x_455, 0); -lean_inc(x_457); -lean_dec(x_455); -x_458 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_458, 0, x_457); -return x_458; -} -} -else -{ -lean_object* x_459; lean_object* x_460; -x_459 = lean_ctor_get(x_455, 0); -lean_inc(x_459); -lean_dec(x_455); -x_460 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_454); -if (lean_obj_tag(x_460) == 0) -{ -uint8_t x_461; -lean_dec(x_459); -x_461 = !lean_is_exclusive(x_460); -if (x_461 == 0) -{ -return x_460; -} -else -{ -lean_object* x_462; lean_object* x_463; -x_462 = lean_ctor_get(x_460, 0); -lean_inc(x_462); -lean_dec(x_460); -x_463 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_463, 0, x_462); -return x_463; -} -} -else -{ -uint8_t x_464; -x_464 = !lean_is_exclusive(x_460); -if (x_464 == 0) -{ -lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; lean_object* x_470; uint8_t x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; -x_465 = lean_ctor_get(x_460, 0); -x_466 = lean_ctor_get(x_459, 0); +lean_object* x_465; lean_object* x_466; lean_object* x_467; +x_465 = lean_ctor_get(x_3, 0); +lean_inc(x_465); +x_466 = lean_ctor_get(x_3, 1); lean_inc(x_466); -x_467 = lean_ctor_get(x_465, 0); -lean_inc(x_467); -x_468 = l_Lean_Parser_sepByInfo(x_466, x_467); -x_469 = lean_ctor_get(x_459, 1); -lean_inc(x_469); -lean_dec(x_459); -x_470 = lean_ctor_get(x_465, 1); -lean_inc(x_470); -lean_dec(x_465); -x_471 = 0; -x_472 = lean_box(x_2); -x_473 = lean_box(x_471); -x_474 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); -lean_closure_set(x_474, 0, x_472); -lean_closure_set(x_474, 1, x_473); -lean_closure_set(x_474, 2, x_469); -lean_closure_set(x_474, 3, x_470); -x_475 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_475, 0, x_468); -lean_ctor_set(x_475, 1, x_474); -lean_ctor_set(x_460, 0, x_475); -return x_460; +lean_dec(x_3); +x_467 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_465); +if (lean_obj_tag(x_467) == 0) +{ +uint8_t x_468; +lean_dec(x_466); +x_468 = !lean_is_exclusive(x_467); +if (x_468 == 0) +{ +return x_467; } else { -lean_object* x_476; lean_object* x_477; lean_object* x_478; lean_object* x_479; lean_object* x_480; lean_object* x_481; uint8_t x_482; lean_object* x_483; lean_object* x_484; lean_object* x_485; lean_object* x_486; lean_object* x_487; -x_476 = lean_ctor_get(x_460, 0); -lean_inc(x_476); -lean_dec(x_460); -x_477 = lean_ctor_get(x_459, 0); -lean_inc(x_477); -x_478 = lean_ctor_get(x_476, 0); +lean_object* x_469; lean_object* x_470; +x_469 = lean_ctor_get(x_467, 0); +lean_inc(x_469); +lean_dec(x_467); +x_470 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_470, 0, x_469); +return x_470; +} +} +else +{ +lean_object* x_471; lean_object* x_472; +x_471 = lean_ctor_get(x_467, 0); +lean_inc(x_471); +lean_dec(x_467); +x_472 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_466); +if (lean_obj_tag(x_472) == 0) +{ +uint8_t x_473; +lean_dec(x_471); +x_473 = !lean_is_exclusive(x_472); +if (x_473 == 0) +{ +return x_472; +} +else +{ +lean_object* x_474; lean_object* x_475; +x_474 = lean_ctor_get(x_472, 0); +lean_inc(x_474); +lean_dec(x_472); +x_475 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_475, 0, x_474); +return x_475; +} +} +else +{ +uint8_t x_476; +x_476 = !lean_is_exclusive(x_472); +if (x_476 == 0) +{ +lean_object* x_477; lean_object* x_478; lean_object* x_479; lean_object* x_480; lean_object* x_481; lean_object* x_482; uint8_t x_483; lean_object* x_484; lean_object* x_485; lean_object* x_486; lean_object* x_487; +x_477 = lean_ctor_get(x_472, 0); +x_478 = lean_ctor_get(x_471, 0); lean_inc(x_478); -x_479 = l_Lean_Parser_sepByInfo(x_477, x_478); -x_480 = lean_ctor_get(x_459, 1); -lean_inc(x_480); -lean_dec(x_459); -x_481 = lean_ctor_get(x_476, 1); +x_479 = lean_ctor_get(x_477, 0); +lean_inc(x_479); +x_480 = l_Lean_Parser_sepByInfo(x_478, x_479); +x_481 = lean_ctor_get(x_471, 1); lean_inc(x_481); -lean_dec(x_476); -x_482 = 0; -x_483 = lean_box(x_2); -x_484 = lean_box(x_482); -x_485 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); -lean_closure_set(x_485, 0, x_483); -lean_closure_set(x_485, 1, x_484); -lean_closure_set(x_485, 2, x_480); -lean_closure_set(x_485, 3, x_481); -x_486 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_486, 0, x_479); -lean_ctor_set(x_486, 1, x_485); -x_487 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_487, 0, x_486); -return x_487; +lean_dec(x_471); +x_482 = lean_ctor_get(x_477, 1); +lean_inc(x_482); +lean_dec(x_477); +x_483 = 0; +x_484 = lean_box(x_2); +x_485 = lean_box(x_483); +x_486 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); +lean_closure_set(x_486, 0, x_484); +lean_closure_set(x_486, 1, x_485); +lean_closure_set(x_486, 2, x_481); +lean_closure_set(x_486, 3, x_482); +x_487 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_487, 0, x_480); +lean_ctor_set(x_487, 1, x_486); +lean_ctor_set(x_472, 0, x_487); +return x_472; +} +else +{ +lean_object* x_488; lean_object* x_489; lean_object* x_490; lean_object* x_491; lean_object* x_492; lean_object* x_493; uint8_t x_494; lean_object* x_495; lean_object* x_496; lean_object* x_497; lean_object* x_498; lean_object* x_499; +x_488 = lean_ctor_get(x_472, 0); +lean_inc(x_488); +lean_dec(x_472); +x_489 = lean_ctor_get(x_471, 0); +lean_inc(x_489); +x_490 = lean_ctor_get(x_488, 0); +lean_inc(x_490); +x_491 = l_Lean_Parser_sepByInfo(x_489, x_490); +x_492 = lean_ctor_get(x_471, 1); +lean_inc(x_492); +lean_dec(x_471); +x_493 = lean_ctor_get(x_488, 1); +lean_inc(x_493); +lean_dec(x_488); +x_494 = 0; +x_495 = lean_box(x_2); +x_496 = lean_box(x_494); +x_497 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); +lean_closure_set(x_497, 0, x_495); +lean_closure_set(x_497, 1, x_496); +lean_closure_set(x_497, 2, x_492); +lean_closure_set(x_497, 3, x_493); +x_498 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_498, 0, x_491); +lean_ctor_set(x_498, 1, x_497); +x_499 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_499, 0, x_498); +return x_499; } } } } case 8: { -lean_object* x_488; lean_object* x_489; lean_object* x_490; -x_488 = lean_ctor_get(x_3, 0); -lean_inc(x_488); -x_489 = lean_ctor_get(x_3, 1); -lean_inc(x_489); -lean_dec(x_3); -x_490 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_488); -if (lean_obj_tag(x_490) == 0) -{ -uint8_t x_491; -lean_dec(x_489); -x_491 = !lean_is_exclusive(x_490); -if (x_491 == 0) -{ -return x_490; -} -else -{ -lean_object* x_492; lean_object* x_493; -x_492 = lean_ctor_get(x_490, 0); -lean_inc(x_492); -lean_dec(x_490); -x_493 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_493, 0, x_492); -return x_493; -} -} -else -{ -lean_object* x_494; lean_object* x_495; -x_494 = lean_ctor_get(x_490, 0); -lean_inc(x_494); -lean_dec(x_490); -x_495 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_489); -if (lean_obj_tag(x_495) == 0) -{ -uint8_t x_496; -lean_dec(x_494); -x_496 = !lean_is_exclusive(x_495); -if (x_496 == 0) -{ -return x_495; -} -else -{ -lean_object* x_497; lean_object* x_498; -x_497 = lean_ctor_get(x_495, 0); -lean_inc(x_497); -lean_dec(x_495); -x_498 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_498, 0, x_497); -return x_498; -} -} -else -{ -uint8_t x_499; -x_499 = !lean_is_exclusive(x_495); -if (x_499 == 0) -{ -lean_object* x_500; lean_object* x_501; lean_object* x_502; lean_object* x_503; lean_object* x_504; lean_object* x_505; uint8_t x_506; lean_object* x_507; lean_object* x_508; lean_object* x_509; lean_object* x_510; -x_500 = lean_ctor_get(x_495, 0); -x_501 = lean_ctor_get(x_494, 0); +lean_object* x_500; lean_object* x_501; lean_object* x_502; +x_500 = lean_ctor_get(x_3, 0); +lean_inc(x_500); +x_501 = lean_ctor_get(x_3, 1); lean_inc(x_501); -x_502 = lean_ctor_get(x_500, 0); -lean_inc(x_502); -x_503 = l_Lean_Parser_sepBy1Info(x_501, x_502); -x_504 = lean_ctor_get(x_494, 1); -lean_inc(x_504); -lean_dec(x_494); -x_505 = lean_ctor_get(x_500, 1); -lean_inc(x_505); -lean_dec(x_500); -x_506 = 0; -x_507 = lean_box(x_2); -x_508 = lean_box(x_506); -x_509 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_509, 0, x_507); -lean_closure_set(x_509, 1, x_508); -lean_closure_set(x_509, 2, x_504); -lean_closure_set(x_509, 3, x_505); -x_510 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_510, 0, x_503); -lean_ctor_set(x_510, 1, x_509); -lean_ctor_set(x_495, 0, x_510); -return x_495; +lean_dec(x_3); +x_502 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_500); +if (lean_obj_tag(x_502) == 0) +{ +uint8_t x_503; +lean_dec(x_501); +x_503 = !lean_is_exclusive(x_502); +if (x_503 == 0) +{ +return x_502; } else { -lean_object* x_511; lean_object* x_512; lean_object* x_513; lean_object* x_514; lean_object* x_515; lean_object* x_516; uint8_t x_517; lean_object* x_518; lean_object* x_519; lean_object* x_520; lean_object* x_521; lean_object* x_522; -x_511 = lean_ctor_get(x_495, 0); -lean_inc(x_511); -lean_dec(x_495); -x_512 = lean_ctor_get(x_494, 0); -lean_inc(x_512); -x_513 = lean_ctor_get(x_511, 0); +lean_object* x_504; lean_object* x_505; +x_504 = lean_ctor_get(x_502, 0); +lean_inc(x_504); +lean_dec(x_502); +x_505 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_505, 0, x_504); +return x_505; +} +} +else +{ +lean_object* x_506; lean_object* x_507; +x_506 = lean_ctor_get(x_502, 0); +lean_inc(x_506); +lean_dec(x_502); +x_507 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_501); +if (lean_obj_tag(x_507) == 0) +{ +uint8_t x_508; +lean_dec(x_506); +x_508 = !lean_is_exclusive(x_507); +if (x_508 == 0) +{ +return x_507; +} +else +{ +lean_object* x_509; lean_object* x_510; +x_509 = lean_ctor_get(x_507, 0); +lean_inc(x_509); +lean_dec(x_507); +x_510 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_510, 0, x_509); +return x_510; +} +} +else +{ +uint8_t x_511; +x_511 = !lean_is_exclusive(x_507); +if (x_511 == 0) +{ +lean_object* x_512; lean_object* x_513; lean_object* x_514; lean_object* x_515; lean_object* x_516; lean_object* x_517; uint8_t x_518; lean_object* x_519; lean_object* x_520; lean_object* x_521; lean_object* x_522; +x_512 = lean_ctor_get(x_507, 0); +x_513 = lean_ctor_get(x_506, 0); lean_inc(x_513); -x_514 = l_Lean_Parser_sepBy1Info(x_512, x_513); -x_515 = lean_ctor_get(x_494, 1); -lean_inc(x_515); -lean_dec(x_494); -x_516 = lean_ctor_get(x_511, 1); +x_514 = lean_ctor_get(x_512, 0); +lean_inc(x_514); +x_515 = l_Lean_Parser_sepBy1Info(x_513, x_514); +x_516 = lean_ctor_get(x_506, 1); lean_inc(x_516); -lean_dec(x_511); -x_517 = 0; -x_518 = lean_box(x_2); -x_519 = lean_box(x_517); -x_520 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); -lean_closure_set(x_520, 0, x_518); -lean_closure_set(x_520, 1, x_519); -lean_closure_set(x_520, 2, x_515); -lean_closure_set(x_520, 3, x_516); -x_521 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_521, 0, x_514); -lean_ctor_set(x_521, 1, x_520); -x_522 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_522, 0, x_521); -return x_522; +lean_dec(x_506); +x_517 = lean_ctor_get(x_512, 1); +lean_inc(x_517); +lean_dec(x_512); +x_518 = 0; +x_519 = lean_box(x_2); +x_520 = lean_box(x_518); +x_521 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); +lean_closure_set(x_521, 0, x_519); +lean_closure_set(x_521, 1, x_520); +lean_closure_set(x_521, 2, x_516); +lean_closure_set(x_521, 3, x_517); +x_522 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_522, 0, x_515); +lean_ctor_set(x_522, 1, x_521); +lean_ctor_set(x_507, 0, x_522); +return x_507; +} +else +{ +lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; lean_object* x_527; lean_object* x_528; uint8_t x_529; lean_object* x_530; lean_object* x_531; lean_object* x_532; lean_object* x_533; lean_object* x_534; +x_523 = lean_ctor_get(x_507, 0); +lean_inc(x_523); +lean_dec(x_507); +x_524 = lean_ctor_get(x_506, 0); +lean_inc(x_524); +x_525 = lean_ctor_get(x_523, 0); +lean_inc(x_525); +x_526 = l_Lean_Parser_sepBy1Info(x_524, x_525); +x_527 = lean_ctor_get(x_506, 1); +lean_inc(x_527); +lean_dec(x_506); +x_528 = lean_ctor_get(x_523, 1); +lean_inc(x_528); +lean_dec(x_523); +x_529 = 0; +x_530 = lean_box(x_2); +x_531 = lean_box(x_529); +x_532 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 7, 4); +lean_closure_set(x_532, 0, x_530); +lean_closure_set(x_532, 1, x_531); +lean_closure_set(x_532, 2, x_527); +lean_closure_set(x_532, 3, x_528); +x_533 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_533, 0, x_526); +lean_ctor_set(x_533, 1, x_532); +x_534 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_534, 0, x_533); +return x_534; } } } } case 9: { -lean_object* x_523; lean_object* x_524; lean_object* x_525; -x_523 = lean_ctor_get(x_3, 0); -lean_inc(x_523); -x_524 = lean_ctor_get(x_3, 1); -lean_inc(x_524); -lean_dec(x_3); -x_525 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_524); -if (lean_obj_tag(x_525) == 0) -{ -uint8_t x_526; -lean_dec(x_523); -x_526 = !lean_is_exclusive(x_525); -if (x_526 == 0) -{ -return x_525; -} -else -{ -lean_object* x_527; lean_object* x_528; -x_527 = lean_ctor_get(x_525, 0); -lean_inc(x_527); -lean_dec(x_525); -x_528 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_528, 0, x_527); -return x_528; -} -} -else -{ -uint8_t x_529; -x_529 = !lean_is_exclusive(x_525); -if (x_529 == 0) -{ -lean_object* x_530; lean_object* x_531; lean_object* x_532; lean_object* x_533; lean_object* x_534; lean_object* x_535; -x_530 = lean_ctor_get(x_525, 0); -x_531 = lean_ctor_get(x_530, 0); -lean_inc(x_531); -lean_inc(x_523); -x_532 = l_Lean_Parser_nodeInfo(x_523, x_531); -x_533 = lean_ctor_get(x_530, 1); -lean_inc(x_533); -lean_dec(x_530); -x_534 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_534, 0, x_523); -lean_closure_set(x_534, 1, x_533); -x_535 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_535, 0, x_532); -lean_ctor_set(x_535, 1, x_534); -lean_ctor_set(x_525, 0, x_535); -return x_525; -} -else -{ -lean_object* x_536; lean_object* x_537; lean_object* x_538; lean_object* x_539; lean_object* x_540; lean_object* x_541; lean_object* x_542; -x_536 = lean_ctor_get(x_525, 0); +lean_object* x_535; lean_object* x_536; lean_object* x_537; +x_535 = lean_ctor_get(x_3, 0); +lean_inc(x_535); +x_536 = lean_ctor_get(x_3, 1); lean_inc(x_536); -lean_dec(x_525); -x_537 = lean_ctor_get(x_536, 0); -lean_inc(x_537); -lean_inc(x_523); -x_538 = l_Lean_Parser_nodeInfo(x_523, x_537); -x_539 = lean_ctor_get(x_536, 1); +lean_dec(x_3); +x_537 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_536); +if (lean_obj_tag(x_537) == 0) +{ +uint8_t x_538; +lean_dec(x_535); +x_538 = !lean_is_exclusive(x_537); +if (x_538 == 0) +{ +return x_537; +} +else +{ +lean_object* x_539; lean_object* x_540; +x_539 = lean_ctor_get(x_537, 0); lean_inc(x_539); -lean_dec(x_536); -x_540 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_540, 0, x_523); -lean_closure_set(x_540, 1, x_539); -x_541 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_541, 0, x_538); -lean_ctor_set(x_541, 1, x_540); -x_542 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_542, 0, x_541); -return x_542; +lean_dec(x_537); +x_540 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_540, 0, x_539); +return x_540; +} +} +else +{ +uint8_t x_541; +x_541 = !lean_is_exclusive(x_537); +if (x_541 == 0) +{ +lean_object* x_542; lean_object* x_543; lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; +x_542 = lean_ctor_get(x_537, 0); +x_543 = lean_ctor_get(x_542, 0); +lean_inc(x_543); +lean_inc(x_535); +x_544 = l_Lean_Parser_nodeInfo(x_535, x_543); +x_545 = lean_ctor_get(x_542, 1); +lean_inc(x_545); +lean_dec(x_542); +x_546 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_546, 0, x_535); +lean_closure_set(x_546, 1, x_545); +x_547 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_547, 0, x_544); +lean_ctor_set(x_547, 1, x_546); +lean_ctor_set(x_537, 0, x_547); +return x_537; +} +else +{ +lean_object* x_548; lean_object* x_549; lean_object* x_550; lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; +x_548 = lean_ctor_get(x_537, 0); +lean_inc(x_548); +lean_dec(x_537); +x_549 = lean_ctor_get(x_548, 0); +lean_inc(x_549); +lean_inc(x_535); +x_550 = l_Lean_Parser_nodeInfo(x_535, x_549); +x_551 = lean_ctor_get(x_548, 1); +lean_inc(x_551); +lean_dec(x_548); +x_552 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_552, 0, x_535); +lean_closure_set(x_552, 1, x_551); +x_553 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_553, 0, x_550); +lean_ctor_set(x_553, 1, x_552); +x_554 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_554, 0, x_553); +return x_554; } } } case 10: { -lean_object* x_543; lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; lean_object* x_548; lean_object* x_549; lean_object* x_550; -x_543 = lean_ctor_get(x_3, 0); -lean_inc(x_543); -x_544 = lean_ctor_get(x_3, 1); -lean_inc(x_544); +lean_object* x_555; lean_object* x_556; lean_object* x_557; lean_object* x_558; lean_object* x_559; lean_object* x_560; lean_object* x_561; lean_object* x_562; +x_555 = lean_ctor_get(x_3, 0); +lean_inc(x_555); +x_556 = lean_ctor_get(x_3, 1); +lean_inc(x_556); lean_dec(x_3); -x_545 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_545, 0, x_544); -x_546 = l_String_trim(x_543); -lean_dec(x_543); -lean_inc(x_546); -x_547 = l_Lean_Parser_symbolInfo(x_546, x_545); -x_548 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); -lean_closure_set(x_548, 0, x_546); -x_549 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_549, 0, x_547); -lean_ctor_set(x_549, 1, x_548); -x_550 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_550, 0, x_549); -return x_550; +x_557 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_557, 0, x_556); +x_558 = l_String_trim(x_555); +lean_dec(x_555); +lean_inc(x_558); +x_559 = l_Lean_Parser_symbolInfo(x_558, x_557); +x_560 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); +lean_closure_set(x_560, 0, x_558); +x_561 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_561, 0, x_559); +lean_ctor_set(x_561, 1, x_560); +x_562 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_562, 0, x_561); +return x_562; } case 11: { -lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; lean_object* x_555; lean_object* x_556; lean_object* x_557; lean_object* x_558; lean_object* x_559; lean_object* x_560; -x_551 = lean_ctor_get(x_3, 0); -lean_inc(x_551); -x_552 = lean_ctor_get(x_3, 1); -lean_inc(x_552); -x_553 = lean_ctor_get(x_3, 2); -lean_inc(x_553); +lean_object* x_563; lean_object* x_564; lean_object* x_565; lean_object* x_566; lean_object* x_567; lean_object* x_568; lean_object* x_569; lean_object* x_570; lean_object* x_571; lean_object* x_572; +x_563 = lean_ctor_get(x_3, 0); +lean_inc(x_563); +x_564 = lean_ctor_get(x_3, 1); +lean_inc(x_564); +x_565 = lean_ctor_get(x_3, 2); +lean_inc(x_565); lean_dec(x_3); -x_554 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_554, 0, x_553); -x_555 = l_String_trim(x_551); -lean_dec(x_551); -x_556 = l_String_trim(x_552); -lean_dec(x_552); -lean_inc(x_556); -lean_inc(x_555); -x_557 = l_Lean_Parser_unicodeSymbolInfo(x_555, x_556, x_554); -x_558 = lean_alloc_closure((void*)(l_Lean_Parser_unicodeSymbolFn___rarg___boxed), 5, 2); -lean_closure_set(x_558, 0, x_555); -lean_closure_set(x_558, 1, x_556); -x_559 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_559, 0, x_557); -lean_ctor_set(x_559, 1, x_558); -x_560 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_560, 0, x_559); -return x_560; +x_566 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_566, 0, x_565); +x_567 = l_String_trim(x_563); +lean_dec(x_563); +x_568 = l_String_trim(x_564); +lean_dec(x_564); +lean_inc(x_568); +lean_inc(x_567); +x_569 = l_Lean_Parser_unicodeSymbolInfo(x_567, x_568, x_566); +x_570 = lean_alloc_closure((void*)(l_Lean_Parser_unicodeSymbolFn___rarg___boxed), 5, 2); +lean_closure_set(x_570, 0, x_567); +lean_closure_set(x_570, 1, x_568); +x_571 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_571, 0, x_569); +lean_ctor_set(x_571, 1, x_570); +x_572 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_572, 0, x_571); +return x_572; } default: { -lean_object* x_561; -x_561 = l_Lean_Parser_compileParserDescr___main___closed__2; -return x_561; +lean_object* x_573; +x_573 = l_Lean_Parser_compileParserDescr___main___closed__2; +return x_573; } } } diff --git a/stage0/stdlib/Init/Lean/Parser/Term.c b/stage0/stdlib/Init/Lean/Parser/Term.c index 542bd68a4a..69283a3b0d 100644 --- a/stage0/stdlib/Init/Lean/Parser/Term.c +++ b/stage0/stdlib/Init/Lean/Parser/Term.c @@ -317,7 +317,6 @@ lean_object* l_Lean_Parser_Term_letPatDecl___closed__4; lean_object* l_Lean_Parser_Term_if___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_or___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_quotedName___closed__5; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_have___elambda__1___closed__11; lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__12; lean_object* l_Lean_Parser_Term_match__syntax___closed__3; @@ -386,7 +385,6 @@ lean_object* l___regBuiltinParser_Lean_Parser_Term_let(lean_object*); lean_object* l_Lean_Parser_Term_doPat___closed__8; lean_object* l_Lean_Parser_Term_id___closed__4; lean_object* l_Lean_Parser_Term_show___closed__6; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_nomatch___elambda__1___closed__9; lean_object* l_Lean_Parser_Term_listLit___closed__4; lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__7; @@ -466,12 +464,10 @@ lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match__syntax___ lean_object* l_Lean_Parser_Term_explicitUniv___closed__10; lean_object* l_Lean_Parser_Term_do___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_where___closed__6; -lean_object* l_Lean_Parser_Term_stxQuot___closed__6; lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_tparser_x21___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__14; lean_object* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__9; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_prod___closed__3; lean_object* l_Lean_Parser_Term_doId___closed__4; lean_object* l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1; @@ -498,7 +494,6 @@ lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_ lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___spec__1(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__13; extern lean_object* l_Sigma_HasRepr___rarg___closed__2; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__9; lean_object* l_Lean_Parser_Term_letPatDecl___closed__6; lean_object* l_Lean_Parser_Term_bor___closed__1; lean_object* l_Lean_Parser_Term_match___elambda__1___closed__7; @@ -527,7 +522,6 @@ lean_object* l_Lean_Parser_Term_letPatDecl___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_infixR___elambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_div___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_sort___elambda__1___closed__3; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_arrayLit___closed__6; lean_object* l_Lean_Parser_Term_letEqns___closed__7; lean_object* l_Lean_Parser_Term_str; @@ -697,7 +691,6 @@ lean_object* l_Lean_Parser_Term_suffices___elambda__1(lean_object*, lean_object* lean_object* l_Lean_Parser_Term_fromTerm___closed__2; lean_object* l_Lean_Parser_Term_id___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_type___elambda__1___closed__5; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_let___closed__4; 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*); @@ -941,7 +934,6 @@ lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__19; lean_object* l_Lean_Parser_Term_implicitBinder___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_structInst___closed__3; lean_object* l_Lean_Parser_Term_inaccessible___elambda__1___closed__3; -lean_object* l_Lean_Parser_Term_stxQuot; lean_object* l_Lean_Parser_Term_bracketedDoSeq___closed__1; lean_object* l_Lean_Parser_Term_namedPattern___elambda__1___closed__10; lean_object* l_Lean_Parser_Term_instBinder___elambda__1___closed__1; @@ -950,7 +942,6 @@ extern lean_object* l_List_repr___rarg___closed__2; lean_object* l_Lean_Parser_Term_match___closed__2; lean_object* l_Lean_Parser_Term_binderIdent___closed__2; lean_object* l_Lean_Parser_Term_instBinder___elambda__1___closed__4; -lean_object* l_Lean_Parser_Term_stxQuot___closed__2; lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_append___closed__1; lean_object* l_Lean_Parser_Term_tparser_x21___elambda__1___closed__1; @@ -1194,7 +1185,6 @@ lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__12; lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_where___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__12; lean_object* l___regBuiltinParser_Lean_Parser_Term_beq(lean_object*); -lean_object* l_Lean_Parser_Term_stxQuot___closed__3; lean_object* l_Lean_Parser_Term_tparser_x21___closed__5; lean_object* l_Lean_Parser_Term_binderTactic___closed__4; lean_object* l_Lean_Parser_Term_prop___closed__5; @@ -1265,7 +1255,6 @@ lean_object* l_Lean_Parser_Term_beq___closed__3; lean_object* l_Lean_Parser_Term_id___closed__1; lean_object* l_Lean_Parser_Term_haveAssign___closed__6; lean_object* l_Lean_Parser_Term_arrayRef___closed__2; -lean_object* l_Lean_Parser_Term_stxQuot___closed__5; extern lean_object* l_Lean_Parser_appPrec; lean_object* l_Lean_Parser_Term_bnot___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_arrayRef___elambda__1___closed__4; @@ -1512,7 +1501,6 @@ lean_object* l_Lean_Parser_Term_forall___closed__8; lean_object* l_Lean_Parser_Term_fromTerm___closed__6; lean_object* l_Lean_Parser_Term_type; lean_object* l_Lean_Parser_Term_pow___closed__1; -lean_object* l___regBuiltinParser_Lean_Parser_Term_stxQuot(lean_object*); lean_object* l_Lean_Parser_Term_binderType___closed__4; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_let___elambda__1___closed__4; @@ -1536,7 +1524,6 @@ lean_object* l_Lean_Parser_Term_pow___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_binderDefault___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_id___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_cons___elambda__1___closed__2; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__11; lean_object* l_Lean_Parser_Term_borrowed___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_if___closed__6; @@ -1649,7 +1636,6 @@ lean_object* l_Lean_Parser_Term_fcomp___closed__3; lean_object* l_Lean_Parser_Term_doLet___closed__2; lean_object* l_Lean_Parser_Term_type___closed__5; lean_object* l_Lean_Parser_Term_match___elambda__1___closed__10; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_unicodeInfixR___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_andthen___closed__1; lean_object* l_Lean_Parser_Term_and___elambda__1___closed__3; @@ -1728,7 +1714,6 @@ lean_object* l_Lean_Parser_Term_ne___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_paren___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_explicitUniv___closed__11; lean_object* l_Lean_Parser_Term_arrayLit___closed__1; -lean_object* l_Lean_Parser_Term_stxQuot___closed__1; lean_object* l_Lean_Parser_Term_nomatch___closed__5; lean_object* l_Lean_Parser_Term_beq___closed__1; lean_object* l_Lean_Parser_Term_fun___closed__2; @@ -1764,7 +1749,7 @@ lean_object* l_Lean_Parser_Term_suffices; lean_object* l_Lean_Parser_Term_mapConstRev; lean_object* l_Lean_Parser_Term_iff; lean_object* l_Lean_Parser_Term_iff___elambda__1___closed__5; -lean_object* l_Lean_Parser_many1Fn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_many1Fn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_letIdLhs; lean_object* l_Lean_Parser_Term_show___elambda__1___closed__9; lean_object* l_Lean_Parser_Term_subtype___closed__8; @@ -1798,7 +1783,6 @@ lean_object* l_Lean_Parser_Term_ne; lean_object* l_Lean_Parser_Term_match___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_binderIdent___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_char___elambda__1___closed__2; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_borrowed___elambda__1___closed__6; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_borrowed(lean_object*); @@ -1866,7 +1850,6 @@ lean_object* l_Lean_Parser_Term_arrayLit___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_fromTerm___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_andM___elambda__1___closed__4; -lean_object* l_Lean_Parser_Term_stxQuot___closed__4; lean_object* l_Lean_Parser_Term_doExpr___closed__3; lean_object* l_Lean_Parser_Term_binderTactic___closed__3; lean_object* l_Lean_Parser_Term_doId___closed__6; @@ -1911,7 +1894,6 @@ lean_object* l_Lean_Parser_fieldIdxFn(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_arrayRef___closed__3; lean_object* l_Lean_Parser_Term_typeSpec___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_hole___closed__1; -lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_match___elambda__1___closed__13; lean_object* l_Lean_Parser_Term_prop___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_inaccessible___elambda__1___closed__4; @@ -16737,14 +16719,17 @@ return x_2; lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__3() { _start: { -uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +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; -x_3 = lean_box(x_1); -x_4 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 5, 2); -lean_closure_set(x_4, 0, x_3); -lean_closure_set(x_4, 1, x_2); -return x_4; +x_3 = 0; +x_4 = lean_box(x_1); +x_5 = lean_box(x_3); +x_6 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_6, 0, x_4); +lean_closure_set(x_6, 1, x_2); +lean_closure_set(x_6, 2, x_5); +return x_6; } } lean_object* _init_l_Lean_Parser_Term_explicitBinder___closed__4() { @@ -22092,399 +22077,6 @@ x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); return x_6; } } -lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("stxQuot"); -return x_1; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__2; -x_2 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___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_stxQuot___elambda__1___closed__4() { -_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_Term_stxQuot___elambda__1___closed__1; -x_3 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__3; -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_Term_stxQuot___elambda__1___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("`("); -return x_1; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__5; -x_2 = l_String_trim(x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__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_Term_stxQuot___elambda__1___closed__6; -x_3 = lean_string_append(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__8() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__7; -x_2 = l_Char_HasRepr___closed__1; -x_3 = lean_string_append(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___elambda__1___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_Term_stxQuot___elambda__1___closed__8; -x_3 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_3, 0, x_2); -lean_ctor_set(x_3, 1, x_1); -return x_3; -} -} -lean_object* l_Lean_Parser_Term_stxQuot___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_Term_stxQuot___elambda__1___closed__4; -x_5 = lean_ctor_get(x_4, 1); -lean_inc(x_5); -x_6 = lean_ctor_get(x_3, 0); -lean_inc(x_6); -x_7 = lean_array_get_size(x_6); -lean_dec(x_6); -x_8 = lean_ctor_get(x_3, 1); -lean_inc(x_8); -lean_inc(x_2); -x_9 = lean_apply_3(x_5, x_1, x_2, x_3); -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_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_2); -return x_9; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_56; lean_object* x_57; -lean_inc(x_8); -x_14 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); -lean_dec(x_7); -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_array_get_size(x_15); -lean_dec(x_15); -lean_inc(x_2); -x_56 = l_Lean_Parser_tokenFn(x_2, x_14); -x_57 = lean_ctor_get(x_56, 3); -lean_inc(x_57); -if (lean_obj_tag(x_57) == 0) -{ -lean_object* x_58; lean_object* x_59; -x_58 = lean_ctor_get(x_56, 0); -lean_inc(x_58); -x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_58); -lean_dec(x_58); -if (lean_obj_tag(x_59) == 2) -{ -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_Term_stxQuot___elambda__1___closed__6; -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_Term_stxQuot___elambda__1___closed__9; -lean_inc(x_8); -x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_63, x_8); -x_17 = x_64; -goto block_55; -} -else -{ -x_17 = x_56; -goto block_55; -} -} -else -{ -lean_object* x_65; lean_object* x_66; -lean_dec(x_59); -x_65 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__9; -lean_inc(x_8); -x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_65, x_8); -x_17 = x_66; -goto block_55; -} -} -else -{ -lean_object* x_67; lean_object* x_68; -lean_dec(x_57); -x_67 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__9; -lean_inc(x_8); -x_68 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_67, x_8); -x_17 = x_68; -goto block_55; -} -block_55: -{ -lean_object* x_18; -x_18 = lean_ctor_get(x_17, 3); -lean_inc(x_18); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = l_Lean_Parser_termParserAttribute; -x_20 = lean_unsigned_to_nat(0u); -lean_inc(x_2); -x_21 = l_Lean_Parser_ParserAttribute_runParserFn(x_19, x_20, x_2, x_17); -x_22 = lean_ctor_get(x_21, 3); -lean_inc(x_22); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -x_24 = l_Lean_Parser_tokenFn(x_2, x_21); -x_25 = lean_ctor_get(x_24, 3); -lean_inc(x_25); -if (lean_obj_tag(x_25) == 0) -{ -lean_object* x_26; lean_object* x_27; -x_26 = lean_ctor_get(x_24, 0); -lean_inc(x_26); -x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_26); -lean_dec(x_26); -if (lean_obj_tag(x_27) == 2) -{ -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_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_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_31, x_23); -x_33 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; -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); -return x_35; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -lean_dec(x_23); -x_36 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; -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); -return x_38; -} -} -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_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_39, x_23); -x_41 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; -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); -return x_43; -} -} -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_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_44, x_23); -x_46 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; -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); -return x_48; -} -} -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_Term_stxQuot___elambda__1___closed__2; -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); -return x_51; -} -} -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_Term_stxQuot___elambda__1___closed__2; -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); -return x_54; -} -} -} -} -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__6; -x_2 = l_Lean_Parser_Level_paren___closed__1; -x_3 = l_Lean_Parser_symbolInfo(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_stxQuot___closed__1; -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_Term_stxQuot___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; -x_2 = l_Lean_Parser_Term_stxQuot___closed__2; -x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__4; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -x_3 = l_Lean_Parser_Term_stxQuot___closed__3; -x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); -return x_4; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_stxQuot___elambda__1), 3, 0); -return x_1; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_stxQuot___closed__4; -x_2 = l_Lean_Parser_Term_stxQuot___closed__5; -x_3 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3, 0, x_1); -lean_ctor_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_stxQuot() { -_start: -{ -lean_object* x_1; -x_1 = l_Lean_Parser_Term_stxQuot___closed__6; -return x_1; -} -} -lean_object* l___regBuiltinParser_Lean_Parser_Term_stxQuot(lean_object* x_1) { -_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_builtinTermParsingTable; -x_4 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; -x_5 = l_Lean_Parser_Term_stxQuot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; -} -} lean_object* _init_l_Lean_Parser_Term_antiquot___closed__1() { _start: { @@ -38433,41 +38025,6 @@ lean_mark_persistent(l_Lean_Parser_Term_quotedName); res = l___regBuiltinParser_Lean_Parser_Term_quotedName(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__1 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__1(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__1); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__2 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__2(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__2); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__3 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__3(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__3); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__4 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__4(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__4); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__5 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__5(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__5); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__6 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__6(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__6); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__7 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__7(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__7); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__8 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__8(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__8); -l_Lean_Parser_Term_stxQuot___elambda__1___closed__9 = _init_l_Lean_Parser_Term_stxQuot___elambda__1___closed__9(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___elambda__1___closed__9); -l_Lean_Parser_Term_stxQuot___closed__1 = _init_l_Lean_Parser_Term_stxQuot___closed__1(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__1); -l_Lean_Parser_Term_stxQuot___closed__2 = _init_l_Lean_Parser_Term_stxQuot___closed__2(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__2); -l_Lean_Parser_Term_stxQuot___closed__3 = _init_l_Lean_Parser_Term_stxQuot___closed__3(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__3); -l_Lean_Parser_Term_stxQuot___closed__4 = _init_l_Lean_Parser_Term_stxQuot___closed__4(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__4); -l_Lean_Parser_Term_stxQuot___closed__5 = _init_l_Lean_Parser_Term_stxQuot___closed__5(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__5); -l_Lean_Parser_Term_stxQuot___closed__6 = _init_l_Lean_Parser_Term_stxQuot___closed__6(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot___closed__6); -l_Lean_Parser_Term_stxQuot = _init_l_Lean_Parser_Term_stxQuot(); -lean_mark_persistent(l_Lean_Parser_Term_stxQuot); -res = l___regBuiltinParser_Lean_Parser_Term_stxQuot(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); l_Lean_Parser_Term_antiquot___closed__1 = _init_l_Lean_Parser_Term_antiquot___closed__1(); lean_mark_persistent(l_Lean_Parser_Term_antiquot___closed__1); l_Lean_Parser_Term_antiquot = _init_l_Lean_Parser_Term_antiquot();