diff --git a/stage0/src/Init/Data/String/Basic.lean b/stage0/src/Init/Data/String/Basic.lean index 9673d385ea..c5309c9aa1 100644 --- a/stage0/src/Init/Data/String/Basic.lean +++ b/stage0/src/Init/Data/String/Basic.lean @@ -515,6 +515,12 @@ s.toSubstring.trimLeft.toString def trim (s : String) : String := s.toSubstring.trim.toString +@[inline] def nextWhile (s : String) (p : Char → Bool) (i : String.Pos) : String.Pos := +Substring.takeWhileAux s s.bsize p i + +@[inline] def nextUntil (s : String) (p : Char → Bool) (i : String.Pos) : String.Pos := +nextWhile s (fun c => !p c) i + end String protected def Char.toString (c : Char) : String := diff --git a/stage0/src/Init/Lean/Elab/Syntax.lean b/stage0/src/Init/Lean/Elab/Syntax.lean index 60599042e5..ccd725db13 100644 --- a/stage0/src/Init/Lean/Elab/Syntax.lean +++ b/stage0/src/Init/Lean/Elab/Syntax.lean @@ -86,11 +86,11 @@ partial def toParserDescrAux : Syntax → ToParserDescrM Syntax `(ParserDescr.symbol $(quote atom) $(quote rbp?)) | none => liftM throwUnsupportedSyntax else if kind == `Lean.Parser.Syntax.num then - `(ParserDescr.num) + `(ParserDescr.numLit) else if kind == `Lean.Parser.Syntax.str then - `(ParserDescr.str) + `(ParserDescr.strLit) else if kind == `Lean.Parser.Syntax.char then - `(ParserDescr.char) + `(ParserDescr.charLit) else if kind == `Lean.Parser.Syntax.ident then `(ParserDescr.ident) else if kind == `Lean.Parser.Syntax.try then do diff --git a/stage0/src/Init/Lean/Elab/Term.lean b/stage0/src/Init/Lean/Elab/Term.lean index 73ecacf2a8..59acf6b675 100644 --- a/stage0/src/Init/Lean/Elab/Term.lean +++ b/stage0/src/Init/Lean/Elab/Term.lean @@ -769,10 +769,9 @@ match result? with | none => let process (candidates : List (Name × List String)) : TermElabM (List (Expr × List String)) := do { when candidates.isEmpty $ do { - -- TODO: improve pretty printing - -- let extractionResult := extractMacroScopes n; - -- env ← getEnv; - throwError ref ("unknown identifier '" ++ toString n ++ "'") + mainModule ← getMainModule; + let view := extractMacroScopes n; + throwError ref ("unknown identifier '" ++ view.format mainModule ++ "'") }; mkConsts ref candidates explicitLevels }; @@ -831,9 +830,10 @@ fun stx _ => do fun stx expectedType? => elabRawCharLit (stx.getArg 0) expectedType? @[builtinTermElab quotedName] def elabQuotedName : TermElab := -fun stx _ => match_syntax stx with -| `(`$n) => pure $ toExpr n.getId -| _ => throwUnsupportedSyntax +fun stx _ => + match (stx.getArg 0).isNameLit? with + | some val => pure $ toExpr val + | none => throwError stx "ill-formed syntax" end Term diff --git a/stage0/src/Init/Lean/Elab/Util.lean b/stage0/src/Init/Lean/Elab/Util.lean index 2c47d4af3f..e068d4f139 100644 --- a/stage0/src/Init/Lean/Elab/Util.lean +++ b/stage0/src/Init/Lean/Elab/Util.lean @@ -14,6 +14,14 @@ match stx.truncateTrailing.reprint with -- TODO use syntax pretty printer | some str => format str.toFormat | none => format stx +def MacroScopesView.format (view : MacroScopesView) (mainModule : Name) : Format := +format $ + if view.scopes.isEmpty then view.name + else if view.mainModule == mainModule then + view.scopes.foldl mkNameNum (view.name ++ view.imported) + else + view.scopes.foldl mkNameNum (view.name ++ view.imported ++ view.mainModule) + namespace Elab structure MacroStackElem := diff --git a/stage0/src/Init/Lean/Parser/Identifier.lean b/stage0/src/Init/Lean/Parser/Identifier.lean deleted file mode 100644 index 74b313723c..0000000000 --- a/stage0/src/Init/Lean/Parser/Identifier.lean +++ /dev/null @@ -1,40 +0,0 @@ -/- -Copyright (c) 2018 Microsoft Corporation. All rights reserved. -Released under Apache 2.0 license as described in the file LICENSE. -Authors: Leonardo de Moura --/ -prelude -import Init.Data.Char.Basic - -namespace Lean - -def isGreek (c : Char) : Bool := -0x391 ≤ c.val && c.val ≤ 0x3dd - -def isLetterLike (c : Char) : Bool := -(0x3b1 ≤ c.val && c.val ≤ 0x3c9 && c.val ≠ 0x3bb) || -- Lower greek, but lambda -(0x391 ≤ c.val && c.val ≤ 0x3A9 && c.val ≠ 0x3A0 && c.val ≠ 0x3A3) || -- Upper greek, but Pi and Sigma -(0x3ca ≤ c.val && c.val ≤ 0x3fb) || -- Coptic letters -(0x1f00 ≤ c.val && c.val ≤ 0x1ffe) || -- Polytonic Greek Extended Character Set -(0x2100 ≤ c.val && c.val ≤ 0x214f) || -- Letter like block -(0x1d49c ≤ c.val && c.val ≤ 0x1d59f) -- Latin letters, Script, Double-struck, Fractur - -def isSubScriptAlnum (c : Char) : Bool := -(0x2080 ≤ c.val && c.val ≤ 0x2089) || -- numeric subscripts -(0x2090 ≤ c.val && c.val ≤ 0x209c) || -(0x1d62 ≤ c.val && c.val ≤ 0x1d6a) - -def isIdFirst (c : Char) : Bool := -c.isAlpha || c = '_' || isLetterLike c - -def isIdRest (c : Char) : Bool := -c.isAlphanum || c = '_' || c = '\'' || c == '!' || c == '?' || isLetterLike c || isSubScriptAlnum c - -def idBeginEscape := '«' -def idEndEscape := '»' -def isIdBeginEscape (c : Char) : Bool := -c = idBeginEscape -def isIdEndEscape (c : Char) : Bool := -c = idEndEscape - -end Lean diff --git a/stage0/src/Init/Lean/Parser/Parser.lean b/stage0/src/Init/Lean/Parser/Parser.lean index 96ca794e6a..ff653c09d7 100644 --- a/stage0/src/Init/Lean/Parser/Parser.lean +++ b/stage0/src/Init/Lean/Parser/Parser.lean @@ -11,7 +11,6 @@ import Init.Lean.ToExpr import Init.Lean.Environment import Init.Lean.Attributes import Init.Lean.Message -import Init.Lean.Parser.Identifier import Init.Lean.Compiler.InitAttr namespace Lean @@ -33,15 +32,21 @@ match stx.getOptional? with end Syntax - namespace Parser +def isLitKind (k : SyntaxNodeKind) : Bool := +k == strLitKind || k == numLitKind || k == charLitKind || k == nameLitKind + abbrev mkAtom (info : SourceInfo) (val : String) : Syntax := Syntax.atom info val abbrev mkIdent (info : SourceInfo) (rawVal : Substring) (val : Name) : Syntax := Syntax.ident (some info) rawVal val [] +/- Return character after position `pos` -/ +def getNext (input : String) (pos : Nat) : Char := +input.get (input.next pos) + /- Function application precedence. In the standard lean language, only two tokens have precedence higher that `appPrec`. - The token `.` has precedence `appPrec+1`. Thus, field accesses like `g (h x).f` are parsed as `g ((h x).f)`, @@ -830,6 +835,23 @@ partial def identFnAux (startPos : Nat) (tk : Option TokenConfig) : Name → Bas else mkTokenAndFixPos startPos tk c s +private def isIdFirstOrBeginEscape (c : Char) : Bool := +isIdFirst c || isIdBeginEscape c + +private def nameLitAux (startPos : Nat) : BasicParserFn +| c, s => + let input := c.input; + let s := identFnAux startPos none Name.anonymous c (s.next input startPos); + if s.hasError then + s.mkErrorAt "invalid Name literal" startPos + else + let stx := s.stxStack.back; + match stx with + | Syntax.ident _ rawStr _ _ => + let s := s.popSyntax; + s.pushSyntax (Syntax.node nameLitKind #[mkAtomFrom stx rawStr.toString]) + | _ => s.mkError "invalid Name literal" + private def tokenFnAux : BasicParserFn | c, s => let input := c.input; @@ -841,6 +863,8 @@ private def tokenFnAux : BasicParserFn charLitFnAux i c (s.next input i) else if curr.isDigit then numberFnAux c s + else if curr == '`' && isIdFirstOrBeginEscape (getNext input i) then + nameLitAux i c s else let (_, tk) := c.tokens.matchPrefix input i; identFnAux i tk Name.anonymous c s @@ -1092,6 +1116,16 @@ fun _ c s => { fn := charLitFn, info := mkAtomicInfo "charLit" } +def nameLitFn {k : ParserKind} : ParserFn k := +fun _ c s => + let iniPos := s.pos; + let s := tokenFn c s; + if s.hasError || !(s.stxStack.back.isOfKind nameLitKind) then s.mkErrorAt "Name literal" iniPos else s + +@[inline] def nameLitNoAntiquot {k : ParserKind} : Parser k := +{ fn := nameLitFn, + info := mkAtomicInfo "nameLit" } + def identFn {k : ParserKind} : ParserFn k := fun _ c s => let iniPos := s.pos; @@ -1130,7 +1164,7 @@ def unquotedSymbolFn {k : ParserKind} : ParserFn k := fun _ c s => let iniPos := s.pos; let s := tokenFn c s; - if s.hasError || s.stxStack.back.isIdent || s.stxStack.back.isOfKind strLitKind || s.stxStack.back.isOfKind charLitKind || s.stxStack.back.isOfKind numLitKind then + if s.hasError || s.stxStack.back.isIdent || isLitKind s.stxStack.back.getKind then s.mkErrorAt "symbol" iniPos else s @@ -1324,7 +1358,11 @@ match stx? with | _ => (s, 0) | some (Syntax.ident _ _ _ _) => (s, appPrec) -- TODO(Leo): add support for associating lbp with syntax node kinds. -| some (Syntax.node k _) => if k == numLitKind || k == charLitKind || k == strLitKind || k == fieldIdxKind then (s, appPrec) else (s, 0) +| some (Syntax.node k _) => + if isLitKind k || k == fieldIdxKind then + (s, appPrec) + else + (s, 0) | _ => (s, 0) def indexed {α : Type} (map : TokenMap α) (c : ParserContext) (s : ParserState) (leadingIdentAsSymbol : Bool) : ParserState × List α := @@ -1486,6 +1524,9 @@ mkAntiquot "strLit" strLitKind <|> strLitNoAntiquot def charLit {k : ParserKind} : Parser k := mkAntiquot "charLit" charLitKind <|> charLitNoAntiquot +def nameLit {k : ParserKind} : Parser k := +mkAntiquot "nameLit" nameLitKind <|> nameLitNoAntiquot + def categoryParserOfStackFn (offset : Nat) : ParserFn leading := fun rbp ctx s => let stack := s.stxStack; @@ -1659,9 +1700,10 @@ def compileParserDescr (categories : ParserCategories) : forall {k : ParserKind} | _, ParserDescr.sepBy1 d₁ d₂ => sepBy1 <$> compileParserDescr d₁ <*> compileParserDescr d₂ | _, ParserDescr.node k d => node k <$> compileParserDescr d | _, ParserDescr.symbol tk lbp => pure $ symbolAux tk lbp -| _, ParserDescr.num => pure $ numLit -| _, ParserDescr.str => pure $ strLit -| _, ParserDescr.char => pure $ charLit +| _, ParserDescr.numLit => pure $ numLit +| _, ParserDescr.strLit => pure $ strLit +| _, ParserDescr.charLit => pure $ charLit +| _, ParserDescr.nameLit => pure $ nameLit | _, ParserDescr.ident => pure $ ident | ParserKind.leading, ParserDescr.nonReservedSymbol tk includeIdent => pure $ nonReservedSymbol tk includeIdent @@ -1783,7 +1825,7 @@ parserExtension.addEntry env $ ParserExtensionEntry.kind k def isValidSyntaxNodeKind (env : Environment) (k : SyntaxNodeKind) : Bool := let kinds := (parserExtension.getState env).kinds; -kinds.contains k || k == choiceKind || k == strLitKind || k == numLitKind || k == charLitKind +kinds.contains k || k == choiceKind || isLitKind k def getSyntaxNodeKinds (env : Environment) : List SyntaxNodeKind := do let kinds := (parserExtension.getState env).kinds; diff --git a/stage0/src/Init/Lean/Parser/Term.lean b/stage0/src/Init/Lean/Parser/Term.lean index d7f306f987..f494e95e9d 100644 --- a/stage0/src/Init/Lean/Parser/Term.lean +++ b/stage0/src/Init/Lean/Parser/Term.lean @@ -85,7 +85,7 @@ def matchAlt := parser! " | " >> sepBy1 termParser ", " >> darrow >> termParser @[builtinTermParser] def «parser!» := parser! "parser! " >> termParser @[builtinTermParser] def «tparser!» := parser! "tparser! " >> termParser @[builtinTermParser] def borrowed := parser! symbol "@&" appPrec >> termParser (appPrec - 1) -@[builtinTermParser] def quotedName := parser! symbol "`" appPrec >> rawIdent +@[builtinTermParser] def quotedName := parser! nameLit -- 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/src/Init/LeanInit.lean b/stage0/src/Init/LeanInit.lean index 0c8c95ed72..103a942e82 100644 --- a/stage0/src/Init/LeanInit.lean +++ b/stage0/src/Init/LeanInit.lean @@ -21,6 +21,36 @@ without importing the whole `Lean` module. It also allow us to use extensions to develop the `Init` library. -/ +/- Valid identifier names -/ +def isGreek (c : Char) : Bool := +0x391 ≤ c.val && c.val ≤ 0x3dd + +def isLetterLike (c : Char) : Bool := +(0x3b1 ≤ c.val && c.val ≤ 0x3c9 && c.val ≠ 0x3bb) || -- Lower greek, but lambda +(0x391 ≤ c.val && c.val ≤ 0x3A9 && c.val ≠ 0x3A0 && c.val ≠ 0x3A3) || -- Upper greek, but Pi and Sigma +(0x3ca ≤ c.val && c.val ≤ 0x3fb) || -- Coptic letters +(0x1f00 ≤ c.val && c.val ≤ 0x1ffe) || -- Polytonic Greek Extended Character Set +(0x2100 ≤ c.val && c.val ≤ 0x214f) || -- Letter like block +(0x1d49c ≤ c.val && c.val ≤ 0x1d59f) -- Latin letters, Script, Double-struck, Fractur + +def isSubScriptAlnum (c : Char) : Bool := +(0x2080 ≤ c.val && c.val ≤ 0x2089) || -- numeric subscripts +(0x2090 ≤ c.val && c.val ≤ 0x209c) || +(0x1d62 ≤ c.val && c.val ≤ 0x1d6a) + +def isIdFirst (c : Char) : Bool := +c.isAlpha || c = '_' || isLetterLike c + +def isIdRest (c : Char) : Bool := +c.isAlphanum || c = '_' || c = '\'' || c == '!' || c == '?' || isLetterLike c || isSubScriptAlnum c + +def idBeginEscape := '«' +def idEndEscape := '»' +def isIdBeginEscape (c : Char) : Bool := +c = idBeginEscape +def isIdEndEscape (c : Char) : Bool := +c = idEndEscape + /- Hierarchical names -/ inductive Name | anonymous : Name @@ -121,9 +151,10 @@ inductive ParserDescrCore : ParserKind → Type | node {k : ParserKind} : Name → ParserDescrCore k → ParserDescrCore k | symbol {k : ParserKind} : String → Option Nat → ParserDescrCore k | nonReservedSymbol : String → Bool → ParserDescrCore ParserKind.leading -| num {k : ParserKind} : ParserDescrCore k -| str {k : ParserKind} : ParserDescrCore k -| char {k : ParserKind} : ParserDescrCore k +| numLit {k : ParserKind} : ParserDescrCore k +| strLit {k : ParserKind} : ParserDescrCore k +| charLit {k : ParserKind} : ParserDescrCore k +| nameLit {k : ParserKind} : ParserDescrCore k | ident {k : ParserKind} : ParserDescrCore k | pushLeading : ParserDescrCore ParserKind.trailing | parser {k : ParserKind} : Name → Nat → ParserDescrCore k @@ -144,9 +175,10 @@ abbrev TrailingParserDescr := ParserDescrCore ParserKind.trailing @[matchPattern] abbrev ParserDescr.sepBy1 := @ParserDescrCore.sepBy1 @[matchPattern] abbrev ParserDescr.node := @ParserDescrCore.node @[matchPattern] abbrev ParserDescr.symbol := @ParserDescrCore.symbol -@[matchPattern] abbrev ParserDescr.num := @ParserDescrCore.num -@[matchPattern] abbrev ParserDescr.str := @ParserDescrCore.str -@[matchPattern] abbrev ParserDescr.char := @ParserDescrCore.char +@[matchPattern] abbrev ParserDescr.numLit := @ParserDescrCore.numLit +@[matchPattern] abbrev ParserDescr.strLit := @ParserDescrCore.strLit +@[matchPattern] abbrev ParserDescr.charLit := @ParserDescrCore.charLit +@[matchPattern] abbrev ParserDescr.nameLit := @ParserDescrCore.nameLit @[matchPattern] abbrev ParserDescr.ident := @ParserDescrCore.ident @[matchPattern] abbrev ParserDescr.nonReservedSymbol := @ParserDescrCore.nonReservedSymbol @[matchPattern] abbrev ParserDescr.pushLeading := @ParserDescrCore.pushLeading @@ -373,6 +405,7 @@ abbrev Macro := Syntax → MacroM Syntax def strLitKind : SyntaxNodeKind := `strLit def charLitKind : SyntaxNodeKind := `charLit def numLitKind : SyntaxNodeKind := `numLit +def nameLitKind : SyntaxNodeKind := `nameLit def fieldIdxKind : SyntaxNodeKind := `fieldIdx /- Helper functions for processing Syntax programmatically -/ @@ -524,16 +557,22 @@ else else if c.isDigit then decodeDecimalLitAux s 0 0 else none -def isNatLitAux (nodeKind : SyntaxNodeKind) : Syntax → Option Nat -| Syntax.node k args => - if k == nodeKind && args.size == 1 then +def isLit? (litKind : SyntaxNodeKind) (stx : Syntax) : Option String := +match stx with +| Syntax.node k args => + if k == litKind && args.size == 1 then match args.get! 0 with - | (Syntax.atom _ val) => decodeNatLitVal val + | (Syntax.atom _ val) => some val | _ => none else none | _ => none +def isNatLitAux (litKind : SyntaxNodeKind) (stx : Syntax) : Option Nat := +match isLit? litKind stx with +| some val => decodeNatLitVal val +| _ => none + def isNatLit? (s : Syntax) : Option Nat := isNatLitAux numLitKind s @@ -586,15 +625,10 @@ partial def decodeStrLitAux (s : String) : String.Pos → String → Option Stri def decodeStrLit (s : String) : Option String := decodeStrLitAux s 1 "" -def isStrLit? : Syntax → Option String -| Syntax.node k args => - if k == strLitKind && args.size == 1 then - match args.get! 0 with - | (Syntax.atom _ val) => decodeStrLit val - | _ => none - else - none -| _ => none +def isStrLit? (stx : Syntax) : Option String := +match isLit? strLitKind stx with +| some val => decodeStrLit val +| _ => none def decodeCharLit (s : String) : Option Char := let c := s.get 1; @@ -604,15 +638,43 @@ if c == '\\' then do else pure c -def isCharLit? : Syntax → Option Char -| Syntax.node k args => - if k == charLitKind && args.size == 1 then - match args.get! 0 with - | (Syntax.atom _ val) => decodeCharLit val - | _ => none +def isCharLit? (stx : Syntax) : Option Char := +match isLit? charLitKind stx with +| some val => decodeCharLit val +| _ => none + +private partial def decodeNameLitAux (s : String) : Nat → Name → Option Name +| i, r => + let continue? (i : Nat) (r : Name) : Option Name := + if s.get i == '.' then + decodeNameLitAux (s.next i) r + else if s.atEnd i then + pure r + else + none; + let curr := s.get i; + if isIdBeginEscape curr then + let startPart := s.next i; + let stopPart := s.nextUntil isIdEndEscape startPart; + if !isIdEndEscape (s.get stopPart) then none + else continue? (s.next stopPart) (mkNameStr r (s.extract startPart stopPart)) + else if isIdFirst curr then + let startPart := i; + let stopPart := s.nextWhile isIdRest startPart; + continue? stopPart (mkNameStr r (s.extract startPart stopPart)) else none -| _ => none + +def decodeNameLit (s : String) : Option Name := +if s.get 0 == '`' then + decodeNameLitAux s 1 Name.anonymous +else + none + +def isNameLit? (stx : Syntax) : Option Name := +match isLit? nameLitKind stx with +| some val => decodeNameLit val +| _ => none def hasArgs : Syntax → Bool | Syntax.node _ args => args.size > 0 diff --git a/stage0/src/frontends/lean/builtin_cmds.cpp b/stage0/src/frontends/lean/builtin_cmds.cpp index 3b31593497..636011617c 100644 --- a/stage0/src/frontends/lean/builtin_cmds.cpp +++ b/stage0/src/frontends/lean/builtin_cmds.cpp @@ -330,6 +330,26 @@ environment hide_cmd(parser & p) { return new_env; } +struct stream_buffer_delete { + void operator () (char ** buffer) { + free(*buffer); + } +}; + +obj_res lean_redirect_stdout(obj_arg new_stdout); +lean_object * lean_io_wrap_handle(FILE *hfile); +lean_object *& get_handle_current_stdout(); + +struct redirect_helper { + object_ref m_old_fp; + redirect_helper(object_ref const & new_fp): + m_old_fp(lean_redirect_stdout(new_fp.to_obj_arg())) { + } + ~redirect_helper() { + lean_dec(lean_redirect_stdout(m_old_fp.to_obj_arg())); + } +}; + static environment eval_cmd(parser & p) { transient_cmd_scope cmd_scope(p); auto pos = p.pos(); @@ -383,11 +403,14 @@ static environment eval_cmd(parser & p) { auto out = p.mk_message(p.cmd_pos(), p.pos(), INFORMATION); out.set_caption("eval result"); scope_traces_as_messages scope_traces(p.get_stream_name(), p.cmd_pos()); - std::streambuf * saved_cout = std::cout.rdbuf(out.get_text_stream().get_stream().rdbuf()); - + char * redirected; size_t redir_size; + FILE * fp = open_memstream(&redirected, &redir_size); + std::unique_ptr stream_buffer(&redirected); object_ref r; try { + object_ref new_fp(lean_io_wrap_handle(fp)); + redirect_helper helper(new_fp); if (p.profiling()) { timeit timer(out.get_text_stream().get_stream(), "eval time"); r = object_ref(ir::run_boxed(new_env, fn_name, args.size(), &args[0])); @@ -395,12 +418,12 @@ static environment eval_cmd(parser & p) { r = object_ref(ir::run_boxed(new_env, fn_name, args.size(), &args[0])); } } catch (exception & ex) { - std::cout.rdbuf(saved_cout); + out << redirected; out.report(); throw ex; } - std::cout.rdbuf(saved_cout); + out << redirected; out.report(); if (io_result_is_error(r.raw())) { message_builder msg = p.mk_message(p.cmd_pos(), p.pos(), ERROR); diff --git a/stage0/src/runtime/io.cpp b/stage0/src/runtime/io.cpp index b6e2cefa98..0fb292ec47 100644 --- a/stage0/src/runtime/io.cpp +++ b/stage0/src/runtime/io.cpp @@ -133,7 +133,7 @@ static void io_handle_finalizer(void * h) { static void io_handle_foreach(void * /* mod */, b_obj_arg /* fn */) { } -static lean_object * io_wrap_handle(FILE *hfile) { +lean_object * lean_io_wrap_handle(FILE *hfile) { return lean_alloc_external(g_io_handle_external_class, hfile); } @@ -144,6 +144,12 @@ MK_THREAD_LOCAL_GET(object *, get_handle_current_stdout, g_handle_stdout); MK_THREAD_LOCAL_GET(object *, get_handle_current_stderr, g_handle_stderr); MK_THREAD_LOCAL_GET(object *, get_handle_current_stdin, g_handle_stdin); +obj_res lean_redirect_stdout(obj_arg new_stdout) { + obj_res r = get_handle_current_stdout(); + get_handle_current_stdout() = new_stdout; + return r; +} + /* getStdout : IO FS.Handle */ extern "C" obj_res lean_get_stdout(obj_arg /* w */) { object * r = get_handle_current_stdout(); @@ -300,7 +306,7 @@ extern "C" obj_res lean_io_prim_handle_mk(b_obj_arg filename, b_obj_arg modeStr, if (!fp) { return set_io_error(decode_io_error(errno, filename)); } else { - return set_io_result(io_wrap_handle(fp)); + return set_io_result(lean_io_wrap_handle(fp)); } } @@ -658,9 +664,9 @@ extern "C" obj_res lean_io_ref_ptr_eq(b_obj_arg ref1, b_obj_arg ref2, obj_arg) { void initialize_io() { g_io_error_nullptr_read = mk_string("null reference read"); g_io_handle_external_class = lean_register_external_class(io_handle_finalizer, io_handle_foreach); - g_handle_stdout = io_wrap_handle(stdout); - g_handle_stderr = io_wrap_handle(stderr); - g_handle_stdin = io_wrap_handle(stdin); + g_handle_stdout = lean_io_wrap_handle(stdout); + g_handle_stderr = lean_io_wrap_handle(stderr); + g_handle_stdin = lean_io_wrap_handle(stdin); mark_persistent(g_handle_stdout); mark_persistent(g_handle_stderr); mark_persistent(g_handle_stdin); diff --git a/stage0/stdlib/CMakeLists.txt b/stage0/stdlib/CMakeLists.txt index 742a91a4db..73affd9279 100644 --- a/stage0/stdlib/CMakeLists.txt +++ b/stage0/stdlib/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT Init/./Coe.c Init/./Control.c Init/./Control/Alternative.c Init/./Control/Applicative.c Init/./Control/Conditional.c Init/./Control/EState.c Init/./Control/Except.c Init/./Control/Functor.c Init/./Control/Id.c Init/./Control/Lift.c Init/./Control/Monad.c Init/./Control/MonadFail.c Init/./Control/Option.c Init/./Control/Reader.c Init/./Control/State.c Init/./Core.c Init/./Data.c Init/./Data/Array.c Init/./Data/Array/Basic.c Init/./Data/Array/BinSearch.c Init/./Data/Array/QSort.c Init/./Data/AssocList.c Init/./Data/Basic.c Init/./Data/BinomialHeap.c Init/./Data/BinomialHeap/Basic.c Init/./Data/ByteArray.c Init/./Data/ByteArray/Basic.c Init/./Data/Char.c Init/./Data/Char/Basic.c Init/./Data/DList.c Init/./Data/Fin.c Init/./Data/Fin/Basic.c Init/./Data/HashMap.c Init/./Data/HashMap/Basic.c Init/./Data/HashSet.c Init/./Data/Hashable.c Init/./Data/Int.c Init/./Data/Int/Basic.c Init/./Data/List.c Init/./Data/List/Basic.c Init/./Data/List/BasicAux.c Init/./Data/List/Control.c Init/./Data/List/Instances.c Init/./Data/Nat.c Init/./Data/Nat/Basic.c Init/./Data/Nat/Bitwise.c Init/./Data/Nat/Control.c Init/./Data/Nat/Div.c Init/./Data/Option.c Init/./Data/Option/Basic.c Init/./Data/Option/BasicAux.c Init/./Data/Option/Instances.c Init/./Data/PersistentArray.c Init/./Data/PersistentArray/Basic.c Init/./Data/PersistentHashMap.c Init/./Data/PersistentHashMap/Basic.c Init/./Data/PersistentHashSet.c Init/./Data/Queue.c Init/./Data/Queue/Basic.c Init/./Data/RBMap.c Init/./Data/RBMap/Basic.c Init/./Data/RBMap/BasicAux.c Init/./Data/RBTree.c Init/./Data/RBTree/Basic.c Init/./Data/Random.c Init/./Data/Repr.c Init/./Data/Stack.c Init/./Data/Stack/Basic.c Init/./Data/String.c Init/./Data/String/Basic.c Init/./Data/ToString.c Init/./Data/UInt.c Init/./Default.c Init/./Fix.c Init/./Lean.c Init/./Lean/Attributes.c Init/./Lean/AuxRecursor.c Init/./Lean/Class.c Init/./Lean/Compiler.c Init/./Lean/Compiler/ClosedTermCache.c Init/./Lean/Compiler/ConstFolding.c Init/./Lean/Compiler/ExportAttr.c Init/./Lean/Compiler/ExternAttr.c Init/./Lean/Compiler/IR.c Init/./Lean/Compiler/IR/Basic.c Init/./Lean/Compiler/IR/Borrow.c Init/./Lean/Compiler/IR/Boxing.c Init/./Lean/Compiler/IR/Checker.c Init/./Lean/Compiler/IR/CompilerM.c Init/./Lean/Compiler/IR/CtorLayout.c Init/./Lean/Compiler/IR/ElimDeadBranches.c Init/./Lean/Compiler/IR/ElimDeadVars.c Init/./Lean/Compiler/IR/EmitC.c Init/./Lean/Compiler/IR/EmitUtil.c Init/./Lean/Compiler/IR/ExpandResetReuse.c Init/./Lean/Compiler/IR/Format.c Init/./Lean/Compiler/IR/FreeVars.c Init/./Lean/Compiler/IR/LiveVars.c Init/./Lean/Compiler/IR/NormIds.c Init/./Lean/Compiler/IR/PushProj.c Init/./Lean/Compiler/IR/RC.c Init/./Lean/Compiler/IR/ResetReuse.c Init/./Lean/Compiler/IR/SimpCase.c Init/./Lean/Compiler/IR/UnboxResult.c Init/./Lean/Compiler/ImplementedByAttr.c Init/./Lean/Compiler/InitAttr.c Init/./Lean/Compiler/InlineAttrs.c Init/./Lean/Compiler/NameMangling.c Init/./Lean/Compiler/NeverExtractAttr.c Init/./Lean/Compiler/Specialize.c Init/./Lean/Compiler/Util.c Init/./Lean/Data/Format.c Init/./Lean/Data/KVMap.c Init/./Lean/Data/LBool.c Init/./Lean/Data/LOption.c Init/./Lean/Data/Name.c Init/./Lean/Data/Occurrences.c Init/./Lean/Data/Options.c Init/./Lean/Data/Position.c Init/./Lean/Data/SMap.c Init/./Lean/Data/Trie.c Init/./Lean/Declaration.c Init/./Lean/Elab.c Init/./Lean/Elab/Alias.c Init/./Lean/Elab/BuiltinNotation.c Init/./Lean/Elab/Command.c Init/./Lean/Elab/DeclModifiers.c Init/./Lean/Elab/Declaration.c Init/./Lean/Elab/Definition.c Init/./Lean/Elab/ElabStrategyAttrs.c Init/./Lean/Elab/Exception.c Init/./Lean/Elab/Frontend.c Init/./Lean/Elab/Import.c Init/./Lean/Elab/Level.c Init/./Lean/Elab/Log.c Init/./Lean/Elab/Quotation.c Init/./Lean/Elab/ResolveName.c Init/./Lean/Elab/Syntax.c Init/./Lean/Elab/SynthesizeSyntheticMVars.c Init/./Lean/Elab/Tactic.c Init/./Lean/Elab/Tactic/Basic.c Init/./Lean/Elab/Tactic/ElabTerm.c Init/./Lean/Elab/Term.c Init/./Lean/Elab/TermApp.c Init/./Lean/Elab/TermBinders.c Init/./Lean/Elab/Util.c Init/./Lean/Environment.c Init/./Lean/EqnCompiler.c Init/./Lean/EqnCompiler/MatchPattern.c Init/./Lean/Eval.c Init/./Lean/Expr.c Init/./Lean/HeadIndex.c Init/./Lean/Hygiene.c Init/./Lean/Level.c Init/./Lean/Linter.c Init/./Lean/LocalContext.c Init/./Lean/Message.c Init/./Lean/Meta.c Init/./Lean/Meta/AbstractMVars.c Init/./Lean/Meta/AppBuilder.c Init/./Lean/Meta/Basic.c Init/./Lean/Meta/Check.c Init/./Lean/Meta/DiscrTree.c Init/./Lean/Meta/DiscrTreeTypes.c Init/./Lean/Meta/Exception.c Init/./Lean/Meta/ExprDefEq.c Init/./Lean/Meta/FunInfo.c Init/./Lean/Meta/InferType.c Init/./Lean/Meta/Instances.c Init/./Lean/Meta/KAbstract.c Init/./Lean/Meta/LevelDefEq.c Init/./Lean/Meta/Message.c Init/./Lean/Meta/Offset.c Init/./Lean/Meta/Reduce.c Init/./Lean/Meta/SynthInstance.c Init/./Lean/Meta/Tactic.c Init/./Lean/Meta/Tactic/Apply.c Init/./Lean/Meta/Tactic/Assumption.c Init/./Lean/Meta/Tactic/Intro.c Init/./Lean/Meta/Tactic/Util.c Init/./Lean/Meta/WHNF.c Init/./Lean/MetavarContext.c Init/./Lean/Modifiers.c Init/./Lean/Parser.c Init/./Lean/Parser/Command.c Init/./Lean/Parser/Identifier.c Init/./Lean/Parser/Level.c Init/./Lean/Parser/Module.c Init/./Lean/Parser/Parser.c Init/./Lean/Parser/Syntax.c Init/./Lean/Parser/Tactic.c Init/./Lean/Parser/Term.c Init/./Lean/Parser/Transform.c Init/./Lean/ProjFns.c Init/./Lean/ReducibilityAttrs.c Init/./Lean/Runtime.c Init/./Lean/Scopes.c Init/./Lean/Structure.c Init/./Lean/Syntax.c Init/./Lean/ToExpr.c Init/./Lean/Util/CollectFVars.c Init/./Lean/Util/CollectLevelParams.c Init/./Lean/Util/CollectMVars.c Init/./Lean/Util/FindMVar.c Init/./Lean/Util/MonadCache.c Init/./Lean/Util/PPExt.c Init/./Lean/Util/PPGoal.c Init/./Lean/Util/Path.c Init/./Lean/Util/Profile.c Init/./Lean/Util/RecDepth.c Init/./Lean/Util/Sorry.c Init/./Lean/Util/Trace.c Init/./Lean/Util/WHNF.c Init/./LeanInit.c Init/./System.c Init/./System/FilePath.c Init/./System/IO.c Init/./System/IOError.c Init/./System/Platform.c Init/./Util.c Init/./WF.c) +add_library (stage0 OBJECT Init/./Coe.c Init/./Control.c Init/./Control/Alternative.c Init/./Control/Applicative.c Init/./Control/Conditional.c Init/./Control/EState.c Init/./Control/Except.c Init/./Control/Functor.c Init/./Control/Id.c Init/./Control/Lift.c Init/./Control/Monad.c Init/./Control/MonadFail.c Init/./Control/Option.c Init/./Control/Reader.c Init/./Control/State.c Init/./Core.c Init/./Data.c Init/./Data/Array.c Init/./Data/Array/Basic.c Init/./Data/Array/BinSearch.c Init/./Data/Array/QSort.c Init/./Data/AssocList.c Init/./Data/Basic.c Init/./Data/BinomialHeap.c Init/./Data/BinomialHeap/Basic.c Init/./Data/ByteArray.c Init/./Data/ByteArray/Basic.c Init/./Data/Char.c Init/./Data/Char/Basic.c Init/./Data/DList.c Init/./Data/Fin.c Init/./Data/Fin/Basic.c Init/./Data/HashMap.c Init/./Data/HashMap/Basic.c Init/./Data/HashSet.c Init/./Data/Hashable.c Init/./Data/Int.c Init/./Data/Int/Basic.c Init/./Data/List.c Init/./Data/List/Basic.c Init/./Data/List/BasicAux.c Init/./Data/List/Control.c Init/./Data/List/Instances.c Init/./Data/Nat.c Init/./Data/Nat/Basic.c Init/./Data/Nat/Bitwise.c Init/./Data/Nat/Control.c Init/./Data/Nat/Div.c Init/./Data/Option.c Init/./Data/Option/Basic.c Init/./Data/Option/BasicAux.c Init/./Data/Option/Instances.c Init/./Data/PersistentArray.c Init/./Data/PersistentArray/Basic.c Init/./Data/PersistentHashMap.c Init/./Data/PersistentHashMap/Basic.c Init/./Data/PersistentHashSet.c Init/./Data/Queue.c Init/./Data/Queue/Basic.c Init/./Data/RBMap.c Init/./Data/RBMap/Basic.c Init/./Data/RBMap/BasicAux.c Init/./Data/RBTree.c Init/./Data/RBTree/Basic.c Init/./Data/Random.c Init/./Data/Repr.c Init/./Data/Stack.c Init/./Data/Stack/Basic.c Init/./Data/String.c Init/./Data/String/Basic.c Init/./Data/ToString.c Init/./Data/UInt.c Init/./Default.c Init/./Fix.c Init/./Lean.c Init/./Lean/Attributes.c Init/./Lean/AuxRecursor.c Init/./Lean/Class.c Init/./Lean/Compiler.c Init/./Lean/Compiler/ClosedTermCache.c Init/./Lean/Compiler/ConstFolding.c Init/./Lean/Compiler/ExportAttr.c Init/./Lean/Compiler/ExternAttr.c Init/./Lean/Compiler/IR.c Init/./Lean/Compiler/IR/Basic.c Init/./Lean/Compiler/IR/Borrow.c Init/./Lean/Compiler/IR/Boxing.c Init/./Lean/Compiler/IR/Checker.c Init/./Lean/Compiler/IR/CompilerM.c Init/./Lean/Compiler/IR/CtorLayout.c Init/./Lean/Compiler/IR/ElimDeadBranches.c Init/./Lean/Compiler/IR/ElimDeadVars.c Init/./Lean/Compiler/IR/EmitC.c Init/./Lean/Compiler/IR/EmitUtil.c Init/./Lean/Compiler/IR/ExpandResetReuse.c Init/./Lean/Compiler/IR/Format.c Init/./Lean/Compiler/IR/FreeVars.c Init/./Lean/Compiler/IR/LiveVars.c Init/./Lean/Compiler/IR/NormIds.c Init/./Lean/Compiler/IR/PushProj.c Init/./Lean/Compiler/IR/RC.c Init/./Lean/Compiler/IR/ResetReuse.c Init/./Lean/Compiler/IR/SimpCase.c Init/./Lean/Compiler/IR/UnboxResult.c Init/./Lean/Compiler/ImplementedByAttr.c Init/./Lean/Compiler/InitAttr.c Init/./Lean/Compiler/InlineAttrs.c Init/./Lean/Compiler/NameMangling.c Init/./Lean/Compiler/NeverExtractAttr.c Init/./Lean/Compiler/Specialize.c Init/./Lean/Compiler/Util.c Init/./Lean/Data/Format.c Init/./Lean/Data/KVMap.c Init/./Lean/Data/LBool.c Init/./Lean/Data/LOption.c Init/./Lean/Data/Name.c Init/./Lean/Data/Occurrences.c Init/./Lean/Data/Options.c Init/./Lean/Data/Position.c Init/./Lean/Data/SMap.c Init/./Lean/Data/Trie.c Init/./Lean/Declaration.c Init/./Lean/Elab.c Init/./Lean/Elab/Alias.c Init/./Lean/Elab/BuiltinNotation.c Init/./Lean/Elab/Command.c Init/./Lean/Elab/DeclModifiers.c Init/./Lean/Elab/Declaration.c Init/./Lean/Elab/Definition.c Init/./Lean/Elab/ElabStrategyAttrs.c Init/./Lean/Elab/Exception.c Init/./Lean/Elab/Frontend.c Init/./Lean/Elab/Import.c Init/./Lean/Elab/Level.c Init/./Lean/Elab/Log.c Init/./Lean/Elab/Quotation.c Init/./Lean/Elab/ResolveName.c Init/./Lean/Elab/Syntax.c Init/./Lean/Elab/SynthesizeSyntheticMVars.c Init/./Lean/Elab/Tactic.c Init/./Lean/Elab/Tactic/Basic.c Init/./Lean/Elab/Tactic/ElabTerm.c Init/./Lean/Elab/Term.c Init/./Lean/Elab/TermApp.c Init/./Lean/Elab/TermBinders.c Init/./Lean/Elab/Util.c Init/./Lean/Environment.c Init/./Lean/EqnCompiler.c Init/./Lean/EqnCompiler/MatchPattern.c Init/./Lean/Eval.c Init/./Lean/Expr.c Init/./Lean/HeadIndex.c Init/./Lean/Hygiene.c Init/./Lean/Level.c Init/./Lean/Linter.c Init/./Lean/LocalContext.c Init/./Lean/Message.c Init/./Lean/Meta.c Init/./Lean/Meta/AbstractMVars.c Init/./Lean/Meta/AppBuilder.c Init/./Lean/Meta/Basic.c Init/./Lean/Meta/Check.c Init/./Lean/Meta/DiscrTree.c Init/./Lean/Meta/DiscrTreeTypes.c Init/./Lean/Meta/Exception.c Init/./Lean/Meta/ExprDefEq.c Init/./Lean/Meta/FunInfo.c Init/./Lean/Meta/InferType.c Init/./Lean/Meta/Instances.c Init/./Lean/Meta/KAbstract.c Init/./Lean/Meta/LevelDefEq.c Init/./Lean/Meta/Message.c Init/./Lean/Meta/Offset.c Init/./Lean/Meta/Reduce.c Init/./Lean/Meta/SynthInstance.c Init/./Lean/Meta/Tactic.c Init/./Lean/Meta/Tactic/Apply.c Init/./Lean/Meta/Tactic/Assumption.c Init/./Lean/Meta/Tactic/Intro.c Init/./Lean/Meta/Tactic/Util.c Init/./Lean/Meta/WHNF.c Init/./Lean/MetavarContext.c Init/./Lean/Modifiers.c Init/./Lean/Parser.c Init/./Lean/Parser/Command.c Init/./Lean/Parser/Level.c Init/./Lean/Parser/Module.c Init/./Lean/Parser/Parser.c Init/./Lean/Parser/Syntax.c Init/./Lean/Parser/Tactic.c Init/./Lean/Parser/Term.c Init/./Lean/Parser/Transform.c Init/./Lean/ProjFns.c Init/./Lean/ReducibilityAttrs.c Init/./Lean/Runtime.c Init/./Lean/Scopes.c Init/./Lean/Structure.c Init/./Lean/Syntax.c Init/./Lean/ToExpr.c Init/./Lean/Util/CollectFVars.c Init/./Lean/Util/CollectLevelParams.c Init/./Lean/Util/CollectMVars.c Init/./Lean/Util/FindMVar.c Init/./Lean/Util/MonadCache.c Init/./Lean/Util/PPExt.c Init/./Lean/Util/PPGoal.c Init/./Lean/Util/Path.c Init/./Lean/Util/Profile.c Init/./Lean/Util/RecDepth.c Init/./Lean/Util/Sorry.c Init/./Lean/Util/Trace.c Init/./Lean/Util/WHNF.c Init/./LeanInit.c Init/./System.c Init/./System/FilePath.c Init/./System/IO.c Init/./System/IOError.c Init/./System/Platform.c Init/./Util.c Init/./WF.c) diff --git a/stage0/stdlib/Init/Data/String/Basic.c b/stage0/stdlib/Init/Data/String/Basic.c index 515104076e..4ca564fb2e 100644 --- a/stage0/stdlib/Init/Data/String/Basic.c +++ b/stage0/stdlib/Init/Data/String/Basic.c @@ -40,6 +40,7 @@ lean_object* l_Substring_extract___boxed(lean_object*, lean_object*, lean_object lean_object* l___private_Init_Data_String_Basic_4__utf8SetAux(uint32_t, lean_object*, lean_object*, lean_object*); lean_object* l_String_trimRight___boxed(lean_object*); lean_object* l_Substring_takeWhileAux___main___at_Substring_trimLeft___spec__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_String_nextWhile___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_String_posOfAux___main(lean_object*, uint32_t, lean_object*, lean_object*); uint8_t l_String_anyAux___main___at_Substring_all___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Substring_drop(lean_object*, lean_object*); @@ -48,6 +49,7 @@ lean_object* l_String_Iterator_extract___boxed(lean_object*, lean_object*); lean_object* l_Substring_takeRight___boxed(lean_object*, lean_object*); lean_object* l_String_revPosOf(lean_object*, uint32_t); lean_object* l_Substring_toString___boxed(lean_object*); +lean_object* l_Substring_takeWhileAux___main___at_String_nextUntil___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Substring_takeRightWhileAux___main___at_Substring_trimRight___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_String_offsetOfPosAux(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_String_anyAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -64,6 +66,7 @@ lean_object* l_String_isEmpty___boxed(lean_object*); lean_object* l_Nat_repeatAux___main___at_String_pushn___spec__1(uint32_t, lean_object*, lean_object*); lean_object* l_String_back___boxed(lean_object*); uint8_t l_Char_isDigit(uint32_t); +lean_object* l_String_nextUntil(lean_object*, lean_object*, lean_object*); lean_object* l_String_toSubstring(lean_object*); lean_object* l_Substring_extract(lean_object*, lean_object*, lean_object*); lean_object* l_String_append___boxed(lean_object*, lean_object*); @@ -178,6 +181,7 @@ lean_object* l___private_Init_Data_String_Basic_7__utf8ExtractAux_u2081(lean_obj lean_object* l_String_foldr___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_String_anyAux___main___at_Substring_all___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_String_Iterator_next(lean_object*); +lean_object* l_String_nextUntil___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Substring_front___boxed(lean_object*); lean_object* l_String_trimLeft(lean_object*); lean_object* l_String_join___boxed(lean_object*); @@ -198,7 +202,9 @@ lean_object* l_String_dropWhile___boxed(lean_object*, lean_object*); lean_object* l_String_anyAux___main___at_Substring_contains___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Substring_atEnd___boxed(lean_object*, lean_object*); lean_object* l_Substring_posOf___boxed(lean_object*, lean_object*); +lean_object* l_Substring_takeWhileAux___main___at_String_nextUntil___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Substring_drop___closed__1; +lean_object* l_String_nextWhile(lean_object*, lean_object*, lean_object*); lean_object* l_String_Iterator_hasNext___boxed(lean_object*); lean_object* l_String_Iterator_prevn___main(lean_object*, lean_object*); lean_object* l_String_offsetOfPosAux___main(lean_object*, lean_object*, lean_object*, lean_object*); @@ -4859,6 +4865,89 @@ lean_dec(x_1); return x_2; } } +lean_object* l_String_nextWhile(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_string_utf8_byte_size(x_1); +x_5 = l_Substring_takeWhileAux___main(x_1, x_4, x_2, x_3); +lean_dec(x_4); +return x_5; +} +} +lean_object* l_String_nextWhile___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_String_nextWhile(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Substring_takeWhileAux___main___at_String_nextUntil___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; +x_5 = lean_nat_dec_eq(x_4, x_3); +if (x_5 == 0) +{ +uint32_t x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_6 = lean_string_utf8_get(x_2, x_4); +x_7 = lean_box_uint32(x_6); +lean_inc(x_1); +x_8 = lean_apply_1(x_1, x_7); +x_9 = lean_unbox(x_8); +lean_dec(x_8); +if (x_9 == 0) +{ +lean_object* x_10; +x_10 = lean_string_utf8_next(x_2, x_4); +lean_dec(x_4); +x_4 = x_10; +goto _start; +} +else +{ +lean_dec(x_1); +return x_4; +} +} +else +{ +lean_dec(x_1); +return x_4; +} +} +} +lean_object* l_String_nextUntil(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_string_utf8_byte_size(x_1); +x_5 = l_Substring_takeWhileAux___main___at_String_nextUntil___spec__1(x_2, x_1, x_4, x_3); +lean_dec(x_4); +return x_5; +} +} +lean_object* l_Substring_takeWhileAux___main___at_String_nextUntil___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Substring_takeWhileAux___main___at_String_nextUntil___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_5; +} +} +lean_object* l_String_nextUntil___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_String_nextUntil(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} lean_object* l_Char_toString(uint32_t x_1) { _start: { diff --git a/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c b/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c index 00d1c2ed6a..bddd1cdce0 100644 --- a/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c +++ b/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c @@ -406,6 +406,7 @@ lean_object* l_Lean_Elab_Term_elabAnd___boxed(lean_object*, lean_object*, lean_o lean_object* l_Lean_Elab_Term_elabMap___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__2; lean_object* l_Lean_Elab_Term_elabGE___closed__2; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l_Lean_Elab_Term_elabTParserMacro___lambda__1___closed__5; lean_object* l_Lean_Elab_Term_elabMap___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__2; @@ -420,7 +421,6 @@ lean_object* l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__20; lean_object* l_Lean_Elab_Term_elabTParserMacro(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabDollarProj___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabAnd___closed__1; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHave___closed__3; lean_object* l_Lean_Elab_Term_elabShow___lambda__1___closed__2; @@ -1477,7 +1477,7 @@ x_122 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_123 = lean_array_push(x_122, x_121); x_124 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_125 = lean_array_push(x_123, x_124); -x_126 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_126 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_127 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_127, 0, x_126); lean_ctor_set(x_127, 1, x_125); @@ -1564,7 +1564,7 @@ x_173 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_174 = lean_array_push(x_173, x_172); x_175 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_176 = lean_array_push(x_174, x_175); -x_177 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_177 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_178 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_178, 0, x_177); lean_ctor_set(x_178, 1, x_176); @@ -1927,7 +1927,7 @@ x_43 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_44 = lean_array_push(x_43, x_42); x_45 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_46 = lean_array_push(x_44, x_45); -x_47 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_47 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_48 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_48, 0, x_47); lean_ctor_set(x_48, 1, x_46); @@ -2009,7 +2009,7 @@ x_92 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_93 = lean_array_push(x_92, x_91); x_94 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_95 = lean_array_push(x_93, x_94); -x_96 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_96 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_97 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_97, 0, x_96); lean_ctor_set(x_97, 1, x_95); @@ -2183,7 +2183,7 @@ x_168 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_169 = lean_array_push(x_168, x_167); x_170 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_171 = lean_array_push(x_169, x_170); -x_172 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_172 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_173 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_173, 0, x_172); lean_ctor_set(x_173, 1, x_171); @@ -2273,7 +2273,7 @@ x_221 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_222 = lean_array_push(x_221, x_220); x_223 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_224 = lean_array_push(x_222, x_223); -x_225 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_225 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_226 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_226, 0, x_225); lean_ctor_set(x_226, 1, x_224); @@ -2992,7 +2992,7 @@ x_33 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_34 = lean_array_push(x_33, x_32); x_35 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_36 = lean_array_push(x_34, x_35); -x_37 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_37 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_38 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_38, 0, x_37); lean_ctor_set(x_38, 1, x_36); @@ -3061,7 +3061,7 @@ x_73 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_74 = lean_array_push(x_73, x_72); x_75 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_76 = lean_array_push(x_74, x_75); -x_77 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_77 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_78 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_78, 0, x_77); lean_ctor_set(x_78, 1, x_76); @@ -3341,7 +3341,7 @@ x_45 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_46 = lean_array_push(x_45, x_44); x_47 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_48 = lean_array_push(x_46, x_47); -x_49 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_49 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_50 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_50, 0, x_49); lean_ctor_set(x_50, 1, x_48); @@ -3415,7 +3415,7 @@ x_89 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_90 = lean_array_push(x_89, x_88); x_91 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_92 = lean_array_push(x_90, x_91); -x_93 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_93 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_94 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_94, 0, x_93); lean_ctor_set(x_94, 1, x_92); @@ -3535,7 +3535,7 @@ x_150 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_151 = lean_array_push(x_150, x_149); x_152 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_153 = lean_array_push(x_151, x_152); -x_154 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_154 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_155 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_155, 0, x_154); lean_ctor_set(x_155, 1, x_153); @@ -3609,7 +3609,7 @@ x_194 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_195 = lean_array_push(x_194, x_193); x_196 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_197 = lean_array_push(x_195, x_196); -x_198 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_198 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_199 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_199, 0, x_198); lean_ctor_set(x_199, 1, x_197); @@ -3764,7 +3764,7 @@ x_266 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_267 = lean_array_push(x_266, x_265); x_268 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_269 = lean_array_push(x_267, x_268); -x_270 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_270 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_271 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_271, 0, x_270); lean_ctor_set(x_271, 1, x_269); @@ -3831,7 +3831,7 @@ x_305 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_306 = lean_array_push(x_305, x_304); x_307 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_308 = lean_array_push(x_306, x_307); -x_309 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_309 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_310 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_310, 0, x_309); lean_ctor_set(x_310, 1, x_308); @@ -3946,7 +3946,7 @@ x_363 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_364 = lean_array_push(x_363, x_362); x_365 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_366 = lean_array_push(x_364, x_365); -x_367 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_367 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_368 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_368, 0, x_367); lean_ctor_set(x_368, 1, x_366); @@ -4013,7 +4013,7 @@ x_402 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_403 = lean_array_push(x_402, x_401); x_404 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_405 = lean_array_push(x_403, x_404); -x_406 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_406 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_407 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_407, 0, x_406); lean_ctor_set(x_407, 1, x_405); @@ -4886,7 +4886,7 @@ x_94 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_95 = lean_array_push(x_94, x_93); x_96 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_97 = lean_array_push(x_95, x_96); -x_98 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_98 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_99 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_99, 0, x_98); lean_ctor_set(x_99, 1, x_97); @@ -4976,7 +4976,7 @@ x_141 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_142 = lean_array_push(x_141, x_140); x_143 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_144 = lean_array_push(x_142, x_143); -x_145 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_145 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_146 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_146, 0, x_145); lean_ctor_set(x_146, 1, x_144); @@ -5077,7 +5077,7 @@ x_193 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_194 = lean_array_push(x_193, x_192); x_195 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_196 = lean_array_push(x_194, x_195); -x_197 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_197 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_198 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_198, 0, x_197); lean_ctor_set(x_198, 1, x_196); @@ -5185,7 +5185,7 @@ x_250 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_251 = lean_array_push(x_250, x_249); x_252 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_253 = lean_array_push(x_251, x_252); -x_254 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_254 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_255 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_255, 0, x_254); lean_ctor_set(x_255, 1, x_253); diff --git a/stage0/stdlib/Init/Lean/Elab/Command.c b/stage0/stdlib/Init/Lean/Elab/Command.c index 207a17b2d2..a6bd983cf7 100644 --- a/stage0/stdlib/Init/Lean/Elab/Command.c +++ b/stage0/stdlib/Init/Lean/Elab/Command.c @@ -31,6 +31,7 @@ lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Command_elabComma extern lean_object* l_Lean_Meta_check___closed__1; lean_object* l_Lean_Syntax_isNatLitAux(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_getOptions(lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; extern lean_object* l_Lean_Elab_Tactic_evalTactic___main___closed__3; extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__8; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabNamespace___closed__3; @@ -139,7 +140,6 @@ lean_object* l_Lean_Elab_Command_commandElabAttribute___closed__2; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_isLevelDefEqAux___main___closed__5; lean_object* l_List_foldl___main___at_Lean_Elab_Command_sortDeclLevelParams___spec__1___boxed(lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; lean_object* l_Lean_Elab_Command_modifyScope___at_Lean_Elab_Command_addOpenDecl___spec__1(lean_object*, lean_object*, lean_object*); size_t l_USize_shiftRight(size_t, size_t); lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__1___boxed(lean_object*, lean_object*); @@ -325,6 +325,7 @@ extern lean_object* l_Lean_Parser_Command_open___elambda__1___closed__2; uint8_t l_Array_contains___at_Lean_findField_x3f___main___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_MonadQuotation___closed__1; lean_object* l_Lean_Elab_mkElabAttribute___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; lean_object* l_Lean_Elab_Command_elabEnd___closed__2; lean_object* l_Lean_Elab_Command_elabCommand(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_liftIO___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -475,7 +476,6 @@ lean_object* l_Lean_Elab_Command_throwAlreadyDeclaredUniverseLevel___rarg(lean_o extern lean_object* l_Lean_Parser_Command_openOnly___elambda__1___closed__2; lean_object* l_Array_toList___rarg(lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__3(lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; lean_object* l_Lean_Elab_Command_setOption___closed__3; lean_object* l_Lean_Elab_Command_registerBuiltinCommandElabAttr___lambda__1___closed__5; lean_object* l___private_Init_Lean_Elab_Command_4__modifyGetState___rarg(lean_object*, lean_object*, lean_object*); @@ -3397,7 +3397,7 @@ x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_1); x_28 = l_Lean_Elab_Command_addBuiltinCommandElab___closed__1; x_29 = lean_string_append(x_28, x_27); lean_dec(x_27); -x_30 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_30 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; x_31 = lean_string_append(x_29, x_30); x_32 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_32, 0, x_31); @@ -3502,7 +3502,7 @@ x_52 = l_Lean_Name_toStringWithSep___main(x_51, x_1); x_53 = l_Lean_Elab_Command_addBuiltinCommandElab___closed__1; x_54 = lean_string_append(x_53, x_52); lean_dec(x_52); -x_55 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_55 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; x_56 = lean_string_append(x_54, x_55); x_57 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_57, 0, x_56); @@ -3829,7 +3829,7 @@ lean_dec(x_13); lean_dec(x_11); lean_dec(x_2); lean_dec(x_1); -x_25 = l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; +x_25 = l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; x_26 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_26, 0, x_25); lean_ctor_set(x_26, 1, x_12); diff --git a/stage0/stdlib/Init/Lean/Elab/Level.c b/stage0/stdlib/Init/Lean/Elab/Level.c index 9bde3596c6..e825398f33 100644 --- a/stage0/stdlib/Init/Lean/Elab/Level.c +++ b/stage0/stdlib/Init/Lean/Elab/Level.c @@ -59,6 +59,7 @@ lean_object* l_Lean_Level_addOffsetAux___main(lean_object*, lean_object*); lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog___closed__8; lean_object* l_Lean_Elab_Level_mkFreshId(lean_object*); lean_object* l_Lean_Elab_Level_elabLevel___main___closed__3; +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); lean_object* l_ReaderT_bind___at_Lean_Elab_Level_LevelElabM_MonadLog___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog___closed__1; uint8_t l_List_elem___main___at_Lean_Parser_addLeadingParser___spec__7(lean_object*, lean_object*); @@ -68,7 +69,6 @@ lean_object* l_Lean_FileMap_toPosition(lean_object*, lean_object*); lean_object* l_Lean_Elab_Level_elabLevel___main___closed__1; lean_object* l_Lean_Elab_Level_mkFreshId___rarg(lean_object*); lean_object* l_Lean_Elab_Level_elabLevel___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); extern lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__1; lean_object* l_Lean_mkLevelMVar(lean_object*); lean_object* l_Lean_Elab_Level_LevelElabM_MonadLog___lambda__4(lean_object*, lean_object*, lean_object*); @@ -1264,7 +1264,7 @@ x_75 = l_Lean_Syntax_getArg(x_1, x_74); lean_dec(x_1); x_76 = l_Lean_Syntax_getArgs(x_75); lean_dec(x_75); -x_77 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_76); +x_77 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_76); x_78 = l_Lean_Elab_Level_elabLevel___main(x_77, x_2, x_3); if (lean_obj_tag(x_78) == 0) { @@ -1330,7 +1330,7 @@ x_93 = l_Lean_Syntax_getArg(x_1, x_92); lean_dec(x_1); x_94 = l_Lean_Syntax_getArgs(x_93); lean_dec(x_93); -x_95 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_94); +x_95 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_94); x_96 = l_Lean_Elab_Level_elabLevel___main(x_95, x_2, x_3); if (lean_obj_tag(x_96) == 0) { diff --git a/stage0/stdlib/Init/Lean/Elab/Quotation.c b/stage0/stdlib/Init/Lean/Elab/Quotation.c index 49b2b509f3..d48b022ab1 100644 --- a/stage0/stdlib/Init/Lean/Elab/Quotation.c +++ b/stage0/stdlib/Init/Lean/Elab/Quotation.c @@ -300,6 +300,7 @@ extern lean_object* l_Lean_Parser_termParser___closed__2; lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__2; +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); extern lean_object* l_Lean_Elab_Exception_hasToString___closed__1; extern lean_object* l_PersistentArray_empty___closed__3; lean_object* l_Lean_Elab_Term_resolveName(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -343,7 +344,6 @@ lean_object* l_Lean_Elab_Term_elabStxQuot(lean_object*, lean_object*, lean_objec lean_object* l_List_map___main___at_Lean_Elab_Term_oldGetPatternVars___spec__2(lean_object*); lean_object* l_Lean_List_hasQuote(lean_object*); lean_object* l_Lean_Elab_Term_stxQuot_expand___closed__19; -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Quotation_7__getHeadInfo___lambda__2___closed__3; @@ -378,16 +378,17 @@ lean_object* l___private_Init_Lean_Elab_Quotation_12__letBindRhss___main___close lean_object* l_ReaderT_bind___at___private_Init_Lean_Elab_Quotation_8__explodeHeadPat___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Quotation_3__quoteOption___rarg___closed__3; lean_object* l___private_Init_Lean_Elab_Quotation_7__getHeadInfo(lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; extern lean_object* l_Lean_mkAppStx___closed__3; lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__4; lean_object* l___private_Init_Lean_Elab_Quotation_14__toPreterm___main___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_KVMap_setName(lean_object*, lean_object*, lean_object*); lean_object* lean_local_ctx_mk_local_decl(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__27; extern lean_object* l_Lean_Parser_appPrec; lean_object* l_Lean_Array_hasQuote(lean_object*); extern lean_object* l_Option_HasRepr___rarg___closed__3; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_List_mapM___main___at___private_Init_Lean_Elab_Quotation_12__letBindRhss___main___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; lean_object* l_List_map___main___at___private_Init_Lean_Elab_Quotation_15__oldRunTermElabM___spec__2(lean_object*, lean_object*); @@ -397,7 +398,6 @@ lean_object* l___private_Init_Lean_Elab_Quotation_2__quoteList___main(lean_objec lean_object* l___private_Init_Lean_Elab_Quotation_9__compileStxMatch___main___closed__14; extern lean_object* l_Lean_mkAppStx___closed__5; lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__44; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l_Lean_Parser_Error_toString(lean_object*); lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__8; lean_object* l___private_Init_Lean_Elab_Quotation_9__compileStxMatch___main___closed__28; @@ -3342,7 +3342,7 @@ x_340 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_341 = lean_array_push(x_340, x_339); x_342 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_343 = lean_array_push(x_341, x_342); -x_344 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_344 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_345 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_345, 0, x_344); lean_ctor_set(x_345, 1, x_343); @@ -3493,7 +3493,7 @@ x_423 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_424 = lean_array_push(x_423, x_422); x_425 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_426 = lean_array_push(x_424, x_425); -x_427 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_427 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_428 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_428, 0, x_427); lean_ctor_set(x_428, 1, x_426); @@ -3693,7 +3693,7 @@ x_528 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_529 = lean_array_push(x_528, x_527); x_530 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_531 = lean_array_push(x_529, x_530); -x_532 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_532 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_533 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_533, 0, x_532); lean_ctor_set(x_533, 1, x_531); @@ -4284,7 +4284,7 @@ x_93 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_94 = lean_array_push(x_93, x_92); x_95 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_96 = lean_array_push(x_94, x_95); -x_97 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_97 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_98 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_98, 0, x_97); lean_ctor_set(x_98, 1, x_96); @@ -4469,7 +4469,7 @@ x_194 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_195 = lean_array_push(x_194, x_193); x_196 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_197 = lean_array_push(x_195, x_196); -x_198 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_198 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_199 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_199, 0, x_198); lean_ctor_set(x_199, 1, x_197); @@ -5681,7 +5681,7 @@ x_45 = lean_box(0); x_46 = lean_name_eq(x_44, x_45); lean_dec(x_44); x_47 = l_Lean_Syntax_getArg(x_14, x_13); -x_48 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_48 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_inc(x_47); x_49 = l_Lean_Syntax_isOfKind(x_47, x_48); x_50 = l_Lean_Elab_Term_isAntiquotSplice(x_14); @@ -9707,7 +9707,7 @@ x_672 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_673 = lean_array_push(x_672, x_671); x_674 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_675 = lean_array_push(x_673, x_674); -x_676 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_676 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_677 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_677, 0, x_676); lean_ctor_set(x_677, 1, x_675); @@ -10081,7 +10081,7 @@ x_864 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43; x_865 = lean_array_push(x_864, x_863); x_866 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_867 = lean_array_push(x_865, x_866); -x_868 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_868 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_869 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_869, 0, x_868); lean_ctor_set(x_869, 1, x_867); @@ -10613,7 +10613,7 @@ x_1080 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43 x_1081 = lean_array_push(x_1080, x_1079); x_1082 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__59; x_1083 = lean_array_push(x_1081, x_1082); -x_1084 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_1084 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_1085 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_1085, 0, x_1084); lean_ctor_set(x_1085, 1, x_1083); @@ -11230,7 +11230,7 @@ lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint x_19 = l_Lean_Syntax_inhabited; x_20 = lean_unsigned_to_nat(1u); x_21 = lean_array_get(x_19, x_4, x_20); -x_22 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_22 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_inc(x_21); x_23 = l_Lean_Syntax_isOfKind(x_21, x_22); if (x_23 == 0) @@ -11796,7 +11796,7 @@ lean_object* _init_l___private_Init_Lean_Elab_Quotation_12__letBindRhss___main__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_2 = l___private_Init_Lean_Elab_Quotation_12__letBindRhss___main___closed__6; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -15250,7 +15250,7 @@ x_163 = lean_string_dec_eq(x_119, x_162); if (x_163 == 0) { lean_object* x_164; uint8_t x_165; -x_164 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_164 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_165 = lean_string_dec_eq(x_119, x_164); if (x_165 == 0) { @@ -17497,7 +17497,7 @@ x_796 = lean_string_dec_eq(x_119, x_795); if (x_796 == 0) { lean_object* x_797; uint8_t x_798; -x_797 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_797 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_798 = lean_string_dec_eq(x_119, x_797); if (x_798 == 0) { @@ -19289,7 +19289,7 @@ x_1278 = lean_string_dec_eq(x_119, x_1277); if (x_1278 == 0) { lean_object* x_1279; uint8_t x_1280; -x_1279 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_1279 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_1280 = lean_string_dec_eq(x_119, x_1279); if (x_1280 == 0) { @@ -21115,7 +21115,7 @@ x_1766 = lean_string_dec_eq(x_119, x_1765); if (x_1766 == 0) { lean_object* x_1767; uint8_t x_1768; -x_1767 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_1767 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_1768 = lean_string_dec_eq(x_119, x_1767); if (x_1768 == 0) { @@ -22974,7 +22974,7 @@ x_2261 = lean_string_dec_eq(x_119, x_2260); if (x_2261 == 0) { lean_object* x_2262; uint8_t x_2263; -x_2262 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2262 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_2263 = lean_string_dec_eq(x_119, x_2262); if (x_2263 == 0) { @@ -25135,7 +25135,7 @@ lean_inc(x_13); x_14 = lean_ctor_get(x_11, 1); lean_inc(x_14); lean_dec(x_11); -x_15 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_13); +x_15 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_13); lean_dec(x_13); x_16 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_16, 0, x_15); diff --git a/stage0/stdlib/Init/Lean/Elab/Syntax.c b/stage0/stdlib/Init/Lean/Elab/Syntax.c index 31d5b204e3..b20426f5e9 100644 --- a/stage0/stdlib/Init/Lean/Elab/Syntax.c +++ b/stage0/stdlib/Init/Lean/Elab/Syntax.c @@ -106,6 +106,7 @@ lean_object* l_Lean_Elab_Command_elabSyntax___lambda__1___boxed(lean_object*, le lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__51; +extern lean_object* l_Lean_charLitKind___closed__1; extern lean_object* l_Lean_Parser_Term_num___elambda__1___closed__1; extern lean_object* l_Lean_Syntax_termIdToAntiquot___closed__3; lean_object* l_Lean_Elab_Command_strLitPrecToPattern(lean_object*, lean_object*); @@ -217,9 +218,11 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__129; lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Unhygienic_run___rarg(lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__25; +extern lean_object* l_Lean_numLitKind___closed__1; extern lean_object* l_Lean_Parser_Command_def___elambda__1___closed__1; lean_object* l___private_Init_Lean_Elab_Syntax_3__markAsTrailingParser(lean_object*, uint8_t, lean_object*); lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_7__antiquote___main___spec__1(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_strLitKind___closed__1; extern lean_object* l___private_Init_Lean_Elab_TermBinders_10__expandFunBindersAux___main___closed__6; lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_optional___elambda__1___closed__1; @@ -1877,7 +1880,7 @@ lean_object* _init_l_Lean_Elab_Term_toParserDescrAux___main___closed__64() { _start: { lean_object* x_1; -x_1 = lean_mk_string("ParserDescr.char"); +x_1 = lean_mk_string("ParserDescr.charLit"); return x_1; } } @@ -1909,7 +1912,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__4; -x_2 = l_Lean_Parser_Term_char___elambda__1___closed__1; +x_2 = l_Lean_charLitKind___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -1919,7 +1922,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__6; -x_2 = l_Lean_Parser_Term_char___elambda__1___closed__1; +x_2 = l_Lean_charLitKind___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -1952,7 +1955,7 @@ lean_object* _init_l_Lean_Elab_Term_toParserDescrAux___main___closed__71() { _start: { lean_object* x_1; -x_1 = lean_mk_string("ParserDescr.str"); +x_1 = lean_mk_string("ParserDescr.strLit"); return x_1; } } @@ -1984,7 +1987,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__4; -x_2 = l_Lean_Parser_Term_str___elambda__1___closed__1; +x_2 = l_Lean_strLitKind___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -1994,7 +1997,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__6; -x_2 = l_Lean_Parser_Term_str___elambda__1___closed__1; +x_2 = l_Lean_strLitKind___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -2027,7 +2030,7 @@ lean_object* _init_l_Lean_Elab_Term_toParserDescrAux___main___closed__78() { _start: { lean_object* x_1; -x_1 = lean_mk_string("ParserDescr.num"); +x_1 = lean_mk_string("ParserDescr.numLit"); return x_1; } } @@ -2059,7 +2062,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__4; -x_2 = l_Lean_Parser_Level_num___elambda__1___closed__1; +x_2 = l_Lean_numLitKind___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -2069,7 +2072,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__6; -x_2 = l_Lean_Parser_Level_num___elambda__1___closed__1; +x_2 = l_Lean_numLitKind___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } diff --git a/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c b/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c index 089c31fe3a..9c05c0debc 100644 --- a/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c +++ b/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c @@ -24,6 +24,7 @@ lean_object* l_Lean_Elab_Tactic_getLocalInsts___boxed(lean_object*, lean_object* lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_withMVarContext___rarg(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_PersistentHashMap_contains___at_Lean_Elab_Tactic_addBuiltinTactic___spec__4(lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; lean_object* l_Lean_Elab_Tactic_evalTactic___main___closed__3; extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__8; lean_object* l_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__2(lean_object*, lean_object*); @@ -105,7 +106,6 @@ extern lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__2; lean_object* l_Lean_Elab_Tactic_withFreshMacroScope(lean_object*); lean_object* l_Lean_MetavarContext_renameMVar(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__3; -extern lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; lean_object* l_AssocList_find___main___at_Lean_Elab_Tactic_evalTactic___main___spec__6___boxed(lean_object*, lean_object*); lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__2; size_t l_USize_shiftRight(size_t, size_t); @@ -238,6 +238,7 @@ extern lean_object* l_Lean_Parser_Tactic_paren___elambda__1___closed__1; lean_object* l_Lean_Elab_Tactic_monadLog___closed__1; lean_object* l_Lean_Elab_Term_ensureHasType___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_mkElabAttribute___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; lean_object* l_Lean_Elab_Tactic_save___boxed(lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___closed__5; lean_object* l_mkHashMapImp___rarg(lean_object*); @@ -366,7 +367,6 @@ lean_object* l_Array_toList___rarg(lean_object*); lean_object* l_Lean_Elab_Tactic_ensureHasType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instantiateMVars(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_withMacroExpansion___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; lean_object* l_Lean_Elab_Tactic_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_reportUnsolvedGoals(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_AssocList_find___main___at_Lean_Elab_Tactic_evalTactic___main___spec__6(lean_object*, lean_object*); @@ -3154,7 +3154,7 @@ x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_1); x_28 = l_Lean_Elab_Tactic_addBuiltinTactic___closed__1; x_29 = lean_string_append(x_28, x_27); lean_dec(x_27); -x_30 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_30 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; x_31 = lean_string_append(x_29, x_30); x_32 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_32, 0, x_31); @@ -3259,7 +3259,7 @@ x_52 = l_Lean_Name_toStringWithSep___main(x_51, x_1); x_53 = l_Lean_Elab_Tactic_addBuiltinTactic___closed__1; x_54 = lean_string_append(x_53, x_52); lean_dec(x_52); -x_55 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_55 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; x_56 = lean_string_append(x_54, x_55); x_57 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_57, 0, x_56); @@ -3578,7 +3578,7 @@ lean_dec(x_13); lean_dec(x_11); lean_dec(x_2); lean_dec(x_1); -x_25 = l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; +x_25 = l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; x_26 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_26, 0, x_25); lean_ctor_set(x_26, 1, x_12); diff --git a/stage0/stdlib/Init/Lean/Elab/Term.c b/stage0/stdlib/Init/Lean/Elab/Term.c index 1cc9c65cea..43256ad857 100644 --- a/stage0/stdlib/Init/Lean/Elab/Term.c +++ b/stage0/stdlib/Init/Lean/Elab/Term.c @@ -28,6 +28,7 @@ lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__1; lean_object* l_Lean_mkAppStx(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_monadQuotation; lean_object* l_Lean_Elab_Term_elabRawNumLit___closed__1; +lean_object* l_Lean_extractMacroScopes(lean_object*); lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__8; uint8_t l___private_Init_Lean_Elab_Term_4__isCDot___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNum(lean_object*); @@ -43,6 +44,7 @@ lean_object* l_Lean_Syntax_isNatLitAux(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabRawCharLit___closed__3; lean_object* l_PersistentArray_foldlMAux___main___at___private_Init_Lean_Elab_Term_3__fromMetaState___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabNum___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__8; lean_object* l_Lean_Elab_Term_State_inhabited; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabChar(lean_object*); @@ -106,6 +108,7 @@ uint8_t l_List_elem___main___at_Lean_addAliasEntry___spec__18(lean_object*, lean extern lean_object* l_Prod_HasRepr___rarg___closed__1; lean_object* l___private_Init_Lean_Elab_Term_4__isCDot___boxed(lean_object*); lean_object* l_Lean_Elab_Term_elabQuotedName___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_MacroScopesView_format(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__1; lean_object* l_Lean_Meta_Exception_toMessageData(lean_object*); lean_object* l_Lean_mkMVar(lean_object*); @@ -181,7 +184,6 @@ lean_object* l___private_Init_Lean_Elab_Term_10__elabCDot(lean_object*, lean_obj lean_object* l___private_Init_Lean_Elab_Term_5__expandCDot___closed__3; lean_object* l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(lean_object*, lean_object*, lean_object*); extern lean_object* l_List_repr___rarg___closed__3; -extern lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; extern lean_object* l_Lean_Parser_Term_typeAscription___elambda__1___closed__2; lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Term_elabTermAux___main___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwError(lean_object*); @@ -372,7 +374,6 @@ lean_object* l_Lean_Elab_Term_trySynthInstance(lean_object*, lean_object*, lean_ lean_object* l_Lean_Elab_Term_liftLevelM___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabListLit___closed__4; extern lean_object* l_Lean_Parser_Term_explicitBinder___elambda__1___closed__2; -lean_object* l_Lean_Syntax_getId(lean_object*); lean_object* l_Lean_Elab_Term_elabRawStrLit___closed__1; lean_object* l_Lean_Syntax_prettyPrint(lean_object*); lean_object* l_Lean_Elab_Term_Lean_Elab_MonadMacroAdapter; @@ -394,6 +395,7 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabRawCharLit___closed__3; lean_object* l_Lean_Elab_Term_monadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_elabTypeStx___rarg___closed__1; +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); extern lean_object* l_Lean_Elab_Exception_hasToString___closed__1; lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Term_elabTermAux___main___spec__3(lean_object*, size_t, lean_object*); extern lean_object* l_PersistentArray_empty___closed__3; @@ -448,6 +450,7 @@ lean_object* l_Lean_Elab_Term_elabTermAux(lean_object*, uint8_t, lean_object*, l lean_object* l_Lean_Elab_Term_termElabAttribute___closed__5; lean_object* l_Lean_Elab_Term_ensureHasType___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_mkElabAttribute___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabArrayLit___closed__3; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabArrayLit(lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSort___closed__1; @@ -463,7 +466,6 @@ lean_object* l_Lean_Elab_Term_getLocalInsts(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabProp(lean_object*); lean_object* l___private_Init_Lean_Elab_Term_7__postponeElabTerm___closed__2; lean_object* l_Lean_Elab_Term_mkFreshInstanceName___rarg(lean_object*); -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Meta_whnf(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSort___closed__2; lean_object* l_Lean_Elab_Term_isClass(lean_object*, lean_object*, lean_object*, lean_object*); @@ -514,6 +516,7 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabRawNumLit___closed__1; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__10; lean_object* l_Lean_ConstantInfo_lparams(lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole(lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l_Lean_Elab_Term_mkFreshAnonymousName(lean_object*); lean_object* l_Lean_Elab_Term_withLCtx(lean_object*); lean_object* l_Lean_Elab_Term_withNode(lean_object*); @@ -536,7 +539,6 @@ lean_object* l_Lean_Meta_trySynthInstance(lean_object*, lean_object*, lean_objec lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__7; extern lean_object* l_Lean_mkAppStx___closed__5; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabRawStrLit___closed__1; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l___private_Init_Lean_Elab_Term_13__mkFreshLevelMVars(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Term_3__fromMetaState___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_6__exceptionToSorry___closed__3; @@ -652,6 +654,7 @@ lean_object* l_Lean_mkTermIdFrom(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabListLit(lean_object*); lean_object* l_Lean_Elab_Term_elabArrayLit___closed__3; extern lean_object* l_Lean_mkOptionalNode___closed__1; +lean_object* l_Lean_Syntax_isNameLit_x3f(lean_object*); lean_object* l_Lean_Elab_Term_getMainModule___boxed(lean_object*); lean_object* l_Lean_Elab_Term_tryEnsureHasType_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_decLevel___closed__4; @@ -664,7 +667,6 @@ lean_object* l_Lean_Elab_Term_monadLog___closed__11; lean_object* l_Lean_Elab_Term_mkTacticMVar___closed__2; extern lean_object* l_Lean_Expr_Inhabited; lean_object* l_Lean_Meta_instantiateMVars(lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; lean_object* l_Lean_Elab_Term_addBuiltinTermElab(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkExplicitBinder___closed__1; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabStr(lean_object*); @@ -2742,7 +2744,7 @@ x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_1); x_28 = l_Lean_Elab_Term_addBuiltinTermElab___closed__1; x_29 = lean_string_append(x_28, x_27); lean_dec(x_27); -x_30 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_30 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; x_31 = lean_string_append(x_29, x_30); x_32 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_32, 0, x_31); @@ -2847,7 +2849,7 @@ x_52 = l_Lean_Name_toStringWithSep___main(x_51, x_1); x_53 = l_Lean_Elab_Term_addBuiltinTermElab___closed__1; x_54 = lean_string_append(x_53, x_52); lean_dec(x_52); -x_55 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_55 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; x_56 = lean_string_append(x_54, x_55); x_57 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_57, 0, x_56); @@ -3174,7 +3176,7 @@ lean_dec(x_13); lean_dec(x_11); lean_dec(x_2); lean_dec(x_1); -x_25 = l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; +x_25 = l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; x_26 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_26, 0, x_25); lean_ctor_set(x_26, 1, x_12); @@ -18441,7 +18443,7 @@ x_4 = lean_array_get_size(x_1); x_5 = lean_unsigned_to_nat(1u); x_6 = lean_nat_sub(x_4, x_5); lean_dec(x_4); -x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_1); +x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_1); x_8 = l___private_Init_Lean_Elab_Term_9__mkPairsAux___main(x_1, x_6, x_7, x_2, x_3); return x_8; } @@ -18639,7 +18641,7 @@ lean_object* l_Lean_Elab_Term_elabParen(lean_object* x_1, lean_object* x_2, lean _start: { uint8_t x_5; lean_object* x_147; uint8_t x_148; -x_147 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_147 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_inc(x_1); x_148 = l_Lean_Syntax_isOfKind(x_1, x_147); if (x_148 == 0) @@ -19233,7 +19235,7 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabParen(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabParen___closed__2; x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabParen___closed__3; x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); @@ -20490,183 +20492,188 @@ return x_23; } else { -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; uint8_t x_33; +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; lean_dec(x_21); lean_dec(x_4); -x_24 = l_Lean_Name_toString___closed__1; -x_25 = l_Lean_Name_toStringWithSep___main(x_24, x_2); -x_26 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_26, 0, x_25); -x_27 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_27, 0, x_26); -x_28 = l_Lean_Elab_Term_resolveName___closed__3; -x_29 = lean_alloc_ctor(9, 2, 0); +x_24 = l_Lean_Elab_Term_getMainModule___rarg(x_20); +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_24, 1); +lean_inc(x_26); +lean_dec(x_24); +x_27 = l_Lean_extractMacroScopes(x_2); +x_28 = l_Lean_MacroScopesView_format(x_27, x_25); +lean_dec(x_25); +x_29 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_29, 0, x_28); -lean_ctor_set(x_29, 1, x_27); -x_30 = l_Lean_Elab_Term_mkConst___closed__4; +x_30 = l_Lean_Elab_Term_resolveName___closed__3; x_31 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_30); -x_32 = l_Lean_Elab_Term_throwError___rarg(x_1, x_31, x_5, x_20); -x_33 = !lean_is_exclusive(x_32); -if (x_33 == 0) +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_29); +x_32 = l_Lean_Elab_Term_mkConst___closed__4; +x_33 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +x_34 = l_Lean_Elab_Term_throwError___rarg(x_1, x_33, x_5, x_26); +x_35 = !lean_is_exclusive(x_34); +if (x_35 == 0) { -return x_32; +return x_34; } else { -lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_34 = lean_ctor_get(x_32, 0); -x_35 = lean_ctor_get(x_32, 1); -lean_inc(x_35); -lean_inc(x_34); -lean_dec(x_32); -x_36 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_36, 0, x_34); -lean_ctor_set(x_36, 1, x_35); -return x_36; +lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_36 = lean_ctor_get(x_34, 0); +x_37 = lean_ctor_get(x_34, 1); +lean_inc(x_37); +lean_inc(x_36); +lean_dec(x_34); +x_38 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_38, 0, x_36); +lean_ctor_set(x_38, 1, x_37); +return x_38; } } } } else { -lean_object* x_37; uint8_t x_38; +lean_object* x_39; uint8_t x_40; lean_dec(x_3); lean_dec(x_2); -x_37 = lean_ctor_get(x_8, 0); -lean_inc(x_37); +x_39 = lean_ctor_get(x_8, 0); +lean_inc(x_39); lean_dec(x_8); -x_38 = !lean_is_exclusive(x_7); -if (x_38 == 0) +x_40 = !lean_is_exclusive(x_7); +if (x_40 == 0) { -lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; -x_39 = lean_ctor_get(x_7, 1); -x_40 = lean_ctor_get(x_7, 0); -lean_dec(x_40); -x_41 = lean_ctor_get(x_37, 0); -lean_inc(x_41); -x_42 = l_List_isEmpty___rarg(x_4); +lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; +x_41 = lean_ctor_get(x_7, 1); +x_42 = lean_ctor_get(x_7, 0); +lean_dec(x_42); +x_43 = lean_ctor_get(x_39, 0); +lean_inc(x_43); +x_44 = l_List_isEmpty___rarg(x_4); lean_dec(x_4); -if (x_42 == 0) +if (x_44 == 0) { -lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; lean_free_object(x_7); -lean_dec(x_37); -x_43 = l_Lean_Expr_fvarId_x21(x_41); -lean_dec(x_41); -x_44 = l_Lean_Name_toString___closed__1; -x_45 = l_Lean_Name_toStringWithSep___main(x_44, x_43); -x_46 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_46, 0, x_45); -x_47 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_47, 0, x_46); -x_48 = l_Lean_Elab_Term_resolveName___closed__6; -x_49 = lean_alloc_ctor(9, 2, 0); +lean_dec(x_39); +x_45 = l_Lean_Expr_fvarId_x21(x_43); +lean_dec(x_43); +x_46 = l_Lean_Name_toString___closed__1; +x_47 = l_Lean_Name_toStringWithSep___main(x_46, x_45); +x_48 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_48, 0, x_47); +x_49 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_49, 0, x_48); -lean_ctor_set(x_49, 1, x_47); -x_50 = l_Lean_Elab_Term_resolveName___closed__9; +x_50 = l_Lean_Elab_Term_resolveName___closed__6; x_51 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_51, 0, x_49); -lean_ctor_set(x_51, 1, x_50); -x_52 = l_Lean_Elab_Term_throwError___rarg(x_1, x_51, x_5, x_39); -x_53 = !lean_is_exclusive(x_52); -if (x_53 == 0) +lean_ctor_set(x_51, 0, x_50); +lean_ctor_set(x_51, 1, x_49); +x_52 = l_Lean_Elab_Term_resolveName___closed__9; +x_53 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_53, 0, x_51); +lean_ctor_set(x_53, 1, x_52); +x_54 = l_Lean_Elab_Term_throwError___rarg(x_1, x_53, x_5, x_41); +x_55 = !lean_is_exclusive(x_54); +if (x_55 == 0) { -return x_52; +return x_54; } else { -lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_54 = lean_ctor_get(x_52, 0); -x_55 = lean_ctor_get(x_52, 1); -lean_inc(x_55); -lean_inc(x_54); -lean_dec(x_52); -x_56 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_56, 0, x_54); -lean_ctor_set(x_56, 1, x_55); -return x_56; -} -} -else -{ -lean_object* x_57; lean_object* x_58; -lean_dec(x_41); -lean_dec(x_5); -x_57 = lean_box(0); +lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_56 = lean_ctor_get(x_54, 0); +x_57 = lean_ctor_get(x_54, 1); +lean_inc(x_57); +lean_inc(x_56); +lean_dec(x_54); x_58 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_58, 0, x_37); +lean_ctor_set(x_58, 0, x_56); lean_ctor_set(x_58, 1, x_57); -lean_ctor_set(x_7, 0, x_58); +return x_58; +} +} +else +{ +lean_object* x_59; lean_object* x_60; +lean_dec(x_43); +lean_dec(x_5); +x_59 = lean_box(0); +x_60 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_60, 0, x_39); +lean_ctor_set(x_60, 1, x_59); +lean_ctor_set(x_7, 0, x_60); return x_7; } } else { -lean_object* x_59; lean_object* x_60; uint8_t x_61; -x_59 = lean_ctor_get(x_7, 1); -lean_inc(x_59); +lean_object* x_61; lean_object* x_62; uint8_t x_63; +x_61 = lean_ctor_get(x_7, 1); +lean_inc(x_61); lean_dec(x_7); -x_60 = lean_ctor_get(x_37, 0); -lean_inc(x_60); -x_61 = l_List_isEmpty___rarg(x_4); +x_62 = lean_ctor_get(x_39, 0); +lean_inc(x_62); +x_63 = l_List_isEmpty___rarg(x_4); lean_dec(x_4); -if (x_61 == 0) +if (x_63 == 0) { -lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -lean_dec(x_37); -x_62 = l_Lean_Expr_fvarId_x21(x_60); -lean_dec(x_60); -x_63 = l_Lean_Name_toString___closed__1; -x_64 = l_Lean_Name_toStringWithSep___main(x_63, x_62); -x_65 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_65, 0, x_64); -x_66 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_66, 0, x_65); -x_67 = l_Lean_Elab_Term_resolveName___closed__6; -x_68 = lean_alloc_ctor(9, 2, 0); +lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; +lean_dec(x_39); +x_64 = l_Lean_Expr_fvarId_x21(x_62); +lean_dec(x_62); +x_65 = l_Lean_Name_toString___closed__1; +x_66 = l_Lean_Name_toStringWithSep___main(x_65, x_64); +x_67 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_67, 0, x_66); +x_68 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_68, 0, x_67); -lean_ctor_set(x_68, 1, x_66); -x_69 = l_Lean_Elab_Term_resolveName___closed__9; +x_69 = l_Lean_Elab_Term_resolveName___closed__6; x_70 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_70, 0, x_68); -lean_ctor_set(x_70, 1, x_69); -x_71 = l_Lean_Elab_Term_throwError___rarg(x_1, x_70, x_5, x_59); -x_72 = lean_ctor_get(x_71, 0); -lean_inc(x_72); -x_73 = lean_ctor_get(x_71, 1); -lean_inc(x_73); -if (lean_is_exclusive(x_71)) { - lean_ctor_release(x_71, 0); - lean_ctor_release(x_71, 1); - x_74 = x_71; +lean_ctor_set(x_70, 0, x_69); +lean_ctor_set(x_70, 1, x_68); +x_71 = l_Lean_Elab_Term_resolveName___closed__9; +x_72 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +x_73 = l_Lean_Elab_Term_throwError___rarg(x_1, x_72, x_5, x_61); +x_74 = lean_ctor_get(x_73, 0); +lean_inc(x_74); +x_75 = lean_ctor_get(x_73, 1); +lean_inc(x_75); +if (lean_is_exclusive(x_73)) { + lean_ctor_release(x_73, 0); + lean_ctor_release(x_73, 1); + x_76 = x_73; } else { - lean_dec_ref(x_71); - x_74 = lean_box(0); + lean_dec_ref(x_73); + x_76 = lean_box(0); } -if (lean_is_scalar(x_74)) { - x_75 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_76)) { + x_77 = lean_alloc_ctor(1, 2, 0); } else { - x_75 = x_74; + x_77 = x_76; } -lean_ctor_set(x_75, 0, x_72); -lean_ctor_set(x_75, 1, x_73); -return x_75; +lean_ctor_set(x_77, 0, x_74); +lean_ctor_set(x_77, 1, x_75); +return x_77; } else { -lean_object* x_76; lean_object* x_77; lean_object* x_78; -lean_dec(x_60); +lean_object* x_78; lean_object* x_79; lean_object* x_80; +lean_dec(x_62); lean_dec(x_5); -x_76 = lean_box(0); -x_77 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_77, 0, x_37); -lean_ctor_set(x_77, 1, x_76); -x_78 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_78, 0, x_77); -lean_ctor_set(x_78, 1, x_59); -return x_78; +x_78 = lean_box(0); +x_79 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_79, 0, x_39); +lean_ctor_set(x_79, 1, x_78); +x_80 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_80, 0, x_79); +lean_ctor_set(x_80, 1, x_61); +return x_80; } } } @@ -21470,67 +21477,30 @@ return x_5; lean_object* l_Lean_Elab_Term_elabQuotedName(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -lean_object* x_5; uint8_t x_6; -x_5 = l_Lean_Parser_Term_quotedName___elambda__1___closed__2; -lean_inc(x_1); -x_6 = l_Lean_Syntax_isOfKind(x_1, x_5); -if (x_6 == 0) +lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_5 = lean_unsigned_to_nat(0u); +x_6 = l_Lean_Syntax_getArg(x_1, x_5); +x_7 = l_Lean_Syntax_isNameLit_x3f(x_6); +lean_dec(x_6); +if (lean_obj_tag(x_7) == 0) { -uint8_t x_7; -x_7 = l___private_Init_Lean_Elab_Term_4__isCDot___closed__1; -if (x_7 == 0) -{ -lean_object* x_8; -lean_dec(x_1); -x_8 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); -return x_8; +lean_object* x_8; lean_object* x_9; +x_8 = l_Lean_Elab_Term_elabRawStrLit___closed__3; +x_9 = l_Lean_Elab_Term_throwError___rarg(x_1, x_8, x_3, x_4); +return x_9; } else { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_9 = lean_unsigned_to_nat(1u); -x_10 = l_Lean_Syntax_getArg(x_1, x_9); -lean_dec(x_1); -x_11 = l_Lean_Syntax_getId(x_10); -lean_dec(x_10); -x_12 = l_Lean_nameToExprAux___main(x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_4); -return x_13; -} -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; uint8_t x_18; -x_14 = l_Lean_Syntax_getArgs(x_1); -x_15 = lean_array_get_size(x_14); -lean_dec(x_14); -x_16 = lean_unsigned_to_nat(2u); -x_17 = lean_nat_dec_eq(x_15, x_16); -lean_dec(x_15); -x_18 = l_coeDecidableEq(x_17); -if (x_18 == 0) -{ -lean_object* x_19; -lean_dec(x_1); -x_19 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); -return x_19; -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_20 = lean_unsigned_to_nat(1u); -x_21 = l_Lean_Syntax_getArg(x_1, x_20); -lean_dec(x_1); -x_22 = l_Lean_Syntax_getId(x_21); -lean_dec(x_21); -x_23 = l_Lean_nameToExprAux___main(x_22); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_4); -return x_24; -} +lean_object* x_10; lean_object* x_11; lean_object* x_12; +lean_dec(x_3); +x_10 = lean_ctor_get(x_7, 0); +lean_inc(x_10); +lean_dec(x_7); +x_11 = l_Lean_nameToExprAux___main(x_10); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_4); +return x_12; } } } @@ -21539,8 +21509,8 @@ _start: { lean_object* x_5; x_5 = l_Lean_Elab_Term_elabQuotedName(x_1, x_2, x_3, x_4); -lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } diff --git a/stage0/stdlib/Init/Lean/Elab/TermBinders.c b/stage0/stdlib/Init/Lean/Elab/TermBinders.c index f234380aee..7fb46bf0d4 100644 --- a/stage0/stdlib/Init/Lean/Elab/TermBinders.c +++ b/stage0/stdlib/Init/Lean/Elab/TermBinders.c @@ -172,6 +172,7 @@ lean_object* l_Lean_Elab_Term_expandOptType___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_nullKind___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDepArrow___closed__1; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabArrow___closed__3; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; extern lean_object* l_Lean_mkAppStx___closed__3; lean_object* l___private_Init_Lean_Elab_TermBinders_7__elabBindersAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_TermBinders_5__matchBinder(lean_object*, lean_object*, lean_object*); @@ -179,7 +180,6 @@ lean_object* lean_local_ctx_mk_local_decl(lean_object*, lean_object*, lean_objec lean_object* l_Lean_Elab_Term_elabLetEqnsDecl___boxed(lean_object*); extern lean_object* l_Option_HasRepr___rarg___closed__3; lean_object* l___private_Init_Lean_Elab_TermBinders_4__expandBinderModifier___closed__6; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabForall___closed__1; extern lean_object* l_Lean_Parser_Term_implicitBinder___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_elabArrow(lean_object*, lean_object*, lean_object*, lean_object*); @@ -5852,7 +5852,7 @@ x_492 = lean_string_dec_eq(x_19, x_491); if (x_492 == 0) { lean_object* x_493; uint8_t x_494; -x_493 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_493 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_494 = lean_string_dec_eq(x_19, x_493); if (x_494 == 0) { @@ -8264,7 +8264,7 @@ x_1438 = lean_string_dec_eq(x_19, x_1437); if (x_1438 == 0) { lean_object* x_1439; uint8_t x_1440; -x_1439 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_1439 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_1440 = lean_string_dec_eq(x_19, x_1439); if (x_1440 == 0) { @@ -9927,7 +9927,7 @@ x_1990 = lean_string_dec_eq(x_19, x_1989); if (x_1990 == 0) { lean_object* x_1991; uint8_t x_1992; -x_1991 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_1991 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_1992 = lean_string_dec_eq(x_19, x_1991); if (x_1992 == 0) { @@ -11624,7 +11624,7 @@ x_2548 = lean_string_dec_eq(x_19, x_2547); if (x_2548 == 0) { lean_object* x_2549; uint8_t x_2550; -x_2549 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2549 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_2550 = lean_string_dec_eq(x_19, x_2549); if (x_2550 == 0) { @@ -13353,7 +13353,7 @@ x_3112 = lean_string_dec_eq(x_2871, x_3111); if (x_3112 == 0) { lean_object* x_3113; uint8_t x_3114; -x_3113 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_3113 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3114 = lean_string_dec_eq(x_2871, x_3113); if (x_3114 == 0) { diff --git a/stage0/stdlib/Init/Lean/Elab/Util.c b/stage0/stdlib/Init/Lean/Elab/Util.c index 13d0024f8c..cb24d03e14 100644 --- a/stage0/stdlib/Init/Lean/Elab/Util.c +++ b/stage0/stdlib/Init/Lean/Elab/Util.c @@ -25,12 +25,14 @@ lean_object* l___private_Init_Lean_Elab_Util_6__ElabAttribute_add___rarg___boxed extern lean_object* l_Lean_Macro_throwUnsupported___closed__1; extern lean_object* l___private_Init_Lean_Environment_8__persistentEnvExtensionsRef; lean_object* l_AssocList_contains___main___at_Lean_Elab_ElabFnTable_insert___spec__26___rarg___boxed(lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_SMap_insert___at_Lean_Elab_ElabFnTable_insert___spec__20___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_mkMacroAttribute(lean_object*); lean_object* l_Lean_Elab_mkElabAttributeAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Util_2__throwUnexpectedElabType(lean_object*); lean_object* l_Lean_Elab_macroAttribute___closed__2; +lean_object* l_Lean_MacroScopesView_format___boxed(lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Elab_ElabFnTable_insert___spec__24___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_String_toFormat(lean_object*); extern lean_object* l_Lean_MessageData_ofList___closed__3; @@ -48,6 +50,7 @@ extern size_t l_PersistentHashMap_insertAux___main___rarg___closed__2; lean_object* lean_array_uset(lean_object*, size_t, lean_object*); lean_object* l_PersistentHashMap_insertAux___main___at_Lean_Elab_ElabFnTable_insert___spec__22___rarg(lean_object*, size_t, size_t, lean_object*, lean_object*); uint8_t l_AssocList_contains___main___at_Lean_Elab_ElabFnTable_insert___spec__26___rarg(lean_object*, lean_object*); +lean_object* l_Lean_MacroScopesView_format(lean_object*, lean_object*); size_t l_USize_sub(size_t, size_t); lean_object* l_HashMapImp_insert___at_Lean_Elab_ElabFnTable_insert___spec__25(lean_object*); lean_object* l___private_Init_Lean_Elab_Util_4__ElabAttribute_addImportedParsers___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -293,7 +296,6 @@ lean_object* l_Lean_SMap_insert___at_Lean_Elab_ElabFnTable_insert___spec__9(lean lean_object* l_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); lean_object* l_PersistentHashMap_empty___at_Lean_Elab_mkBuiltinMacroFnTable___spec__3; lean_object* l_mkHashMap___at_Lean_Elab_mkElabAttributeAux___spec__5___rarg(lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; lean_object* l_Lean_Elab_declareBuiltinMacro___closed__8; lean_object* lean_mk_array(lean_object*, lean_object*); lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_getMacros___spec__3(lean_object*, size_t, lean_object*); @@ -309,6 +311,7 @@ extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed_ lean_object* l_Lean_Elab_checkSyntaxNodeKind___boxed(lean_object*, lean_object*); lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_Elab_ElabFnTable_insert___spec__23(lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Elab_ElabFnTable_insert___spec__13(lean_object*); +lean_object* l_List_foldl___main___at_Lean_MacroScopesView_review___spec__1(lean_object*, lean_object*); lean_object* l_Lean_SMap_insert___at_Lean_Elab_ElabFnTable_insert___spec__9___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_checkSyntaxNodeKind(lean_object*, lean_object*); lean_object* l_AssocList_find___main___at_Lean_Elab_ElabFnTable_insert___spec__8___rarg___boxed(lean_object*, lean_object*); @@ -324,6 +327,7 @@ lean_object* l_List_toArrayAux___main___rarg(lean_object*, lean_object*); lean_object* l_HashMapImp_find_x3f___at_Lean_Elab_ElabFnTable_insert___spec__7___rarg(lean_object*, lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_ElabAttributeExtensionState_inhabited(lean_object*); +uint8_t l_List_isEmpty___rarg(lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_AssocList_find___main___at_Lean_Elab_getMacros___spec__6(lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); @@ -392,6 +396,81 @@ return x_8; } } } +lean_object* l_Lean_MacroScopesView_format(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_ctor_get(x_1, 3); +lean_inc(x_3); +x_4 = l_List_isEmpty___rarg(x_3); +if (x_4 == 0) +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_ctor_get(x_1, 2); +lean_inc(x_5); +x_6 = lean_name_eq(x_5, x_2); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_7 = lean_ctor_get(x_1, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_1, 1); +lean_inc(x_8); +lean_dec(x_1); +x_9 = l_Lean_Name_append___main(x_7, x_8); +lean_dec(x_7); +x_10 = l_Lean_Name_append___main(x_9, x_5); +lean_dec(x_9); +x_11 = l_List_foldl___main___at_Lean_MacroScopesView_review___spec__1(x_10, x_3); +x_12 = l_Lean_Name_toString___closed__1; +x_13 = l_Lean_Name_toStringWithSep___main(x_12, x_11); +x_14 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_14, 0, x_13); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_dec(x_5); +x_15 = lean_ctor_get(x_1, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_1, 1); +lean_inc(x_16); +lean_dec(x_1); +x_17 = l_Lean_Name_append___main(x_15, x_16); +lean_dec(x_15); +x_18 = l_List_foldl___main___at_Lean_MacroScopesView_review___spec__1(x_17, x_3); +x_19 = l_Lean_Name_toString___closed__1; +x_20 = l_Lean_Name_toStringWithSep___main(x_19, x_18); +x_21 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_21, 0, x_20); +return x_21; +} +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_dec(x_3); +x_22 = lean_ctor_get(x_1, 0); +lean_inc(x_22); +lean_dec(x_1); +x_23 = l_Lean_Name_toString___closed__1; +x_24 = l_Lean_Name_toStringWithSep___main(x_23, x_22); +x_25 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_25, 0, x_24); +return x_25; +} +} +} +lean_object* l_Lean_MacroScopesView_format___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_MacroScopesView_format(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} uint8_t l_Lean_Elab_getBetterRef___lambda__1(lean_object* x_1, lean_object* x_2) { _start: { @@ -5780,7 +5859,7 @@ lean_dec(x_13); lean_dec(x_11); lean_dec(x_2); lean_dec(x_1); -x_25 = l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; +x_25 = l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; x_26 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_26, 0, x_25); lean_ctor_set(x_26, 1, x_12); diff --git a/stage0/stdlib/Init/Lean/Parser/Command.c b/stage0/stdlib/Init/Lean/Parser/Command.c index 32718f6dce..ba674704d0 100644 --- a/stage0/stdlib/Init/Lean/Parser/Command.c +++ b/stage0/stdlib/Init/Lean/Parser/Command.c @@ -39,7 +39,6 @@ lean_object* l_Lean_Parser_Command_constant___closed__6; lean_object* l_Lean_Parser_Command_visibility___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_structExplicitBinder___closed__8; lean_object* l_Lean_Parser_Command_protected___elambda__1___closed__1; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_Command_declSig___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_openRenamingItem___closed__6; lean_object* l_Lean_Parser_Command_axiom___closed__5; @@ -105,6 +104,7 @@ lean_object* l_Lean_Parser_Command_openHiding; lean_object* l_Lean_Parser_Command_synth___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_declModifiers___closed__8; lean_object* l_Lean_Parser_Command_def___elambda__1___closed__8; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_regBuiltinCommandParserAttr___closed__4; lean_object* l_Lean_Parser_Command_partial___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_export___closed__8; @@ -263,6 +263,7 @@ lean_object* l_Lean_Parser_Command_instance___closed__8; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_openRenaming___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_openOnly___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_structFields___elambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Command_attrInstance___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_export___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_variables___closed__1; lean_object* l_Lean_Parser_Command_openRenamingItem___elambda__1___closed__9; @@ -449,7 +450,6 @@ lean_object* l_Lean_Parser_Command_universe___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_openRenamingItem___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_def___elambda__1___closed__2; extern lean_object* l_Lean_Parser_Term_typeSpec; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; lean_object* l_Lean_Parser_Command_attribute___elambda__1___closed__11; lean_object* l_Lean_Parser_Command_protected___closed__4; lean_object* l_Lean_Parser_Command_structureTk___elambda__1___closed__3; @@ -528,7 +528,6 @@ lean_object* l___regBuiltinParser_Lean_Parser_Command_namespace(lean_object*); lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_declValEqns___elambda__1___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_abbrev___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_export___closed__2; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_Command_classTk___closed__4; lean_object* l_Lean_Parser_Command_declValEqns___closed__1; lean_object* l_Lean_Parser_Command_namespace___elambda__1___closed__9; @@ -555,8 +554,10 @@ lean_object* l_Lean_Parser_Command_unsafe___closed__1; lean_object* l_Lean_Parser_Command_namespace___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_partial___closed__5; lean_object* l_Lean_Parser_Command_classTk___closed__2; +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); extern lean_object* l_Lean_Parser_Term_equation; lean_object* l_Lean_Parser_Command_variable___elambda__1___closed__9; +lean_object* l_Lean_Parser_rawIdent(uint8_t); 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; @@ -653,14 +654,12 @@ lean_object* l_Lean_Parser_Command_constant___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_relaxedInferMod___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_declSig___elambda__1(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_haveAssign___elambda__1___closed__8; -extern lean_object* l_Lean_Parser_Term_quotedName___elambda__1___closed__6; extern lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_theorem___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_abbrev___closed__8; lean_object* l_Lean_Parser_Command_inductive___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_open___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_classTk___elambda__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_variable___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_optDeclSig___elambda__1(lean_object*, lean_object*, lean_object*); @@ -802,6 +801,7 @@ lean_object* l_Lean_Parser_Command_declVal___closed__3; lean_object* l_Lean_Parser_Command_set__option___elambda__1___closed__13; lean_object* l_Lean_Parser_Command_axiom___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_structCtor___closed__5; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; extern lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__9; uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__3; @@ -862,6 +862,7 @@ lean_object* l_Lean_Parser_Command_introRule___closed__2; lean_object* l_Lean_Parser_Command_def___closed__1; lean_object* l_Lean_Parser_Command_attrInstance___closed__3; lean_object* l_Lean_Parser_Command_export___elambda__1___closed__4; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_Command_structure___closed__4; lean_object* l_Lean_Parser_Command_declModifiers___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Term_explicitUniv___closed__1; @@ -924,6 +925,7 @@ lean_object* l_Lean_Parser_Command_universes___elambda__1___closed__2; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Command_attributes___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_classInductive___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_openRenaming___closed__2; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_Command_openHiding___elambda__1___closed__9; lean_object* l_Lean_Parser_Command_declaration___closed__8; extern lean_object* l_Lean_Parser_Term_matchAlt___closed__2; @@ -1009,7 +1011,6 @@ 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; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_Command_structCtor___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_partial; lean_object* l_Lean_Parser_Command_declId___elambda__1___closed__4; @@ -1480,7 +1481,7 @@ 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); +x_94 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_93); lean_dec(x_93); if (lean_obj_tag(x_94) == 2) { @@ -1545,7 +1546,7 @@ 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); +x_23 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_22); lean_dec(x_22); if (lean_obj_tag(x_23) == 2) { @@ -1553,7 +1554,7 @@ 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___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_25 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_26 = lean_string_dec_eq(x_24, x_25); lean_dec(x_24); if (x_26 == 0) @@ -1808,7 +1809,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_stxQuot___closed__3; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } @@ -2172,7 +2173,7 @@ if (lean_obj_tag(x_28) == 0) lean_object* x_29; lean_object* x_30; x_29 = lean_ctor_get(x_27, 0); lean_inc(x_29); -x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_29); +x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_29); lean_dec(x_29); if (lean_obj_tag(x_30) == 2) { @@ -2604,11 +2605,20 @@ x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); return x_5; } } +lean_object* _init_l_Lean_Parser_Command_attrInstance___elambda__1___closed__5() { +_start: +{ +uint8_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = l_Lean_Parser_rawIdent(x_1); +return x_2; +} +} lean_object* l_Lean_Parser_Command_attrInstance___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; lean_object* x_11; lean_object* x_12; -x_4 = l_Lean_Parser_Term_quotedName___elambda__1___closed__6; +x_4 = l_Lean_Parser_Command_attrInstance___elambda__1___closed__5; x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); x_6 = l_Lean_Parser_Command_attrInstance___elambda__1___closed__4; @@ -2717,7 +2727,7 @@ lean_object* _init_l_Lean_Parser_Command_attrInstance___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Term_quotedName___elambda__1___closed__6; +x_1 = l_Lean_Parser_Command_attrInstance___elambda__1___closed__5; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); x_3 = l_Lean_Parser_Command_attrInstance___closed__1; @@ -2820,7 +2830,7 @@ if (lean_obj_tag(x_32) == 0) lean_object* x_33; lean_object* x_34; x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); -x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_33); lean_dec(x_33); if (lean_obj_tag(x_34) == 2) { @@ -3150,7 +3160,7 @@ 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); +x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_58); lean_dec(x_58); if (lean_obj_tag(x_59) == 2) { @@ -3224,7 +3234,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -3583,7 +3593,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -3856,7 +3866,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -4227,7 +4237,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -4500,7 +4510,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -4773,7 +4783,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -5595,7 +5605,7 @@ if (lean_obj_tag(x_34) == 0) lean_object* x_35; lean_object* x_36; x_35 = lean_ctor_get(x_33, 0); lean_inc(x_35); -x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_35); lean_dec(x_35); if (lean_obj_tag(x_36) == 2) { @@ -5895,7 +5905,7 @@ if (lean_obj_tag(x_67) == 0) lean_object* x_68; lean_object* x_69; x_68 = lean_ctor_get(x_66, 0); lean_inc(x_68); -x_69 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_68); +x_69 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_68); lean_dec(x_68); if (lean_obj_tag(x_69) == 2) { @@ -6020,7 +6030,7 @@ if (lean_obj_tag(x_53) == 0) lean_object* x_54; lean_object* x_55; x_54 = lean_ctor_get(x_52, 0); lean_inc(x_54); -x_55 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_54); +x_55 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_54); lean_dec(x_54); if (lean_obj_tag(x_55) == 2) { @@ -6716,7 +6726,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -7874,7 +7884,7 @@ if (lean_obj_tag(x_38) == 0) lean_object* x_39; lean_object* x_40; x_39 = lean_ctor_get(x_37, 0); lean_inc(x_39); -x_40 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_39); +x_40 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_39); lean_dec(x_39); if (lean_obj_tag(x_40) == 2) { @@ -8244,7 +8254,7 @@ if (lean_obj_tag(x_38) == 0) lean_object* x_39; lean_object* x_40; x_39 = lean_ctor_get(x_37, 0); lean_inc(x_39); -x_40 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_39); +x_40 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_39); lean_dec(x_39); if (lean_obj_tag(x_40) == 2) { @@ -8588,7 +8598,7 @@ if (lean_obj_tag(x_38) == 0) lean_object* x_39; lean_object* x_40; x_39 = lean_ctor_get(x_37, 0); lean_inc(x_39); -x_40 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_39); +x_40 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_39); lean_dec(x_39); if (lean_obj_tag(x_40) == 2) { @@ -8958,7 +8968,7 @@ 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); +x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_58); lean_dec(x_58); if (lean_obj_tag(x_59) == 2) { @@ -9385,7 +9395,7 @@ if (lean_obj_tag(x_77) == 0) lean_object* x_78; lean_object* x_79; x_78 = lean_ctor_get(x_76, 0); lean_inc(x_78); -x_79 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_78); +x_79 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_78); lean_dec(x_78); if (lean_obj_tag(x_79) == 2) { @@ -9878,7 +9888,7 @@ if (lean_obj_tag(x_33) == 0) lean_object* x_34; lean_object* x_35; x_34 = lean_ctor_get(x_32, 0); lean_inc(x_34); -x_35 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_34); +x_35 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_34); lean_dec(x_34); if (lean_obj_tag(x_35) == 2) { @@ -10215,7 +10225,7 @@ if (lean_obj_tag(x_33) == 0) lean_object* x_34; lean_object* x_35; x_34 = lean_ctor_get(x_32, 0); lean_inc(x_34); -x_35 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_34); +x_35 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_34); lean_dec(x_34); if (lean_obj_tag(x_35) == 2) { @@ -10499,7 +10509,7 @@ if (lean_obj_tag(x_64) == 0) lean_object* x_65; lean_object* x_66; x_65 = lean_ctor_get(x_63, 0); lean_inc(x_65); -x_66 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_65); +x_66 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_65); lean_dec(x_65); if (lean_obj_tag(x_66) == 2) { @@ -10600,7 +10610,7 @@ if (lean_obj_tag(x_35) == 0) lean_object* x_36; lean_object* x_37; x_36 = lean_ctor_get(x_34, 0); lean_inc(x_36); -x_37 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_36); +x_37 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_36); lean_dec(x_36); if (lean_obj_tag(x_37) == 2) { @@ -10879,7 +10889,7 @@ if (lean_obj_tag(x_64) == 0) lean_object* x_65; lean_object* x_66; x_65 = lean_ctor_get(x_63, 0); lean_inc(x_65); -x_66 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_65); +x_66 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_65); lean_dec(x_65); if (lean_obj_tag(x_66) == 2) { @@ -10887,7 +10897,7 @@ lean_object* x_67; lean_object* x_68; uint8_t x_69; x_67 = lean_ctor_get(x_66, 1); lean_inc(x_67); lean_dec(x_66); -x_68 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_68 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_69 = lean_string_dec_eq(x_67, x_68); lean_dec(x_67); if (x_69 == 0) @@ -10980,7 +10990,7 @@ if (lean_obj_tag(x_35) == 0) lean_object* x_36; lean_object* x_37; x_36 = lean_ctor_get(x_34, 0); lean_inc(x_36); -x_37 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_36); +x_37 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_36); lean_dec(x_36); if (lean_obj_tag(x_37) == 2) { @@ -10988,7 +10998,7 @@ lean_object* x_38; lean_object* x_39; uint8_t x_40; x_38 = lean_ctor_get(x_37, 1); lean_inc(x_38); lean_dec(x_37); -x_39 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_39 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_40 = lean_string_dec_eq(x_38, x_39); lean_dec(x_38); if (x_40 == 0) @@ -11089,8 +11099,8 @@ lean_object* _init_l_Lean_Parser_Command_strictInferMod___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } @@ -11352,7 +11362,7 @@ if (lean_obj_tag(x_69) == 0) lean_object* x_70; lean_object* x_71; x_70 = lean_ctor_get(x_68, 0); lean_inc(x_70); -x_71 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_70); +x_71 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_70); lean_dec(x_70); if (lean_obj_tag(x_71) == 2) { @@ -11873,7 +11883,7 @@ if (lean_obj_tag(x_43) == 0) lean_object* x_44; lean_object* x_45; x_44 = lean_ctor_get(x_42, 0); lean_inc(x_44); -x_45 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_44); +x_45 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_44); lean_dec(x_44); if (lean_obj_tag(x_45) == 2) { @@ -12282,7 +12292,7 @@ if (lean_obj_tag(x_84) == 0) lean_object* x_85; lean_object* x_86; x_85 = lean_ctor_get(x_83, 0); lean_inc(x_85); -x_86 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_85); +x_86 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_85); lean_dec(x_85); if (lean_obj_tag(x_86) == 2) { @@ -12454,7 +12464,7 @@ if (lean_obj_tag(x_55) == 0) lean_object* x_56; lean_object* x_57; x_56 = lean_ctor_get(x_54, 0); lean_inc(x_56); -x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_56); lean_dec(x_56); if (lean_obj_tag(x_57) == 2) { @@ -12747,7 +12757,7 @@ if (lean_obj_tag(x_104) == 0) lean_object* x_105; lean_object* x_106; x_105 = lean_ctor_get(x_103, 0); lean_inc(x_105); -x_106 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_105); +x_106 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_105); lean_dec(x_105); if (lean_obj_tag(x_106) == 2) { @@ -12755,7 +12765,7 @@ lean_object* x_107; lean_object* x_108; uint8_t x_109; x_107 = lean_ctor_get(x_106, 1); lean_inc(x_107); lean_dec(x_106); -x_108 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_108 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_109 = lean_string_dec_eq(x_107, x_108); lean_dec(x_107); if (x_109 == 0) @@ -12812,7 +12822,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -12820,7 +12830,7 @@ lean_object* x_26; lean_object* x_27; uint8_t x_28; x_26 = lean_ctor_get(x_25, 1); lean_inc(x_26); lean_dec(x_25); -x_27 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_27 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_28 = lean_string_dec_eq(x_26, x_27); lean_dec(x_26); if (x_28 == 0) @@ -13098,7 +13108,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Command_structExplicitBinder___closed__2; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } @@ -13139,7 +13149,7 @@ lean_object* _init_l_Lean_Parser_Command_structExplicitBinder___closed__7() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; x_2 = l_Lean_Parser_Command_structExplicitBinder___closed__6; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -13304,7 +13314,7 @@ if (lean_obj_tag(x_84) == 0) lean_object* x_85; lean_object* x_86; x_85 = lean_ctor_get(x_83, 0); lean_inc(x_85); -x_86 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_85); +x_86 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_85); lean_dec(x_85); if (lean_obj_tag(x_86) == 2) { @@ -13376,7 +13386,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -13760,7 +13770,7 @@ if (lean_obj_tag(x_84) == 0) lean_object* x_85; lean_object* x_86; x_85 = lean_ctor_get(x_83, 0); lean_inc(x_85); -x_86 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_85); +x_86 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_85); lean_dec(x_85); if (lean_obj_tag(x_86) == 2) { @@ -13832,7 +13842,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -14687,7 +14697,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -14993,7 +15003,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -15217,7 +15227,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -15484,7 +15494,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -15937,7 +15947,7 @@ if (lean_obj_tag(x_69) == 0) lean_object* x_70; lean_object* x_71; x_70 = lean_ctor_get(x_68, 0); lean_inc(x_70); -x_71 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_70); +x_71 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_70); lean_dec(x_70); if (lean_obj_tag(x_71) == 2) { @@ -17330,7 +17340,7 @@ if (lean_obj_tag(x_49) == 0) lean_object* x_50; lean_object* x_51; x_50 = lean_ctor_get(x_48, 0); lean_inc(x_50); -x_51 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_50); +x_51 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_50); lean_dec(x_50); if (lean_obj_tag(x_51) == 2) { @@ -17709,7 +17719,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -18031,7 +18041,7 @@ if (lean_obj_tag(x_49) == 0) lean_object* x_50; lean_object* x_51; x_50 = lean_ctor_get(x_48, 0); lean_inc(x_50); -x_51 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_50); +x_51 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_50); lean_dec(x_50); if (lean_obj_tag(x_51) == 2) { @@ -18399,7 +18409,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -18721,7 +18731,7 @@ if (lean_obj_tag(x_42) == 0) lean_object* x_43; lean_object* x_44; x_43 = lean_ctor_get(x_41, 0); lean_inc(x_43); -x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_43); +x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_43); lean_dec(x_43); if (lean_obj_tag(x_44) == 2) { @@ -19075,7 +19085,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -19397,7 +19407,7 @@ if (lean_obj_tag(x_42) == 0) lean_object* x_43; lean_object* x_44; x_43 = lean_ctor_get(x_41, 0); lean_inc(x_43); -x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_43); +x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_43); lean_dec(x_43); if (lean_obj_tag(x_44) == 2) { @@ -19743,7 +19753,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -20057,7 +20067,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -20370,7 +20380,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -20664,7 +20674,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -20969,7 +20979,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -21331,7 +21341,7 @@ if (lean_obj_tag(x_95) == 0) lean_object* x_96; lean_object* x_97; x_96 = lean_ctor_get(x_94, 0); lean_inc(x_96); -x_97 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_96); +x_97 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_96); lean_dec(x_96); if (lean_obj_tag(x_97) == 2) { @@ -21963,7 +21973,7 @@ if (lean_obj_tag(x_121) == 0) lean_object* x_122; lean_object* x_123; x_122 = lean_ctor_get(x_120, 0); lean_inc(x_122); -x_123 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_122); +x_123 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_122); lean_dec(x_122); if (lean_obj_tag(x_123) == 2) { @@ -22100,7 +22110,7 @@ if (lean_obj_tag(x_49) == 0) lean_object* x_50; lean_object* x_51; x_50 = lean_ctor_get(x_48, 0); lean_inc(x_50); -x_51 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_50); +x_51 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_50); lean_dec(x_50); if (lean_obj_tag(x_51) == 2) { @@ -22193,7 +22203,7 @@ if (lean_obj_tag(x_72) == 0) lean_object* x_73; lean_object* x_74; x_73 = lean_ctor_get(x_71, 0); lean_inc(x_73); -x_74 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_73); +x_74 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_73); lean_dec(x_73); if (lean_obj_tag(x_74) == 2) { @@ -22272,7 +22282,7 @@ 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); +x_94 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_93); lean_dec(x_93); if (lean_obj_tag(x_94) == 2) { @@ -22681,7 +22691,7 @@ if (lean_obj_tag(x_93) == 0) lean_object* x_94; lean_object* x_95; x_94 = lean_ctor_get(x_92, 0); lean_inc(x_94); -x_95 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_94); +x_95 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_94); lean_dec(x_94); if (lean_obj_tag(x_95) == 2) { @@ -22746,7 +22756,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -22754,7 +22764,7 @@ lean_object* x_26; lean_object* x_27; uint8_t x_28; x_26 = lean_ctor_get(x_25, 1); lean_inc(x_26); lean_dec(x_25); -x_27 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_27 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_28 = lean_string_dec_eq(x_26, x_27); lean_dec(x_26); if (x_28 == 0) @@ -22900,7 +22910,7 @@ if (lean_obj_tag(x_73) == 0) lean_object* x_74; lean_object* x_75; x_74 = lean_ctor_get(x_72, 0); lean_inc(x_74); -x_75 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_74); +x_75 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_74); lean_dec(x_74); if (lean_obj_tag(x_75) == 2) { @@ -22908,7 +22918,7 @@ lean_object* x_76; lean_object* x_77; uint8_t x_78; x_76 = lean_ctor_get(x_75, 1); lean_inc(x_76); lean_dec(x_75); -x_77 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_77 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_78 = lean_string_dec_eq(x_76, x_77); lean_dec(x_76); if (x_78 == 0) @@ -22995,7 +23005,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Level_ident___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -23004,7 +23014,7 @@ lean_object* _init_l_Lean_Parser_Command_export___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; x_2 = l_Lean_Parser_Command_export___closed__2; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -23276,7 +23286,7 @@ if (lean_obj_tag(x_54) == 0) lean_object* x_55; lean_object* x_56; x_55 = lean_ctor_get(x_53, 0); lean_inc(x_55); -x_56 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_55); +x_56 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_55); lean_dec(x_55); if (lean_obj_tag(x_56) == 2) { @@ -23917,7 +23927,7 @@ if (lean_obj_tag(x_32) == 0) lean_object* x_33; lean_object* x_34; x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); -x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_33); lean_dec(x_33); if (lean_obj_tag(x_34) == 2) { @@ -24275,7 +24285,7 @@ if (lean_obj_tag(x_44) == 0) lean_object* x_45; lean_object* x_46; x_45 = lean_ctor_get(x_43, 0); lean_inc(x_45); -x_46 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_45); +x_46 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_45); lean_dec(x_45); if (lean_obj_tag(x_46) == 2) { @@ -24694,7 +24704,7 @@ if (lean_obj_tag(x_80) == 0) lean_object* x_81; lean_object* x_82; x_81 = lean_ctor_get(x_79, 0); lean_inc(x_81); -x_82 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_81); +x_82 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_81); lean_dec(x_81); if (lean_obj_tag(x_82) == 2) { @@ -24702,7 +24712,7 @@ lean_object* x_83; lean_object* x_84; uint8_t x_85; x_83 = lean_ctor_get(x_82, 1); lean_inc(x_83); lean_dec(x_82); -x_84 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_84 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_85 = lean_string_dec_eq(x_83, x_84); lean_dec(x_83); if (x_85 == 0) @@ -24811,7 +24821,7 @@ if (lean_obj_tag(x_24) == 0) lean_object* x_25; lean_object* x_26; x_25 = lean_ctor_get(x_23, 0); lean_inc(x_25); -x_26 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_25); +x_26 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_25); lean_dec(x_25); if (lean_obj_tag(x_26) == 2) { @@ -24819,7 +24829,7 @@ lean_object* x_27; lean_object* x_28; uint8_t x_29; x_27 = lean_ctor_get(x_26, 1); lean_inc(x_27); lean_dec(x_26); -x_28 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_28 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_29 = lean_string_dec_eq(x_27, x_28); lean_dec(x_27); if (x_29 == 0) @@ -24978,7 +24988,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Level_ident___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -25388,7 +25398,7 @@ if (lean_obj_tag(x_80) == 0) lean_object* x_81; lean_object* x_82; x_81 = lean_ctor_get(x_79, 0); lean_inc(x_81); -x_82 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_81); +x_82 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_81); lean_dec(x_81); if (lean_obj_tag(x_82) == 2) { @@ -25898,6 +25908,8 @@ l_Lean_Parser_Command_attrInstance___elambda__1___closed__3 = _init_l_Lean_Parse lean_mark_persistent(l_Lean_Parser_Command_attrInstance___elambda__1___closed__3); l_Lean_Parser_Command_attrInstance___elambda__1___closed__4 = _init_l_Lean_Parser_Command_attrInstance___elambda__1___closed__4(); lean_mark_persistent(l_Lean_Parser_Command_attrInstance___elambda__1___closed__4); +l_Lean_Parser_Command_attrInstance___elambda__1___closed__5 = _init_l_Lean_Parser_Command_attrInstance___elambda__1___closed__5(); +lean_mark_persistent(l_Lean_Parser_Command_attrInstance___elambda__1___closed__5); l_Lean_Parser_Command_attrInstance___closed__1 = _init_l_Lean_Parser_Command_attrInstance___closed__1(); lean_mark_persistent(l_Lean_Parser_Command_attrInstance___closed__1); l_Lean_Parser_Command_attrInstance___closed__2 = _init_l_Lean_Parser_Command_attrInstance___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Parser/Identifier.c b/stage0/stdlib/Init/Lean/Parser/Identifier.c deleted file mode 100644 index 572d7a4d4f..0000000000 --- a/stage0/stdlib/Init/Lean/Parser/Identifier.c +++ /dev/null @@ -1,706 +0,0 @@ -// Lean compiler output -// Module: Init.Lean.Parser.Identifier -// Imports: Init.Data.Char.Basic -#include "runtime/lean.h" -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -#ifdef __cplusplus -extern "C" { -#endif -uint32_t l_Lean_idBeginEscape; -lean_object* l_Lean_isGreek___boxed(lean_object*); -uint32_t l_Lean_idEndEscape; -lean_object* l_Lean_isIdRest___boxed(lean_object*); -uint8_t l_Lean_isIdBeginEscape(uint32_t); -lean_object* l_Lean_isIdFirst___boxed(lean_object*); -lean_object* l_Lean_isSubScriptAlnum___boxed(lean_object*); -uint8_t l_Lean_isIdEndEscape(uint32_t); -uint8_t l_Char_isAlpha(uint32_t); -uint8_t l_Lean_isLetterLike(uint32_t); -lean_object* l_Lean_isLetterLike___boxed(lean_object*); -uint8_t l_UInt32_decEq(uint32_t, uint32_t); -uint8_t l_Char_isAlphanum(uint32_t); -uint8_t l_Lean_isGreek(uint32_t); -lean_object* l_Lean_isIdBeginEscape___boxed(lean_object*); -lean_object* l_Lean_isIdEndEscape___boxed(lean_object*); -uint8_t l_Lean_isIdFirst(uint32_t); -uint8_t l_Lean_isSubScriptAlnum(uint32_t); -uint8_t l_UInt32_decLe(uint32_t, uint32_t); -uint8_t l_Lean_isIdRest(uint32_t); -uint8_t l_Lean_isGreek(uint32_t x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; -x_2 = 913; -x_3 = x_2 <= x_1; -if (x_3 == 0) -{ -uint8_t x_4; -x_4 = 0; -return x_4; -} -else -{ -uint32_t x_5; uint8_t x_6; -x_5 = 989; -x_6 = x_1 <= x_5; -return x_6; -} -} -} -lean_object* l_Lean_isGreek___boxed(lean_object* x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; lean_object* x_4; -x_2 = lean_unbox_uint32(x_1); -lean_dec(x_1); -x_3 = l_Lean_isGreek(x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -uint8_t l_Lean_isLetterLike(uint32_t x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; uint8_t x_19; uint8_t x_27; uint8_t x_35; uint8_t x_59; -x_2 = 945; -x_59 = x_2 <= x_1; -if (x_59 == 0) -{ -uint8_t x_60; -x_60 = 0; -x_35 = x_60; -goto block_58; -} -else -{ -uint32_t x_61; uint8_t x_62; -x_61 = 969; -x_62 = x_1 <= x_61; -if (x_62 == 0) -{ -uint8_t x_63; -x_63 = 0; -x_35 = x_63; -goto block_58; -} -else -{ -uint32_t x_64; uint8_t x_65; -x_64 = 955; -x_65 = x_1 == x_64; -if (x_65 == 0) -{ -uint8_t x_66; -x_66 = 1; -return x_66; -} -else -{ -uint8_t x_67; -x_67 = 0; -x_35 = x_67; -goto block_58; -} -} -} -block_18: -{ -uint32_t x_4; uint8_t x_5; -x_4 = 8448; -x_5 = x_4 <= x_1; -if (x_5 == 0) -{ -if (x_3 == 0) -{ -uint32_t x_6; uint8_t x_7; -x_6 = 119964; -x_7 = x_6 <= x_1; -if (x_7 == 0) -{ -return x_3; -} -else -{ -uint32_t x_8; uint8_t x_9; -x_8 = 120223; -x_9 = x_1 <= x_8; -return x_9; -} -} -else -{ -uint8_t x_10; -x_10 = 1; -return x_10; -} -} -else -{ -uint32_t x_11; uint8_t x_12; -x_11 = 8527; -x_12 = x_1 <= x_11; -if (x_12 == 0) -{ -uint32_t x_13; uint8_t x_14; -x_13 = 119964; -x_14 = x_13 <= x_1; -if (x_14 == 0) -{ -return x_12; -} -else -{ -uint32_t x_15; uint8_t x_16; -x_15 = 120223; -x_16 = x_1 <= x_15; -return x_16; -} -} -else -{ -uint8_t x_17; -x_17 = 1; -return x_17; -} -} -} -block_26: -{ -uint32_t x_20; uint8_t x_21; -x_20 = 7936; -x_21 = x_20 <= x_1; -if (x_21 == 0) -{ -if (x_19 == 0) -{ -x_3 = x_19; -goto block_18; -} -else -{ -uint8_t x_22; -x_22 = 1; -return x_22; -} -} -else -{ -uint32_t x_23; uint8_t x_24; -x_23 = 8190; -x_24 = x_1 <= x_23; -if (x_24 == 0) -{ -x_3 = x_24; -goto block_18; -} -else -{ -uint8_t x_25; -x_25 = 1; -return x_25; -} -} -} -block_34: -{ -uint32_t x_28; uint8_t x_29; -x_28 = 970; -x_29 = x_28 <= x_1; -if (x_29 == 0) -{ -if (x_27 == 0) -{ -x_19 = x_27; -goto block_26; -} -else -{ -uint8_t x_30; -x_30 = 1; -return x_30; -} -} -else -{ -uint32_t x_31; uint8_t x_32; -x_31 = 1019; -x_32 = x_1 <= x_31; -if (x_32 == 0) -{ -x_19 = x_32; -goto block_26; -} -else -{ -uint8_t x_33; -x_33 = 1; -return x_33; -} -} -} -block_58: -{ -uint32_t x_36; uint8_t x_37; -x_36 = 913; -x_37 = x_36 <= x_1; -if (x_37 == 0) -{ -if (x_35 == 0) -{ -x_27 = x_35; -goto block_34; -} -else -{ -uint32_t x_38; uint8_t x_39; -x_38 = 928; -x_39 = x_1 == x_38; -if (x_39 == 0) -{ -uint32_t x_40; uint8_t x_41; -x_40 = 931; -x_41 = x_1 == x_40; -if (x_41 == 0) -{ -uint8_t x_42; -x_42 = 1; -return x_42; -} -else -{ -uint8_t x_43; -x_43 = 0; -x_27 = x_43; -goto block_34; -} -} -else -{ -uint8_t x_44; -x_44 = 1; -return x_44; -} -} -} -else -{ -uint32_t x_45; uint8_t x_46; -x_45 = 937; -x_46 = x_1 <= x_45; -if (x_46 == 0) -{ -if (x_35 == 0) -{ -x_27 = x_35; -goto block_34; -} -else -{ -uint32_t x_47; uint8_t x_48; -x_47 = 931; -x_48 = x_1 == x_47; -if (x_48 == 0) -{ -uint8_t x_49; -x_49 = 1; -return x_49; -} -else -{ -uint8_t x_50; -x_50 = 0; -x_27 = x_50; -goto block_34; -} -} -} -else -{ -uint32_t x_51; uint8_t x_52; -x_51 = 928; -x_52 = x_1 == x_51; -if (x_52 == 0) -{ -uint32_t x_53; uint8_t x_54; -x_53 = 931; -x_54 = x_1 == x_53; -if (x_54 == 0) -{ -uint8_t x_55; -x_55 = 1; -return x_55; -} -else -{ -uint8_t x_56; -x_56 = 0; -x_27 = x_56; -goto block_34; -} -} -else -{ -if (x_35 == 0) -{ -x_27 = x_35; -goto block_34; -} -else -{ -uint8_t x_57; -x_57 = 1; -return x_57; -} -} -} -} -} -} -} -lean_object* l_Lean_isLetterLike___boxed(lean_object* x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; lean_object* x_4; -x_2 = lean_unbox_uint32(x_1); -lean_dec(x_1); -x_3 = l_Lean_isLetterLike(x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -uint8_t l_Lean_isSubScriptAlnum(uint32_t x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; uint8_t x_19; -x_2 = 8320; -x_19 = x_2 <= x_1; -if (x_19 == 0) -{ -uint8_t x_20; -x_20 = 0; -x_3 = x_20; -goto block_18; -} -else -{ -uint32_t x_21; uint8_t x_22; -x_21 = 8329; -x_22 = x_1 <= x_21; -if (x_22 == 0) -{ -x_3 = x_22; -goto block_18; -} -else -{ -uint8_t x_23; -x_23 = 1; -return x_23; -} -} -block_18: -{ -uint32_t x_4; uint8_t x_5; -x_4 = 8336; -x_5 = x_4 <= x_1; -if (x_5 == 0) -{ -if (x_3 == 0) -{ -uint32_t x_6; uint8_t x_7; -x_6 = 7522; -x_7 = x_6 <= x_1; -if (x_7 == 0) -{ -return x_3; -} -else -{ -uint32_t x_8; uint8_t x_9; -x_8 = 7530; -x_9 = x_1 <= x_8; -return x_9; -} -} -else -{ -uint8_t x_10; -x_10 = 1; -return x_10; -} -} -else -{ -uint32_t x_11; uint8_t x_12; -x_11 = 8348; -x_12 = x_1 <= x_11; -if (x_12 == 0) -{ -uint32_t x_13; uint8_t x_14; -x_13 = 7522; -x_14 = x_13 <= x_1; -if (x_14 == 0) -{ -return x_12; -} -else -{ -uint32_t x_15; uint8_t x_16; -x_15 = 7530; -x_16 = x_1 <= x_15; -return x_16; -} -} -else -{ -uint8_t x_17; -x_17 = 1; -return x_17; -} -} -} -} -} -lean_object* l_Lean_isSubScriptAlnum___boxed(lean_object* x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; lean_object* x_4; -x_2 = lean_unbox_uint32(x_1); -lean_dec(x_1); -x_3 = l_Lean_isSubScriptAlnum(x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -uint8_t l_Lean_isIdFirst(uint32_t x_1) { -_start: -{ -uint8_t x_2; -x_2 = l_Char_isAlpha(x_1); -if (x_2 == 0) -{ -uint32_t x_3; uint8_t x_4; -x_3 = 95; -x_4 = x_1 == x_3; -if (x_4 == 0) -{ -uint8_t x_5; -x_5 = l_Lean_isLetterLike(x_1); -return x_5; -} -else -{ -uint8_t x_6; -x_6 = 1; -return x_6; -} -} -else -{ -uint8_t x_7; -x_7 = 1; -return x_7; -} -} -} -lean_object* l_Lean_isIdFirst___boxed(lean_object* x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; lean_object* x_4; -x_2 = lean_unbox_uint32(x_1); -lean_dec(x_1); -x_3 = l_Lean_isIdFirst(x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -uint8_t l_Lean_isIdRest(uint32_t x_1) { -_start: -{ -uint8_t x_2; -x_2 = l_Char_isAlphanum(x_1); -if (x_2 == 0) -{ -uint32_t x_3; uint8_t x_4; -x_3 = 95; -x_4 = x_1 == x_3; -if (x_4 == 0) -{ -uint32_t x_5; uint8_t x_6; -x_5 = 39; -x_6 = x_1 == x_5; -if (x_6 == 0) -{ -uint32_t x_7; uint8_t x_8; -x_7 = 33; -x_8 = x_1 == x_7; -if (x_8 == 0) -{ -uint32_t x_9; uint8_t x_10; -x_9 = 63; -x_10 = x_1 == x_9; -if (x_10 == 0) -{ -uint8_t x_11; -x_11 = l_Lean_isLetterLike(x_1); -if (x_11 == 0) -{ -uint8_t x_12; -x_12 = l_Lean_isSubScriptAlnum(x_1); -return x_12; -} -else -{ -uint8_t x_13; -x_13 = 1; -return x_13; -} -} -else -{ -uint8_t x_14; -x_14 = 1; -return x_14; -} -} -else -{ -uint8_t x_15; -x_15 = 1; -return x_15; -} -} -else -{ -uint8_t x_16; -x_16 = 1; -return x_16; -} -} -else -{ -uint8_t x_17; -x_17 = 1; -return x_17; -} -} -else -{ -uint8_t x_18; -x_18 = 1; -return x_18; -} -} -} -lean_object* l_Lean_isIdRest___boxed(lean_object* x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; lean_object* x_4; -x_2 = lean_unbox_uint32(x_1); -lean_dec(x_1); -x_3 = l_Lean_isIdRest(x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -uint32_t _init_l_Lean_idBeginEscape() { -_start: -{ -uint32_t x_1; -x_1 = 171; -return x_1; -} -} -uint32_t _init_l_Lean_idEndEscape() { -_start: -{ -uint32_t x_1; -x_1 = 187; -return x_1; -} -} -uint8_t l_Lean_isIdBeginEscape(uint32_t x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; -x_2 = l_Lean_idBeginEscape; -x_3 = x_1 == x_2; -if (x_3 == 0) -{ -uint8_t x_4; -x_4 = 0; -return x_4; -} -else -{ -uint8_t x_5; -x_5 = 1; -return x_5; -} -} -} -lean_object* l_Lean_isIdBeginEscape___boxed(lean_object* x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; lean_object* x_4; -x_2 = lean_unbox_uint32(x_1); -lean_dec(x_1); -x_3 = l_Lean_isIdBeginEscape(x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -uint8_t l_Lean_isIdEndEscape(uint32_t x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; -x_2 = l_Lean_idEndEscape; -x_3 = x_1 == x_2; -if (x_3 == 0) -{ -uint8_t x_4; -x_4 = 0; -return x_4; -} -else -{ -uint8_t x_5; -x_5 = 1; -return x_5; -} -} -} -lean_object* l_Lean_isIdEndEscape___boxed(lean_object* x_1) { -_start: -{ -uint32_t x_2; uint8_t x_3; lean_object* x_4; -x_2 = lean_unbox_uint32(x_1); -lean_dec(x_1); -x_3 = l_Lean_isIdEndEscape(x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -lean_object* initialize_Init_Data_Char_Basic(lean_object*); -static bool _G_initialized = false; -lean_object* initialize_Init_Lean_Parser_Identifier(lean_object* w) { -lean_object * res; -if (_G_initialized) return lean_mk_io_result(lean_box(0)); -_G_initialized = true; -res = initialize_Init_Data_Char_Basic(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -l_Lean_idBeginEscape = _init_l_Lean_idBeginEscape(); -l_Lean_idEndEscape = _init_l_Lean_idEndEscape(); -return lean_mk_io_result(lean_box(0)); -} -#ifdef __cplusplus -} -#endif diff --git a/stage0/stdlib/Init/Lean/Parser/Level.c b/stage0/stdlib/Init/Lean/Parser/Level.c index 2fb8dadee7..7ad615f05a 100644 --- a/stage0/stdlib/Init/Lean/Parser/Level.c +++ b/stage0/stdlib/Init/Lean/Parser/Level.c @@ -16,7 +16,6 @@ extern "C" { extern lean_object* l_Lean_mkHole___closed__3; extern lean_object* l_Lean_Parser_manyAux___main___closed__1; lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__4; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_regBuiltinLevelParserAttr___closed__1; lean_object* l_Lean_Parser_Level_ident___elambda__1(lean_object*, lean_object*, lean_object*); @@ -29,6 +28,7 @@ lean_object* l_Lean_Parser_Level_num___closed__4; lean_object* l_Lean_Parser_Level_max___elambda__1___closed__6; lean_object* l_Lean_Parser_regBuiltinLevelParserAttr(lean_object*); lean_object* l_Lean_Parser_Level_num___elambda__1___closed__4; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_Level_hole___closed__5; lean_object* l_Lean_Parser_Level_hole___closed__3; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Level_max___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -91,10 +91,10 @@ extern lean_object* l_Lean_Level_LevelToFormat_Result_format___main___closed__5; lean_object* l_Lean_Parser_orelseInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_levelParser(uint8_t, lean_object*); lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Level_max___elambda__1___spec__1(uint8_t, lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_Level_num___elambda__1___closed__3; lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_num___elambda__1___closed__5; +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__11; lean_object* l_Lean_Parser_Level_imax___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_ident___closed__1; @@ -103,7 +103,6 @@ lean_object* l_Lean_Parser_Level_addLit___closed__5; lean_object* l_Lean_Parser_Level_addLit___closed__3; lean_object* l_Lean_Parser_Level_imax___closed__2; lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__4; -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__1; lean_object* l_Lean_Parser_Level_paren___closed__4; @@ -114,9 +113,9 @@ lean_object* l_Lean_Parser_categoryParserFn(lean_object*, lean_object*, lean_obj lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__6; lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__2; lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__1; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Level_ident___closed__2; extern lean_object* l_Lean_Parser_appPrec; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__3; lean_object* l_Lean_Parser_Level_max___closed__4; lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__5; @@ -133,6 +132,7 @@ lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__10; lean_object* l_Lean_Parser_symbolInfo(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_epsilonInfo; lean_object* l_Lean_Parser_Level_imax___elambda__1___closed__6; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; extern lean_object* l_Lean_mkHole___closed__1; lean_object* l_Lean_Parser_Level_ident___closed__4; lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__7; @@ -141,6 +141,7 @@ lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__9; lean_object* l___regBuiltinParser_Lean_Parser_Level_hole(lean_object*); lean_object* l_Lean_Parser_Level_hole___closed__1; extern lean_object* l_Lean_Level_LevelToFormat_Result_format___main___closed__3; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; lean_object* l_String_trim(lean_object*); lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__8; lean_object* l_Lean_Parser_Level_hole___closed__2; @@ -152,7 +153,6 @@ lean_object* l___regBuiltinParser_Lean_Parser_Level_ident(lean_object*); lean_object* l_Lean_Parser_Level_addLit; extern lean_object* l_Lean_Syntax_getKind___closed__3; lean_object* l_Lean_Parser_mkAntiquot(uint8_t, lean_object*, lean_object*, uint8_t); -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_Level_max___elambda__1___closed__5; lean_object* l_Lean_Parser_Level_max___elambda__1___closed__7; lean_object* l_Lean_Parser_Level_imax___elambda__1___closed__5; @@ -265,7 +265,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Level_paren___elambda__1___closed__2; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -285,7 +285,7 @@ _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; x_1 = 0; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3 = l_Lean_Parser_Level_paren___elambda__1___closed__4; x_4 = 1; x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); @@ -297,7 +297,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Char_HasRepr___closed__1; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_3 = lean_string_append(x_1, x_2); return x_3; } @@ -329,7 +329,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Char_HasRepr___closed__1; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_3 = lean_string_append(x_1, x_2); return x_3; } @@ -417,7 +417,7 @@ 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); +x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_58); lean_dec(x_58); if (lean_obj_tag(x_59) == 2) { @@ -425,7 +425,7 @@ 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___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_61 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_62 = lean_string_dec_eq(x_60, x_61); lean_dec(x_60); if (x_62 == 0) @@ -491,7 +491,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -499,7 +499,7 @@ 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___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_29 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_30 = lean_string_dec_eq(x_28, x_29); lean_dec(x_28); if (x_30 == 0) @@ -592,7 +592,7 @@ lean_object* _init_l_Lean_Parser_Level_paren___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_2 = l_Lean_Parser_Level_paren___closed__1; x_3 = l_Lean_Parser_symbolInfo(x_1, x_2); return x_3; @@ -616,7 +616,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Level_paren___closed__3; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -1188,7 +1188,7 @@ if (lean_obj_tag(x_42) == 0) lean_object* x_43; lean_object* x_44; x_43 = lean_ctor_get(x_41, 0); lean_inc(x_43); -x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_43); +x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_43); lean_dec(x_43); if (lean_obj_tag(x_44) == 2) { @@ -1516,7 +1516,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -2109,7 +2109,7 @@ if (lean_obj_tag(x_12) == 0) lean_object* x_13; lean_object* x_14; x_13 = lean_ctor_get(x_11, 0); lean_inc(x_13); -x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_13); +x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_13); lean_dec(x_13); if (lean_obj_tag(x_14) == 2) { diff --git a/stage0/stdlib/Init/Lean/Parser/Module.c b/stage0/stdlib/Init/Lean/Parser/Module.c index 8d3bf7a953..ebe5205dff 100644 --- a/stage0/stdlib/Init/Lean/Parser/Module.c +++ b/stage0/stdlib/Init/Lean/Parser/Module.c @@ -108,6 +108,7 @@ lean_object* l_Lean_Parser_orelseInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_prelude___elambda__1___closed__10; lean_object* l_Lean_Parser_testModuleParser___closed__1; lean_object* lean_name_mk_string(lean_object*, lean_object*); +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); extern lean_object* l_PersistentArray_empty___closed__3; lean_object* l_Lean_Parser_Module_prelude___elambda__1___closed__7; lean_object* l_Lean_Parser_addParserTokens(lean_object*, lean_object*); @@ -120,7 +121,6 @@ lean_object* l_Lean_Parser_parseFileAux(lean_object*, lean_object*, lean_object* lean_object* l_Lean_Parser_Trie_Inhabited(lean_object*); extern lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__4; lean_object* l_PersistentArray_forMAux___main___at___private_Init_Lean_Parser_Module_4__testModuleParserAux___main___spec__7(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Array_forMAux___main___at___private_Init_Lean_Parser_Module_4__testModuleParserAux___main___spec__9(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MessageLog_forM___at___private_Init_Lean_Parser_Module_4__testModuleParserAux___main___spec__5(lean_object*, lean_object*, lean_object*); @@ -353,7 +353,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -684,7 +684,7 @@ if (lean_obj_tag(x_78) == 0) lean_object* x_79; lean_object* x_80; x_79 = lean_ctor_get(x_77, 0); lean_inc(x_79); -x_80 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_79); +x_80 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_79); lean_dec(x_79); if (lean_obj_tag(x_80) == 2) { @@ -754,7 +754,7 @@ if (lean_obj_tag(x_61) == 0) lean_object* x_62; lean_object* x_63; x_62 = lean_ctor_get(x_60, 0); lean_inc(x_62); -x_63 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_62); +x_63 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_62); lean_dec(x_62); if (lean_obj_tag(x_63) == 2) { @@ -1571,7 +1571,7 @@ lean_inc(x_4); x_10 = l_Lean_Parser_Module_header___elambda__1(x_9, x_4, x_8); x_11 = lean_ctor_get(x_10, 0); lean_inc(x_11); -x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_11); +x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_11); lean_dec(x_11); x_13 = lean_ctor_get(x_10, 3); lean_inc(x_13); @@ -1790,7 +1790,7 @@ lean_dec(x_2); lean_dec(x_1); x_21 = lean_ctor_get(x_19, 0); lean_inc(x_21); -x_22 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_21); +x_22 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_21); lean_dec(x_21); x_23 = lean_ctor_get(x_19, 1); lean_inc(x_23); @@ -1873,7 +1873,7 @@ lean_dec(x_2); lean_dec(x_1); x_49 = lean_ctor_get(x_47, 0); lean_inc(x_49); -x_50 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_49); +x_50 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_49); lean_dec(x_49); x_51 = lean_ctor_get(x_47, 1); lean_inc(x_51); diff --git a/stage0/stdlib/Init/Lean/Parser/Parser.c b/stage0/stdlib/Init/Lean/Parser/Parser.c index f33373a482..815428ed0c 100644 --- a/stage0/stdlib/Init/Lean/Parser/Parser.c +++ b/stage0/stdlib/Init/Lean/Parser/Parser.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Init.Lean.Parser.Parser -// Imports: Init.Lean.Data.Trie Init.Lean.Data.Position Init.Lean.Syntax Init.Lean.ToExpr Init.Lean.Environment Init.Lean.Attributes Init.Lean.Message Init.Lean.Parser.Identifier Init.Lean.Compiler.InitAttr +// Imports: Init.Lean.Data.Trie Init.Lean.Data.Position Init.Lean.Syntax Init.Lean.ToExpr Init.Lean.Environment Init.Lean.Attributes Init.Lean.Message Init.Lean.Compiler.InitAttr #include "runtime/lean.h" #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -20,6 +20,7 @@ lean_object* l_Lean_Parser_optionalFn___rarg(lean_object*, lean_object*, lean_ob lean_object* l_Lean_Parser_identEq(uint8_t, lean_object*); lean_object* l_Lean_Parser_takeWhileFn___at_Lean_Parser_decimalNumberFn___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldArgs___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_19__ParserExtension_mkInitial(lean_object*); lean_object* l_Lean_Parser_charLit___boxed(lean_object*); lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1(lean_object*); lean_object* l_Lean_Parser_categoryParserOfStack___elambda__1(uint8_t); @@ -31,27 +32,24 @@ extern lean_object* l_Lean_Name_toString___closed__1; lean_object* l_Lean_Parser_charLit___closed__1; lean_object* l_Lean_Parser_andthenInfo___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolAux___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_hashOrelse(uint8_t); lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t l_USize_add(size_t, size_t); lean_object* l_Lean_Parser_manyAux___main___closed__1; extern lean_object* l_Lean_fieldIdxKind; lean_object* l_PersistentHashMap_foldlM___at_Lean_Parser_getSyntaxNodeKinds___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_forArgsM___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_20__mergePrecendences___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolCheckPrec___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; uint8_t l_RBNode_isRed___rarg(lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_andthenFn___boxed(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Parser_checkTailWs(lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_foldArgsM___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension___closed__1; +lean_object* l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__1; lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_hexNumberFn___spec__1(lean_object*, lean_object*, lean_object*); -uint8_t l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__2(lean_object*, size_t, lean_object*); lean_object* l_Lean_Parser_try(uint8_t, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolInfo___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_prattParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); @@ -63,6 +61,9 @@ lean_object* l_Lean_Syntax_foldSepRevArgs___rarg(lean_object*, lean_object*, lea extern lean_object* l___private_Init_Lean_Compiler_InitAttr_2__isUnitType___closed__1; extern lean_object* l___private_Init_Lean_Environment_8__persistentEnvExtensionsRef; lean_object* l_Lean_Parser_ParserState_mkError(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_20__mergePrecendences(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__7; +lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_octalNumberFn___spec__3(lean_object*, lean_object*); lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserContext(lean_object*, lean_object*); @@ -76,18 +77,17 @@ lean_object* l_PersistentHashMap_findAux___main___at_Lean_Parser_addLeadingParse lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_Parser_sepByInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_shrinkStack___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_mkCategoryParserFnExtension___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__3; lean_object* l_Lean_Parser_orelseFn___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_decimalNumberFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldSepRevArgsM(lean_object*, lean_object*); lean_object* l_unreachable_x21___rarg(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1(uint8_t); extern lean_object* l_Lean_nullKind; lean_object* l_Lean_Parser_mkParserExtension___closed__2; lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__2; +lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); 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_strLitNoAntiquot(uint8_t); @@ -101,9 +101,9 @@ extern lean_object* l_Lean_fieldIdxKind___closed__2; lean_object* l_Lean_Syntax_getOptional_x3f(lean_object*); lean_object* l_Lean_Parser_strAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_rawCh___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawFn___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_List_repr___rarg___closed__1; +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_optionaInfo___elambda__2(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserFn_inhabited___rarg(lean_object*); @@ -113,9 +113,9 @@ lean_object* l_Lean_Syntax_foldSepRevArgs(lean_object*); lean_object* l_Lean_Parser_binNumberFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_List_foldlM___main___at_Lean_Parser_addParserTokens___spec__1(lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepArgsM___spec__1___boxed(lean_object*, lean_object*); -lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_many___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_numberFnAux(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_TokenConfig_HasToString___closed__1; lean_object* l_Lean_Parser_lookahead(uint8_t, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolInfo___elambda__2(lean_object*, lean_object*, lean_object*, lean_object*); @@ -131,13 +131,11 @@ lean_object* l_Lean_Parser_strLit___elambda__1___rarg(lean_object*, lean_object* lean_object* l_Array_foldSepBy___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_1__expectedToString___main(lean_object*); lean_object* l_Lean_Parser_longestMatchFn(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2; lean_object* l_Lean_Parser_registerBuiltinParserAttribute___closed__1; +lean_object* l_Lean_Parser_nameLitNoAntiquot(uint8_t); lean_object* l_Lean_Parser_parserExtension___elambda__1___boxed(lean_object*); lean_object* l_Lean_Syntax_foldSepArgs___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__2; -lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__3; lean_object* l_Lean_Parser_mkParserExtension___closed__4; lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_decimalNumberFn___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchFn_u2081___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -145,14 +143,12 @@ lean_object* l_Lean_Parser_Trie_matchPrefix___rarg(lean_object*, lean_object*, l lean_object* l_Lean_Parser_octalNumberFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_stackSize___boxed(lean_object*); lean_object* l_Lean_Parser_getTokenTable___boxed(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1(uint8_t, lean_object*); lean_object* l_Lean_Parser_octalNumberFn(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_identFnAux___main___spec__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_hexNumberFn(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldSepBy___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strLitFnAux(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_6__updateCache(lean_object*, lean_object*); -lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__1(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens(lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Parser_SyntaxNodeKindSet_insert___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_next(lean_object*, lean_object*, lean_object*); extern lean_object* l_Prod_HasRepr___rarg___closed__1; @@ -179,14 +175,14 @@ lean_object* lean_environment_find(lean_object*, lean_object*); lean_object* l_Lean_Parser_rawCh___elambda__1___rarg(uint32_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_parserExtension; lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_forSepArgsM___spec__1___boxed(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_group(uint8_t, lean_object*); lean_object* l_Lean_Parser_charLit___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolInfo___closed__2; lean_object* l_Lean_Parser_dollarSymbol___closed__1; lean_object* l_Lean_Parser_ident(uint8_t); lean_object* l_Lean_Parser_parserExtension___closed__2; -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__6(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Parser_isLitKind(lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_whitespace___main___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_binNumberFn___spec__1(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_fieldIdxKind___closed__1; @@ -194,41 +190,46 @@ lean_object* l_Lean_Parser_unquotedSymbolFn___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_TokenConfig_HasBeq___closed__1; lean_object* l_Lean_Parser_categoryParserOfStackFn___closed__2; lean_object* lean_io_mk_ref(lean_object*, lean_object*); -lean_object* l_List_foldl___main___at___private_Init_Lean_Parser_Parser_20__addTrailingParserAux___spec__1(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__3; lean_object* l_Lean_Parser_checkColGe(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_dollarSymbol___boxed(lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolFn(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_26__ParserAttribute_add(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); uint8_t l_Char_isDigit(uint32_t); lean_object* l_Lean_Parser_ParserState_mkNode(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserState(lean_object*); lean_object* l_List_append___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension___lambda__2(lean_object*); lean_object* l_Lean_Parser_categoryParserFnExtension___closed__2; +lean_object* l_Lean_Parser_nameLitNoAntiquot___closed__1; lean_object* l_Lean_Parser_checkNoWsBefore___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_foldArgsM___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepByM___spec__1(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_8__updateCache(lean_object*, lean_object*); +lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_many1Indent___lambda__1(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* lean_io_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_nameLitNoAntiquot___boxed(lean_object*); lean_object* l_Lean_Parser_declareBuiltinParser___closed__5; lean_object* l_Lean_Parser_strLit___boxed(lean_object*); lean_object* l_Lean_Parser_identEqFn___boxed(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___boxed(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__9; lean_object* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5(lean_object*); lean_object* l_List_map___main___at_Lean_Parser_addLeadingParser___spec__4(lean_object*); lean_object* l_Lean_Parser_symbolNoWsFn___closed__1; uint8_t l_Lean_isIdBeginEscape(uint32_t); lean_object* l_Lean_Parser_declareBuiltinParser___closed__3; -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___closed__1; lean_object* l_Array_foldSepByM(lean_object*, lean_object*); +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1___boxed(lean_object*); lean_object* l_Lean_Parser_orelseFn(uint8_t); lean_object* l_Lean_Parser_registerBuiltinDynamicParserAttribute(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Position_Inhabited___closed__1; +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___rarg(lean_object*); lean_object* l_Lean_Parser_symbolNoWsFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unquotedSymbolFn___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_unquotedSymbol___elambda__1___rarg(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_finishCommentBlock___main___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_try___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__4; @@ -237,22 +238,18 @@ lean_object* l_Lean_Parser_addBuiltinParser___boxed(lean_object*, lean_object*, lean_object* l_Lean_Parser_addBuiltinParser(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* l_Lean_Parser_rawCh___elambda__1(uint8_t); -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__3; lean_object* lean_array_get_size(lean_object*); +lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__1(lean_object*, lean_object*); extern lean_object* l_Lean_charLitKind___closed__1; -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__1; lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolNoWsFn(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__3___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_Syntax_termIdToAntiquot___closed__3; -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__1; lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*); lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7(lean_object*); lean_object* l_Lean_Parser_mkAtomicInfo(lean_object*); lean_object* l_Lean_Parser_quotedSymbolFn___rarg___closed__1; lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_binNumberFn___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_string_utf8_extract(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_22__ParserExtension_addEntry(lean_object*, lean_object*); lean_object* l_Lean_Parser_parserExtension___elambda__4___rarg(lean_object*); lean_object* l_Lean_Parser_declareBuiltinParser___closed__1; uint8_t l_Char_isWhitespace(uint32_t); @@ -262,11 +259,9 @@ lean_object* l_Lean_Parser_withPosition(uint8_t, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__11; lean_object* l_Lean_Parser_charLitFnAux(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Syntax_termIdToAntiquot___closed__1; -lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__3(lean_object*, lean_object*); extern lean_object* l_List_repr___rarg___closed__3; lean_object* l_Lean_Parser_mkAntiquot___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepByM___spec__1___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_identFnAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkNodeToken(lean_object*, lean_object*, lean_object*, lean_object*); @@ -277,7 +272,6 @@ lean_object* l_Lean_Parser_symbolInfo___elambda__1(lean_object*); lean_object* l_Lean_Parser_nonReservedSymbol(uint8_t, lean_object*, uint8_t); lean_object* l_Lean_Parser_symbolFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkNodeToken___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_initCacheForInput___boxed(lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_forArgsM___spec__1(lean_object*); lean_object* l_Lean_Parser_symbolNoWs___boxed(lean_object*, lean_object*); @@ -287,31 +281,31 @@ lean_object* l_Lean_Syntax_foldSepArgsM___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_identEqFn___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_string_utf8_byte_size(lean_object*); lean_object* l_Lean_Syntax_forSepArgsM(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId(uint8_t); extern lean_object* l_Lean_mkAppStx___closed__4; lean_object* l_Lean_Parser_ParserState_mkErrorsAt(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_mkCategoryParserFnExtension___spec__1___closed__1; -lean_object* l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldSepRevArgs___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_leadingParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolNoWsInfo___elambda__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_9__pickNonNone___spec__1(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkAttributeImplOfConstantUnsafe___closed__3; lean_object* l_Lean_Parser_strLitFn___rarg___closed__1; lean_object* l_Lean_Parser_parserExtension___closed__1; -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId(uint8_t); lean_object* l_Lean_Parser_checkColGeFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_declareBuiltinParser___closed__4; +lean_object* l_Lean_Parser_nameLitFn(uint8_t, lean_object*); lean_object* l_Lean_Parser_quotedSymbolFn(uint8_t); lean_object* l_Lean_Parser_quotedSymbolFn___rarg___closed__4; -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Nat_HasOfNat___closed__1; lean_object* l_Lean_Parser_categoryParserFnExtension___elambda__1___rarg(lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strLitFnAux___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_nameLitKind; lean_object* l_Lean_Parser_categoryParserFnExtension___closed__1; lean_object* l_Lean_Parser_strLit___closed__1; extern lean_object* l_Lean_LocalContext_Inhabited___closed__1; lean_object* l_Lean_Parser_symbolFn___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_binNumberFn___spec__3___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_pushLeading___closed__1; lean_object* l_Array_anyRangeMAux___main___at_Lean_Parser_mkParserExtension___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -326,11 +320,14 @@ lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Lean_Parser_ident___boxed(lean_object*); lean_object* l_Lean_Parser_indexed___rarg(lean_object*, lean_object*, lean_object*, uint8_t); uint8_t l_Lean_Parser_takeWhileFn___lambda__1(lean_object*, uint32_t); +uint32_t l_Lean_Parser_getNext(lean_object*, lean_object*); lean_object* l_Lean_Parser_rawIdentNoAntiquot___boxed(lean_object*); 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_IO_ofExcept___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_addParserCategory(lean_object*, lean_object*, uint8_t); lean_object* l_Lean_Parser_many1Fn(uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId___boxed(lean_object*); lean_object* l_Lean_Parser_satisfyFn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolNoWsInfo___elambda__1(lean_object*); lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__2; @@ -347,22 +344,20 @@ lean_object* l_Lean_Parser_numLit___boxed(lean_object*); lean_object* l_Lean_Parser_numLitNoAntiquot___boxed(lean_object*); lean_object* l_Lean_Parser_identFn___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_declareTrailingBuiltinParser___closed__1; -lean_object* l___private_Init_Lean_Parser_Parser_18__mergePrecendences(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension___lambda__1(lean_object*); lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__2; -lean_object* l___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr(uint8_t); lean_object* l_Lean_Parser_parserExtension___closed__5; lean_object* l_Array_iterateMAux___main___at_Lean_Parser_getSyntaxNodeKinds___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_numLit___closed__1; lean_object* l_Lean_Parser_rawIdentFn(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder(lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr(uint8_t); uint8_t l_Lean_Parser_leadingIdentAsSymbol(lean_object*, lean_object*); lean_object* l_Lean_Parser_indexed(lean_object*); lean_object* l_Lean_Parser_strLit___elambda__1(uint8_t); extern lean_object* l_Lean_mkTermIdFromIdent___closed__2; lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepArgs___spec__1(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder(lean_object*); lean_object* l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; lean_object* lean_string_utf8_next(lean_object*, lean_object*); extern lean_object* l_Lean_mkAttributeImplOfConstant___closed__1; @@ -371,7 +366,7 @@ lean_object* l_Lean_Parser_TokenConfig_HasToString; lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_binNumberFn___spec__3(lean_object*, lean_object*); lean_object* l_Lean_Parser_fieldIdx___boxed(lean_object*); lean_object* l_Lean_Parser_setCategoryParserFnRef(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1(uint8_t, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Syntax_forArgsM(lean_object*); extern lean_object* l_Lean_registerTagAttribute___lambda__4___closed__3; lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -383,7 +378,6 @@ lean_object* l_Lean_Parser_PrattParsingTables_inhabited___closed__1; lean_object* l_Lean_Parser_throwUnknownParserCategory___rarg___closed__1; lean_object* l_Lean_Parser_unquotedSymbol___boxed(lean_object*); lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__1; -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_quotedSymbolFn___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeWhileFn(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepArgsM___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -392,8 +386,8 @@ lean_object* l_Lean_Parser_nonReservedSymbolInfo___elambda__2(lean_object*); lean_object* l_Lean_Parser_unicodeSymbolFn___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_tryFn___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_initCacheForInput(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_9__pickNonNone___boxed(lean_object*); lean_object* l_Lean_Parser_symbolNoWsAux(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__1; lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_identFnAux___main___spec__4(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_addSyntaxNodeKind(lean_object*, lean_object*); lean_object* l_Lean_Parser_termParser___closed__1; @@ -402,6 +396,7 @@ lean_object* l_Lean_Parser_mkIdResult___boxed(lean_object*, lean_object*, lean_o lean_object* l_Lean_Parser_fieldIdx___closed__1; lean_object* l_Lean_Parser_TokenMap_insert(lean_object*); lean_object* l_Lean_Parser_unicodeSymbol(uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchFn___closed__1; lean_object* l_Lean_Parser_termParser___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_takeWhileFn___boxed(lean_object*, lean_object*, lean_object*); @@ -412,6 +407,7 @@ lean_object* l_Lean_Parser_ParserState_setPos(lean_object*, lean_object*); lean_object* l_Lean_Parser_quotedSymbol___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_mkTokenAndFixPos___closed__1; extern lean_object* l_Lean_Syntax_getKind___closed__4; +lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg(lean_object*); lean_object* l_Lean_Parser_strLitFn___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Parser_whitespace___boxed(lean_object*, lean_object*); @@ -427,27 +423,22 @@ lean_object* l_Lean_Parser_mkAtomicInfo___elambda__2(lean_object*); lean_object* l_Lean_Parser_manyAux___main(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main(uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_fieldIdx___lambda__1___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone(uint8_t); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_rawCh___elambda__1___spec__1(uint32_t, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Parser_Error_HasBeq___closed__1; lean_object* l_Lean_Parser_nonReservedSymbolFnAux(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__1; lean_object* l_Lean_Parser_charLit___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldSepArgsM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Parser_inhabited(uint8_t); lean_object* l_Lean_Parser_dollarSymbol___elambda__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkBuiltinParserCategories(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_takeUntilFn___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_8__mkResult(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_10__mkResult(lean_object*, lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_quotedSymbolFn___spec__2(uint32_t, lean_object*, lean_object*); -lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1___boxed(lean_object*, lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec__3(lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchFnAux(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_lookaheadFn(uint8_t); -lean_object* l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_7__pickNonNone___spec__1___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_EnvExtension_Inhabited___rarg___closed__1; lean_object* l_Lean_Parser_rawIdentNoAntiquot___closed__1; lean_object* l_Lean_Parser_symbolNoWsFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -458,7 +449,6 @@ lean_object* l_Lean_Parser_quotedSymbol___elambda__1___rarg___boxed(lean_object* lean_object* l_Lean_Parser_symbolFn___boxed(lean_object*); extern lean_object* l_Lean_numLitKind; lean_object* l_Lean_Parser_mkAntiquot___elambda__2___boxed(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_EStateM_bind___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldArgsM___boxed(lean_object*, lean_object*); lean_object* l_PersistentHashMap_findAux___main___at_Lean_Parser_addLeadingParser___spec__2___boxed(lean_object*, lean_object*, lean_object*); @@ -476,7 +466,6 @@ lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lea lean_object* l_Lean_Parser_checkNoWsBefore(uint8_t, lean_object*); lean_object* l_Lean_Parser_checkWsBefore___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_noFirstTokenInfo(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__1; lean_object* l_Lean_Parser_checkLeadingFn___closed__1; extern lean_object* l_Lean_strLitKind; @@ -485,7 +474,6 @@ lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_forArgsM___spec__1___ra lean_object* l_Lean_Parser_finishCommentBlock___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unquotedSymbol___elambda__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_parserExtension___closed__6; -uint8_t l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_checkNoWsBefore___elambda__1___boxed(lean_object*); lean_object* l_Lean_Syntax_foldArgs(lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolInfo___elambda__1(lean_object*); @@ -505,22 +493,19 @@ lean_object* l_Array_shrink___main___rarg(lean_object*, lean_object*); lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__2___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_fieldIdx___closed__3; lean_object* l_Lean_Parser_trailingLoop___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; uint8_t l_Lean_Parser_Error_beq(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_keepNewError(lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParserOfStack___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_regTermParserAttribute___closed__1; lean_object* l_Lean_Parser_symbol(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_anyOfFn___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension___closed__8; -lean_object* l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__3; +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___boxed(lean_object*); lean_object* l_Lean_Parser_takeWhileFn___at_Lean_Parser_octalNumberFn___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolInfo___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_whitespace___main(lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldArgsM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_numLitFn(uint8_t, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_7__pickNonNone___boxed(lean_object*); lean_object* l_Lean_Parser_parserExtension___closed__4; lean_object* l_Lean_Parser_identFnAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); @@ -533,12 +518,14 @@ lean_object* l_Lean_Parser_anyOfFn___main___closed__1; lean_object* l_Lean_Parser_SyntaxNodeKindSet_insert(lean_object*, lean_object*); extern lean_object* l_Lean_strLitKind___closed__1; lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_nameLit(uint8_t); lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux(uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_1__expectedToString___main___closed__1; lean_object* l_Lean_Parser_binNumberFn(lean_object*, lean_object*, lean_object*); lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserOfConstant___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strLit___elambda__1___boxed(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone(uint8_t); lean_object* l_Lean_Parser_Error_HasBeq; lean_object* l_Lean_Parser_nonReservedSymbolInfo___closed__3; extern lean_object* l___private_Init_Lean_Compiler_InitAttr_1__getIOTypeArg___closed__1; @@ -550,26 +537,30 @@ uint8_t l_Lean_Parser_checkTailNoWs(lean_object*); lean_object* l_Lean_Parser_checkTailWs___boxed(lean_object*); lean_object* l_Lean_Parser_charLitFn(uint8_t, lean_object*); lean_object* l_Lean_Parser_trailingLoopStep(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1___closed__1; lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_foldArgsM___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_andthenFn___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchStep(uint8_t); lean_object* l_Lean_Parser_addLeadingParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_charLitNoAntiquot___boxed(lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strLitFn(uint8_t, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__1; lean_object* l_Lean_Parser_mkParserExtension___lambda__2___boxed(lean_object*); lean_object* l_Lean_Parser_nodeFn___boxed(lean_object*); lean_object* l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; lean_object* l_PersistentHashMap_foldlMAux___main___at_Lean_Parser_getSyntaxNodeKinds___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__12; lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__4; +lean_object* l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); size_t l_Lean_Name_hash(lean_object*); lean_object* l_Lean_Parser_nonReservedSymbol___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_addToken(lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchFnAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_nameLit___closed__1; lean_object* l_Nat_repr(lean_object*); lean_object* l_Lean_Parser_categoryParserOfStack(uint8_t, lean_object*, lean_object*); extern lean_object* l_Char_HasRepr___closed__1; +lean_object* l___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory(lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Parser_toTrailing___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkBuiltinSyntaxNodeKindSetRef(lean_object*); lean_object* l_Lean_Parser_registerBuiltinParserAttribute___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -591,42 +582,45 @@ lean_object* l_Lean_Parser_dollarSymbol___elambda__1___rarg(lean_object*, lean_o lean_object* l_Lean_Parser_strLitNoAntiquot___closed__1; lean_object* l_Lean_Parser_sepByFn(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_fieldIdx___closed__2; +lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_chFn___spec__1(uint32_t, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory(lean_object*, uint8_t, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_PersistentHashMap_insertAux___main___rarg___closed__3; -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1(lean_object*); lean_object* l_Lean_Syntax_getId(lean_object*); lean_object* l_Lean_Parser_rawCh___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_getNext___boxed(lean_object*, lean_object*); +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__6(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_IO_ofExcept___at_Lean_Parser_declareBuiltinParser___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_strLitNoAntiquot___boxed(lean_object*); lean_object* l_Lean_Parser_mkParserAttributeImpl___closed__1; lean_object* l_Lean_Parser_termParser___closed__2; -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1___boxed(lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); extern lean_object* l_Lean_choiceKind; lean_object* l_Lean_Parser_pushLeading___closed__2; lean_object* l_Lean_Parser_rawCh___elambda__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_nameLit___boxed(lean_object*); extern lean_object* l_List_repr___rarg___closed__2; -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___boxed(lean_object*); extern lean_object* l_Lean_charLitKind; lean_object* l_Lean_Parser_identFn___rarg___closed__1; lean_object* l_Lean_Parser_checkLeading(lean_object*); extern lean_object* l_List_reprAux___main___rarg___closed__1; lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_hexNumberFn___spec__3___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__4; +lean_object* l_Lean_Parser_nameLitFn___rarg___closed__1; lean_object* l_Lean_Parser_TokenMap_Inhabited(lean_object*); +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); lean_object* l_Lean_Parser_categoryParserFnExtension___elambda__1___rarg___boxed(lean_object*); lean_object* l_Lean_Parser_regTermParserAttribute___closed__2; lean_object* l_Lean_Parser_rawIdent(uint8_t); lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepByM___spec__1___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_FirstTokens_merge(lean_object*, lean_object*); lean_object* l_Lean_Parser_manyAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1(uint8_t); lean_object* lean_eval_const(lean_object*, lean_object*); lean_object* l_Lean_Parser_nodeFn___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserAttributeImpl(lean_object*, lean_object*); +lean_object* l_Lean_Parser_nameLitFn___rarg(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__3___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolInfo___elambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeWhileFn___at_Lean_Parser_hexNumberFn___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserFn_inhabited(uint8_t, lean_object*, lean_object*); @@ -642,7 +636,6 @@ lean_object* l_Lean_Parser_hashAndthen(uint8_t); lean_object* l_Lean_Parser_nonReservedSymbolInfo___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_setCategoryParserFnRef___closed__1; lean_object* l_PersistentHashMap_insertAux___main___at_Lean_Parser_SyntaxNodeKindSet_insert___spec__2(lean_object*, size_t, size_t, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId___boxed(lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_octalNumberFn___spec__3___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_identEqFn___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Parser_mkParserExtension___spec__1(lean_object*, lean_object*); @@ -660,14 +653,16 @@ extern lean_object* l_Lean_Options_empty; extern lean_object* l_IO_Error_Inhabited___closed__1; lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_octalNumberFn___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolFn(uint8_t); +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_hasError___boxed(lean_object*); lean_object* l_Lean_Parser_unicodeSymbol___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_empty___at_Lean_Parser_mkBuiltinSyntaxNodeKindSetRef___spec__1; lean_object* l_Lean_Parser_nodeInfo___elambda__2(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_24__ParserExtension_addEntry(lean_object*, lean_object*); lean_object* l_Lean_Parser_compileParserDescr___main___closed__1; lean_object* l_Lean_Parser_identFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_identFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_addParserCategory___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_registerBuiltinParserAttribute(lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Parser_charLitNoAntiquot___closed__1; @@ -684,21 +679,22 @@ lean_object* l_Lean_Parser_categoryParserFnImplAux(lean_object*, lean_object*, l lean_object* l_Lean_Parser_epsilonInfo___elambda__1___boxed(lean_object*); lean_object* l_Lean_registerBuiltinAttribute(lean_object*, lean_object*); lean_object* l_Lean_Parser_rawIdent___elambda__1___boxed(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens___closed__1; lean_object* l_Lean_FileMap_toPosition(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAtomicInfo___elambda__1(lean_object*); lean_object* l_Lean_Parser_anyOfFn(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_lookaheadFn___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_mkEmptySubstringAt(lean_object*, lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeWhileFn___at_Lean_Parser_binNumberFn___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_strLitFnAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Error_toString___closed__2; lean_object* l___private_Init_Lean_Data_Trie_3__findAux___main___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__6; +lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; lean_object* l_IO_Prim_Ref_get___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchMkResult(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_26__catNameToString(lean_object*); size_t l_USize_mul(size_t, size_t); lean_object* l_Lean_FileMap_ofString(lean_object*); lean_object* l_Lean_Parser_whitespace(lean_object*, lean_object*); @@ -711,17 +707,14 @@ uint8_t l_PersistentHashMap_containsAtAux___main___at_Lean_Environment_contains_ lean_object* l_PersistentHashMap_empty___at_Lean_Parser_mkBuiltinParserCategories___spec__1; lean_object* l_Lean_Parser_ParserState_restore___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_List_elem___main___at_Lean_Parser_addLeadingParser___spec__7___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__1; -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolAux(uint8_t, lean_object*, lean_object*); -lean_object* l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1___closed__1; lean_object* l_Lean_Parser_isValidSyntaxNodeKind___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_24__catNameToString(lean_object*); lean_object* l_Lean_Parser_sepBy1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension(lean_object*); lean_object* l_Lean_Parser_ParserState_popSyntax(lean_object*); lean_object* l_Lean_Parser_checkWsBefore___elambda__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_nameLit___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_termParser(uint8_t, lean_object*); lean_object* l_Lean_Parser_sepByFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkBuiltinTokenTable(lean_object*); @@ -739,52 +732,59 @@ lean_object* l_Lean_Parser_declareBuiltinParser___closed__6; lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_quotedSymbolFn___spec__1(uint32_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawIdent___boxed(lean_object*); lean_object* l_Lean_Parser_mkAntiquot___elambda__1___boxed(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__1; uint8_t l_Lean_isIdEndEscape(uint32_t); lean_object* l_Lean_Parser_addBuiltinLeadingParser(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldSepArgsM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension___closed__7; lean_object* l_Lean_Parser_dollarSymbol___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__1; -lean_object* l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__2; +lean_object* l___private_Init_Lean_Parser_Parser_6__nameLitAux(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PersistentEnvExtension_addEntry___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr___boxed(lean_object*); size_t l_USize_land(size_t, size_t); lean_object* l_Lean_Parser_parserExtension___elambda__4___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_dollarSymbol___elambda__1___rarg___closed__4; lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___boxed(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_mkParserExtension___spec__3___closed__1; lean_object* l_Lean_Parser_mkAntiquot___elambda__2(uint8_t); extern lean_object* l_Lean_registerTagAttribute___lambda__4___closed__2; lean_object* l_Lean_Parser_toTrailing(lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParserOfStack___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_19__addTokenConfig(lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParserFn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParametricAttribute_setParam___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepByM___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkCategoryParserFnExtension___closed__1; lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1Info(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_21__addTokenConfig(lean_object*, lean_object*); lean_object* l_Lean_Parser_quotedCharFn___closed__1; lean_object* l_Lean_Parser_charLitFnAux___closed__1; lean_object* l_Lean_Parser_quotedSymbolFn___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolNoWs(lean_object*, lean_object*); lean_object* l_Lean_Parser_hexDigitFn___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_mergeErrors___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___boxed(lean_object*); lean_object* l_Array_foldSepBy(lean_object*); lean_object* l_Lean_Parser_ident___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_categoryParserFnExtension___elambda__2(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_trailingNode(lean_object*, lean_object*); +lean_object* l_Lean_mkAtomFrom(lean_object*, lean_object*); lean_object* l_Lean_Parser_orelseInfo___elambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_quotedCharFn___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1(uint8_t, lean_object*, lean_object*, uint8_t, uint8_t); lean_object* l_Lean_Parser_sepBy1Fn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkAppStx___closed__3; uint8_t l_Array_anyRangeMAux___main___at_Lean_Parser_mkParserExtension___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens___closed__1; lean_object* l_Lean_Parser_categoryParser___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_TokenConfig_beq___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__3; lean_object* l_Lean_Parser_noFirstTokenInfo___elambda__1(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr___boxed(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__2; +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l___private_Init_Lean_Parser_Parser_3__rawAux___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolCheckPrec(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_declareLeadingBuiltinParser(lean_object*, lean_object*, lean_object*, lean_object*); @@ -794,12 +794,10 @@ lean_object* l_Lean_Parser_registerParserCategory(lean_object*, lean_object*, le lean_object* l_Lean_Parser_charLitFnAux___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Option_HasRepr___rarg___closed__3; lean_object* l_Lean_Parser_prattParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1(uint8_t); lean_object* l_Lean_Parser_tryFn___boxed(lean_object*); lean_object* l_Array_foldSepByM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_nonReservedSymbol___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension___closed__3; -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_ParserState_mkErrorAt(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_fieldIdxFn___closed__1; lean_object* l_Lean_Parser_ident___elambda__1(uint8_t); @@ -819,29 +817,30 @@ lean_object* l_String_intercalate(lean_object*, lean_object*); extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__1; lean_object* l_Lean_Parser_numLit(uint8_t); lean_object* l_Lean_Parser_leadingParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_7__pickNonNone___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_hexDigitFn(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkCategoryParserFnRef___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__16; +lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__1; lean_object* l_Lean_Parser_FirstTokens_HasToString___closed__1; lean_object* l_Lean_Parser_FirstTokens_HasToString; lean_object* l_Lean_Parser_pushLeading; -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l_Lean_Parser_numLit___elambda__1(uint8_t); lean_object* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1(lean_object*); lean_object* l_Lean_Parser_Error_toString(lean_object*); lean_object* l_Lean_Parser_categoryParserOfStackFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolNoWsFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___boxed(lean_object*); lean_object* l_Lean_Parser_mkAntiquot___elambda__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_9__pickNonNone___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__2___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchStep___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepBy___spec__1(lean_object*); lean_object* l_Lean_Parser_string2basic___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_keepNewError___boxed(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_rawIdent___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr(uint8_t); extern lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__4___closed__2; lean_object* l_Lean_Parser_ParserState_mkUnexpectedErrorAt(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Syntax_hasArgs(lean_object*); @@ -854,6 +853,7 @@ lean_object* l_Lean_Parser_whitespace___main___boxed(lean_object*, lean_object*) lean_object* l_Lean_Parser_longestMatchFn_u2081___boxed(lean_object*); uint8_t l_Lean_Parser_isParserCategory(lean_object*, lean_object*); lean_object* l_Lean_Parser_withPosition___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_Lean_Parser_pushLeadingFn(lean_object*, lean_object*, lean_object*); uint8_t l_USize_decLe(size_t, size_t); @@ -867,10 +867,13 @@ lean_object* l_Lean_Parser_categoryParser(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_nameToExprAux___main(lean_object*); lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParser___elambda__1___boxed(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_28__ParserAttribute_add(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Syntax_getArgs(lean_object*); lean_object* l_Array_foldSepByM___boxed(lean_object*, lean_object*); lean_object* l_Lean_Environment_addAndCompile(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__2(uint8_t, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_getKind(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__4; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1(uint8_t, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_chFn___boxed(lean_object*); uint8_t l_Lean_Parser_isValidSyntaxNodeKind(lean_object*, lean_object*); @@ -878,15 +881,16 @@ lean_object* l_Lean_Parser_numLitNoAntiquot(uint8_t); lean_object* l_Lean_Parser_dollarSymbol___elambda__1___rarg___closed__2; lean_object* l_Lean_Parser_Error_beq___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_orelseInfo___elambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr(uint8_t); lean_object* l_Lean_Parser_mkAntiquot___closed__14; lean_object* l_Lean_Parser_FirstTokens_toStr___closed__1; lean_object* l_Lean_Parser_runParserCategory(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Parser_getSyntaxNodeKinds___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_addLeadingParser(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_quotedSymbolFn___boxed(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__1; uint8_t l_PersistentHashMap_containsAtAux___main___at_Lean_Parser_isValidSyntaxNodeKind___spec__3(lean_object*, lean_object*, lean_object*); -lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__1___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1(uint8_t); lean_object* l_Lean_Parser_mkParserExtension___closed__5; lean_object* l_Lean_Parser_categoryParser___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_satisfySymbolFn(lean_object*, lean_object*, lean_object*, lean_object*); @@ -901,14 +905,17 @@ lean_object* l_Lean_Parser_sepBy1Fn(uint8_t, uint8_t, lean_object*, lean_object* lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_octalNumberFn___spec__1___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Util_1__mkPanicMessage___closed__2; lean_object* l_Lean_Parser_epsilonInfo; -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___boxed(lean_object*); lean_object* l_Lean_Parser_lookaheadFn___boxed(lean_object*); lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_anyOfFn___main(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_List_toString___at_Lean_Parser_FirstTokens_toStr___spec__1(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_epsilonInfo___closed__3; +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__3; lean_object* l_Lean_Parser_unquotedSymbol(uint8_t); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_nonReservedSymbolInfo___elambda__2___boxed(lean_object*); lean_object* l_Lean_Parser_many1Indent(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_whitespace___main___spec__1___boxed(lean_object*, lean_object*); @@ -924,14 +931,17 @@ lean_object* l_Lean_Parser_FirstTokens_toStr___closed__2; lean_object* l_Lean_Parser_hashOrelse___boxed(lean_object*); lean_object* lean_io_ref_swap(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawIdentNoAntiquot(uint8_t); +lean_object* l___private_Init_Lean_Parser_Parser_5__isIdFirstOrBeginEscape___boxed(lean_object*); +uint8_t l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_replaceLongest(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Parser_TokenConfig_beq(lean_object*, lean_object*); lean_object* l_Lean_Parser_strLitFn___rarg(lean_object*, lean_object*); extern lean_object* l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; lean_object* l_Lean_Parser_fieldIdxFn___boxed(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__1; lean_object* l_Lean_Parser_orelse___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserCategory_inhabited; -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__7; +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1(uint8_t); lean_object* l_Lean_Parser_dollarSymbol___elambda__1(uint8_t, lean_object*); lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_many1Indent___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_toTrailing___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -940,6 +950,7 @@ lean_object* l_Lean_Parser_checkNoWsBefore___elambda__1(uint8_t); lean_object* l_RBNode_setBlack___rarg(lean_object*); lean_object* l_Lean_Parser_noFirstTokenInfo___elambda__2(lean_object*, lean_object*); lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_mkCategoryParserFnExtension___spec__1(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1(uint8_t, lean_object*); lean_object* l_Lean_Parser_mkCategoryParserFnRef___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_chFn___rarg(uint32_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_epsilonInfo___closed__2; @@ -955,6 +966,7 @@ lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_foldArgsM___spec__1(lea lean_object* l_Lean_Syntax_forSepArgsM___boxed(lean_object*); lean_object* l_Lean_Parser_ParserCategory_inhabited___closed__1; lean_object* l_Lean_Parser_isIdCont___boxed(lean_object*, lean_object*); +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Syntax_isNone(lean_object*); lean_object* l_PersistentHashMap_insertAux___main___at_Lean_Parser_SyntaxNodeKindSet_insert___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -964,76 +976,78 @@ lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__7; lean_object* l_Lean_Parser_epsilonInfo___closed__1; lean_object* lean_io_ref_set(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1___boxed(lean_object*, lean_object*); -lean_object* l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(lean_object*, size_t, size_t, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_6__nameLitAux___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_andthen___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_FileMap_Inhabited___closed__1; lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg(lean_object*, lean_object*); extern lean_object* l_Lean_mkOptionalNode___closed__1; lean_object* l_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawIdentFn___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__2; lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepBy___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_6__nameLitAux___closed__1; lean_object* l_String_trim(lean_object*); lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_forSepArgsM___rarg___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawFn(uint8_t); lean_object* l_Lean_Syntax_getOptionalIdent_x3f___boxed(lean_object*); lean_object* l_Lean_Parser_charLitFn___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_compileParserDescr___main(lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Parser_regBuiltinTermParserAttr(lean_object*); lean_object* l_Lean_Parser_nodeFn(uint8_t); -lean_object* l___private_Init_Lean_Parser_Parser_5__tokenFnAux(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon(uint8_t); lean_object* l_Lean_Parser_checkWsBeforeFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_optionalFn(uint8_t); -lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; +uint8_t l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__2(lean_object*, size_t, lean_object*); lean_object* lean_array_pop(lean_object*); lean_object* l_Lean_Parser_TokenMap_insert___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_quotedSymbolFn___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_containsAtAux___main___at_Lean_Parser_isValidSyntaxNodeKind___spec__3___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolInfo___closed__4; uint8_t l_Lean_isIdFirst(uint32_t); extern lean_object* l_Lean_registerEnvExtensionUnsafe___rarg___closed__3; uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_mkLongestNodeAlt(lean_object*, lean_object*); +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isNone___boxed(lean_object*); lean_object* l_Lean_Parser_currLbp(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserOfConstant(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeWhile1Fn(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___rarg(lean_object*); lean_object* lean_io_initializing(lean_object*); extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2; lean_object* l_Lean_Parser_sepByInfo___elambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolInfo___closed__1; +lean_object* l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_forSepArgsM___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_EnvExtension_getStateUnsafe___rarg(lean_object*, lean_object*); lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__2(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_9__pickNonNone(lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_3__rawAux(uint8_t); lean_object* l_Lean_Parser_checkNoWsBefore___elambda__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_nameLit___elambda__1(uint8_t); lean_object* l_Lean_Parser_mkAntiquot___closed__6; lean_object* l_Lean_Parser_parserExtension___elambda__1(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_7__pickNonNone(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1(uint8_t); lean_object* l_Lean_Parser_numLit___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_mkParserExtension___spec__3(lean_object*, lean_object*); lean_object* l_Lean_Parser_getSyntaxNodeKinds(lean_object*); lean_object* l_Lean_Parser_addBuiltinTrailingParser(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Syntax_getKind___closed__3; +lean_object* l_Lean_Parser_nameLitFn___boxed(lean_object*, lean_object*); lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_mkCategoryParserFnExtension___spec__1___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_string2basic(uint8_t, lean_object*); lean_object* l_Lean_Parser_mkAntiquot(uint8_t, lean_object*, lean_object*, uint8_t); lean_object* l_Lean_Parser_pushLeadingFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_optionaInfo___elambda__1(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__3; lean_object* l_Lean_Parser_addParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_leadingNode(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_ParserState_toErrorMsg(lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Parser_SyntaxNodeKindSet_insert___spec__4(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkStxLit(lean_object*, lean_object*, lean_object*); lean_object* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__2(lean_object*); -lean_object* l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAtomicInfo___closed__1; lean_object* l_Lean_Parser_Error_toString___closed__3; lean_object* l_Lean_Parser_ParserState_stackSize(lean_object*); @@ -1042,16 +1056,17 @@ lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_hexNumberFn___spe lean_object* l_Lean_Parser_identFn___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolFn___boxed(lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_forSepArgsM___spec__1(lean_object*); +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___elambda__1(uint8_t); lean_object* l_Lean_Parser_categoryParserOfStackFn___closed__1; lean_object* l_Lean_Parser_manyFn(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_next___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_mkOptionalNode___closed__2; lean_object* l_Lean_Parser_Parser_inhabited___lambda__1___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepArgsM___spec__1___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_chFn___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getOptional_x3f___boxed(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__2(lean_object*, lean_object*); lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1Info___elambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_epsilonInfo___elambda__2(lean_object*); @@ -1074,26 +1089,28 @@ lean_object* l_Lean_Parser_andthen(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_node(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_lookahead___boxed(lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_forArgsM___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined(lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__8; uint8_t l_List_isEmpty___rarg(lean_object*); lean_object* l_Lean_Parser_unicodeSymbolInfo(lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_identNoAntiquot(uint8_t); +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___closed__1; +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined(lean_object*); +lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__3(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkCategoryParserFnRef(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*); lean_object* l_List_beq___main___at_Lean_Parser_Error_toString___spec__1___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_17__ParserExtension_mkInitial(lean_object*); lean_object* l_Lean_Parser_mkCategoryParserFnRef___closed__1; lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec__2(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_usize_to_nat(size_t); -lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1(lean_object*); lean_object* l_Lean_Parser_mkTokenAndFixPos(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_20__addTrailingParserAux(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAtomicInfo___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_FirstTokens_toOptional(lean_object*); lean_object* l_Lean_Parser_checkWsBefore___elambda__1(uint8_t); @@ -1101,19 +1118,22 @@ lean_object* l_Lean_registerAttributeImplBuilder(lean_object*, lean_object*, lea lean_object* l_Lean_Parser_ParserState_mkUnexpectedError(lean_object*, lean_object*); uint8_t l_UInt32_decLe(uint32_t, uint32_t); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec__3___boxed(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_quotedSymbol___elambda__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_getSyntaxNodeKinds___boxed(lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_15__addParserCategoryCore(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Parser_ParserState_hasError(lean_object*); lean_object* l_Lean_Parser_symbolFnAux(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_hexDigitFn___closed__1; lean_object* l_Lean_Parser_mkAtom(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2; lean_object* l_Lean_Parser_currLbp___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_mkEOIError(lean_object*); lean_object* l_Lean_Parser_unicodeSymbolFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone___boxed(lean_object*); lean_object* l_Lean_Parser_indexed___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawFn___boxed(lean_object*); lean_object* l_Lean_Parser_categoryParserOfStackFn(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(lean_object*, size_t, size_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeWhileFn___at_Lean_Parser_identFnAux___main___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldSepArgs(lean_object*); lean_object* l_Lean_Parser_ParserState_keepPrevError(lean_object*, lean_object*, lean_object*, lean_object*); @@ -1121,11 +1141,14 @@ lean_object* l_Lean_Parser_checkWsBefore___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_ParserFn_inhabited___rarg___boxed(lean_object*); lean_object* l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__5(lean_object*); lean_object* l_Lean_Parser_orelseFn___boxed(lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); +uint8_t l___private_Init_Lean_Parser_Parser_5__isIdFirstOrBeginEscape(uint32_t); lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__3; lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4(lean_object*); lean_object* l_List_toStringAux___main___at_Lean_Parser_FirstTokens_toStr___spec__2___boxed(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_17__addParserCategoryCore(lean_object*, lean_object*, lean_object*); lean_object* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone___boxed(lean_object*); +lean_object* l_List_foldl___main___at___private_Init_Lean_Parser_Parser_22__addTrailingParserAux___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolInfo___closed__1; lean_object* l_Lean_Parser_checkColGe___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParser___elambda__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1144,20 +1167,18 @@ lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepRevArgsM___spe lean_object* l_Lean_Parser_Error_toString___closed__1; lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__2; lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_Parser_addLeadingParser___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_18__mergePrecendences___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__1; lean_object* l_Lean_Parser_mkAntiquot___closed__2; -lean_object* l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_7__tokenFnAux(lean_object*, lean_object*); lean_object* l_Lean_Parser_Parser_inhabited___closed__1; lean_object* l_Lean_Parser_checkWsBefore___elambda__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getTailInfo___main(lean_object*); lean_object* l_Lean_Parser_categoryParserOfStack___elambda__1___boxed(lean_object*); lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_Parser_SyntaxNodeKindSet_insert___spec__3(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__2; extern lean_object* l_Lean_registerTagAttribute___lambda__4___closed__1; extern lean_object* l_Lean_initAttr; lean_object* l_Lean_Parser_identFn(uint8_t, lean_object*); lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_decimalNumberFn___spec__2___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3(lean_object*); lean_object* l_Lean_Parser_TokenConfig_HasBeq; lean_object* l_Lean_Parser_Parser_inhabited___boxed(lean_object*); @@ -1175,12 +1196,14 @@ lean_object* l_Lean_Parser_manyAux___boxed(lean_object*, lean_object*, lean_obje lean_object* l_Lean_Parser_group___boxed(lean_object*, lean_object*); lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_many1Indent___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon(uint8_t); lean_object* l_Lean_Parser_sepBy1Info___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawIdent___elambda__1(uint8_t); +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strLit(uint8_t); lean_object* l_Lean_Parser_rawIdentNoAntiquot___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_many1(uint8_t, lean_object*, uint8_t); +lean_object* l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__3; +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); 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*); @@ -1192,14 +1215,18 @@ lean_object* l_Lean_Parser_numberFnAux___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_numLit___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_parserExtension___elambda__3(lean_object*, lean_object*); lean_object* l_Lean_Parser_fieldIdxFn(lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_forArgsM___spec__1___boxed(lean_object*); lean_object* l_Lean_Parser_mkIdent(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_nameLitKind___closed__1; +lean_object* l_Lean_Parser_nameLit___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_withPosition___boxed(lean_object*, lean_object*); uint8_t lean_string_dec_eq(lean_object*, lean_object*); +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_isLitKind___boxed(lean_object*); lean_object* l_IO_ofExcept___at_Lean_Parser_declareBuiltinParser___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_registerParserCategory___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Parser_Parser_22__addTrailingParserAux(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Array_foldSepByM___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_longestMatchFnAux___main(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1357,6 +1384,61 @@ lean_dec(x_1); return x_2; } } +uint8_t l_Lean_Parser_isLitKind(lean_object* x_1) { +_start: +{ +lean_object* x_2; uint8_t x_3; +x_2 = l_Lean_strLitKind; +x_3 = lean_name_eq(x_1, x_2); +if (x_3 == 0) +{ +lean_object* x_4; uint8_t x_5; +x_4 = l_Lean_numLitKind; +x_5 = lean_name_eq(x_1, x_4); +if (x_5 == 0) +{ +lean_object* x_6; uint8_t x_7; +x_6 = l_Lean_charLitKind; +x_7 = lean_name_eq(x_1, x_6); +if (x_7 == 0) +{ +lean_object* x_8; uint8_t x_9; +x_8 = l_Lean_nameLitKind; +x_9 = lean_name_eq(x_1, x_8); +return x_9; +} +else +{ +uint8_t x_10; +x_10 = 1; +return x_10; +} +} +else +{ +uint8_t x_11; +x_11 = 1; +return x_11; +} +} +else +{ +uint8_t x_12; +x_12 = 1; +return x_12; +} +} +} +lean_object* l_Lean_Parser_isLitKind___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_Parser_isLitKind(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} lean_object* l_Lean_Parser_mkAtom(lean_object* x_1, lean_object* x_2) { _start: { @@ -1384,6 +1466,27 @@ lean_ctor_set(x_6, 3, x_5); return x_6; } } +uint32_t l_Lean_Parser_getNext(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint32_t x_4; +x_3 = lean_string_utf8_next(x_1, x_2); +x_4 = lean_string_utf8_get(x_1, x_3); +lean_dec(x_3); +return x_4; +} +} +lean_object* l_Lean_Parser_getNext___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint32_t x_3; lean_object* x_4; +x_3 = l_Lean_Parser_getNext(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box_uint32(x_3); +return x_4; +} +} lean_object* _init_l_Lean_Parser_appPrec() { _start: { @@ -9176,7 +9279,145 @@ lean_dec(x_4); return x_6; } } -lean_object* l___private_Init_Lean_Parser_Parser_5__tokenFnAux(lean_object* x_1, lean_object* x_2) { +uint8_t l___private_Init_Lean_Parser_Parser_5__isIdFirstOrBeginEscape(uint32_t x_1) { +_start: +{ +uint8_t x_2; +x_2 = l_Lean_isIdFirst(x_1); +if (x_2 == 0) +{ +uint8_t x_3; +x_3 = l_Lean_isIdBeginEscape(x_1); +return x_3; +} +else +{ +uint8_t x_4; +x_4 = 1; +return x_4; +} +} +} +lean_object* l___private_Init_Lean_Parser_Parser_5__isIdFirstOrBeginEscape___boxed(lean_object* x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; lean_object* x_4; +x_2 = lean_unbox_uint32(x_1); +lean_dec(x_1); +x_3 = l___private_Init_Lean_Parser_Parser_5__isIdFirstOrBeginEscape(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_2 = lean_array_get_size(x_1); +x_3 = lean_unsigned_to_nat(1u); +x_4 = lean_nat_sub(x_2, x_3); +lean_dec(x_2); +x_5 = l_Lean_Syntax_inhabited; +x_6 = lean_array_get(x_5, x_1, x_4); +lean_dec(x_4); +return x_6; +} +} +lean_object* _init_l___private_Init_Lean_Parser_Parser_6__nameLitAux___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("invalid Name literal"); +return x_1; +} +} +lean_object* l___private_Init_Lean_Parser_Parser_6__nameLitAux(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 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_4, 0); +x_6 = lean_box(0); +x_7 = l_Lean_Parser_ParserState_next(x_3, x_5, x_1); +x_8 = lean_box(0); +lean_inc(x_1); +x_9 = l_Lean_Parser_identFnAux___main(x_1, x_6, x_8, x_2, x_7); +x_10 = lean_ctor_get(x_9, 3); +lean_inc(x_10); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; lean_object* x_12; +lean_dec(x_1); +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_11); +x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_11); +lean_dec(x_11); +if (lean_obj_tag(x_12) == 3) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_13 = lean_ctor_get(x_12, 1); +lean_inc(x_13); +x_14 = l_Lean_Parser_ParserState_popSyntax(x_9); +x_15 = lean_ctor_get(x_13, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_13, 1); +lean_inc(x_16); +x_17 = lean_ctor_get(x_13, 2); +lean_inc(x_17); +lean_dec(x_13); +x_18 = lean_string_utf8_extract(x_15, x_16, x_17); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +x_19 = l_Lean_mkAtomFrom(x_12, x_18); +lean_dec(x_12); +x_20 = l_Lean_mkOptionalNode___closed__2; +x_21 = lean_array_push(x_20, x_19); +x_22 = l_Lean_nameLitKind; +x_23 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_24 = l_Lean_Parser_ParserState_pushSyntax(x_14, x_23); +return x_24; +} +else +{ +lean_object* x_25; lean_object* x_26; +lean_dec(x_12); +x_25 = l___private_Init_Lean_Parser_Parser_6__nameLitAux___closed__1; +x_26 = l_Lean_Parser_ParserState_mkError(x_9, x_25); +return x_26; +} +} +else +{ +lean_object* x_27; lean_object* x_28; +lean_dec(x_10); +x_27 = l___private_Init_Lean_Parser_Parser_6__nameLitAux___closed__1; +x_28 = l_Lean_Parser_ParserState_mkErrorAt(x_9, x_27, x_1); +return x_28; +} +} +} +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l___private_Init_Lean_Parser_Parser_6__nameLitAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Init_Lean_Parser_Parser_6__nameLitAux(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l___private_Init_Lean_Parser_Parser_7__tokenFnAux(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; lean_object* x_5; uint32_t x_6; uint32_t x_7; uint8_t x_8; @@ -9192,75 +9433,114 @@ x_7 = 34; x_8 = x_6 == x_7; if (x_8 == 0) { -uint32_t x_9; uint8_t x_10; +uint32_t x_9; uint8_t x_10; uint8_t x_31; x_9 = 39; -x_10 = x_6 == x_9; +x_31 = x_6 == x_9; +if (x_31 == 0) +{ +uint8_t x_32; +x_32 = 0; +x_10 = x_32; +goto block_30; +} +else +{ +uint8_t x_33; +x_33 = 1; +x_10 = x_33; +goto block_30; +} +block_30: +{ if (x_10 == 0) { uint8_t x_11; x_11 = l_Char_isDigit(x_6); if (x_11 == 0) { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_12 = lean_ctor_get(x_1, 2); -lean_inc(x_12); -lean_inc(x_5); -x_13 = l_Lean_Parser_Trie_matchPrefix___rarg(x_4, x_12, x_5); -lean_dec(x_4); -x_14 = lean_ctor_get(x_13, 1); +uint32_t x_12; uint8_t x_13; +x_12 = 96; +x_13 = x_6 == x_12; +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_14 = lean_ctor_get(x_1, 2); lean_inc(x_14); -lean_dec(x_13); -x_15 = lean_box(0); -x_16 = l_Lean_Parser_identFnAux___main(x_5, x_14, x_15, x_1, x_2); +lean_inc(x_5); +x_15 = l_Lean_Parser_Trie_matchPrefix___rarg(x_4, x_14, x_5); +lean_dec(x_4); +x_16 = lean_ctor_get(x_15, 1); +lean_inc(x_16); +lean_dec(x_15); +x_17 = lean_box(0); +x_18 = l_Lean_Parser_identFnAux___main(x_5, x_16, x_17, x_1, x_2); lean_dec(x_1); -return x_16; +return x_18; } else { -lean_object* x_17; +uint32_t x_19; uint8_t x_20; +x_19 = l_Lean_Parser_getNext(x_4, x_5); +x_20 = l___private_Init_Lean_Parser_Parser_5__isIdFirstOrBeginEscape(x_19); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_21 = lean_ctor_get(x_1, 2); +lean_inc(x_21); +lean_inc(x_5); +x_22 = l_Lean_Parser_Trie_matchPrefix___rarg(x_4, x_21, x_5); +lean_dec(x_4); +x_23 = lean_ctor_get(x_22, 1); +lean_inc(x_23); +lean_dec(x_22); +x_24 = lean_box(0); +x_25 = l_Lean_Parser_identFnAux___main(x_5, x_23, x_24, x_1, x_2); +lean_dec(x_1); +return x_25; +} +else +{ +lean_object* x_26; +lean_dec(x_4); +x_26 = l___private_Init_Lean_Parser_Parser_6__nameLitAux(x_5, x_1, x_2); +lean_dec(x_1); +return x_26; +} +} +} +else +{ +lean_object* x_27; lean_dec(x_5); lean_dec(x_4); -x_17 = l_Lean_Parser_numberFnAux(x_1, x_2); +x_27 = l_Lean_Parser_numberFnAux(x_1, x_2); lean_dec(x_1); -return x_17; +return x_27; } } else { -lean_object* x_18; lean_object* x_19; -x_18 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5); +lean_object* x_28; lean_object* x_29; +x_28 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5); lean_dec(x_4); -x_19 = l_Lean_Parser_charLitFnAux(x_5, x_1, x_18); +x_29 = l_Lean_Parser_charLitFnAux(x_5, x_1, x_28); lean_dec(x_1); -return x_19; +return x_29; +} } } else { -lean_object* x_20; lean_object* x_21; -x_20 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5); +lean_object* x_34; lean_object* x_35; +x_34 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5); lean_dec(x_4); -x_21 = l_Lean_Parser_strLitFnAux___main(x_5, x_1, x_20); +x_35 = l_Lean_Parser_strLitFnAux___main(x_5, x_1, x_34); lean_dec(x_1); -return x_21; +return x_35; } } } -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_2 = lean_array_get_size(x_1); -x_3 = lean_unsigned_to_nat(1u); -x_4 = lean_nat_sub(x_2, x_3); -lean_dec(x_2); -x_5 = l_Lean_Syntax_inhabited; -x_6 = lean_array_get(x_5, x_1, x_4); -lean_dec(x_4); -return x_6; -} -} -lean_object* l___private_Init_Lean_Parser_Parser_6__updateCache(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_8__updateCache(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; @@ -9292,7 +9572,7 @@ x_12 = lean_ctor_get(x_2, 1); lean_dec(x_12); x_13 = lean_ctor_get(x_2, 0); lean_dec(x_13); -x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_4); +x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_4); lean_inc(x_5); x_15 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_15, 0, x_1); @@ -9305,7 +9585,7 @@ else { lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_dec(x_2); -x_16 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_4); +x_16 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_4); lean_inc(x_5); x_17 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_17, 0, x_1); @@ -9335,15 +9615,6 @@ return x_2; } } } -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_1); -lean_dec(x_1); -return x_2; -} -} lean_object* l_Lean_Parser_tokenFn(lean_object* x_1, lean_object* x_2) { _start: { @@ -9370,8 +9641,8 @@ if (x_9 == 0) { lean_object* x_10; lean_object* x_11; lean_dec(x_7); -x_10 = l___private_Init_Lean_Parser_Parser_5__tokenFnAux(x_1, x_2); -x_11 = l___private_Init_Lean_Parser_Parser_6__updateCache(x_5, x_10); +x_10 = l___private_Init_Lean_Parser_Parser_7__tokenFnAux(x_1, x_2); +x_11 = l___private_Init_Lean_Parser_Parser_8__updateCache(x_5, x_10); return x_11; } else @@ -9418,7 +9689,7 @@ if (lean_obj_tag(x_7) == 0) lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_8 = lean_ctor_get(x_6, 0); lean_inc(x_8); -x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_8); +x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_8); lean_dec(x_8); x_10 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); lean_dec(x_4); @@ -9493,7 +9764,7 @@ if (lean_obj_tag(x_7) == 0) lean_object* x_8; lean_object* x_9; x_8 = lean_ctor_get(x_6, 0); lean_inc(x_8); -x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_8); +x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_8); lean_dec(x_8); if (lean_obj_tag(x_9) == 2) { @@ -9554,7 +9825,7 @@ if (lean_obj_tag(x_9) == 0) lean_object* x_10; lean_object* x_11; x_10 = lean_ctor_get(x_8, 0); lean_inc(x_10); -x_11 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_10); +x_11 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_10); lean_dec(x_10); if (lean_obj_tag(x_11) == 2) { @@ -9691,7 +9962,7 @@ if (lean_obj_tag(x_12) == 0) lean_object* x_13; lean_object* x_14; x_13 = lean_ctor_get(x_11, 0); lean_inc(x_13); -x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_13); +x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_13); lean_dec(x_13); if (lean_obj_tag(x_14) == 2) { @@ -9827,7 +10098,7 @@ if (lean_obj_tag(x_7) == 0) lean_object* x_8; lean_object* x_9; x_8 = lean_ctor_get(x_6, 0); lean_inc(x_8); -x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_8); +x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_8); lean_dec(x_8); switch (lean_obj_tag(x_9)) { case 2: @@ -10237,7 +10508,7 @@ _start: lean_object* x_4; lean_object* x_5; uint8_t x_6; x_4 = lean_ctor_get(x_3, 0); lean_inc(x_4); -x_5 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_4); +x_5 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_4); lean_dec(x_4); x_6 = l_Lean_Parser_checkTailWs(x_5); lean_dec(x_5); @@ -10364,7 +10635,7 @@ x_3 = lean_box(x_2); return x_3; } } -lean_object* l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_7__pickNonNone___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_9__pickNonNone___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; uint8_t x_5; @@ -10403,12 +10674,12 @@ goto _start; } } } -lean_object* l___private_Init_Lean_Parser_Parser_7__pickNonNone(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_9__pickNonNone(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; x_2 = lean_array_get_size(x_1); -x_3 = l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_7__pickNonNone___spec__1(x_1, x_2, lean_box(0)); +x_3 = l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_9__pickNonNone___spec__1(x_1, x_2, lean_box(0)); if (lean_obj_tag(x_3) == 0) { lean_object* x_4; @@ -10425,20 +10696,20 @@ return x_5; } } } -lean_object* l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_7__pickNonNone___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_9__pickNonNone___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_7__pickNonNone___spec__1(x_1, x_2, x_3); +x_4 = l_Array_findRevMAux___main___at___private_Init_Lean_Parser_Parser_9__pickNonNone___spec__1(x_1, x_2, x_3); lean_dec(x_1); return x_4; } } -lean_object* l___private_Init_Lean_Parser_Parser_7__pickNonNone___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_9__pickNonNone___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l___private_Init_Lean_Parser_Parser_7__pickNonNone(x_1); +x_2 = l___private_Init_Lean_Parser_Parser_9__pickNonNone(x_1); lean_dec(x_1); return x_2; } @@ -10449,7 +10720,7 @@ _start: lean_object* x_4; lean_object* x_5; uint8_t x_6; x_4 = lean_ctor_get(x_3, 0); lean_inc(x_4); -x_5 = l___private_Init_Lean_Parser_Parser_7__pickNonNone(x_4); +x_5 = l___private_Init_Lean_Parser_Parser_9__pickNonNone(x_4); lean_dec(x_4); x_6 = l_Lean_Parser_checkTailNoWs(x_5); lean_dec(x_5); @@ -10823,7 +11094,7 @@ if (lean_obj_tag(x_8) == 0) lean_object* x_9; lean_object* x_10; x_9 = lean_ctor_get(x_7, 0); lean_inc(x_9); -x_10 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_9); +x_10 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_9); lean_dec(x_9); if (lean_obj_tag(x_10) == 2) { @@ -11074,7 +11345,7 @@ if (lean_obj_tag(x_12) == 0) lean_object* x_13; lean_object* x_14; x_13 = lean_ctor_get(x_11, 0); lean_inc(x_13); -x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_13); +x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_13); lean_dec(x_13); if (lean_obj_tag(x_14) == 2) { @@ -11317,7 +11588,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_6); lean_dec(x_6); x_8 = l_Lean_numLitKind; x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); @@ -11418,7 +11689,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_6); lean_dec(x_6); x_8 = l_Lean_strLitKind; x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); @@ -11519,7 +11790,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_6); lean_dec(x_6); x_8 = l_Lean_charLitKind; x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); @@ -11598,6 +11869,107 @@ x_3 = l_Lean_Parser_charLitNoAntiquot(x_2); return x_3; } } +lean_object* _init_l_Lean_Parser_nameLitFn___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Name literal"); +return x_1; +} +} +lean_object* l_Lean_Parser_nameLitFn___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_2, 1); +lean_inc(x_3); +x_4 = l_Lean_Parser_tokenFn(x_1, x_2); +x_5 = lean_ctor_get(x_4, 3); +lean_inc(x_5); +if (lean_obj_tag(x_5) == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_6 = lean_ctor_get(x_4, 0); +lean_inc(x_6); +x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_6); +lean_dec(x_6); +x_8 = l_Lean_nameLitKind; +x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; +x_10 = l_Lean_Parser_nameLitFn___rarg___closed__1; +x_11 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_10, x_3); +return x_11; +} +else +{ +lean_dec(x_3); +return x_4; +} +} +else +{ +lean_object* x_12; lean_object* x_13; +lean_dec(x_5); +x_12 = l_Lean_Parser_nameLitFn___rarg___closed__1; +x_13 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_12, x_3); +return x_13; +} +} +} +lean_object* l_Lean_Parser_nameLitFn(uint8_t x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Lean_Parser_nameLitFn___rarg), 2, 0); +return x_3; +} +} +lean_object* l_Lean_Parser_nameLitFn___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = lean_unbox(x_1); +lean_dec(x_1); +x_4 = l_Lean_Parser_nameLitFn(x_3, x_2); +lean_dec(x_2); +return x_4; +} +} +lean_object* _init_l_Lean_Parser_nameLitNoAntiquot___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_nameLitKind___closed__1; +x_2 = l_Lean_Parser_mkAtomicInfo(x_1); +return x_2; +} +} +lean_object* l_Lean_Parser_nameLitNoAntiquot(uint8_t x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = lean_box(x_1); +x_3 = lean_alloc_closure((void*)(l_Lean_Parser_nameLitFn___boxed), 2, 1); +lean_closure_set(x_3, 0, x_2); +x_4 = l_Lean_Parser_nameLitNoAntiquot___closed__1; +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_4); +lean_ctor_set(x_5, 1, x_3); +return x_5; +} +} +lean_object* l_Lean_Parser_nameLitNoAntiquot___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = lean_unbox(x_1); +lean_dec(x_1); +x_3 = l_Lean_Parser_nameLitNoAntiquot(x_2); +return x_3; +} +} lean_object* _init_l_Lean_Parser_identFn___rarg___closed__1() { _start: { @@ -11620,7 +11992,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; uint8_t x_8; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_6); lean_dec(x_6); x_8 = l_Lean_Syntax_isIdent(x_7); lean_dec(x_7); @@ -11769,7 +12141,7 @@ if (lean_obj_tag(x_7) == 0) lean_object* x_8; lean_object* x_9; x_8 = lean_ctor_get(x_6, 0); lean_inc(x_8); -x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_8); +x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_8); lean_dec(x_8); if (lean_obj_tag(x_9) == 3) { @@ -12227,75 +12599,46 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; uint8_t x_8; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_6); lean_dec(x_6); x_8 = l_Lean_Syntax_isIdent(x_7); if (x_8 == 0) { lean_object* x_9; uint8_t x_10; -x_9 = l_Lean_strLitKind; -lean_inc(x_7); -x_10 = l_Lean_Syntax_isOfKind(x_7, x_9); +x_9 = l_Lean_Syntax_getKind(x_7); +x_10 = l_Lean_Parser_isLitKind(x_9); +lean_dec(x_9); if (x_10 == 0) { -lean_object* x_11; uint8_t x_12; -x_11 = l_Lean_charLitKind; -lean_inc(x_7); -x_12 = l_Lean_Syntax_isOfKind(x_7, x_11); -if (x_12 == 0) -{ -lean_object* x_13; uint8_t x_14; -x_13 = l_Lean_numLitKind; -x_14 = l_Lean_Syntax_isOfKind(x_7, x_13); -if (x_14 == 0) -{ lean_dec(x_3); return x_4; } else { +lean_object* x_11; lean_object* x_12; +x_11 = l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; +x_12 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_11, x_3); +return x_12; +} +} +else +{ +lean_object* x_13; lean_object* x_14; +lean_dec(x_7); +x_13 = l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; +x_14 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_13, x_3); +return x_14; +} +} +else +{ lean_object* x_15; lean_object* x_16; +lean_dec(x_5); x_15 = l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; x_16 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_15, x_3); return x_16; } } -else -{ -lean_object* x_17; lean_object* x_18; -lean_dec(x_7); -x_17 = l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; -x_18 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_17, x_3); -return x_18; -} -} -else -{ -lean_object* x_19; lean_object* x_20; -lean_dec(x_7); -x_19 = l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; -x_20 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_19, x_3); -return x_20; -} -} -else -{ -lean_object* x_21; lean_object* x_22; -lean_dec(x_7); -x_21 = l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; -x_22 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_21, x_3); -return x_22; -} -} -else -{ -lean_object* x_23; lean_object* x_24; -lean_dec(x_5); -x_23 = l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; -x_24 = l_Lean_Parser_ParserState_mkErrorAt(x_4, x_23, x_3); -return x_24; -} -} } lean_object* l_Lean_Parser_unquotedSymbolFn(uint8_t x_1, lean_object* x_2) { _start: @@ -12748,7 +13091,7 @@ lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_obj x_4 = lean_ctor_get(x_1, 0); x_5 = lean_ctor_get(x_1, 3); lean_dec(x_5); -x_6 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_4); +x_6 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_4); x_7 = l_Array_shrink___main___rarg(x_4, x_2); x_8 = lean_array_push(x_7, x_6); x_9 = lean_box(0); @@ -12766,7 +13109,7 @@ lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_dec(x_1); -x_13 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_10); +x_13 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_10); x_14 = l_Array_shrink___main___rarg(x_10, x_2); x_15 = lean_array_push(x_14, x_13); x_16 = lean_box(0); @@ -12882,7 +13225,7 @@ lean_dec(x_7); x_22 = l_Lean_Parser_ParserState_mkLongestNodeAlt(x_12, x_10); x_23 = lean_ctor_get(x_22, 0); lean_inc(x_23); -x_24 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_23); +x_24 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_23); lean_dec(x_23); x_25 = l_Lean_Parser_ParserState_shrinkStack(x_22, x_1); x_26 = l_Lean_Parser_ParserState_pushSyntax(x_25, x_24); @@ -23769,260 +24112,296 @@ lean_dec(x_2); x_19 = !lean_is_exclusive(x_4); if (x_19 == 0) { -lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; +lean_object* x_20; lean_object* x_21; uint8_t x_22; x_20 = lean_ctor_get(x_4, 1); lean_dec(x_20); x_21 = lean_ctor_get(x_12, 0); lean_inc(x_21); lean_dec(x_12); -x_22 = l_Lean_numLitKind; -x_23 = lean_name_eq(x_21, x_22); -if (x_23 == 0) +x_22 = l_Lean_Parser_isLitKind(x_21); +if (x_22 == 0) { -lean_object* x_24; uint8_t x_25; -x_24 = l_Lean_charLitKind; -x_25 = lean_name_eq(x_21, x_24); -if (x_25 == 0) -{ -lean_object* x_26; uint8_t x_27; -x_26 = l_Lean_strLitKind; -x_27 = lean_name_eq(x_21, x_26); -if (x_27 == 0) -{ -lean_object* x_28; uint8_t x_29; -x_28 = l_Lean_fieldIdxKind; -x_29 = lean_name_eq(x_21, x_28); +lean_object* x_23; uint8_t x_24; +x_23 = l_Lean_fieldIdxKind; +x_24 = lean_name_eq(x_21, x_23); lean_dec(x_21); -if (x_29 == 0) +if (x_24 == 0) { -lean_object* x_30; -x_30 = lean_unsigned_to_nat(0u); -lean_ctor_set(x_4, 1, x_30); +lean_object* x_25; +x_25 = lean_unsigned_to_nat(0u); +lean_ctor_set(x_4, 1, x_25); return x_4; } else { -lean_object* x_31; -x_31 = l_Lean_Parser_appPrec; -lean_ctor_set(x_4, 1, x_31); +lean_object* x_26; +x_26 = l_Lean_Parser_appPrec; +lean_ctor_set(x_4, 1, x_26); return x_4; } } else { -lean_object* x_32; +lean_object* x_27; lean_dec(x_21); -x_32 = l_Lean_Parser_appPrec; -lean_ctor_set(x_4, 1, x_32); +x_27 = l_Lean_Parser_appPrec; +lean_ctor_set(x_4, 1, x_27); return x_4; } } else { -lean_object* x_33; -lean_dec(x_21); -x_33 = l_Lean_Parser_appPrec; -lean_ctor_set(x_4, 1, x_33); -return x_4; -} -} -else -{ -lean_object* x_34; -lean_dec(x_21); -x_34 = l_Lean_Parser_appPrec; -lean_ctor_set(x_4, 1, x_34); -return x_4; -} -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; -x_35 = lean_ctor_get(x_4, 0); -lean_inc(x_35); +lean_object* x_28; lean_object* x_29; uint8_t x_30; +x_28 = lean_ctor_get(x_4, 0); +lean_inc(x_28); lean_dec(x_4); -x_36 = lean_ctor_get(x_12, 0); -lean_inc(x_36); +x_29 = lean_ctor_get(x_12, 0); +lean_inc(x_29); lean_dec(x_12); -x_37 = l_Lean_numLitKind; -x_38 = lean_name_eq(x_36, x_37); -if (x_38 == 0) +x_30 = l_Lean_Parser_isLitKind(x_29); +if (x_30 == 0) { -lean_object* x_39; uint8_t x_40; -x_39 = l_Lean_charLitKind; -x_40 = lean_name_eq(x_36, x_39); -if (x_40 == 0) +lean_object* x_31; uint8_t x_32; +x_31 = l_Lean_fieldIdxKind; +x_32 = lean_name_eq(x_29, x_31); +lean_dec(x_29); +if (x_32 == 0) { -lean_object* x_41; uint8_t x_42; -x_41 = l_Lean_strLitKind; -x_42 = lean_name_eq(x_36, x_41); -if (x_42 == 0) -{ -lean_object* x_43; uint8_t x_44; -x_43 = l_Lean_fieldIdxKind; -x_44 = lean_name_eq(x_36, x_43); -lean_dec(x_36); -if (x_44 == 0) -{ -lean_object* x_45; lean_object* x_46; -x_45 = lean_unsigned_to_nat(0u); -x_46 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_46, 0, x_35); -lean_ctor_set(x_46, 1, x_45); -return x_46; +lean_object* x_33; lean_object* x_34; +x_33 = lean_unsigned_to_nat(0u); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_28); +lean_ctor_set(x_34, 1, x_33); +return x_34; } else { -lean_object* x_47; lean_object* x_48; -x_47 = l_Lean_Parser_appPrec; -x_48 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_48, 0, x_35); -lean_ctor_set(x_48, 1, x_47); -return x_48; +lean_object* x_35; lean_object* x_36; +x_35 = l_Lean_Parser_appPrec; +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_28); +lean_ctor_set(x_36, 1, x_35); +return x_36; } } else { -lean_object* x_49; lean_object* x_50; -lean_dec(x_36); -x_49 = l_Lean_Parser_appPrec; -x_50 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_50, 0, x_35); -lean_ctor_set(x_50, 1, x_49); -return x_50; -} -} -else -{ -lean_object* x_51; lean_object* x_52; -lean_dec(x_36); -x_51 = l_Lean_Parser_appPrec; -x_52 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_52, 0, x_35); -lean_ctor_set(x_52, 1, x_51); -return x_52; -} -} -else -{ -lean_object* x_53; lean_object* x_54; -lean_dec(x_36); -x_53 = l_Lean_Parser_appPrec; -x_54 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_54, 0, x_35); -lean_ctor_set(x_54, 1, x_53); -return x_54; +lean_object* x_37; lean_object* x_38; +lean_dec(x_29); +x_37 = l_Lean_Parser_appPrec; +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_28); +lean_ctor_set(x_38, 1, x_37); +return x_38; } } } case 2: { -uint8_t x_55; -x_55 = !lean_is_exclusive(x_4); -if (x_55 == 0) +uint8_t x_39; +x_39 = !lean_is_exclusive(x_4); +if (x_39 == 0) { -lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60; -x_56 = lean_ctor_get(x_4, 0); -x_57 = lean_ctor_get(x_4, 1); -lean_dec(x_57); -x_58 = lean_ctor_get(x_12, 1); -lean_inc(x_58); -x_59 = l_Lean_Syntax_termIdToAntiquot___closed__3; -x_60 = lean_string_dec_eq(x_58, x_59); -if (x_60 == 0) +lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; +x_40 = lean_ctor_get(x_4, 0); +x_41 = lean_ctor_get(x_4, 1); +lean_dec(x_41); +x_42 = lean_ctor_get(x_12, 1); +lean_inc(x_42); +x_43 = l_Lean_Syntax_termIdToAntiquot___closed__3; +x_44 = lean_string_dec_eq(x_42, x_43); +if (x_44 == 0) { -lean_object* x_61; lean_object* x_62; lean_object* x_63; uint8_t x_64; +lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; lean_free_object(x_4); lean_dec(x_12); -x_61 = lean_ctor_get(x_2, 2); -lean_inc(x_61); +x_45 = lean_ctor_get(x_2, 2); +lean_inc(x_45); lean_dec(x_2); -x_62 = lean_unsigned_to_nat(0u); -x_63 = l_Lean_Parser_Trie_matchPrefix___rarg(x_58, x_61, x_62); -lean_dec(x_58); -x_64 = !lean_is_exclusive(x_63); -if (x_64 == 0) +x_46 = lean_unsigned_to_nat(0u); +x_47 = l_Lean_Parser_Trie_matchPrefix___rarg(x_42, x_45, x_46); +lean_dec(x_42); +x_48 = !lean_is_exclusive(x_47); +if (x_48 == 0) { -lean_object* x_65; lean_object* x_66; -x_65 = lean_ctor_get(x_63, 1); -x_66 = lean_ctor_get(x_63, 0); -lean_dec(x_66); -if (lean_obj_tag(x_65) == 0) +lean_object* x_49; lean_object* x_50; +x_49 = lean_ctor_get(x_47, 1); +x_50 = lean_ctor_get(x_47, 0); +lean_dec(x_50); +if (lean_obj_tag(x_49) == 0) { -lean_ctor_set(x_63, 1, x_62); -lean_ctor_set(x_63, 0, x_56); -return x_63; +lean_ctor_set(x_47, 1, x_46); +lean_ctor_set(x_47, 0, x_40); +return x_47; } else { -lean_object* x_67; lean_object* x_68; -x_67 = lean_ctor_get(x_65, 0); -lean_inc(x_67); -lean_dec(x_65); -x_68 = lean_ctor_get(x_67, 1); +lean_object* x_51; lean_object* x_52; +x_51 = lean_ctor_get(x_49, 0); +lean_inc(x_51); +lean_dec(x_49); +x_52 = lean_ctor_get(x_51, 1); +lean_inc(x_52); +if (lean_obj_tag(x_52) == 0) +{ +lean_object* x_53; +x_53 = lean_ctor_get(x_51, 2); +lean_inc(x_53); +lean_dec(x_51); +if (lean_obj_tag(x_53) == 0) +{ +lean_ctor_set(x_47, 1, x_46); +lean_ctor_set(x_47, 0, x_40); +return x_47; +} +else +{ +lean_object* x_54; +x_54 = lean_ctor_get(x_53, 0); +lean_inc(x_54); +lean_dec(x_53); +lean_ctor_set(x_47, 1, x_54); +lean_ctor_set(x_47, 0, x_40); +return x_47; +} +} +else +{ +lean_object* x_55; +x_55 = lean_ctor_get(x_51, 2); +lean_inc(x_55); +lean_dec(x_51); +if (lean_obj_tag(x_55) == 0) +{ +lean_object* x_56; +x_56 = lean_ctor_get(x_52, 0); +lean_inc(x_56); +lean_dec(x_52); +lean_ctor_set(x_47, 1, x_56); +lean_ctor_set(x_47, 0, x_40); +return x_47; +} +else +{ +lean_object* x_57; lean_object* x_58; uint8_t x_59; +x_57 = lean_ctor_get(x_52, 0); +lean_inc(x_57); +lean_dec(x_52); +x_58 = lean_ctor_get(x_55, 0); +lean_inc(x_58); +lean_dec(x_55); +x_59 = l_Lean_Parser_checkTailNoWs(x_1); +if (x_59 == 0) +{ +lean_dec(x_58); +lean_ctor_set(x_47, 1, x_57); +lean_ctor_set(x_47, 0, x_40); +return x_47; +} +else +{ +lean_dec(x_57); +lean_ctor_set(x_47, 1, x_58); +lean_ctor_set(x_47, 0, x_40); +return x_47; +} +} +} +} +} +else +{ +lean_object* x_60; +x_60 = lean_ctor_get(x_47, 1); +lean_inc(x_60); +lean_dec(x_47); +if (lean_obj_tag(x_60) == 0) +{ +lean_object* x_61; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_40); +lean_ctor_set(x_61, 1, x_46); +return x_61; +} +else +{ +lean_object* x_62; lean_object* x_63; +x_62 = lean_ctor_get(x_60, 0); +lean_inc(x_62); +lean_dec(x_60); +x_63 = lean_ctor_get(x_62, 1); +lean_inc(x_63); +if (lean_obj_tag(x_63) == 0) +{ +lean_object* x_64; +x_64 = lean_ctor_get(x_62, 2); +lean_inc(x_64); +lean_dec(x_62); +if (lean_obj_tag(x_64) == 0) +{ +lean_object* x_65; +x_65 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_65, 0, x_40); +lean_ctor_set(x_65, 1, x_46); +return x_65; +} +else +{ +lean_object* x_66; lean_object* x_67; +x_66 = lean_ctor_get(x_64, 0); +lean_inc(x_66); +lean_dec(x_64); +x_67 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_67, 0, x_40); +lean_ctor_set(x_67, 1, x_66); +return x_67; +} +} +else +{ +lean_object* x_68; +x_68 = lean_ctor_get(x_62, 2); lean_inc(x_68); +lean_dec(x_62); if (lean_obj_tag(x_68) == 0) { -lean_object* x_69; -x_69 = lean_ctor_get(x_67, 2); +lean_object* x_69; lean_object* x_70; +x_69 = lean_ctor_get(x_63, 0); lean_inc(x_69); -lean_dec(x_67); -if (lean_obj_tag(x_69) == 0) -{ -lean_ctor_set(x_63, 1, x_62); -lean_ctor_set(x_63, 0, x_56); -return x_63; +lean_dec(x_63); +x_70 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_70, 0, x_40); +lean_ctor_set(x_70, 1, x_69); +return x_70; } else { -lean_object* x_70; -x_70 = lean_ctor_get(x_69, 0); -lean_inc(x_70); -lean_dec(x_69); -lean_ctor_set(x_63, 1, x_70); -lean_ctor_set(x_63, 0, x_56); -return x_63; -} -} -else -{ -lean_object* x_71; -x_71 = lean_ctor_get(x_67, 2); +lean_object* x_71; lean_object* x_72; uint8_t x_73; +x_71 = lean_ctor_get(x_63, 0); lean_inc(x_71); -lean_dec(x_67); -if (lean_obj_tag(x_71) == 0) -{ -lean_object* x_72; +lean_dec(x_63); x_72 = lean_ctor_get(x_68, 0); lean_inc(x_72); lean_dec(x_68); -lean_ctor_set(x_63, 1, x_72); -lean_ctor_set(x_63, 0, x_56); -return x_63; +x_73 = l_Lean_Parser_checkTailNoWs(x_1); +if (x_73 == 0) +{ +lean_object* x_74; +lean_dec(x_72); +x_74 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_74, 0, x_40); +lean_ctor_set(x_74, 1, x_71); +return x_74; } else { -lean_object* x_73; lean_object* x_74; uint8_t x_75; -x_73 = lean_ctor_get(x_68, 0); -lean_inc(x_73); -lean_dec(x_68); -x_74 = lean_ctor_get(x_71, 0); -lean_inc(x_74); +lean_object* x_75; lean_dec(x_71); -x_75 = l_Lean_Parser_checkTailNoWs(x_1); -if (x_75 == 0) -{ -lean_dec(x_74); -lean_ctor_set(x_63, 1, x_73); -lean_ctor_set(x_63, 0, x_56); -return x_63; +x_75 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_75, 0, x_40); +lean_ctor_set(x_75, 1, x_72); +return x_75; } -else -{ -lean_dec(x_73); -lean_ctor_set(x_63, 1, x_74); -lean_ctor_set(x_63, 0, x_56); -return x_63; } } } @@ -24030,97 +24409,102 @@ return x_63; } else { -lean_object* x_76; -x_76 = lean_ctor_get(x_63, 1); -lean_inc(x_76); -lean_dec(x_63); -if (lean_obj_tag(x_76) == 0) +uint8_t x_76; +x_76 = l_Lean_Parser_checkTailNoWs(x_12); +lean_dec(x_12); +if (x_76 == 0) { -lean_object* x_77; -x_77 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_77, 0, x_56); -lean_ctor_set(x_77, 1, x_62); -return x_77; +lean_object* x_77; lean_object* x_78; lean_object* x_79; uint8_t x_80; +lean_free_object(x_4); +x_77 = lean_ctor_get(x_2, 2); +lean_inc(x_77); +lean_dec(x_2); +x_78 = lean_unsigned_to_nat(0u); +x_79 = l_Lean_Parser_Trie_matchPrefix___rarg(x_42, x_77, x_78); +lean_dec(x_42); +x_80 = !lean_is_exclusive(x_79); +if (x_80 == 0) +{ +lean_object* x_81; lean_object* x_82; +x_81 = lean_ctor_get(x_79, 1); +x_82 = lean_ctor_get(x_79, 0); +lean_dec(x_82); +if (lean_obj_tag(x_81) == 0) +{ +lean_ctor_set(x_79, 1, x_78); +lean_ctor_set(x_79, 0, x_40); +return x_79; } else { -lean_object* x_78; lean_object* x_79; -x_78 = lean_ctor_get(x_76, 0); -lean_inc(x_78); -lean_dec(x_76); -x_79 = lean_ctor_get(x_78, 1); -lean_inc(x_79); -if (lean_obj_tag(x_79) == 0) -{ -lean_object* x_80; -x_80 = lean_ctor_get(x_78, 2); -lean_inc(x_80); -lean_dec(x_78); -if (lean_obj_tag(x_80) == 0) -{ -lean_object* x_81; -x_81 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_81, 0, x_56); -lean_ctor_set(x_81, 1, x_62); -return x_81; -} -else -{ -lean_object* x_82; lean_object* x_83; -x_82 = lean_ctor_get(x_80, 0); -lean_inc(x_82); -lean_dec(x_80); -x_83 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_83, 0, x_56); -lean_ctor_set(x_83, 1, x_82); -return x_83; -} -} -else -{ -lean_object* x_84; -x_84 = lean_ctor_get(x_78, 2); +lean_object* x_83; lean_object* x_84; +x_83 = lean_ctor_get(x_81, 0); +lean_inc(x_83); +lean_dec(x_81); +x_84 = lean_ctor_get(x_83, 1); lean_inc(x_84); -lean_dec(x_78); if (lean_obj_tag(x_84) == 0) { -lean_object* x_85; lean_object* x_86; -x_85 = lean_ctor_get(x_79, 0); +lean_object* x_85; +x_85 = lean_ctor_get(x_83, 2); lean_inc(x_85); -lean_dec(x_79); -x_86 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_86, 0, x_56); -lean_ctor_set(x_86, 1, x_85); -return x_86; +lean_dec(x_83); +if (lean_obj_tag(x_85) == 0) +{ +lean_ctor_set(x_79, 1, x_78); +lean_ctor_set(x_79, 0, x_40); +return x_79; } else { -lean_object* x_87; lean_object* x_88; uint8_t x_89; -x_87 = lean_ctor_get(x_79, 0); +lean_object* x_86; +x_86 = lean_ctor_get(x_85, 0); +lean_inc(x_86); +lean_dec(x_85); +lean_ctor_set(x_79, 1, x_86); +lean_ctor_set(x_79, 0, x_40); +return x_79; +} +} +else +{ +lean_object* x_87; +x_87 = lean_ctor_get(x_83, 2); lean_inc(x_87); -lean_dec(x_79); +lean_dec(x_83); +if (lean_obj_tag(x_87) == 0) +{ +lean_object* x_88; x_88 = lean_ctor_get(x_84, 0); lean_inc(x_88); lean_dec(x_84); -x_89 = l_Lean_Parser_checkTailNoWs(x_1); -if (x_89 == 0) -{ -lean_object* x_90; -lean_dec(x_88); -x_90 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_90, 0, x_56); -lean_ctor_set(x_90, 1, x_87); -return x_90; +lean_ctor_set(x_79, 1, x_88); +lean_ctor_set(x_79, 0, x_40); +return x_79; } else { -lean_object* x_91; +lean_object* x_89; lean_object* x_90; uint8_t x_91; +x_89 = lean_ctor_get(x_84, 0); +lean_inc(x_89); +lean_dec(x_84); +x_90 = lean_ctor_get(x_87, 0); +lean_inc(x_90); lean_dec(x_87); -x_91 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_91, 0, x_56); -lean_ctor_set(x_91, 1, x_88); -return x_91; +x_91 = l_Lean_Parser_checkTailNoWs(x_1); +if (x_91 == 0) +{ +lean_dec(x_90); +lean_ctor_set(x_79, 1, x_89); +lean_ctor_set(x_79, 0, x_40); +return x_79; } +else +{ +lean_dec(x_89); +lean_ctor_set(x_79, 1, x_90); +lean_ctor_set(x_79, 0, x_40); +return x_79; } } } @@ -24128,102 +24512,97 @@ return x_91; } else { -uint8_t x_92; -x_92 = l_Lean_Parser_checkTailNoWs(x_12); -lean_dec(x_12); -if (x_92 == 0) +lean_object* x_92; +x_92 = lean_ctor_get(x_79, 1); +lean_inc(x_92); +lean_dec(x_79); +if (lean_obj_tag(x_92) == 0) { -lean_object* x_93; lean_object* x_94; lean_object* x_95; uint8_t x_96; -lean_free_object(x_4); -x_93 = lean_ctor_get(x_2, 2); -lean_inc(x_93); -lean_dec(x_2); -x_94 = lean_unsigned_to_nat(0u); -x_95 = l_Lean_Parser_Trie_matchPrefix___rarg(x_58, x_93, x_94); -lean_dec(x_58); -x_96 = !lean_is_exclusive(x_95); -if (x_96 == 0) -{ -lean_object* x_97; lean_object* x_98; -x_97 = lean_ctor_get(x_95, 1); -x_98 = lean_ctor_get(x_95, 0); -lean_dec(x_98); -if (lean_obj_tag(x_97) == 0) -{ -lean_ctor_set(x_95, 1, x_94); -lean_ctor_set(x_95, 0, x_56); -return x_95; +lean_object* x_93; +x_93 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_93, 0, x_40); +lean_ctor_set(x_93, 1, x_78); +return x_93; } else { -lean_object* x_99; lean_object* x_100; -x_99 = lean_ctor_get(x_97, 0); -lean_inc(x_99); -lean_dec(x_97); -x_100 = lean_ctor_get(x_99, 1); +lean_object* x_94; lean_object* x_95; +x_94 = lean_ctor_get(x_92, 0); +lean_inc(x_94); +lean_dec(x_92); +x_95 = lean_ctor_get(x_94, 1); +lean_inc(x_95); +if (lean_obj_tag(x_95) == 0) +{ +lean_object* x_96; +x_96 = lean_ctor_get(x_94, 2); +lean_inc(x_96); +lean_dec(x_94); +if (lean_obj_tag(x_96) == 0) +{ +lean_object* x_97; +x_97 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_97, 0, x_40); +lean_ctor_set(x_97, 1, x_78); +return x_97; +} +else +{ +lean_object* x_98; lean_object* x_99; +x_98 = lean_ctor_get(x_96, 0); +lean_inc(x_98); +lean_dec(x_96); +x_99 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_99, 0, x_40); +lean_ctor_set(x_99, 1, x_98); +return x_99; +} +} +else +{ +lean_object* x_100; +x_100 = lean_ctor_get(x_94, 2); lean_inc(x_100); +lean_dec(x_94); if (lean_obj_tag(x_100) == 0) { -lean_object* x_101; -x_101 = lean_ctor_get(x_99, 2); +lean_object* x_101; lean_object* x_102; +x_101 = lean_ctor_get(x_95, 0); lean_inc(x_101); -lean_dec(x_99); -if (lean_obj_tag(x_101) == 0) -{ -lean_ctor_set(x_95, 1, x_94); -lean_ctor_set(x_95, 0, x_56); -return x_95; +lean_dec(x_95); +x_102 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_102, 0, x_40); +lean_ctor_set(x_102, 1, x_101); +return x_102; } else { -lean_object* x_102; -x_102 = lean_ctor_get(x_101, 0); -lean_inc(x_102); -lean_dec(x_101); -lean_ctor_set(x_95, 1, x_102); -lean_ctor_set(x_95, 0, x_56); -return x_95; -} -} -else -{ -lean_object* x_103; -x_103 = lean_ctor_get(x_99, 2); +lean_object* x_103; lean_object* x_104; uint8_t x_105; +x_103 = lean_ctor_get(x_95, 0); lean_inc(x_103); -lean_dec(x_99); -if (lean_obj_tag(x_103) == 0) -{ -lean_object* x_104; +lean_dec(x_95); x_104 = lean_ctor_get(x_100, 0); lean_inc(x_104); lean_dec(x_100); -lean_ctor_set(x_95, 1, x_104); -lean_ctor_set(x_95, 0, x_56); -return x_95; +x_105 = l_Lean_Parser_checkTailNoWs(x_1); +if (x_105 == 0) +{ +lean_object* x_106; +lean_dec(x_104); +x_106 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_106, 0, x_40); +lean_ctor_set(x_106, 1, x_103); +return x_106; } else { -lean_object* x_105; lean_object* x_106; uint8_t x_107; -x_105 = lean_ctor_get(x_100, 0); -lean_inc(x_105); -lean_dec(x_100); -x_106 = lean_ctor_get(x_103, 0); -lean_inc(x_106); +lean_object* x_107; lean_dec(x_103); -x_107 = l_Lean_Parser_checkTailNoWs(x_1); -if (x_107 == 0) -{ -lean_dec(x_106); -lean_ctor_set(x_95, 1, x_105); -lean_ctor_set(x_95, 0, x_56); -return x_95; +x_107 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_107, 0, x_40); +lean_ctor_set(x_107, 1, x_104); +return x_107; } -else -{ -lean_dec(x_105); -lean_ctor_set(x_95, 1, x_106); -lean_ctor_set(x_95, 0, x_56); -return x_95; } } } @@ -24232,436 +24611,338 @@ return x_95; else { lean_object* x_108; -x_108 = lean_ctor_get(x_95, 1); -lean_inc(x_108); -lean_dec(x_95); -if (lean_obj_tag(x_108) == 0) -{ -lean_object* x_109; -x_109 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_109, 0, x_56); -lean_ctor_set(x_109, 1, x_94); -return x_109; -} -else -{ -lean_object* x_110; lean_object* x_111; -x_110 = lean_ctor_get(x_108, 0); -lean_inc(x_110); -lean_dec(x_108); -x_111 = lean_ctor_get(x_110, 1); -lean_inc(x_111); -if (lean_obj_tag(x_111) == 0) -{ -lean_object* x_112; -x_112 = lean_ctor_get(x_110, 2); -lean_inc(x_112); -lean_dec(x_110); -if (lean_obj_tag(x_112) == 0) -{ -lean_object* x_113; -x_113 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_113, 0, x_56); -lean_ctor_set(x_113, 1, x_94); -return x_113; -} -else -{ -lean_object* x_114; lean_object* x_115; -x_114 = lean_ctor_get(x_112, 0); -lean_inc(x_114); -lean_dec(x_112); -x_115 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_115, 0, x_56); -lean_ctor_set(x_115, 1, x_114); -return x_115; -} -} -else -{ -lean_object* x_116; -x_116 = lean_ctor_get(x_110, 2); -lean_inc(x_116); -lean_dec(x_110); -if (lean_obj_tag(x_116) == 0) -{ -lean_object* x_117; lean_object* x_118; -x_117 = lean_ctor_get(x_111, 0); -lean_inc(x_117); -lean_dec(x_111); -x_118 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_118, 0, x_56); -lean_ctor_set(x_118, 1, x_117); -return x_118; -} -else -{ -lean_object* x_119; lean_object* x_120; uint8_t x_121; -x_119 = lean_ctor_get(x_111, 0); -lean_inc(x_119); -lean_dec(x_111); -x_120 = lean_ctor_get(x_116, 0); -lean_inc(x_120); -lean_dec(x_116); -x_121 = l_Lean_Parser_checkTailNoWs(x_1); -if (x_121 == 0) -{ -lean_object* x_122; -lean_dec(x_120); -x_122 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_122, 0, x_56); -lean_ctor_set(x_122, 1, x_119); -return x_122; -} -else -{ -lean_object* x_123; -lean_dec(x_119); -x_123 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_123, 0, x_56); -lean_ctor_set(x_123, 1, x_120); -return x_123; -} -} -} -} -} -} -else -{ -lean_object* x_124; -lean_dec(x_58); +lean_dec(x_42); lean_dec(x_2); -x_124 = l_Lean_Parser_appPrec; -lean_ctor_set(x_4, 1, x_124); +x_108 = l_Lean_Parser_appPrec; +lean_ctor_set(x_4, 1, x_108); return x_4; } } } else { -lean_object* x_125; lean_object* x_126; lean_object* x_127; uint8_t x_128; -x_125 = lean_ctor_get(x_4, 0); -lean_inc(x_125); +lean_object* x_109; lean_object* x_110; lean_object* x_111; uint8_t x_112; +x_109 = lean_ctor_get(x_4, 0); +lean_inc(x_109); lean_dec(x_4); -x_126 = lean_ctor_get(x_12, 1); -lean_inc(x_126); -x_127 = l_Lean_Syntax_termIdToAntiquot___closed__3; -x_128 = lean_string_dec_eq(x_126, x_127); -if (x_128 == 0) +x_110 = lean_ctor_get(x_12, 1); +lean_inc(x_110); +x_111 = l_Lean_Syntax_termIdToAntiquot___closed__3; +x_112 = lean_string_dec_eq(x_110, x_111); +if (x_112 == 0) { -lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; +lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_dec(x_12); -x_129 = lean_ctor_get(x_2, 2); -lean_inc(x_129); +x_113 = lean_ctor_get(x_2, 2); +lean_inc(x_113); lean_dec(x_2); -x_130 = lean_unsigned_to_nat(0u); -x_131 = l_Lean_Parser_Trie_matchPrefix___rarg(x_126, x_129, x_130); -lean_dec(x_126); -x_132 = lean_ctor_get(x_131, 1); -lean_inc(x_132); -if (lean_is_exclusive(x_131)) { - lean_ctor_release(x_131, 0); - lean_ctor_release(x_131, 1); - x_133 = x_131; +x_114 = lean_unsigned_to_nat(0u); +x_115 = l_Lean_Parser_Trie_matchPrefix___rarg(x_110, x_113, x_114); +lean_dec(x_110); +x_116 = lean_ctor_get(x_115, 1); +lean_inc(x_116); +if (lean_is_exclusive(x_115)) { + lean_ctor_release(x_115, 0); + lean_ctor_release(x_115, 1); + x_117 = x_115; } else { - lean_dec_ref(x_131); - x_133 = lean_box(0); + lean_dec_ref(x_115); + x_117 = lean_box(0); } -if (lean_obj_tag(x_132) == 0) +if (lean_obj_tag(x_116) == 0) { -lean_object* x_134; -if (lean_is_scalar(x_133)) { - x_134 = lean_alloc_ctor(0, 2, 0); +lean_object* x_118; +if (lean_is_scalar(x_117)) { + x_118 = lean_alloc_ctor(0, 2, 0); } else { - x_134 = x_133; + x_118 = x_117; } -lean_ctor_set(x_134, 0, x_125); -lean_ctor_set(x_134, 1, x_130); -return x_134; +lean_ctor_set(x_118, 0, x_109); +lean_ctor_set(x_118, 1, x_114); +return x_118; } else { -lean_object* x_135; lean_object* x_136; -x_135 = lean_ctor_get(x_132, 0); -lean_inc(x_135); -lean_dec(x_132); -x_136 = lean_ctor_get(x_135, 1); -lean_inc(x_136); -if (lean_obj_tag(x_136) == 0) +lean_object* x_119; lean_object* x_120; +x_119 = lean_ctor_get(x_116, 0); +lean_inc(x_119); +lean_dec(x_116); +x_120 = lean_ctor_get(x_119, 1); +lean_inc(x_120); +if (lean_obj_tag(x_120) == 0) { -lean_object* x_137; -x_137 = lean_ctor_get(x_135, 2); +lean_object* x_121; +x_121 = lean_ctor_get(x_119, 2); +lean_inc(x_121); +lean_dec(x_119); +if (lean_obj_tag(x_121) == 0) +{ +lean_object* x_122; +if (lean_is_scalar(x_117)) { + x_122 = lean_alloc_ctor(0, 2, 0); +} else { + x_122 = x_117; +} +lean_ctor_set(x_122, 0, x_109); +lean_ctor_set(x_122, 1, x_114); +return x_122; +} +else +{ +lean_object* x_123; lean_object* x_124; +x_123 = lean_ctor_get(x_121, 0); +lean_inc(x_123); +lean_dec(x_121); +if (lean_is_scalar(x_117)) { + x_124 = lean_alloc_ctor(0, 2, 0); +} else { + x_124 = x_117; +} +lean_ctor_set(x_124, 0, x_109); +lean_ctor_set(x_124, 1, x_123); +return x_124; +} +} +else +{ +lean_object* x_125; +x_125 = lean_ctor_get(x_119, 2); +lean_inc(x_125); +lean_dec(x_119); +if (lean_obj_tag(x_125) == 0) +{ +lean_object* x_126; lean_object* x_127; +x_126 = lean_ctor_get(x_120, 0); +lean_inc(x_126); +lean_dec(x_120); +if (lean_is_scalar(x_117)) { + x_127 = lean_alloc_ctor(0, 2, 0); +} else { + x_127 = x_117; +} +lean_ctor_set(x_127, 0, x_109); +lean_ctor_set(x_127, 1, x_126); +return x_127; +} +else +{ +lean_object* x_128; lean_object* x_129; uint8_t x_130; +x_128 = lean_ctor_get(x_120, 0); +lean_inc(x_128); +lean_dec(x_120); +x_129 = lean_ctor_get(x_125, 0); +lean_inc(x_129); +lean_dec(x_125); +x_130 = l_Lean_Parser_checkTailNoWs(x_1); +if (x_130 == 0) +{ +lean_object* x_131; +lean_dec(x_129); +if (lean_is_scalar(x_117)) { + x_131 = lean_alloc_ctor(0, 2, 0); +} else { + x_131 = x_117; +} +lean_ctor_set(x_131, 0, x_109); +lean_ctor_set(x_131, 1, x_128); +return x_131; +} +else +{ +lean_object* x_132; +lean_dec(x_128); +if (lean_is_scalar(x_117)) { + x_132 = lean_alloc_ctor(0, 2, 0); +} else { + x_132 = x_117; +} +lean_ctor_set(x_132, 0, x_109); +lean_ctor_set(x_132, 1, x_129); +return x_132; +} +} +} +} +} +else +{ +uint8_t x_133; +x_133 = l_Lean_Parser_checkTailNoWs(x_12); +lean_dec(x_12); +if (x_133 == 0) +{ +lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; +x_134 = lean_ctor_get(x_2, 2); +lean_inc(x_134); +lean_dec(x_2); +x_135 = lean_unsigned_to_nat(0u); +x_136 = l_Lean_Parser_Trie_matchPrefix___rarg(x_110, x_134, x_135); +lean_dec(x_110); +x_137 = lean_ctor_get(x_136, 1); lean_inc(x_137); -lean_dec(x_135); +if (lean_is_exclusive(x_136)) { + lean_ctor_release(x_136, 0); + lean_ctor_release(x_136, 1); + x_138 = x_136; +} else { + lean_dec_ref(x_136); + x_138 = lean_box(0); +} if (lean_obj_tag(x_137) == 0) { -lean_object* x_138; -if (lean_is_scalar(x_133)) { - x_138 = lean_alloc_ctor(0, 2, 0); +lean_object* x_139; +if (lean_is_scalar(x_138)) { + x_139 = lean_alloc_ctor(0, 2, 0); } else { - x_138 = x_133; + x_139 = x_138; } -lean_ctor_set(x_138, 0, x_125); -lean_ctor_set(x_138, 1, x_130); -return x_138; +lean_ctor_set(x_139, 0, x_109); +lean_ctor_set(x_139, 1, x_135); +return x_139; } else { -lean_object* x_139; lean_object* x_140; -x_139 = lean_ctor_get(x_137, 0); -lean_inc(x_139); +lean_object* x_140; lean_object* x_141; +x_140 = lean_ctor_get(x_137, 0); +lean_inc(x_140); lean_dec(x_137); -if (lean_is_scalar(x_133)) { - x_140 = lean_alloc_ctor(0, 2, 0); -} else { - x_140 = x_133; -} -lean_ctor_set(x_140, 0, x_125); -lean_ctor_set(x_140, 1, x_139); -return x_140; -} -} -else -{ -lean_object* x_141; -x_141 = lean_ctor_get(x_135, 2); +x_141 = lean_ctor_get(x_140, 1); lean_inc(x_141); -lean_dec(x_135); if (lean_obj_tag(x_141) == 0) { -lean_object* x_142; lean_object* x_143; -x_142 = lean_ctor_get(x_136, 0); +lean_object* x_142; +x_142 = lean_ctor_get(x_140, 2); lean_inc(x_142); -lean_dec(x_136); -if (lean_is_scalar(x_133)) { +lean_dec(x_140); +if (lean_obj_tag(x_142) == 0) +{ +lean_object* x_143; +if (lean_is_scalar(x_138)) { x_143 = lean_alloc_ctor(0, 2, 0); } else { - x_143 = x_133; + x_143 = x_138; } -lean_ctor_set(x_143, 0, x_125); -lean_ctor_set(x_143, 1, x_142); +lean_ctor_set(x_143, 0, x_109); +lean_ctor_set(x_143, 1, x_135); return x_143; } else { -lean_object* x_144; lean_object* x_145; uint8_t x_146; -x_144 = lean_ctor_get(x_136, 0); +lean_object* x_144; lean_object* x_145; +x_144 = lean_ctor_get(x_142, 0); lean_inc(x_144); -lean_dec(x_136); -x_145 = lean_ctor_get(x_141, 0); -lean_inc(x_145); -lean_dec(x_141); -x_146 = l_Lean_Parser_checkTailNoWs(x_1); -if (x_146 == 0) -{ -lean_object* x_147; -lean_dec(x_145); -if (lean_is_scalar(x_133)) { - x_147 = lean_alloc_ctor(0, 2, 0); +lean_dec(x_142); +if (lean_is_scalar(x_138)) { + x_145 = lean_alloc_ctor(0, 2, 0); } else { - x_147 = x_133; + x_145 = x_138; +} +lean_ctor_set(x_145, 0, x_109); +lean_ctor_set(x_145, 1, x_144); +return x_145; } -lean_ctor_set(x_147, 0, x_125); -lean_ctor_set(x_147, 1, x_144); -return x_147; } else { -lean_object* x_148; -lean_dec(x_144); -if (lean_is_scalar(x_133)) { +lean_object* x_146; +x_146 = lean_ctor_get(x_140, 2); +lean_inc(x_146); +lean_dec(x_140); +if (lean_obj_tag(x_146) == 0) +{ +lean_object* x_147; lean_object* x_148; +x_147 = lean_ctor_get(x_141, 0); +lean_inc(x_147); +lean_dec(x_141); +if (lean_is_scalar(x_138)) { x_148 = lean_alloc_ctor(0, 2, 0); } else { - x_148 = x_133; + x_148 = x_138; } -lean_ctor_set(x_148, 0, x_125); -lean_ctor_set(x_148, 1, x_145); +lean_ctor_set(x_148, 0, x_109); +lean_ctor_set(x_148, 1, x_147); return x_148; } -} -} -} -} else { -uint8_t x_149; -x_149 = l_Lean_Parser_checkTailNoWs(x_12); -lean_dec(x_12); -if (x_149 == 0) -{ -lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; -x_150 = lean_ctor_get(x_2, 2); +lean_object* x_149; lean_object* x_150; uint8_t x_151; +x_149 = lean_ctor_get(x_141, 0); +lean_inc(x_149); +lean_dec(x_141); +x_150 = lean_ctor_get(x_146, 0); lean_inc(x_150); -lean_dec(x_2); -x_151 = lean_unsigned_to_nat(0u); -x_152 = l_Lean_Parser_Trie_matchPrefix___rarg(x_126, x_150, x_151); -lean_dec(x_126); -x_153 = lean_ctor_get(x_152, 1); -lean_inc(x_153); -if (lean_is_exclusive(x_152)) { - lean_ctor_release(x_152, 0); - lean_ctor_release(x_152, 1); - x_154 = x_152; -} else { - lean_dec_ref(x_152); - x_154 = lean_box(0); -} -if (lean_obj_tag(x_153) == 0) +lean_dec(x_146); +x_151 = l_Lean_Parser_checkTailNoWs(x_1); +if (x_151 == 0) { -lean_object* x_155; -if (lean_is_scalar(x_154)) { - x_155 = lean_alloc_ctor(0, 2, 0); +lean_object* x_152; +lean_dec(x_150); +if (lean_is_scalar(x_138)) { + x_152 = lean_alloc_ctor(0, 2, 0); } else { - x_155 = x_154; + x_152 = x_138; } -lean_ctor_set(x_155, 0, x_125); -lean_ctor_set(x_155, 1, x_151); +lean_ctor_set(x_152, 0, x_109); +lean_ctor_set(x_152, 1, x_149); +return x_152; +} +else +{ +lean_object* x_153; +lean_dec(x_149); +if (lean_is_scalar(x_138)) { + x_153 = lean_alloc_ctor(0, 2, 0); +} else { + x_153 = x_138; +} +lean_ctor_set(x_153, 0, x_109); +lean_ctor_set(x_153, 1, x_150); +return x_153; +} +} +} +} +} +else +{ +lean_object* x_154; lean_object* x_155; +lean_dec(x_110); +lean_dec(x_2); +x_154 = l_Lean_Parser_appPrec; +x_155 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_155, 0, x_109); +lean_ctor_set(x_155, 1, x_154); return x_155; } -else -{ -lean_object* x_156; lean_object* x_157; -x_156 = lean_ctor_get(x_153, 0); -lean_inc(x_156); -lean_dec(x_153); -x_157 = lean_ctor_get(x_156, 1); -lean_inc(x_157); -if (lean_obj_tag(x_157) == 0) -{ -lean_object* x_158; -x_158 = lean_ctor_get(x_156, 2); -lean_inc(x_158); -lean_dec(x_156); -if (lean_obj_tag(x_158) == 0) -{ -lean_object* x_159; -if (lean_is_scalar(x_154)) { - x_159 = lean_alloc_ctor(0, 2, 0); -} else { - x_159 = x_154; -} -lean_ctor_set(x_159, 0, x_125); -lean_ctor_set(x_159, 1, x_151); -return x_159; -} -else -{ -lean_object* x_160; lean_object* x_161; -x_160 = lean_ctor_get(x_158, 0); -lean_inc(x_160); -lean_dec(x_158); -if (lean_is_scalar(x_154)) { - x_161 = lean_alloc_ctor(0, 2, 0); -} else { - x_161 = x_154; -} -lean_ctor_set(x_161, 0, x_125); -lean_ctor_set(x_161, 1, x_160); -return x_161; -} -} -else -{ -lean_object* x_162; -x_162 = lean_ctor_get(x_156, 2); -lean_inc(x_162); -lean_dec(x_156); -if (lean_obj_tag(x_162) == 0) -{ -lean_object* x_163; lean_object* x_164; -x_163 = lean_ctor_get(x_157, 0); -lean_inc(x_163); -lean_dec(x_157); -if (lean_is_scalar(x_154)) { - x_164 = lean_alloc_ctor(0, 2, 0); -} else { - x_164 = x_154; -} -lean_ctor_set(x_164, 0, x_125); -lean_ctor_set(x_164, 1, x_163); -return x_164; -} -else -{ -lean_object* x_165; lean_object* x_166; uint8_t x_167; -x_165 = lean_ctor_get(x_157, 0); -lean_inc(x_165); -lean_dec(x_157); -x_166 = lean_ctor_get(x_162, 0); -lean_inc(x_166); -lean_dec(x_162); -x_167 = l_Lean_Parser_checkTailNoWs(x_1); -if (x_167 == 0) -{ -lean_object* x_168; -lean_dec(x_166); -if (lean_is_scalar(x_154)) { - x_168 = lean_alloc_ctor(0, 2, 0); -} else { - x_168 = x_154; -} -lean_ctor_set(x_168, 0, x_125); -lean_ctor_set(x_168, 1, x_165); -return x_168; -} -else -{ -lean_object* x_169; -lean_dec(x_165); -if (lean_is_scalar(x_154)) { - x_169 = lean_alloc_ctor(0, 2, 0); -} else { - x_169 = x_154; -} -lean_ctor_set(x_169, 0, x_125); -lean_ctor_set(x_169, 1, x_166); -return x_169; -} -} -} -} -} -else -{ -lean_object* x_170; lean_object* x_171; -lean_dec(x_126); -lean_dec(x_2); -x_170 = l_Lean_Parser_appPrec; -x_171 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_171, 0, x_125); -lean_ctor_set(x_171, 1, x_170); -return x_171; -} } } } default: { -uint8_t x_172; +uint8_t x_156; lean_dec(x_12); lean_dec(x_2); -x_172 = !lean_is_exclusive(x_4); -if (x_172 == 0) +x_156 = !lean_is_exclusive(x_4); +if (x_156 == 0) { -lean_object* x_173; lean_object* x_174; -x_173 = lean_ctor_get(x_4, 1); -lean_dec(x_173); -x_174 = l_Lean_Parser_appPrec; -lean_ctor_set(x_4, 1, x_174); +lean_object* x_157; lean_object* x_158; +x_157 = lean_ctor_get(x_4, 1); +lean_dec(x_157); +x_158 = l_Lean_Parser_appPrec; +lean_ctor_set(x_4, 1, x_158); return x_4; } else { -lean_object* x_175; lean_object* x_176; lean_object* x_177; -x_175 = lean_ctor_get(x_4, 0); -lean_inc(x_175); +lean_object* x_159; lean_object* x_160; lean_object* x_161; +x_159 = lean_ctor_get(x_4, 0); +lean_inc(x_159); lean_dec(x_4); -x_176 = l_Lean_Parser_appPrec; -x_177 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_177, 0, x_175); -lean_ctor_set(x_177, 1, x_176); -return x_177; +x_160 = l_Lean_Parser_appPrec; +x_161 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_161, 0, x_159); +lean_ctor_set(x_161, 1, x_160); +return x_161; } } } @@ -25038,7 +25319,7 @@ lean_dec(x_1); return x_6; } } -lean_object* l___private_Init_Lean_Parser_Parser_8__mkResult(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_10__mkResult(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; @@ -25094,7 +25375,7 @@ uint8_t x_16; lean_object* x_17; lean_object* x_18; lean_dec(x_1); x_16 = 0; x_17 = l_Lean_Parser_longestMatchFn(x_16, x_14, x_4, x_5, x_11); -x_18 = l___private_Init_Lean_Parser_Parser_8__mkResult(x_17, x_8); +x_18 = l___private_Init_Lean_Parser_Parser_10__mkResult(x_17, x_8); return x_18; } else @@ -25226,10 +25507,10 @@ lean_inc(x_19); if (lean_obj_tag(x_19) == 0) { lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_20 = l___private_Init_Lean_Parser_Parser_8__mkResult(x_18, x_11); +x_20 = l___private_Init_Lean_Parser_Parser_10__mkResult(x_18, x_11); x_21 = lean_ctor_get(x_20, 0); lean_inc(x_21); -x_22 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_21); +x_22 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_21); lean_dec(x_21); x_23 = l_Lean_Parser_ParserState_popSyntax(x_20); x_4 = x_22; @@ -25263,10 +25544,10 @@ lean_inc(x_28); if (lean_obj_tag(x_28) == 0) { lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_29 = l___private_Init_Lean_Parser_Parser_8__mkResult(x_27, x_11); +x_29 = l___private_Init_Lean_Parser_Parser_10__mkResult(x_27, x_11); x_30 = lean_ctor_get(x_29, 0); lean_inc(x_30); -x_31 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_30); +x_31 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_30); lean_dec(x_30); x_32 = l_Lean_Parser_ParserState_popSyntax(x_29); x_4 = x_31; @@ -25345,7 +25626,7 @@ if (lean_obj_tag(x_8) == 0) lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_9 = lean_ctor_get(x_7, 0); lean_inc(x_9); -x_10 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_9); +x_10 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_9); lean_dec(x_9); x_11 = l_Lean_Parser_ParserState_popSyntax(x_7); x_12 = l_Lean_Parser_trailingLoop___main(x_2, x_4, x_5, x_10, x_11); @@ -25926,7 +26207,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_6); +x_7 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_6); lean_dec(x_6); if (lean_obj_tag(x_7) == 2) { @@ -26032,7 +26313,7 @@ x_3 = l_Lean_Parser_dollarSymbol(x_2); return x_3; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___closed__1() { _start: { lean_object* x_1; @@ -26040,13 +26321,13 @@ x_1 = lean_mk_string("unexpected ':'"); return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; uint8_t x_5; x_3 = lean_ctor_get(x_2, 0); lean_inc(x_3); -x_4 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_3); +x_4 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_3); lean_dec(x_3); x_5 = l_Lean_Parser_checkTailNoWs(x_4); lean_dec(x_4); @@ -26076,7 +26357,7 @@ return x_2; else { lean_object* x_13; lean_object* x_14; -x_13 = l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___closed__1; +x_13 = l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___closed__1; x_14 = l_Lean_Parser_ParserState_mkUnexpectedError(x_2, x_13); return x_14; } @@ -26089,20 +26370,20 @@ return x_2; } } } -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1(uint8_t x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1(uint8_t x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___boxed), 2, 0); +x_3 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___boxed), 2, 0); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon(uint8_t x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon(uint8_t x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_2 = lean_box(x_1); -x_3 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___boxed), 2, 1); +x_3 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___boxed), 2, 1); lean_closure_set(x_3, 0, x_2); x_4 = l_Lean_Parser_Parser_inhabited___closed__1; x_5 = lean_alloc_ctor(0, 2, 0); @@ -26111,37 +26392,37 @@ lean_ctor_set(x_5, 1, x_3); return x_5; } } -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg(x_1, x_2); +x_3 = l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg(x_1, x_2); lean_dec(x_1); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___boxed(lean_object* x_1, lean_object* x_2) { _start: { uint8_t x_3; lean_object* x_4; x_3 = lean_unbox(x_1); lean_dec(x_1); -x_4 = l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1(x_3, x_2); +x_4 = l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1(x_3, x_2); lean_dec(x_2); return x_4; } } -lean_object* l___private_Init_Lean_Parser_Parser_9__noImmediateColon___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_11__noImmediateColon___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_9__noImmediateColon(x_2); +x_3 = l___private_Init_Lean_Parser_Parser_11__noImmediateColon(x_2); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___rarg(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -26150,20 +26431,20 @@ x_3 = l_Lean_Parser_ParserState_pushSyntax(x_1, x_2); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1(uint8_t x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1(uint8_t x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___rarg), 1, 0); +x_4 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___rarg), 1, 0); return x_4; } } -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone(uint8_t x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone(uint8_t x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_2 = lean_box(x_1); -x_3 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___boxed), 3, 1); +x_3 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___boxed), 3, 1); lean_closure_set(x_3, 0, x_2); x_4 = l_Lean_Parser_Parser_inhabited___closed__1; x_5 = lean_alloc_ctor(0, 2, 0); @@ -26172,29 +26453,29 @@ lean_ctor_set(x_5, 1, x_3); return x_5; } } -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { uint8_t x_4; lean_object* x_5; x_4 = lean_unbox(x_1); lean_dec(x_1); -x_5 = l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1(x_4, x_2, x_3); +x_5 = l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1(x_4, x_2, x_3); lean_dec(x_3); lean_dec(x_2); return x_5; } } -lean_object* l___private_Init_Lean_Parser_Parser_10__pushNone___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_12__pushNone___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_10__pushNone(x_2); +x_3 = l___private_Init_Lean_Parser_Parser_12__pushNone(x_2); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; @@ -26208,36 +26489,36 @@ x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_6); return x_9; } } -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1(uint8_t x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1(uint8_t x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1___rarg), 4, 0); +x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1___rarg), 4, 0); return x_2; } } -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId(uint8_t x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId(uint8_t x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; x_2 = lean_box(x_1); x_3 = lean_alloc_closure((void*)(l_Lean_Parser_identFn___boxed), 2, 1); lean_closure_set(x_3, 0, x_2); -x_4 = l___private_Init_Lean_Parser_Parser_10__pushNone(x_1); +x_4 = l___private_Init_Lean_Parser_Parser_12__pushNone(x_1); x_5 = lean_ctor_get(x_4, 0); lean_inc(x_5); lean_dec(x_4); x_6 = l_Lean_Parser_identNoAntiquot___closed__1; x_7 = l_Lean_Parser_andthenInfo(x_6, x_5); x_8 = lean_box(x_1); -x_9 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___boxed), 3, 1); +x_9 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___boxed), 3, 1); lean_closure_set(x_9, 0, x_8); x_10 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_10, 0, x_3); lean_closure_set(x_10, 1, x_9); x_11 = l_Lean_mkTermIdFromIdent___closed__2; x_12 = l_Lean_Parser_nodeInfo(x_11, x_7); -x_13 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1___rarg), 4, 1); +x_13 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1___rarg), 4, 1); lean_closure_set(x_13, 0, x_10); x_14 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_14, 0, x_12); @@ -26245,27 +26526,27 @@ lean_ctor_set(x_14, 1, x_13); return x_14; } } -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_11__antiquotId___elambda__1(x_2); +x_3 = l___private_Init_Lean_Parser_Parser_13__antiquotId___elambda__1(x_2); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_11__antiquotId___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotId___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_11__antiquotId(x_2); +x_3 = l___private_Init_Lean_Parser_Parser_13__antiquotId(x_2); return x_3; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1() { _start: { lean_object* x_1; @@ -26273,17 +26554,17 @@ x_1 = lean_mk_string("paren"); return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_mkAppStx___closed__6; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; @@ -26292,20 +26573,20 @@ lean_inc(x_5); x_6 = lean_array_get_size(x_5); lean_dec(x_5); x_7 = lean_apply_3(x_1, x_2, x_3, x_4); -x_8 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_8 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_9 = l_Lean_Parser_ParserState_mkNode(x_7, x_8, x_6); return x_9; } } -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1(uint8_t x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1(uint8_t x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg), 4, 0); +x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg), 4, 0); return x_2; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1() { _start: { lean_object* x_1; lean_object* x_2; @@ -26314,27 +26595,27 @@ x_2 = l_String_trim(x_1); return x_2; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); return x_3; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__3() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__3() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); lean_closure_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__4() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -26346,7 +26627,7 @@ lean_closure_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5() { _start: { lean_object* x_1; lean_object* x_2; @@ -26355,34 +26636,34 @@ x_2 = l_String_trim(x_1); return x_2; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); return x_3; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__7() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__7() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); lean_closure_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr(uint8_t x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr(uint8_t x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; x_2 = l_Lean_Parser_termParser___closed__2; x_3 = lean_unsigned_to_nat(0u); x_4 = l_Lean_Parser_categoryParser(x_1, x_2, x_3); -x_5 = l___private_Init_Lean_Parser_Parser_10__pushNone(x_1); +x_5 = l___private_Init_Lean_Parser_Parser_12__pushNone(x_1); x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); lean_dec(x_4); @@ -26391,9 +26672,9 @@ lean_inc(x_7); lean_dec(x_5); x_8 = l_Lean_Parser_andthenInfo(x_6, x_7); x_9 = lean_box(x_1); -x_10 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___boxed), 3, 1); +x_10 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___boxed), 3, 1); lean_closure_set(x_10, 0, x_9); -x_11 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__4; +x_11 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__4; x_12 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_12, 0, x_11); lean_closure_set(x_12, 1, x_10); @@ -26402,21 +26683,21 @@ x_14 = l_Lean_Parser_nodeInfo(x_13, x_8); x_15 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); lean_closure_set(x_15, 0, x_13); lean_closure_set(x_15, 1, x_12); -x_16 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_16 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_17 = l_Lean_Parser_andthenInfo(x_14, x_16); -x_18 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__7; +x_18 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__7; x_19 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_19, 0, x_15); lean_closure_set(x_19, 1, x_18); -x_20 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; +x_20 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; x_21 = l_Lean_Parser_andthenInfo(x_20, x_17); -x_22 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__3; +x_22 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__3; x_23 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_23, 0, x_22); lean_closure_set(x_23, 1, x_19); -x_24 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_24 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_25 = l_Lean_Parser_nodeInfo(x_24, x_21); -x_26 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg), 4, 1); +x_26 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg), 4, 1); lean_closure_set(x_26, 0, x_23); x_27 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_27, 0, x_25); @@ -26424,27 +26705,27 @@ lean_ctor_set(x_27, 1, x_26); return x_27; } } -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1(x_2); +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1(x_2); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr(x_2); +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr(x_2); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; @@ -26502,20 +26783,20 @@ return x_16; } } } -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1(uint8_t x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1(uint8_t x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1___rarg), 5, 0); +x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1___rarg), 5, 0); return x_2; } } -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr(uint8_t x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr(uint8_t x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -x_2 = l___private_Init_Lean_Parser_Parser_11__antiquotId(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr(x_1); +x_2 = l___private_Init_Lean_Parser_Parser_13__antiquotId(x_1); +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr(x_1); x_4 = lean_ctor_get(x_2, 0); lean_inc(x_4); x_5 = lean_ctor_get(x_3, 0); @@ -26527,7 +26808,7 @@ lean_dec(x_2); x_8 = lean_ctor_get(x_3, 1); lean_inc(x_8); lean_dec(x_3); -x_9 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1___rarg), 5, 2); +x_9 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1___rarg), 5, 2); lean_closure_set(x_9, 0, x_7); lean_closure_set(x_9, 1, x_8); x_10 = lean_alloc_ctor(0, 2, 0); @@ -26536,23 +26817,23 @@ lean_ctor_set(x_10, 1, x_9); return x_10; } } -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_13__antiquotExpr___elambda__1(x_2); +x_3 = l___private_Init_Lean_Parser_Parser_15__antiquotExpr___elambda__1(x_2); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_13__antiquotExpr___boxed(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_15__antiquotExpr___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_Init_Lean_Parser_Parser_13__antiquotExpr(x_2); +x_3 = l___private_Init_Lean_Parser_Parser_15__antiquotExpr(x_2); return x_3; } } @@ -26779,7 +27060,7 @@ x_20 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_20, 0, x_19); lean_closure_set(x_20, 1, x_16); x_21 = l_Lean_Parser_dollarSymbol(x_1); -x_22 = l___private_Init_Lean_Parser_Parser_13__antiquotExpr(x_1); +x_22 = l___private_Init_Lean_Parser_Parser_15__antiquotExpr(x_1); x_23 = lean_ctor_get(x_22, 0); lean_inc(x_23); x_24 = lean_ctor_get(x_22, 1); @@ -26850,15 +27131,15 @@ return x_45; else { lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; -x_46 = l___private_Init_Lean_Parser_Parser_9__noImmediateColon(x_1); -x_47 = l___private_Init_Lean_Parser_Parser_10__pushNone(x_1); +x_46 = l___private_Init_Lean_Parser_Parser_11__noImmediateColon(x_1); +x_47 = l___private_Init_Lean_Parser_Parser_12__pushNone(x_1); x_48 = lean_ctor_get(x_47, 0); lean_inc(x_48); lean_dec(x_47); lean_inc(x_48); x_49 = l_Lean_Parser_andthenInfo(x_48, x_48); x_50 = lean_box(x_1); -x_51 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_10__pushNone___elambda__1___boxed), 3, 1); +x_51 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_12__pushNone___elambda__1___boxed), 3, 1); lean_closure_set(x_51, 0, x_50); lean_inc(x_51); x_52 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); @@ -26869,7 +27150,7 @@ lean_inc(x_53); lean_dec(x_46); x_54 = l_Lean_Parser_andthenInfo(x_53, x_49); x_55 = lean_box(x_1); -x_56 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___boxed), 2, 1); +x_56 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___boxed), 2, 1); lean_closure_set(x_56, 0, x_55); x_57 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_57, 0, x_56); @@ -27548,6 +27829,129 @@ x_3 = l_Lean_Parser_charLit(x_2); return x_3; } } +lean_object* l_Lean_Parser_nameLit___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_array_get_size(x_6); +lean_dec(x_6); +x_8 = lean_ctor_get(x_5, 1); +lean_inc(x_8); +lean_inc(x_4); +lean_inc(x_3); +x_9 = lean_apply_3(x_2, x_3, x_4, x_5); +x_10 = lean_ctor_get(x_9, 3); +lean_inc(x_10); +if (lean_obj_tag(x_10) == 0) +{ +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_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_4); +lean_dec(x_3); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +lean_inc(x_8); +x_14 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); +lean_dec(x_7); +x_15 = lean_apply_3(x_1, x_3, x_4, x_14); +x_16 = l_Lean_Parser_mergeOrElseErrors(x_15, x_11, x_8); +lean_dec(x_8); +return x_16; +} +} +} +} +lean_object* l_Lean_Parser_nameLit___elambda__1(uint8_t x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_nameLit___elambda__1___rarg), 5, 0); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_nameLit___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_nameLitKind; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_Parser_nameLit(uint8_t x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_2 = l_Lean_nameLitKind___closed__1; +x_3 = l_Lean_Parser_nameLit___closed__1; +x_4 = 1; +x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); +x_6 = lean_box(x_1); +x_7 = lean_alloc_closure((void*)(l_Lean_Parser_nameLitFn___boxed), 2, 1); +lean_closure_set(x_7, 0, x_6); +x_8 = lean_ctor_get(x_5, 0); +lean_inc(x_8); +x_9 = l_Lean_Parser_nameLitNoAntiquot___closed__1; +x_10 = l_Lean_Parser_orelseInfo(x_8, x_9); +x_11 = lean_ctor_get(x_5, 1); +lean_inc(x_11); +lean_dec(x_5); +x_12 = lean_alloc_closure((void*)(l_Lean_Parser_nameLit___elambda__1___rarg), 5, 2); +lean_closure_set(x_12, 0, x_7); +lean_closure_set(x_12, 1, x_11); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_10); +lean_ctor_set(x_13, 1, x_12); +return x_13; +} +} +lean_object* l_Lean_Parser_nameLit___elambda__1___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = lean_unbox(x_1); +lean_dec(x_1); +x_3 = l_Lean_Parser_nameLit___elambda__1(x_2); +return x_3; +} +} +lean_object* l_Lean_Parser_nameLit___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = lean_unbox(x_1); +lean_dec(x_1); +x_3 = l_Lean_Parser_nameLit(x_2); +return x_3; +} +} lean_object* _init_l_Lean_Parser_categoryParserOfStackFn___closed__1() { _start: { @@ -27731,7 +28135,7 @@ x_3 = lean_io_mk_ref(x_2, x_1); return x_3; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__1() { _start: { lean_object* x_1; @@ -27739,7 +28143,7 @@ x_1 = lean_mk_string("parser category '"); return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2() { _start: { lean_object* x_1; @@ -27747,31 +28151,31 @@ x_1 = lean_mk_string("' has already been defined"); return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; x_2 = l_Lean_Name_toString___closed__1; x_3 = l_Lean_Name_toStringWithSep___main(x_2, x_1); -x_4 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__1; +x_4 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__1; x_5 = lean_string_append(x_4, x_3); lean_dec(x_3); -x_6 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_6 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2; x_7 = lean_string_append(x_5, x_6); x_8 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_8, 0, x_7); return x_8; } } -lean_object* l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg), 1, 0); +x_2 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg), 1, 0); return x_2; } } -uint8_t l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__2(lean_object* x_1, size_t x_2, lean_object* x_3) { +uint8_t l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__2(lean_object* x_1, size_t x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_1) == 0) @@ -27831,7 +28235,7 @@ return x_19; } } } -uint8_t l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__1(lean_object* x_1, lean_object* x_2) { +uint8_t l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__1(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; size_t x_4; uint8_t x_5; @@ -27839,11 +28243,11 @@ x_3 = lean_ctor_get(x_1, 0); lean_inc(x_3); lean_dec(x_1); x_4 = l_Lean_Name_hash(x_2); -x_5 = l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__2(x_3, x_4, x_2); +x_5 = l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__2(x_3, x_4, x_2); return x_5; } } -lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; @@ -27935,7 +28339,7 @@ return x_29; } } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__6(size_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__6(size_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; uint8_t x_8; @@ -27958,7 +28362,7 @@ x_13 = x_1 - x_12; x_14 = 5; x_15 = x_14 * x_13; x_16 = x_11 >> x_15; -x_17 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(x_6, x_16, x_1, x_9, x_10); +x_17 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(x_6, x_16, x_1, x_9, x_10); x_18 = lean_unsigned_to_nat(1u); x_19 = lean_nat_add(x_5, x_18); lean_dec(x_5); @@ -27968,7 +28372,7 @@ goto _start; } } } -lean_object* l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4, lean_object* x_5) { _start: { if (lean_obj_tag(x_1) == 0) @@ -28081,7 +28485,7 @@ lean_object* x_35; size_t x_36; size_t x_37; lean_object* x_38; lean_object* x_3 x_35 = lean_ctor_get(x_15, 0); x_36 = x_2 >> x_9; x_37 = x_3 + x_8; -x_38 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(x_35, x_36, x_37, x_4, x_5); +x_38 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(x_35, x_36, x_37, x_4, x_5); lean_ctor_set(x_15, 0, x_38); x_39 = lean_array_fset(x_17, x_12, x_15); lean_dec(x_12); @@ -28096,7 +28500,7 @@ lean_inc(x_40); lean_dec(x_15); x_41 = x_2 >> x_9; x_42 = x_3 + x_8; -x_43 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(x_40, x_41, x_42, x_4, x_5); +x_43 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(x_40, x_41, x_42, x_4, x_5); x_44 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_44, 0, x_43); x_45 = lean_array_fset(x_17, x_12, x_44); @@ -28212,7 +28616,7 @@ if (lean_is_exclusive(x_57)) { } x_73 = x_2 >> x_50; x_74 = x_3 + x_49; -x_75 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(x_71, x_73, x_74, x_4, x_5); +x_75 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(x_71, x_73, x_74, x_4, x_5); if (lean_is_scalar(x_72)) { x_76 = lean_alloc_ctor(1, 1, 0); } else { @@ -28245,7 +28649,7 @@ else { lean_object* x_82; lean_object* x_83; size_t x_84; uint8_t x_85; x_82 = lean_unsigned_to_nat(0u); -x_83 = l_PersistentHashMap_insertAtCollisionNodeAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__5(x_1, x_82, x_4, x_5); +x_83 = l_PersistentHashMap_insertAtCollisionNodeAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__5(x_1, x_82, x_4, x_5); x_84 = 7; x_85 = x_84 <= x_3; if (x_85 == 0) @@ -28264,7 +28668,7 @@ x_90 = lean_ctor_get(x_83, 1); lean_inc(x_90); lean_dec(x_83); x_91 = l_PersistentHashMap_insertAux___main___rarg___closed__3; -x_92 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__6(x_3, x_89, x_90, x_89, x_82, x_91); +x_92 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__6(x_3, x_89, x_90, x_89, x_82, x_91); lean_dec(x_90); lean_dec(x_89); return x_92; @@ -28281,7 +28685,7 @@ return x_83; } } } -lean_object* l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { uint8_t x_4; @@ -28293,7 +28697,7 @@ x_5 = lean_ctor_get(x_1, 0); x_6 = lean_ctor_get(x_1, 1); x_7 = l_Lean_Name_hash(x_2); x_8 = 1; -x_9 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(x_5, x_7, x_8, x_2, x_3); +x_9 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(x_5, x_7, x_8, x_2, x_3); x_10 = lean_unsigned_to_nat(1u); x_11 = lean_nat_add(x_6, x_10); lean_dec(x_6); @@ -28311,7 +28715,7 @@ lean_inc(x_12); lean_dec(x_1); x_14 = l_Lean_Name_hash(x_2); x_15 = 1; -x_16 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(x_12, x_14, x_15, x_2, x_3); +x_16 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(x_12, x_14, x_15, x_2, x_3); x_17 = lean_unsigned_to_nat(1u); x_18 = lean_nat_add(x_13, x_17); lean_dec(x_13); @@ -28322,16 +28726,16 @@ return x_19; } } } -lean_object* l___private_Init_Lean_Parser_Parser_15__addParserCategoryCore(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_Parser_Parser_17__addParserCategoryCore(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { uint8_t x_4; lean_inc(x_1); -x_4 = l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__1(x_1, x_2); +x_4 = l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__1(x_1, x_2); if (x_4 == 0) { lean_object* x_5; lean_object* x_6; -x_5 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_1, x_2, x_3); +x_5 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_1, x_2, x_3); x_6 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_6, 0, x_5); return x_6; @@ -28341,47 +28745,47 @@ else lean_object* x_7; lean_dec(x_3); lean_dec(x_1); -x_7 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg(x_2); +x_7 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg(x_2); return x_7; } } } -lean_object* l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { size_t x_4; uint8_t x_5; lean_object* x_6; x_4 = lean_unbox_usize(x_2); lean_dec(x_2); -x_5 = l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__2(x_1, x_4, x_3); +x_5 = l_PersistentHashMap_containsAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__2(x_1, x_4, x_3); lean_dec(x_3); x_6 = lean_box(x_5); return x_6; } } -lean_object* l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__1___boxed(lean_object* x_1, lean_object* x_2) { _start: { uint8_t x_3; lean_object* x_4; -x_3 = l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__1(x_1, x_2); +x_3 = l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__1(x_1, x_2); lean_dec(x_2); x_4 = lean_box(x_3); return x_4; } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__6___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: { size_t x_7; lean_object* x_8; x_7 = lean_unbox_usize(x_1); lean_dec(x_1); -x_8 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__6(x_7, x_2, x_3, x_4, x_5, x_6); +x_8 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__6(x_7, x_2, x_3, x_4, x_5, x_6); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); return x_8; } } -lean_object* l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { size_t x_6; size_t x_7; lean_object* x_8; @@ -28389,11 +28793,11 @@ x_6 = lean_unbox_usize(x_2); lean_dec(x_2); x_7 = lean_unbox_usize(x_3); lean_dec(x_3); -x_8 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__4(x_1, x_6, x_7, x_4, x_5); +x_8 = l_PersistentHashMap_insertAux___main___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__4(x_1, x_6, x_7, x_4, x_5); return x_8; } } -lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1(lean_object* x_1, lean_object* x_2) { +lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1(lean_object* x_1, lean_object* x_2) { _start: { if (lean_obj_tag(x_1) == 0) @@ -28420,7 +28824,7 @@ return x_7; } } } -lean_object* l___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory(lean_object* x_1, uint8_t x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory(lean_object* x_1, uint8_t x_2, lean_object* x_3) { _start: { lean_object* x_4; lean_object* x_5; @@ -28438,8 +28842,8 @@ x_8 = l_Lean_Parser_PrattParsingTables_inhabited___closed__1; x_9 = lean_alloc_ctor(0, 1, 1); lean_ctor_set(x_9, 0, x_8); lean_ctor_set_uint8(x_9, sizeof(void*)*1, x_2); -x_10 = l___private_Init_Lean_Parser_Parser_15__addParserCategoryCore(x_6, x_1, x_9); -x_11 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1(x_10, x_7); +x_10 = l___private_Init_Lean_Parser_Parser_17__addParserCategoryCore(x_6, x_1, x_9); +x_11 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1(x_10, x_7); lean_dec(x_10); if (lean_obj_tag(x_11) == 0) { @@ -28500,22 +28904,22 @@ return x_22; } } } -lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1(x_1, x_2); +x_3 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1(x_1, x_2); lean_dec(x_1); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { uint8_t x_4; lean_object* x_5; x_4 = lean_unbox(x_2); lean_dec(x_2); -x_5 = l___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory(x_1, x_4, x_3); +x_5 = l___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory(x_1, x_4, x_3); return x_5; } } @@ -28543,7 +28947,7 @@ x_1 = l_Lean_Parser_ParserExtensionState_inhabited___closed__1; return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_17__ParserExtension_mkInitial(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_19__ParserExtension_mkInitial(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -28679,7 +29083,7 @@ return x_32; } } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__1() { _start: { lean_object* x_1; @@ -28687,7 +29091,7 @@ x_1 = lean_mk_string("precedence mismatch for '"); return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__2() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__2() { _start: { lean_object* x_1; @@ -28695,7 +29099,7 @@ x_1 = lean_mk_string("', previous: "); return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__3() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__3() { _start: { lean_object* x_1; @@ -28703,7 +29107,7 @@ x_1 = lean_mk_string(", new: "); return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_18__mergePrecendences(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Init_Lean_Parser_Parser_20__mergePrecendences(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { if (lean_obj_tag(x_3) == 0) @@ -28737,15 +29141,15 @@ if (x_9 == 0) { lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_dec(x_3); -x_10 = l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__1; +x_10 = l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__1; x_11 = lean_string_append(x_1, x_10); x_12 = lean_string_append(x_11, x_2); -x_13 = l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__2; +x_13 = l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__2; x_14 = lean_string_append(x_12, x_13); x_15 = l_Nat_repr(x_7); x_16 = lean_string_append(x_14, x_15); lean_dec(x_15); -x_17 = l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__3; +x_17 = l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__3; x_18 = lean_string_append(x_16, x_17); x_19 = l_Nat_repr(x_8); x_20 = lean_string_append(x_18, x_19); @@ -28768,16 +29172,16 @@ return x_22; } } } -lean_object* l___private_Init_Lean_Parser_Parser_18__mergePrecendences___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Init_Lean_Parser_Parser_20__mergePrecendences___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l___private_Init_Lean_Parser_Parser_18__mergePrecendences(x_1, x_2, x_3, x_4); +x_5 = l___private_Init_Lean_Parser_Parser_20__mergePrecendences(x_1, x_2, x_3, x_4); lean_dec(x_2); return x_5; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__1() { _start: { lean_object* x_1; @@ -28785,7 +29189,7 @@ x_1 = lean_mk_string("(no whitespace) "); return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__2() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__2() { _start: { lean_object* x_1; @@ -28793,17 +29197,17 @@ x_1 = lean_mk_string("invalid empty symbol"); return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__3() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__3() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__2; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_Init_Lean_Parser_Parser_19__addTokenConfig(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_21__addTokenConfig(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; @@ -28850,7 +29254,7 @@ lean_inc(x_16); lean_dec(x_9); x_17 = lean_ctor_get(x_16, 1); lean_inc(x_17); -x_18 = l___private_Init_Lean_Parser_Parser_18__mergePrecendences(x_6, x_3, x_17, x_4); +x_18 = l___private_Init_Lean_Parser_Parser_20__mergePrecendences(x_6, x_3, x_17, x_4); if (lean_obj_tag(x_18) == 0) { uint8_t x_19; @@ -28884,8 +29288,8 @@ lean_dec(x_18); x_23 = lean_ctor_get(x_16, 2); lean_inc(x_23); lean_dec(x_16); -x_24 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__1; -x_25 = l___private_Init_Lean_Parser_Parser_18__mergePrecendences(x_24, x_3, x_23, x_5); +x_24 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__1; +x_25 = l___private_Init_Lean_Parser_Parser_20__mergePrecendences(x_24, x_3, x_23, x_5); if (lean_obj_tag(x_25) == 0) { uint8_t x_26; @@ -28952,7 +29356,7 @@ lean_inc(x_35); lean_dec(x_9); x_36 = lean_ctor_get(x_35, 1); lean_inc(x_36); -x_37 = l___private_Init_Lean_Parser_Parser_18__mergePrecendences(x_6, x_3, x_36, x_4); +x_37 = l___private_Init_Lean_Parser_Parser_20__mergePrecendences(x_6, x_3, x_36, x_4); if (lean_obj_tag(x_37) == 0) { lean_object* x_38; lean_object* x_39; lean_object* x_40; @@ -28986,8 +29390,8 @@ lean_dec(x_37); x_42 = lean_ctor_get(x_35, 2); lean_inc(x_42); lean_dec(x_35); -x_43 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__1; -x_44 = l___private_Init_Lean_Parser_Parser_18__mergePrecendences(x_43, x_3, x_42, x_5); +x_43 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__1; +x_44 = l___private_Init_Lean_Parser_Parser_20__mergePrecendences(x_43, x_3, x_42, x_5); if (lean_obj_tag(x_44) == 0) { lean_object* x_45; lean_object* x_46; lean_object* x_47; @@ -29050,7 +29454,7 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_53 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__3; +x_53 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__3; return x_53; } } @@ -29498,7 +29902,7 @@ x_13 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_13, 0, x_4); lean_ctor_set(x_13, 1, x_12); lean_ctor_set(x_10, 1, x_13); -x_14 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_1, x_2, x_7); +x_14 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_1, x_2, x_7); x_15 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_15, 0, x_14); return x_15; @@ -29524,7 +29928,7 @@ lean_ctor_set(x_21, 1, x_20); lean_ctor_set(x_21, 2, x_18); lean_ctor_set(x_21, 3, x_19); lean_ctor_set(x_7, 0, x_21); -x_22 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_1, x_2, x_7); +x_22 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_1, x_2, x_7); x_23 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_23, 0, x_22); return x_23; @@ -29570,7 +29974,7 @@ lean_ctor_set(x_32, 3, x_29); x_33 = lean_alloc_ctor(0, 1, 1); lean_ctor_set(x_33, 0, x_32); lean_ctor_set_uint8(x_33, sizeof(void*)*1, x_25); -x_34 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_1, x_2, x_33); +x_34 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_1, x_2, x_33); x_35 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_35, 0, x_34); return x_35; @@ -29588,7 +29992,7 @@ x_40 = lean_ctor_get(x_7, 0); x_41 = l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__5(x_38); x_42 = l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__8(x_4, x_40, x_41); lean_ctor_set(x_7, 0, x_42); -x_43 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_1, x_2, x_7); +x_43 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_1, x_2, x_7); x_44 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_44, 0, x_43); return x_44; @@ -29605,7 +30009,7 @@ x_48 = l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__8(x_4, x_45 x_49 = lean_alloc_ctor(0, 1, 1); lean_ctor_set(x_49, 0, x_48); lean_ctor_set_uint8(x_49, sizeof(void*)*1, x_46); -x_50 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_1, x_2, x_49); +x_50 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_1, x_2, x_49); x_51 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_51, 0, x_50); return x_51; @@ -29665,7 +30069,7 @@ lean_dec(x_3); return x_5; } } -lean_object* l_List_foldl___main___at___private_Init_Lean_Parser_Parser_20__addTrailingParserAux___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_List_foldl___main___at___private_Init_Lean_Parser_Parser_22__addTrailingParserAux___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_3) == 0) @@ -29718,7 +30122,7 @@ goto _start; } } } -lean_object* l___private_Init_Lean_Parser_Parser_20__addTrailingParserAux(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_22__addTrailingParserAux(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_14; lean_object* x_19; lean_object* x_20; @@ -29798,7 +30202,7 @@ block_18: lean_object* x_15; lean_object* x_16; lean_object* x_17; x_15 = l_List_map___main___at_Lean_Parser_addLeadingParser___spec__4(x_14); x_16 = l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__5(x_15); -x_17 = l_List_foldl___main___at___private_Init_Lean_Parser_Parser_20__addTrailingParserAux___spec__1(x_2, x_1, x_16); +x_17 = l_List_foldl___main___at___private_Init_Lean_Parser_Parser_22__addTrailingParserAux___spec__1(x_2, x_1, x_16); return x_17; } } @@ -29828,9 +30232,9 @@ if (x_7 == 0) { lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; x_8 = lean_ctor_get(x_6, 0); -x_9 = l___private_Init_Lean_Parser_Parser_20__addTrailingParserAux(x_8, x_3); +x_9 = l___private_Init_Lean_Parser_Parser_22__addTrailingParserAux(x_8, x_3); lean_ctor_set(x_6, 0, x_9); -x_10 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_1, x_2, x_6); +x_10 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_1, x_2, x_6); x_11 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_11, 0, x_10); return x_11; @@ -29842,11 +30246,11 @@ x_12 = lean_ctor_get(x_6, 0); x_13 = lean_ctor_get_uint8(x_6, sizeof(void*)*1); lean_inc(x_12); lean_dec(x_6); -x_14 = l___private_Init_Lean_Parser_Parser_20__addTrailingParserAux(x_12, x_3); +x_14 = l___private_Init_Lean_Parser_Parser_22__addTrailingParserAux(x_12, x_3); x_15 = lean_alloc_ctor(0, 1, 1); lean_ctor_set(x_15, 0, x_14); lean_ctor_set_uint8(x_15, sizeof(void*)*1, x_13); -x_16 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_1, x_2, x_15); +x_16 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_1, x_2, x_15); x_17 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_17, 0, x_16); return x_17; @@ -29900,7 +30304,7 @@ lean_inc(x_4); x_5 = lean_ctor_get(x_2, 1); lean_inc(x_5); lean_dec(x_2); -x_6 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig(x_1, x_4); +x_6 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig(x_1, x_4); if (lean_obj_tag(x_6) == 0) { uint8_t x_7; @@ -29947,7 +30351,7 @@ x_6 = l_List_foldlM___main___at_Lean_Parser_addParserTokens___spec__1(x_1, x_5); return x_6; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens___closed__1() { _start: { lean_object* x_1; @@ -29955,7 +30359,7 @@ x_1 = lean_mk_string("invalid builtin parser '"); return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens(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; @@ -29980,7 +30384,7 @@ lean_inc(x_11); lean_dec(x_10); x_12 = l_Lean_Name_toString___closed__1; x_13 = l_Lean_Name_toStringWithSep___main(x_12, x_2); -x_14 = l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens___closed__1; +x_14 = l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens___closed__1; x_15 = lean_string_append(x_14, x_13); lean_dec(x_13); x_16 = l_Lean_registerTagAttribute___lambda__4___closed__3; @@ -30022,7 +30426,7 @@ lean_inc(x_25); lean_dec(x_24); x_26 = l_Lean_Name_toString___closed__1; x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_2); -x_28 = l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens___closed__1; +x_28 = l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens___closed__1; x_29 = lean_string_append(x_28, x_27); lean_dec(x_27); x_30 = l_Lean_registerTagAttribute___lambda__4___closed__3; @@ -30090,7 +30494,7 @@ lean_inc(x_9); lean_dec(x_7); lean_inc(x_4); x_10 = l_Lean_Parser_addParser(x_1, x_8, x_2, x_3, x_4); -x_11 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1(x_10, x_9); +x_11 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1(x_10, x_9); lean_dec(x_10); if (lean_obj_tag(x_11) == 0) { @@ -30137,7 +30541,7 @@ lean_object* x_26; lean_object* x_27; x_26 = lean_ctor_get(x_25, 1); lean_inc(x_26); lean_dec(x_25); -x_27 = l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens(x_16, x_3, x_26); +x_27 = l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens(x_16, x_3, x_26); return x_27; } else @@ -30323,7 +30727,7 @@ x_6 = l_Lean_Parser_addBuiltinParser(x_5, x_1, x_2, x_3, x_4); return x_6; } } -lean_object* l___private_Init_Lean_Parser_Parser_22__ParserExtension_addEntry(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Parser_Parser_24__ParserExtension_addEntry(lean_object* x_1, lean_object* x_2) { _start: { switch (lean_obj_tag(x_2)) { @@ -30342,7 +30746,7 @@ x_6 = lean_ctor_get(x_1, 1); x_7 = lean_ctor_get(x_1, 2); x_8 = lean_ctor_get(x_1, 3); lean_inc(x_3); -x_9 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig(x_5, x_3); +x_9 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig(x_5, x_3); if (lean_obj_tag(x_9) == 0) { lean_object* x_10; lean_object* x_11; @@ -30385,7 +30789,7 @@ lean_inc(x_16); lean_inc(x_15); lean_dec(x_1); lean_inc(x_3); -x_19 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig(x_15, x_3); +x_19 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig(x_15, x_3); if (lean_obj_tag(x_19) == 0) { lean_object* x_20; lean_object* x_21; @@ -30486,7 +30890,7 @@ lean_inc(x_47); x_48 = lean_ctor_get(x_1, 3); lean_inc(x_48); lean_inc(x_47); -x_49 = l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__1(x_47, x_43); +x_49 = l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__1(x_47, x_43); if (x_49 == 0) { uint8_t x_50; @@ -30507,7 +30911,7 @@ x_56 = lean_alloc_ctor(0, 1, 1); lean_ctor_set(x_56, 0, x_55); lean_ctor_set_uint8(x_56, sizeof(void*)*1, x_44); lean_inc(x_43); -x_57 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_47, x_43, x_56); +x_57 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_47, x_43, x_56); x_58 = lean_alloc_ctor(2, 1, 1); lean_ctor_set(x_58, 0, x_43); lean_ctor_set_uint8(x_58, sizeof(void*)*1, x_44); @@ -30527,7 +30931,7 @@ x_61 = lean_alloc_ctor(0, 1, 1); lean_ctor_set(x_61, 0, x_60); lean_ctor_set_uint8(x_61, sizeof(void*)*1, x_44); lean_inc(x_43); -x_62 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__3(x_47, x_43, x_61); +x_62 = l_PersistentHashMap_insert___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__3(x_47, x_43, x_61); x_63 = lean_alloc_ctor(2, 1, 1); lean_ctor_set(x_63, 0, x_43); lean_ctor_set_uint8(x_63, sizeof(void*)*1, x_44); @@ -31758,35 +32162,45 @@ case 15: lean_object* x_286; lean_object* x_287; lean_dec(x_3); lean_dec(x_1); -x_286 = l_Lean_Parser_ident(x_2); +x_286 = l_Lean_Parser_nameLit(x_2); x_287 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_287, 0, x_286); return x_287; } +case 16: +{ +lean_object* x_288; lean_object* x_289; +lean_dec(x_3); +lean_dec(x_1); +x_288 = l_Lean_Parser_ident(x_2); +x_289 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_289, 0, x_288); +return x_289; +} default: { -lean_object* x_288; lean_object* x_289; lean_object* x_290; -x_288 = lean_ctor_get(x_3, 0); -lean_inc(x_288); -x_289 = lean_ctor_get(x_3, 1); -lean_inc(x_289); +lean_object* x_290; lean_object* x_291; lean_object* x_292; +x_290 = lean_ctor_get(x_3, 0); +lean_inc(x_290); +x_291 = lean_ctor_get(x_3, 1); +lean_inc(x_291); lean_dec(x_3); -x_290 = l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1(x_1, x_288); -if (lean_obj_tag(x_290) == 0) +x_292 = l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1(x_1, x_290); +if (lean_obj_tag(x_292) == 0) { -lean_object* x_291; -lean_dec(x_289); -x_291 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_288); -return x_291; +lean_object* x_293; +lean_dec(x_291); +x_293 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_290); +return x_293; } else { -lean_object* x_292; lean_object* x_293; -lean_dec(x_290); -x_292 = l_Lean_Parser_categoryParser(x_2, x_288, x_289); -x_293 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_293, 0, x_292); -return x_293; +lean_object* x_294; lean_object* x_295; +lean_dec(x_292); +x_294 = l_Lean_Parser_categoryParser(x_2, x_290, x_291); +x_295 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_295, 0, x_294); +return x_295; } } } @@ -31796,1106 +32210,1116 @@ else switch (lean_obj_tag(x_3)) { case 0: { -lean_object* x_294; lean_object* x_295; lean_object* x_296; -x_294 = lean_ctor_get(x_3, 0); -lean_inc(x_294); -x_295 = lean_ctor_get(x_3, 1); -lean_inc(x_295); +lean_object* x_296; lean_object* x_297; lean_object* x_298; +x_296 = lean_ctor_get(x_3, 0); +lean_inc(x_296); +x_297 = lean_ctor_get(x_3, 1); +lean_inc(x_297); lean_dec(x_3); lean_inc(x_1); -x_296 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_294); -if (lean_obj_tag(x_296) == 0) +x_298 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_296); +if (lean_obj_tag(x_298) == 0) { -uint8_t x_297; -lean_dec(x_295); +uint8_t x_299; +lean_dec(x_297); lean_dec(x_1); -x_297 = !lean_is_exclusive(x_296); -if (x_297 == 0) +x_299 = !lean_is_exclusive(x_298); +if (x_299 == 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); -lean_dec(x_296); -x_299 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_299, 0, x_298); -return x_299; -} +return x_298; } else { lean_object* x_300; lean_object* x_301; -x_300 = lean_ctor_get(x_296, 0); +x_300 = lean_ctor_get(x_298, 0); lean_inc(x_300); -lean_dec(x_296); -x_301 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_295); -if (lean_obj_tag(x_301) == 0) -{ -uint8_t x_302; -lean_dec(x_300); -x_302 = !lean_is_exclusive(x_301); -if (x_302 == 0) -{ +lean_dec(x_298); +x_301 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_301, 0, x_300); return x_301; } +} else { -lean_object* x_303; lean_object* x_304; -x_303 = lean_ctor_get(x_301, 0); -lean_inc(x_303); -lean_dec(x_301); -x_304 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_304, 0, x_303); -return x_304; +lean_object* x_302; lean_object* x_303; +x_302 = lean_ctor_get(x_298, 0); +lean_inc(x_302); +lean_dec(x_298); +x_303 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_297); +if (lean_obj_tag(x_303) == 0) +{ +uint8_t x_304; +lean_dec(x_302); +x_304 = !lean_is_exclusive(x_303); +if (x_304 == 0) +{ +return x_303; +} +else +{ +lean_object* x_305; lean_object* x_306; +x_305 = lean_ctor_get(x_303, 0); +lean_inc(x_305); +lean_dec(x_303); +x_306 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_306, 0, x_305); +return x_306; } } else { -uint8_t x_305; -x_305 = !lean_is_exclusive(x_301); -if (x_305 == 0) +uint8_t x_307; +x_307 = !lean_is_exclusive(x_303); +if (x_307 == 0) { -lean_object* x_306; 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; -x_306 = lean_ctor_get(x_301, 0); -x_307 = lean_ctor_get(x_300, 0); -lean_inc(x_307); -x_308 = lean_ctor_get(x_306, 0); -lean_inc(x_308); -x_309 = l_Lean_Parser_andthenInfo(x_307, x_308); -x_310 = lean_ctor_get(x_300, 1); +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; lean_object* x_315; +x_308 = lean_ctor_get(x_303, 0); +x_309 = lean_ctor_get(x_302, 0); +lean_inc(x_309); +x_310 = lean_ctor_get(x_308, 0); lean_inc(x_310); -lean_dec(x_300); -x_311 = lean_ctor_get(x_306, 1); -lean_inc(x_311); -lean_dec(x_306); -x_312 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); -lean_closure_set(x_312, 0, x_310); -lean_closure_set(x_312, 1, x_311); -x_313 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_313, 0, x_309); -lean_ctor_set(x_313, 1, x_312); -lean_ctor_set(x_301, 0, x_313); -return x_301; +x_311 = l_Lean_Parser_andthenInfo(x_309, x_310); +x_312 = lean_ctor_get(x_302, 1); +lean_inc(x_312); +lean_dec(x_302); +x_313 = lean_ctor_get(x_308, 1); +lean_inc(x_313); +lean_dec(x_308); +x_314 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); +lean_closure_set(x_314, 0, x_312); +lean_closure_set(x_314, 1, x_313); +x_315 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_315, 0, x_311); +lean_ctor_set(x_315, 1, x_314); +lean_ctor_set(x_303, 0, x_315); +return x_303; } else { -lean_object* x_314; 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; -x_314 = lean_ctor_get(x_301, 0); -lean_inc(x_314); -lean_dec(x_301); -x_315 = lean_ctor_get(x_300, 0); -lean_inc(x_315); -x_316 = lean_ctor_get(x_314, 0); +lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324; +x_316 = lean_ctor_get(x_303, 0); lean_inc(x_316); -x_317 = l_Lean_Parser_andthenInfo(x_315, x_316); -x_318 = lean_ctor_get(x_300, 1); +lean_dec(x_303); +x_317 = lean_ctor_get(x_302, 0); +lean_inc(x_317); +x_318 = lean_ctor_get(x_316, 0); lean_inc(x_318); -lean_dec(x_300); -x_319 = lean_ctor_get(x_314, 1); -lean_inc(x_319); -lean_dec(x_314); -x_320 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); -lean_closure_set(x_320, 0, x_318); -lean_closure_set(x_320, 1, x_319); -x_321 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_321, 0, x_317); -lean_ctor_set(x_321, 1, x_320); -x_322 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_322, 0, x_321); -return x_322; +x_319 = l_Lean_Parser_andthenInfo(x_317, x_318); +x_320 = lean_ctor_get(x_302, 1); +lean_inc(x_320); +lean_dec(x_302); +x_321 = lean_ctor_get(x_316, 1); +lean_inc(x_321); +lean_dec(x_316); +x_322 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); +lean_closure_set(x_322, 0, x_320); +lean_closure_set(x_322, 1, x_321); +x_323 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_323, 0, x_319); +lean_ctor_set(x_323, 1, x_322); +x_324 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_324, 0, x_323); +return x_324; } } } } case 1: { -lean_object* x_323; lean_object* x_324; lean_object* x_325; -x_323 = lean_ctor_get(x_3, 0); -lean_inc(x_323); -x_324 = lean_ctor_get(x_3, 1); -lean_inc(x_324); +lean_object* x_325; lean_object* x_326; lean_object* x_327; +x_325 = lean_ctor_get(x_3, 0); +lean_inc(x_325); +x_326 = lean_ctor_get(x_3, 1); +lean_inc(x_326); lean_dec(x_3); lean_inc(x_1); -x_325 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_323); -if (lean_obj_tag(x_325) == 0) +x_327 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_325); +if (lean_obj_tag(x_327) == 0) { -uint8_t x_326; -lean_dec(x_324); +uint8_t x_328; +lean_dec(x_326); lean_dec(x_1); -x_326 = !lean_is_exclusive(x_325); -if (x_326 == 0) +x_328 = !lean_is_exclusive(x_327); +if (x_328 == 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); -lean_dec(x_325); -x_328 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_328, 0, x_327); -return x_328; -} +return x_327; } else { lean_object* x_329; lean_object* x_330; -x_329 = lean_ctor_get(x_325, 0); +x_329 = lean_ctor_get(x_327, 0); lean_inc(x_329); -lean_dec(x_325); -x_330 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_324); -if (lean_obj_tag(x_330) == 0) -{ -uint8_t x_331; -lean_dec(x_329); -x_331 = !lean_is_exclusive(x_330); -if (x_331 == 0) -{ +lean_dec(x_327); +x_330 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_330, 0, x_329); return x_330; } +} else { -lean_object* x_332; lean_object* x_333; -x_332 = lean_ctor_get(x_330, 0); -lean_inc(x_332); -lean_dec(x_330); -x_333 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_333, 0, x_332); -return x_333; +lean_object* x_331; lean_object* x_332; +x_331 = lean_ctor_get(x_327, 0); +lean_inc(x_331); +lean_dec(x_327); +x_332 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_326); +if (lean_obj_tag(x_332) == 0) +{ +uint8_t x_333; +lean_dec(x_331); +x_333 = !lean_is_exclusive(x_332); +if (x_333 == 0) +{ +return x_332; +} +else +{ +lean_object* x_334; lean_object* x_335; +x_334 = lean_ctor_get(x_332, 0); +lean_inc(x_334); +lean_dec(x_332); +x_335 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_335, 0, x_334); +return x_335; } } else { -uint8_t x_334; -x_334 = !lean_is_exclusive(x_330); -if (x_334 == 0) +uint8_t x_336; +x_336 = !lean_is_exclusive(x_332); +if (x_336 == 0) { -lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; -x_335 = lean_ctor_get(x_330, 0); -x_336 = lean_ctor_get(x_329, 0); -lean_inc(x_336); -x_337 = lean_ctor_get(x_335, 0); -lean_inc(x_337); -x_338 = l_Lean_Parser_orelseInfo(x_336, x_337); -x_339 = lean_ctor_get(x_329, 1); +lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; +x_337 = lean_ctor_get(x_332, 0); +x_338 = lean_ctor_get(x_331, 0); +lean_inc(x_338); +x_339 = lean_ctor_get(x_337, 0); lean_inc(x_339); -lean_dec(x_329); -x_340 = lean_ctor_get(x_335, 1); -lean_inc(x_340); -lean_dec(x_335); -x_341 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); -lean_closure_set(x_341, 0, x_339); -lean_closure_set(x_341, 1, x_340); -x_342 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_342, 0, x_338); -lean_ctor_set(x_342, 1, x_341); -lean_ctor_set(x_330, 0, x_342); -return x_330; +x_340 = l_Lean_Parser_orelseInfo(x_338, x_339); +x_341 = lean_ctor_get(x_331, 1); +lean_inc(x_341); +lean_dec(x_331); +x_342 = lean_ctor_get(x_337, 1); +lean_inc(x_342); +lean_dec(x_337); +x_343 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); +lean_closure_set(x_343, 0, x_341); +lean_closure_set(x_343, 1, x_342); +x_344 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_344, 0, x_340); +lean_ctor_set(x_344, 1, x_343); +lean_ctor_set(x_332, 0, x_344); +return x_332; } else { -lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; -x_343 = lean_ctor_get(x_330, 0); -lean_inc(x_343); -lean_dec(x_330); -x_344 = lean_ctor_get(x_329, 0); -lean_inc(x_344); -x_345 = lean_ctor_get(x_343, 0); +lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; +x_345 = lean_ctor_get(x_332, 0); lean_inc(x_345); -x_346 = l_Lean_Parser_orelseInfo(x_344, x_345); -x_347 = lean_ctor_get(x_329, 1); +lean_dec(x_332); +x_346 = lean_ctor_get(x_331, 0); +lean_inc(x_346); +x_347 = lean_ctor_get(x_345, 0); lean_inc(x_347); -lean_dec(x_329); -x_348 = lean_ctor_get(x_343, 1); -lean_inc(x_348); -lean_dec(x_343); -x_349 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); -lean_closure_set(x_349, 0, x_347); -lean_closure_set(x_349, 1, x_348); -x_350 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_350, 0, x_346); -lean_ctor_set(x_350, 1, x_349); -x_351 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_351, 0, x_350); -return x_351; +x_348 = l_Lean_Parser_orelseInfo(x_346, x_347); +x_349 = lean_ctor_get(x_331, 1); +lean_inc(x_349); +lean_dec(x_331); +x_350 = lean_ctor_get(x_345, 1); +lean_inc(x_350); +lean_dec(x_345); +x_351 = lean_alloc_closure((void*)(l_Lean_Parser_orelseFn___rarg), 5, 2); +lean_closure_set(x_351, 0, x_349); +lean_closure_set(x_351, 1, x_350); +x_352 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_352, 0, x_348); +lean_ctor_set(x_352, 1, x_351); +x_353 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_353, 0, x_352); +return x_353; } } } } case 2: { -lean_object* x_352; lean_object* x_353; -x_352 = lean_ctor_get(x_3, 0); -lean_inc(x_352); +lean_object* x_354; lean_object* x_355; +x_354 = lean_ctor_get(x_3, 0); +lean_inc(x_354); lean_dec(x_3); -x_353 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_352); -if (lean_obj_tag(x_353) == 0) +x_355 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_354); +if (lean_obj_tag(x_355) == 0) { -uint8_t x_354; -x_354 = !lean_is_exclusive(x_353); -if (x_354 == 0) +uint8_t x_356; +x_356 = !lean_is_exclusive(x_355); +if (x_356 == 0) { -return x_353; +return x_355; } else { -lean_object* x_355; lean_object* x_356; -x_355 = lean_ctor_get(x_353, 0); -lean_inc(x_355); -lean_dec(x_353); -x_356 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_356, 0, x_355); -return x_356; +lean_object* x_357; lean_object* x_358; +x_357 = lean_ctor_get(x_355, 0); +lean_inc(x_357); +lean_dec(x_355); +x_358 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_358, 0, x_357); +return x_358; } } else { -uint8_t x_357; -x_357 = !lean_is_exclusive(x_353); -if (x_357 == 0) +uint8_t x_359; +x_359 = !lean_is_exclusive(x_355); +if (x_359 == 0) { -lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; -x_358 = lean_ctor_get(x_353, 0); -x_359 = lean_ctor_get(x_358, 0); -lean_inc(x_359); -x_360 = l_Lean_Parser_optionaInfo(x_359); -x_361 = lean_ctor_get(x_358, 1); +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_360 = lean_ctor_get(x_355, 0); +x_361 = lean_ctor_get(x_360, 0); lean_inc(x_361); -lean_dec(x_358); -x_362 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); -lean_closure_set(x_362, 0, x_361); -x_363 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_363, 0, x_360); -lean_ctor_set(x_363, 1, x_362); -lean_ctor_set(x_353, 0, x_363); -return x_353; +x_362 = l_Lean_Parser_optionaInfo(x_361); +x_363 = lean_ctor_get(x_360, 1); +lean_inc(x_363); +lean_dec(x_360); +x_364 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); +lean_closure_set(x_364, 0, x_363); +x_365 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_365, 0, x_362); +lean_ctor_set(x_365, 1, x_364); +lean_ctor_set(x_355, 0, x_365); +return x_355; } else { -lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; -x_364 = lean_ctor_get(x_353, 0); -lean_inc(x_364); -lean_dec(x_353); -x_365 = lean_ctor_get(x_364, 0); -lean_inc(x_365); -x_366 = l_Lean_Parser_optionaInfo(x_365); -x_367 = lean_ctor_get(x_364, 1); +lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; +x_366 = lean_ctor_get(x_355, 0); +lean_inc(x_366); +lean_dec(x_355); +x_367 = lean_ctor_get(x_366, 0); lean_inc(x_367); -lean_dec(x_364); -x_368 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); -lean_closure_set(x_368, 0, x_367); -x_369 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_369, 0, x_366); -lean_ctor_set(x_369, 1, x_368); -x_370 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_370, 0, x_369); -return x_370; +x_368 = l_Lean_Parser_optionaInfo(x_367); +x_369 = lean_ctor_get(x_366, 1); +lean_inc(x_369); +lean_dec(x_366); +x_370 = lean_alloc_closure((void*)(l_Lean_Parser_optionalFn___rarg), 4, 1); +lean_closure_set(x_370, 0, x_369); +x_371 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_371, 0, x_368); +lean_ctor_set(x_371, 1, x_370); +x_372 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_372, 0, x_371); +return x_372; } } } case 3: { -lean_object* x_371; lean_object* x_372; -x_371 = lean_ctor_get(x_3, 0); -lean_inc(x_371); +lean_object* x_373; lean_object* x_374; +x_373 = lean_ctor_get(x_3, 0); +lean_inc(x_373); lean_dec(x_3); -x_372 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_371); -if (lean_obj_tag(x_372) == 0) +x_374 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_373); +if (lean_obj_tag(x_374) == 0) { -uint8_t x_373; -x_373 = !lean_is_exclusive(x_372); -if (x_373 == 0) +uint8_t x_375; +x_375 = !lean_is_exclusive(x_374); +if (x_375 == 0) { -return x_372; +return x_374; } else { -lean_object* x_374; lean_object* x_375; -x_374 = lean_ctor_get(x_372, 0); -lean_inc(x_374); -lean_dec(x_372); -x_375 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_375, 0, x_374); -return x_375; +lean_object* x_376; lean_object* x_377; +x_376 = lean_ctor_get(x_374, 0); +lean_inc(x_376); +lean_dec(x_374); +x_377 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_377, 0, x_376); +return x_377; } } else { -uint8_t x_376; -x_376 = !lean_is_exclusive(x_372); -if (x_376 == 0) -{ -lean_object* x_377; uint8_t x_378; -x_377 = lean_ctor_get(x_372, 0); -x_378 = !lean_is_exclusive(x_377); +uint8_t x_378; +x_378 = !lean_is_exclusive(x_374); if (x_378 == 0) { -lean_object* x_379; lean_object* x_380; -x_379 = lean_ctor_get(x_377, 1); -x_380 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_380, 0, x_379); -lean_ctor_set(x_377, 1, x_380); -return x_372; +lean_object* x_379; uint8_t x_380; +x_379 = lean_ctor_get(x_374, 0); +x_380 = !lean_is_exclusive(x_379); +if (x_380 == 0) +{ +lean_object* x_381; lean_object* x_382; +x_381 = lean_ctor_get(x_379, 1); +x_382 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); +lean_closure_set(x_382, 0, x_381); +lean_ctor_set(x_379, 1, x_382); +return x_374; } else { -lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; -x_381 = lean_ctor_get(x_377, 0); -x_382 = lean_ctor_get(x_377, 1); -lean_inc(x_382); -lean_inc(x_381); -lean_dec(x_377); -x_383 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_383, 0, x_382); -x_384 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_384, 0, x_381); -lean_ctor_set(x_384, 1, x_383); -lean_ctor_set(x_372, 0, x_384); -return x_372; +lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; +x_383 = lean_ctor_get(x_379, 0); +x_384 = lean_ctor_get(x_379, 1); +lean_inc(x_384); +lean_inc(x_383); +lean_dec(x_379); +x_385 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); +lean_closure_set(x_385, 0, x_384); +x_386 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_386, 0, x_383); +lean_ctor_set(x_386, 1, x_385); +lean_ctor_set(x_374, 0, x_386); +return x_374; } } else { -lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; -x_385 = lean_ctor_get(x_372, 0); -lean_inc(x_385); -lean_dec(x_372); -x_386 = lean_ctor_get(x_385, 0); -lean_inc(x_386); -x_387 = lean_ctor_get(x_385, 1); +lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; +x_387 = lean_ctor_get(x_374, 0); lean_inc(x_387); -if (lean_is_exclusive(x_385)) { - lean_ctor_release(x_385, 0); - lean_ctor_release(x_385, 1); - x_388 = x_385; +lean_dec(x_374); +x_388 = lean_ctor_get(x_387, 0); +lean_inc(x_388); +x_389 = lean_ctor_get(x_387, 1); +lean_inc(x_389); +if (lean_is_exclusive(x_387)) { + lean_ctor_release(x_387, 0); + lean_ctor_release(x_387, 1); + x_390 = x_387; } else { - lean_dec_ref(x_385); - x_388 = lean_box(0); + lean_dec_ref(x_387); + x_390 = lean_box(0); } -x_389 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); -lean_closure_set(x_389, 0, x_387); -if (lean_is_scalar(x_388)) { - x_390 = lean_alloc_ctor(0, 2, 0); +x_391 = lean_alloc_closure((void*)(l_Lean_Parser_lookaheadFn___rarg), 4, 1); +lean_closure_set(x_391, 0, x_389); +if (lean_is_scalar(x_390)) { + x_392 = lean_alloc_ctor(0, 2, 0); } else { - x_390 = x_388; + x_392 = x_390; } -lean_ctor_set(x_390, 0, x_386); -lean_ctor_set(x_390, 1, x_389); -x_391 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_391, 0, x_390); -return x_391; +lean_ctor_set(x_392, 0, x_388); +lean_ctor_set(x_392, 1, x_391); +x_393 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_393, 0, x_392); +return x_393; } } } case 4: { -lean_object* x_392; lean_object* x_393; -x_392 = lean_ctor_get(x_3, 0); -lean_inc(x_392); +lean_object* x_394; lean_object* x_395; +x_394 = lean_ctor_get(x_3, 0); +lean_inc(x_394); lean_dec(x_3); -x_393 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_392); -if (lean_obj_tag(x_393) == 0) +x_395 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_394); +if (lean_obj_tag(x_395) == 0) { -uint8_t x_394; -x_394 = !lean_is_exclusive(x_393); -if (x_394 == 0) +uint8_t x_396; +x_396 = !lean_is_exclusive(x_395); +if (x_396 == 0) { -return x_393; +return x_395; } else { -lean_object* x_395; lean_object* x_396; -x_395 = lean_ctor_get(x_393, 0); -lean_inc(x_395); -lean_dec(x_393); -x_396 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_396, 0, x_395); -return x_396; +lean_object* x_397; lean_object* x_398; +x_397 = lean_ctor_get(x_395, 0); +lean_inc(x_397); +lean_dec(x_395); +x_398 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_398, 0, x_397); +return x_398; } } else { -uint8_t x_397; -x_397 = !lean_is_exclusive(x_393); -if (x_397 == 0) -{ -lean_object* x_398; uint8_t x_399; -x_398 = lean_ctor_get(x_393, 0); -x_399 = !lean_is_exclusive(x_398); +uint8_t x_399; +x_399 = !lean_is_exclusive(x_395); if (x_399 == 0) { -lean_object* x_400; lean_object* x_401; -x_400 = lean_ctor_get(x_398, 1); -x_401 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_401, 0, x_400); -lean_ctor_set(x_398, 1, x_401); -return x_393; +lean_object* x_400; uint8_t x_401; +x_400 = lean_ctor_get(x_395, 0); +x_401 = !lean_is_exclusive(x_400); +if (x_401 == 0) +{ +lean_object* x_402; lean_object* x_403; +x_402 = lean_ctor_get(x_400, 1); +x_403 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); +lean_closure_set(x_403, 0, x_402); +lean_ctor_set(x_400, 1, x_403); +return x_395; } else { -lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; -x_402 = lean_ctor_get(x_398, 0); -x_403 = lean_ctor_get(x_398, 1); -lean_inc(x_403); -lean_inc(x_402); -lean_dec(x_398); -x_404 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_404, 0, x_403); -x_405 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_405, 0, x_402); -lean_ctor_set(x_405, 1, x_404); -lean_ctor_set(x_393, 0, x_405); -return x_393; +lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; +x_404 = lean_ctor_get(x_400, 0); +x_405 = lean_ctor_get(x_400, 1); +lean_inc(x_405); +lean_inc(x_404); +lean_dec(x_400); +x_406 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); +lean_closure_set(x_406, 0, x_405); +x_407 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_407, 0, x_404); +lean_ctor_set(x_407, 1, x_406); +lean_ctor_set(x_395, 0, x_407); +return x_395; } } else { -lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; -x_406 = lean_ctor_get(x_393, 0); -lean_inc(x_406); -lean_dec(x_393); -x_407 = lean_ctor_get(x_406, 0); -lean_inc(x_407); -x_408 = lean_ctor_get(x_406, 1); +lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; +x_408 = lean_ctor_get(x_395, 0); lean_inc(x_408); -if (lean_is_exclusive(x_406)) { - lean_ctor_release(x_406, 0); - lean_ctor_release(x_406, 1); - x_409 = x_406; +lean_dec(x_395); +x_409 = lean_ctor_get(x_408, 0); +lean_inc(x_409); +x_410 = lean_ctor_get(x_408, 1); +lean_inc(x_410); +if (lean_is_exclusive(x_408)) { + lean_ctor_release(x_408, 0); + lean_ctor_release(x_408, 1); + x_411 = x_408; } else { - lean_dec_ref(x_406); - x_409 = lean_box(0); + lean_dec_ref(x_408); + x_411 = lean_box(0); } -x_410 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); -lean_closure_set(x_410, 0, x_408); -if (lean_is_scalar(x_409)) { - x_411 = lean_alloc_ctor(0, 2, 0); +x_412 = lean_alloc_closure((void*)(l_Lean_Parser_tryFn___rarg), 4, 1); +lean_closure_set(x_412, 0, x_410); +if (lean_is_scalar(x_411)) { + x_413 = lean_alloc_ctor(0, 2, 0); } else { - x_411 = x_409; + x_413 = x_411; } -lean_ctor_set(x_411, 0, x_407); -lean_ctor_set(x_411, 1, x_410); -x_412 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_412, 0, x_411); -return x_412; +lean_ctor_set(x_413, 0, x_409); +lean_ctor_set(x_413, 1, x_412); +x_414 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_414, 0, x_413); +return x_414; } } } case 5: { -lean_object* x_413; lean_object* x_414; -x_413 = lean_ctor_get(x_3, 0); -lean_inc(x_413); +lean_object* x_415; lean_object* x_416; +x_415 = lean_ctor_get(x_3, 0); +lean_inc(x_415); lean_dec(x_3); -x_414 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_413); -if (lean_obj_tag(x_414) == 0) +x_416 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_415); +if (lean_obj_tag(x_416) == 0) { -uint8_t x_415; -x_415 = !lean_is_exclusive(x_414); -if (x_415 == 0) +uint8_t x_417; +x_417 = !lean_is_exclusive(x_416); +if (x_417 == 0) { -return x_414; +return x_416; } else { -lean_object* x_416; lean_object* x_417; -x_416 = lean_ctor_get(x_414, 0); -lean_inc(x_416); -lean_dec(x_414); -x_417 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_417, 0, x_416); -return x_417; +lean_object* x_418; lean_object* x_419; +x_418 = lean_ctor_get(x_416, 0); +lean_inc(x_418); +lean_dec(x_416); +x_419 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_419, 0, x_418); +return x_419; } } else { -uint8_t x_418; -x_418 = !lean_is_exclusive(x_414); -if (x_418 == 0) +uint8_t x_420; +x_420 = !lean_is_exclusive(x_416); +if (x_420 == 0) { -lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; -x_419 = lean_ctor_get(x_414, 0); -x_420 = lean_ctor_get(x_419, 0); -lean_inc(x_420); -x_421 = l_Lean_Parser_noFirstTokenInfo(x_420); -x_422 = lean_ctor_get(x_419, 1); +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; +x_421 = lean_ctor_get(x_416, 0); +x_422 = lean_ctor_get(x_421, 0); lean_inc(x_422); -lean_dec(x_419); -x_423 = lean_box(x_2); -x_424 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); -lean_closure_set(x_424, 0, x_423); -lean_closure_set(x_424, 1, x_422); -x_425 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_425, 0, x_421); -lean_ctor_set(x_425, 1, x_424); -lean_ctor_set(x_414, 0, x_425); -return x_414; +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); +lean_ctor_set(x_416, 0, x_427); +return x_416; } else { -lean_object* x_426; 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; -x_426 = lean_ctor_get(x_414, 0); -lean_inc(x_426); -lean_dec(x_414); -x_427 = lean_ctor_get(x_426, 0); -lean_inc(x_427); -x_428 = l_Lean_Parser_noFirstTokenInfo(x_427); -x_429 = lean_ctor_get(x_426, 1); +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; lean_object* x_435; +x_428 = lean_ctor_get(x_416, 0); +lean_inc(x_428); +lean_dec(x_416); +x_429 = lean_ctor_get(x_428, 0); lean_inc(x_429); -lean_dec(x_426); -x_430 = lean_box(x_2); -x_431 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); -lean_closure_set(x_431, 0, x_430); -lean_closure_set(x_431, 1, x_429); -x_432 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_432, 0, x_428); -lean_ctor_set(x_432, 1, x_431); -x_433 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_433, 0, x_432); -return x_433; +x_430 = l_Lean_Parser_noFirstTokenInfo(x_429); +x_431 = lean_ctor_get(x_428, 1); +lean_inc(x_431); +lean_dec(x_428); +x_432 = lean_box(x_2); +x_433 = lean_alloc_closure((void*)(l_Lean_Parser_manyFn___boxed), 5, 2); +lean_closure_set(x_433, 0, x_432); +lean_closure_set(x_433, 1, x_431); +x_434 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_434, 0, x_430); +lean_ctor_set(x_434, 1, x_433); +x_435 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_435, 0, x_434); +return x_435; } } } case 6: { -lean_object* x_434; lean_object* x_435; -x_434 = lean_ctor_get(x_3, 0); -lean_inc(x_434); +lean_object* x_436; lean_object* x_437; +x_436 = lean_ctor_get(x_3, 0); +lean_inc(x_436); lean_dec(x_3); -x_435 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_434); -if (lean_obj_tag(x_435) == 0) +x_437 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_436); +if (lean_obj_tag(x_437) == 0) { -uint8_t x_436; -x_436 = !lean_is_exclusive(x_435); -if (x_436 == 0) +uint8_t x_438; +x_438 = !lean_is_exclusive(x_437); +if (x_438 == 0) { -return x_435; +return x_437; } else { -lean_object* x_437; lean_object* x_438; -x_437 = lean_ctor_get(x_435, 0); -lean_inc(x_437); -lean_dec(x_435); -x_438 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_438, 0, x_437); -return x_438; +lean_object* x_439; lean_object* x_440; +x_439 = lean_ctor_get(x_437, 0); +lean_inc(x_439); +lean_dec(x_437); +x_440 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_440, 0, x_439); +return x_440; } } else { -uint8_t x_439; -x_439 = !lean_is_exclusive(x_435); -if (x_439 == 0) -{ -lean_object* x_440; uint8_t x_441; -x_440 = lean_ctor_get(x_435, 0); -x_441 = !lean_is_exclusive(x_440); +uint8_t x_441; +x_441 = !lean_is_exclusive(x_437); if (x_441 == 0) { -lean_object* x_442; uint8_t x_443; lean_object* x_444; lean_object* x_445; lean_object* x_446; -x_442 = lean_ctor_get(x_440, 1); -x_443 = 0; -x_444 = lean_box(x_2); -x_445 = lean_box(x_443); -x_446 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); -lean_closure_set(x_446, 0, x_444); -lean_closure_set(x_446, 1, x_442); -lean_closure_set(x_446, 2, x_445); -lean_ctor_set(x_440, 1, x_446); -return x_435; +lean_object* x_442; uint8_t x_443; +x_442 = lean_ctor_get(x_437, 0); +x_443 = !lean_is_exclusive(x_442); +if (x_443 == 0) +{ +lean_object* x_444; uint8_t x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; +x_444 = lean_ctor_get(x_442, 1); +x_445 = 0; +x_446 = lean_box(x_2); +x_447 = lean_box(x_445); +x_448 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_448, 0, x_446); +lean_closure_set(x_448, 1, x_444); +lean_closure_set(x_448, 2, x_447); +lean_ctor_set(x_442, 1, x_448); +return x_437; } else { -lean_object* x_447; lean_object* x_448; uint8_t x_449; lean_object* x_450; lean_object* x_451; lean_object* x_452; lean_object* x_453; -x_447 = lean_ctor_get(x_440, 0); -x_448 = lean_ctor_get(x_440, 1); -lean_inc(x_448); -lean_inc(x_447); -lean_dec(x_440); -x_449 = 0; -x_450 = lean_box(x_2); -x_451 = lean_box(x_449); -x_452 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); -lean_closure_set(x_452, 0, x_450); -lean_closure_set(x_452, 1, x_448); -lean_closure_set(x_452, 2, x_451); -x_453 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_453, 0, x_447); -lean_ctor_set(x_453, 1, x_452); -lean_ctor_set(x_435, 0, x_453); -return x_435; +lean_object* x_449; lean_object* x_450; uint8_t x_451; lean_object* x_452; lean_object* x_453; lean_object* x_454; lean_object* x_455; +x_449 = lean_ctor_get(x_442, 0); +x_450 = lean_ctor_get(x_442, 1); +lean_inc(x_450); +lean_inc(x_449); +lean_dec(x_442); +x_451 = 0; +x_452 = lean_box(x_2); +x_453 = lean_box(x_451); +x_454 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_454, 0, x_452); +lean_closure_set(x_454, 1, x_450); +lean_closure_set(x_454, 2, x_453); +x_455 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_455, 0, x_449); +lean_ctor_set(x_455, 1, x_454); +lean_ctor_set(x_437, 0, x_455); +return x_437; } } else { -lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; uint8_t x_458; lean_object* x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; -x_454 = lean_ctor_get(x_435, 0); -lean_inc(x_454); -lean_dec(x_435); -x_455 = lean_ctor_get(x_454, 0); -lean_inc(x_455); -x_456 = lean_ctor_get(x_454, 1); +lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; uint8_t x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; lean_object* x_465; +x_456 = lean_ctor_get(x_437, 0); lean_inc(x_456); -if (lean_is_exclusive(x_454)) { - lean_ctor_release(x_454, 0); - lean_ctor_release(x_454, 1); - x_457 = x_454; +lean_dec(x_437); +x_457 = lean_ctor_get(x_456, 0); +lean_inc(x_457); +x_458 = lean_ctor_get(x_456, 1); +lean_inc(x_458); +if (lean_is_exclusive(x_456)) { + lean_ctor_release(x_456, 0); + lean_ctor_release(x_456, 1); + x_459 = x_456; } else { - lean_dec_ref(x_454); - x_457 = lean_box(0); + lean_dec_ref(x_456); + x_459 = lean_box(0); } -x_458 = 0; -x_459 = lean_box(x_2); -x_460 = lean_box(x_458); -x_461 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); -lean_closure_set(x_461, 0, x_459); -lean_closure_set(x_461, 1, x_456); -lean_closure_set(x_461, 2, x_460); -if (lean_is_scalar(x_457)) { - x_462 = lean_alloc_ctor(0, 2, 0); +x_460 = 0; +x_461 = lean_box(x_2); +x_462 = lean_box(x_460); +x_463 = lean_alloc_closure((void*)(l_Lean_Parser_many1Fn___boxed), 6, 3); +lean_closure_set(x_463, 0, x_461); +lean_closure_set(x_463, 1, x_458); +lean_closure_set(x_463, 2, x_462); +if (lean_is_scalar(x_459)) { + x_464 = lean_alloc_ctor(0, 2, 0); } else { - x_462 = x_457; + x_464 = x_459; } -lean_ctor_set(x_462, 0, x_455); -lean_ctor_set(x_462, 1, x_461); -x_463 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_463, 0, x_462); -return x_463; +lean_ctor_set(x_464, 0, x_457); +lean_ctor_set(x_464, 1, x_463); +x_465 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_465, 0, x_464); +return x_465; } } } case 7: { -lean_object* x_464; lean_object* x_465; lean_object* x_466; -x_464 = lean_ctor_get(x_3, 0); -lean_inc(x_464); -x_465 = lean_ctor_get(x_3, 1); -lean_inc(x_465); +lean_object* x_466; lean_object* x_467; lean_object* x_468; +x_466 = lean_ctor_get(x_3, 0); +lean_inc(x_466); +x_467 = lean_ctor_get(x_3, 1); +lean_inc(x_467); lean_dec(x_3); lean_inc(x_1); -x_466 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_464); -if (lean_obj_tag(x_466) == 0) +x_468 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_466); +if (lean_obj_tag(x_468) == 0) { -uint8_t x_467; -lean_dec(x_465); +uint8_t x_469; +lean_dec(x_467); lean_dec(x_1); -x_467 = !lean_is_exclusive(x_466); -if (x_467 == 0) +x_469 = !lean_is_exclusive(x_468); +if (x_469 == 0) { -return x_466; -} -else -{ -lean_object* x_468; lean_object* x_469; -x_468 = lean_ctor_get(x_466, 0); -lean_inc(x_468); -lean_dec(x_466); -x_469 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_469, 0, x_468); -return x_469; -} +return x_468; } else { lean_object* x_470; lean_object* x_471; -x_470 = lean_ctor_get(x_466, 0); +x_470 = lean_ctor_get(x_468, 0); lean_inc(x_470); -lean_dec(x_466); -x_471 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_465); -if (lean_obj_tag(x_471) == 0) -{ -uint8_t x_472; -lean_dec(x_470); -x_472 = !lean_is_exclusive(x_471); -if (x_472 == 0) -{ +lean_dec(x_468); +x_471 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_471, 0, x_470); return x_471; } +} else { -lean_object* x_473; lean_object* x_474; -x_473 = lean_ctor_get(x_471, 0); -lean_inc(x_473); -lean_dec(x_471); -x_474 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_474, 0, x_473); -return x_474; +lean_object* x_472; lean_object* x_473; +x_472 = lean_ctor_get(x_468, 0); +lean_inc(x_472); +lean_dec(x_468); +x_473 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_467); +if (lean_obj_tag(x_473) == 0) +{ +uint8_t x_474; +lean_dec(x_472); +x_474 = !lean_is_exclusive(x_473); +if (x_474 == 0) +{ +return x_473; +} +else +{ +lean_object* x_475; lean_object* x_476; +x_475 = lean_ctor_get(x_473, 0); +lean_inc(x_475); +lean_dec(x_473); +x_476 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_476, 0, x_475); +return x_476; } } else { -uint8_t x_475; -x_475 = !lean_is_exclusive(x_471); -if (x_475 == 0) +uint8_t x_477; +x_477 = !lean_is_exclusive(x_473); +if (x_477 == 0) { -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; -x_476 = lean_ctor_get(x_471, 0); -x_477 = lean_ctor_get(x_470, 0); -lean_inc(x_477); -x_478 = lean_ctor_get(x_476, 0); -lean_inc(x_478); -x_479 = l_Lean_Parser_sepByInfo(x_477, x_478); -x_480 = lean_ctor_get(x_470, 1); +lean_object* x_478; lean_object* x_479; lean_object* x_480; lean_object* x_481; lean_object* x_482; lean_object* x_483; uint8_t x_484; lean_object* x_485; lean_object* x_486; lean_object* x_487; lean_object* x_488; +x_478 = lean_ctor_get(x_473, 0); +x_479 = lean_ctor_get(x_472, 0); +lean_inc(x_479); +x_480 = lean_ctor_get(x_478, 0); lean_inc(x_480); -lean_dec(x_470); -x_481 = lean_ctor_get(x_476, 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); -lean_ctor_set(x_471, 0, x_486); -return x_471; +x_481 = l_Lean_Parser_sepByInfo(x_479, x_480); +x_482 = lean_ctor_get(x_472, 1); +lean_inc(x_482); +lean_dec(x_472); +x_483 = lean_ctor_get(x_478, 1); +lean_inc(x_483); +lean_dec(x_478); +x_484 = 0; +x_485 = lean_box(x_2); +x_486 = lean_box(x_484); +x_487 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); +lean_closure_set(x_487, 0, x_485); +lean_closure_set(x_487, 1, x_486); +lean_closure_set(x_487, 2, x_482); +lean_closure_set(x_487, 3, x_483); +x_488 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_488, 0, x_481); +lean_ctor_set(x_488, 1, x_487); +lean_ctor_set(x_473, 0, x_488); +return x_473; } else { -lean_object* x_487; lean_object* x_488; lean_object* x_489; lean_object* x_490; lean_object* x_491; lean_object* x_492; uint8_t x_493; lean_object* x_494; lean_object* x_495; lean_object* x_496; lean_object* x_497; lean_object* x_498; -x_487 = lean_ctor_get(x_471, 0); -lean_inc(x_487); -lean_dec(x_471); -x_488 = lean_ctor_get(x_470, 0); -lean_inc(x_488); -x_489 = lean_ctor_get(x_487, 0); +lean_object* x_489; lean_object* x_490; lean_object* x_491; lean_object* x_492; lean_object* x_493; lean_object* x_494; uint8_t x_495; lean_object* x_496; lean_object* x_497; lean_object* x_498; lean_object* x_499; lean_object* x_500; +x_489 = lean_ctor_get(x_473, 0); lean_inc(x_489); -x_490 = l_Lean_Parser_sepByInfo(x_488, x_489); -x_491 = lean_ctor_get(x_470, 1); +lean_dec(x_473); +x_490 = lean_ctor_get(x_472, 0); +lean_inc(x_490); +x_491 = lean_ctor_get(x_489, 0); lean_inc(x_491); -lean_dec(x_470); -x_492 = lean_ctor_get(x_487, 1); -lean_inc(x_492); -lean_dec(x_487); -x_493 = 0; -x_494 = lean_box(x_2); -x_495 = lean_box(x_493); -x_496 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); -lean_closure_set(x_496, 0, x_494); -lean_closure_set(x_496, 1, x_495); -lean_closure_set(x_496, 2, x_491); -lean_closure_set(x_496, 3, x_492); -x_497 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_497, 0, x_490); -lean_ctor_set(x_497, 1, x_496); -x_498 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_498, 0, x_497); -return x_498; +x_492 = l_Lean_Parser_sepByInfo(x_490, x_491); +x_493 = lean_ctor_get(x_472, 1); +lean_inc(x_493); +lean_dec(x_472); +x_494 = lean_ctor_get(x_489, 1); +lean_inc(x_494); +lean_dec(x_489); +x_495 = 0; +x_496 = lean_box(x_2); +x_497 = lean_box(x_495); +x_498 = lean_alloc_closure((void*)(l_Lean_Parser_sepByFn___boxed), 7, 4); +lean_closure_set(x_498, 0, x_496); +lean_closure_set(x_498, 1, x_497); +lean_closure_set(x_498, 2, x_493); +lean_closure_set(x_498, 3, x_494); +x_499 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_499, 0, x_492); +lean_ctor_set(x_499, 1, x_498); +x_500 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_500, 0, x_499); +return x_500; } } } } case 8: { -lean_object* x_499; lean_object* x_500; lean_object* x_501; -x_499 = lean_ctor_get(x_3, 0); -lean_inc(x_499); -x_500 = lean_ctor_get(x_3, 1); -lean_inc(x_500); +lean_object* x_501; lean_object* x_502; lean_object* x_503; +x_501 = lean_ctor_get(x_3, 0); +lean_inc(x_501); +x_502 = lean_ctor_get(x_3, 1); +lean_inc(x_502); lean_dec(x_3); lean_inc(x_1); -x_501 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_499); -if (lean_obj_tag(x_501) == 0) +x_503 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_501); +if (lean_obj_tag(x_503) == 0) { -uint8_t x_502; -lean_dec(x_500); +uint8_t x_504; +lean_dec(x_502); lean_dec(x_1); -x_502 = !lean_is_exclusive(x_501); -if (x_502 == 0) +x_504 = !lean_is_exclusive(x_503); +if (x_504 == 0) { -return x_501; -} -else -{ -lean_object* x_503; lean_object* x_504; -x_503 = lean_ctor_get(x_501, 0); -lean_inc(x_503); -lean_dec(x_501); -x_504 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_504, 0, x_503); -return x_504; -} +return x_503; } else { lean_object* x_505; lean_object* x_506; -x_505 = lean_ctor_get(x_501, 0); +x_505 = lean_ctor_get(x_503, 0); lean_inc(x_505); -lean_dec(x_501); -x_506 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_500); -if (lean_obj_tag(x_506) == 0) -{ -uint8_t x_507; -lean_dec(x_505); -x_507 = !lean_is_exclusive(x_506); -if (x_507 == 0) -{ +lean_dec(x_503); +x_506 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_506, 0, x_505); return x_506; } +} else { -lean_object* x_508; lean_object* x_509; -x_508 = lean_ctor_get(x_506, 0); -lean_inc(x_508); -lean_dec(x_506); -x_509 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_509, 0, x_508); -return x_509; +lean_object* x_507; lean_object* x_508; +x_507 = lean_ctor_get(x_503, 0); +lean_inc(x_507); +lean_dec(x_503); +x_508 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_502); +if (lean_obj_tag(x_508) == 0) +{ +uint8_t x_509; +lean_dec(x_507); +x_509 = !lean_is_exclusive(x_508); +if (x_509 == 0) +{ +return x_508; +} +else +{ +lean_object* x_510; lean_object* x_511; +x_510 = lean_ctor_get(x_508, 0); +lean_inc(x_510); +lean_dec(x_508); +x_511 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_511, 0, x_510); +return x_511; } } else { -uint8_t x_510; -x_510 = !lean_is_exclusive(x_506); -if (x_510 == 0) +uint8_t x_512; +x_512 = !lean_is_exclusive(x_508); +if (x_512 == 0) { -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_506, 0); -x_512 = lean_ctor_get(x_505, 0); -lean_inc(x_512); -x_513 = lean_ctor_get(x_511, 0); -lean_inc(x_513); -x_514 = l_Lean_Parser_sepBy1Info(x_512, x_513); -x_515 = lean_ctor_get(x_505, 1); +lean_object* x_513; lean_object* x_514; lean_object* x_515; lean_object* x_516; lean_object* x_517; lean_object* x_518; uint8_t x_519; lean_object* x_520; lean_object* x_521; lean_object* x_522; lean_object* x_523; lean_object* x_524; +x_513 = lean_ctor_get(x_508, 0); +x_514 = lean_ctor_get(x_507, 0); +lean_inc(x_514); +x_515 = lean_ctor_get(x_513, 0); lean_inc(x_515); -lean_dec(x_505); -x_516 = lean_ctor_get(x_511, 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_box(x_517); -x_521 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); -lean_closure_set(x_521, 0, x_518); -lean_closure_set(x_521, 1, x_519); -lean_closure_set(x_521, 2, x_515); -lean_closure_set(x_521, 3, x_516); -lean_closure_set(x_521, 4, x_520); -x_522 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_522, 0, x_514); -lean_ctor_set(x_522, 1, x_521); -lean_ctor_set(x_506, 0, x_522); -return x_506; +x_516 = l_Lean_Parser_sepBy1Info(x_514, x_515); +x_517 = lean_ctor_get(x_507, 1); +lean_inc(x_517); +lean_dec(x_507); +x_518 = lean_ctor_get(x_513, 1); +lean_inc(x_518); +lean_dec(x_513); +x_519 = 0; +x_520 = lean_box(x_2); +x_521 = lean_box(x_519); +x_522 = lean_box(x_519); +x_523 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); +lean_closure_set(x_523, 0, x_520); +lean_closure_set(x_523, 1, x_521); +lean_closure_set(x_523, 2, x_517); +lean_closure_set(x_523, 3, x_518); +lean_closure_set(x_523, 4, x_522); +x_524 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_524, 0, x_516); +lean_ctor_set(x_524, 1, x_523); +lean_ctor_set(x_508, 0, x_524); +return x_508; } 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; lean_object* x_535; -x_523 = lean_ctor_get(x_506, 0); -lean_inc(x_523); -lean_dec(x_506); -x_524 = lean_ctor_get(x_505, 0); -lean_inc(x_524); -x_525 = lean_ctor_get(x_523, 0); +lean_object* x_525; lean_object* x_526; lean_object* x_527; lean_object* x_528; lean_object* x_529; lean_object* x_530; uint8_t x_531; lean_object* x_532; lean_object* x_533; lean_object* x_534; lean_object* x_535; lean_object* x_536; lean_object* x_537; +x_525 = lean_ctor_get(x_508, 0); lean_inc(x_525); -x_526 = l_Lean_Parser_sepBy1Info(x_524, x_525); -x_527 = lean_ctor_get(x_505, 1); +lean_dec(x_508); +x_526 = lean_ctor_get(x_507, 0); +lean_inc(x_526); +x_527 = lean_ctor_get(x_525, 0); lean_inc(x_527); -lean_dec(x_505); -x_528 = lean_ctor_get(x_523, 1); -lean_inc(x_528); -lean_dec(x_523); -x_529 = 0; -x_530 = lean_box(x_2); -x_531 = lean_box(x_529); -x_532 = lean_box(x_529); -x_533 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); -lean_closure_set(x_533, 0, x_530); -lean_closure_set(x_533, 1, x_531); -lean_closure_set(x_533, 2, x_527); -lean_closure_set(x_533, 3, x_528); -lean_closure_set(x_533, 4, x_532); -x_534 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_534, 0, x_526); -lean_ctor_set(x_534, 1, x_533); -x_535 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_535, 0, x_534); -return x_535; +x_528 = l_Lean_Parser_sepBy1Info(x_526, x_527); +x_529 = lean_ctor_get(x_507, 1); +lean_inc(x_529); +lean_dec(x_507); +x_530 = lean_ctor_get(x_525, 1); +lean_inc(x_530); +lean_dec(x_525); +x_531 = 0; +x_532 = lean_box(x_2); +x_533 = lean_box(x_531); +x_534 = lean_box(x_531); +x_535 = lean_alloc_closure((void*)(l_Lean_Parser_sepBy1Fn___boxed), 8, 5); +lean_closure_set(x_535, 0, x_532); +lean_closure_set(x_535, 1, x_533); +lean_closure_set(x_535, 2, x_529); +lean_closure_set(x_535, 3, x_530); +lean_closure_set(x_535, 4, x_534); +x_536 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_536, 0, x_528); +lean_ctor_set(x_536, 1, x_535); +x_537 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_537, 0, x_536); +return x_537; } } } } case 9: { -lean_object* x_536; lean_object* x_537; lean_object* x_538; -x_536 = lean_ctor_get(x_3, 0); -lean_inc(x_536); -x_537 = lean_ctor_get(x_3, 1); -lean_inc(x_537); +lean_object* x_538; lean_object* x_539; lean_object* x_540; +x_538 = lean_ctor_get(x_3, 0); +lean_inc(x_538); +x_539 = lean_ctor_get(x_3, 1); +lean_inc(x_539); lean_dec(x_3); -x_538 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_537); -if (lean_obj_tag(x_538) == 0) +x_540 = l_Lean_Parser_compileParserDescr___main(x_1, x_2, x_539); +if (lean_obj_tag(x_540) == 0) { -uint8_t x_539; -lean_dec(x_536); -x_539 = !lean_is_exclusive(x_538); -if (x_539 == 0) -{ -return x_538; -} -else -{ -lean_object* x_540; lean_object* x_541; -x_540 = lean_ctor_get(x_538, 0); -lean_inc(x_540); +uint8_t x_541; lean_dec(x_538); -x_541 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_541, 0, x_540); -return x_541; +x_541 = !lean_is_exclusive(x_540); +if (x_541 == 0) +{ +return x_540; +} +else +{ +lean_object* x_542; lean_object* x_543; +x_542 = lean_ctor_get(x_540, 0); +lean_inc(x_542); +lean_dec(x_540); +x_543 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_543, 0, x_542); +return x_543; } } else { -uint8_t x_542; -x_542 = !lean_is_exclusive(x_538); -if (x_542 == 0) +uint8_t x_544; +x_544 = !lean_is_exclusive(x_540); +if (x_544 == 0) { -lean_object* x_543; lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; lean_object* x_548; -x_543 = lean_ctor_get(x_538, 0); -x_544 = lean_ctor_get(x_543, 0); -lean_inc(x_544); -lean_inc(x_536); -x_545 = l_Lean_Parser_nodeInfo(x_536, x_544); -x_546 = lean_ctor_get(x_543, 1); +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_545 = lean_ctor_get(x_540, 0); +x_546 = lean_ctor_get(x_545, 0); lean_inc(x_546); -lean_dec(x_543); -x_547 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_547, 0, x_536); -lean_closure_set(x_547, 1, x_546); -x_548 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_548, 0, x_545); -lean_ctor_set(x_548, 1, x_547); -lean_ctor_set(x_538, 0, x_548); -return x_538; +lean_inc(x_538); +x_547 = l_Lean_Parser_nodeInfo(x_538, x_546); +x_548 = lean_ctor_get(x_545, 1); +lean_inc(x_548); +lean_dec(x_545); +x_549 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_549, 0, x_538); +lean_closure_set(x_549, 1, x_548); +x_550 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_550, 0, x_547); +lean_ctor_set(x_550, 1, x_549); +lean_ctor_set(x_540, 0, x_550); +return x_540; } else { -lean_object* x_549; lean_object* x_550; lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; lean_object* x_555; -x_549 = lean_ctor_get(x_538, 0); -lean_inc(x_549); -lean_dec(x_538); -x_550 = lean_ctor_get(x_549, 0); -lean_inc(x_550); -lean_inc(x_536); -x_551 = l_Lean_Parser_nodeInfo(x_536, x_550); -x_552 = lean_ctor_get(x_549, 1); +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; +x_551 = lean_ctor_get(x_540, 0); +lean_inc(x_551); +lean_dec(x_540); +x_552 = lean_ctor_get(x_551, 0); lean_inc(x_552); -lean_dec(x_549); -x_553 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); -lean_closure_set(x_553, 0, x_536); -lean_closure_set(x_553, 1, x_552); -x_554 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_554, 0, x_551); -lean_ctor_set(x_554, 1, x_553); -x_555 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_555, 0, x_554); -return x_555; +lean_inc(x_538); +x_553 = l_Lean_Parser_nodeInfo(x_538, x_552); +x_554 = lean_ctor_get(x_551, 1); +lean_inc(x_554); +lean_dec(x_551); +x_555 = lean_alloc_closure((void*)(l_Lean_Parser_nodeFn___rarg), 5, 2); +lean_closure_set(x_555, 0, x_538); +lean_closure_set(x_555, 1, x_554); +x_556 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_556, 0, x_553); +lean_ctor_set(x_556, 1, x_555); +x_557 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_557, 0, x_556); +return x_557; } } } case 10: { -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; +lean_object* x_558; lean_object* x_559; lean_object* x_560; lean_object* x_561; lean_object* x_562; lean_object* x_563; lean_object* x_564; lean_dec(x_1); -x_556 = lean_ctor_get(x_3, 0); -lean_inc(x_556); -x_557 = lean_ctor_get(x_3, 1); -lean_inc(x_557); -lean_dec(x_3); -x_558 = l_String_trim(x_556); -lean_dec(x_556); +x_558 = lean_ctor_get(x_3, 0); 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 12: -{ -lean_object* x_563; lean_object* x_564; +x_559 = lean_ctor_get(x_3, 1); +lean_inc(x_559); lean_dec(x_3); -lean_dec(x_1); -x_563 = l_Lean_Parser_numLit(x_2); +x_560 = l_String_trim(x_558); +lean_dec(x_558); +lean_inc(x_560); +x_561 = l_Lean_Parser_symbolInfo(x_560, x_559); +x_562 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); +lean_closure_set(x_562, 0, x_560); +x_563 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_563, 0, x_561); +lean_ctor_set(x_563, 1, x_562); x_564 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_564, 0, x_563); return x_564; } -case 13: +case 12: { lean_object* x_565; lean_object* x_566; lean_dec(x_3); lean_dec(x_1); -x_565 = l_Lean_Parser_strLit(x_2); +x_565 = l_Lean_Parser_numLit(x_2); x_566 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_566, 0, x_565); return x_566; } -case 14: +case 13: { lean_object* x_567; lean_object* x_568; lean_dec(x_3); lean_dec(x_1); -x_567 = l_Lean_Parser_charLit(x_2); +x_567 = l_Lean_Parser_strLit(x_2); x_568 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_568, 0, x_567); return x_568; } -case 15: +case 14: { lean_object* x_569; lean_object* x_570; lean_dec(x_3); lean_dec(x_1); -x_569 = l_Lean_Parser_ident(x_2); +x_569 = l_Lean_Parser_charLit(x_2); x_570 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_570, 0, x_569); return x_570; } +case 15: +{ +lean_object* x_571; lean_object* x_572; +lean_dec(x_3); +lean_dec(x_1); +x_571 = l_Lean_Parser_nameLit(x_2); +x_572 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_572, 0, x_571); +return x_572; +} case 16: { -lean_object* x_571; +lean_object* x_573; lean_object* x_574; +lean_dec(x_3); lean_dec(x_1); -x_571 = l_Lean_Parser_compileParserDescr___main___closed__1; -return x_571; +x_573 = l_Lean_Parser_ident(x_2); +x_574 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_574, 0, x_573); +return x_574; +} +case 17: +{ +lean_object* x_575; +lean_dec(x_1); +x_575 = l_Lean_Parser_compileParserDescr___main___closed__1; +return x_575; } default: { -lean_object* x_572; lean_object* x_573; lean_object* x_574; -x_572 = lean_ctor_get(x_3, 0); -lean_inc(x_572); -x_573 = lean_ctor_get(x_3, 1); -lean_inc(x_573); +lean_object* x_576; lean_object* x_577; lean_object* x_578; +x_576 = lean_ctor_get(x_3, 0); +lean_inc(x_576); +x_577 = lean_ctor_get(x_3, 1); +lean_inc(x_577); lean_dec(x_3); -x_574 = l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1(x_1, x_572); -if (lean_obj_tag(x_574) == 0) +x_578 = l_PersistentHashMap_find_x3f___at_Lean_Parser_addLeadingParser___spec__1(x_1, x_576); +if (lean_obj_tag(x_578) == 0) { -lean_object* x_575; -lean_dec(x_573); -x_575 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_572); -return x_575; +lean_object* x_579; +lean_dec(x_577); +x_579 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_576); +return x_579; } else { -lean_object* x_576; lean_object* x_577; -lean_dec(x_574); -x_576 = l_Lean_Parser_categoryParser(x_2, x_572, x_573); -x_577 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_577, 0, x_576); -return x_577; +lean_object* x_580; lean_object* x_581; +lean_dec(x_578); +x_580 = l_Lean_Parser_categoryParser(x_2, x_576, x_577); +x_581 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_581, 0, x_580); +return x_581; } } } @@ -33813,7 +34237,7 @@ lean_dec(x_1); return x_4; } } -lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__1(lean_object* x_1, lean_object* x_2) { +lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__1(lean_object* x_1, lean_object* x_2) { _start: { if (lean_obj_tag(x_1) == 0) @@ -33840,7 +34264,7 @@ return x_7; } } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; uint8_t x_8; @@ -33879,8 +34303,8 @@ x_15 = lean_ctor_get(x_5, 0); x_16 = lean_ctor_get(x_5, 1); x_17 = lean_ctor_get(x_5, 2); x_18 = lean_ctor_get(x_5, 3); -x_19 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig(x_15, x_13); -x_20 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__1(x_19, x_6); +x_19 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig(x_15, x_13); +x_20 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__1(x_19, x_6); lean_dec(x_19); if (lean_obj_tag(x_20) == 0) { @@ -33936,8 +34360,8 @@ lean_inc(x_30); lean_inc(x_29); lean_inc(x_28); lean_dec(x_5); -x_32 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig(x_28, x_13); -x_33 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__1(x_32, x_6); +x_32 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig(x_28, x_13); +x_33 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__1(x_32, x_6); lean_dec(x_32); if (lean_obj_tag(x_33) == 0) { @@ -34048,8 +34472,8 @@ x_63 = l_Lean_Parser_PrattParsingTables_inhabited___closed__1; x_64 = lean_alloc_ctor(0, 1, 1); lean_ctor_set(x_64, 0, x_63); lean_ctor_set_uint8(x_64, sizeof(void*)*1, x_57); -x_65 = l___private_Init_Lean_Parser_Parser_15__addParserCategoryCore(x_61, x_56, x_64); -x_66 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1(x_65, x_6); +x_65 = l___private_Init_Lean_Parser_Parser_17__addParserCategoryCore(x_61, x_56, x_64); +x_66 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1(x_65, x_6); lean_dec(x_65); if (lean_obj_tag(x_66) == 0) { @@ -34109,8 +34533,8 @@ x_78 = l_Lean_Parser_PrattParsingTables_inhabited___closed__1; x_79 = lean_alloc_ctor(0, 1, 1); lean_ctor_set(x_79, 0, x_78); lean_ctor_set_uint8(x_79, sizeof(void*)*1, x_57); -x_80 = l___private_Init_Lean_Parser_Parser_15__addParserCategoryCore(x_76, x_56, x_79); -x_81 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory___spec__1(x_80, x_6); +x_80 = l___private_Init_Lean_Parser_Parser_17__addParserCategoryCore(x_76, x_56, x_79); +x_81 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory___spec__1(x_80, x_6); lean_dec(x_80); if (lean_obj_tag(x_81) == 0) { @@ -34341,7 +34765,7 @@ goto _start; } } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; uint8_t x_8; @@ -34367,7 +34791,7 @@ x_12 = lean_nat_add(x_4, x_11); lean_dec(x_4); x_13 = lean_unsigned_to_nat(0u); lean_inc(x_1); -x_14 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__2(x_1, x_10, x_10, x_13, x_5, x_6); +x_14 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__2(x_1, x_10, x_10, x_13, x_5, x_6); lean_dec(x_10); if (lean_obj_tag(x_14) == 0) { @@ -34409,11 +34833,11 @@ return x_21; } } } -lean_object* l___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l___private_Init_Lean_Parser_Parser_17__ParserExtension_mkInitial(x_3); +x_4 = l___private_Init_Lean_Parser_Parser_19__ParserExtension_mkInitial(x_3); if (lean_obj_tag(x_4) == 0) { lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; @@ -34423,7 +34847,7 @@ x_6 = lean_ctor_get(x_4, 1); lean_inc(x_6); lean_dec(x_4); x_7 = lean_unsigned_to_nat(0u); -x_8 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__3(x_1, x_2, x_2, x_7, x_5, x_6); +x_8 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__3(x_1, x_2, x_2, x_7, x_5, x_6); return x_8; } else @@ -34451,40 +34875,40 @@ return x_12; } } } -lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__1___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__1(x_1, x_2); +x_3 = l_IO_ofExcept___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__1(x_1, x_2); lean_dec(x_1); return x_3; } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_3); lean_dec(x_2); return x_7; } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___spec__3(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___spec__3(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_3); lean_dec(x_2); return x_7; } } -lean_object* l___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported(x_1, x_2, x_3); +x_4 = l___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported(x_1, x_2, x_3); lean_dec(x_2); return x_4; } @@ -35298,7 +35722,7 @@ lean_object* _init_l_Lean_Parser_mkParserExtension___closed__3() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_17__ParserExtension_mkInitial), 1, 0); +x_1 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_19__ParserExtension_mkInitial), 1, 0); return x_1; } } @@ -35306,7 +35730,7 @@ lean_object* _init_l_Lean_Parser_mkParserExtension___closed__4() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_23__ParserExtension_addImported___boxed), 3, 0); +x_1 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_25__ParserExtension_addImported___boxed), 3, 0); return x_1; } } @@ -35314,7 +35738,7 @@ lean_object* _init_l_Lean_Parser_mkParserExtension___closed__5() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_22__ParserExtension_addEntry), 2, 0); +x_1 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_24__ParserExtension_addEntry), 2, 0); return x_1; } } @@ -35540,7 +35964,7 @@ x_4 = l_Lean_PersistentEnvExtension_getState___rarg(x_3, x_1); x_5 = lean_ctor_get(x_4, 2); lean_inc(x_5); lean_dec(x_4); -x_6 = l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_15__addParserCategoryCore___spec__1(x_5, x_2); +x_6 = l_PersistentHashMap_contains___at___private_Init_Lean_Parser_Parser_17__addParserCategoryCore___spec__1(x_5, x_2); return x_6; } } @@ -35576,7 +36000,7 @@ else { lean_object* x_9; lean_dec(x_1); -x_9 = l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg(x_2); +x_9 = l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg(x_2); return x_9; } } @@ -35673,7 +36097,7 @@ return x_20; } } } -lean_object* l___private_Init_Lean_Parser_Parser_24__catNameToString(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_26__catNameToString(lean_object* x_1) { _start: { if (lean_obj_tag(x_1) == 1) @@ -35717,7 +36141,7 @@ if (x_6 == 0) { lean_object* x_7; lean_object* x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_inc(x_1); -x_7 = l___private_Init_Lean_Parser_Parser_24__catNameToString(x_1); +x_7 = l___private_Init_Lean_Parser_Parser_26__catNameToString(x_1); x_8 = lean_box(0); x_9 = 0; x_10 = 0; @@ -35815,7 +36239,7 @@ x_5 = lean_ctor_get(x_4, 0); lean_inc(x_5); lean_dec(x_4); lean_inc(x_2); -x_6 = l___private_Init_Lean_Parser_Parser_19__addTokenConfig(x_5, x_2); +x_6 = l___private_Init_Lean_Parser_Parser_21__addTokenConfig(x_5, x_2); if (lean_obj_tag(x_6) == 0) { uint8_t x_7; @@ -36005,47 +36429,22 @@ x_7 = l_Lean_choiceKind; x_8 = lean_name_eq(x_2, x_7); if (x_8 == 0) { -lean_object* x_9; uint8_t x_10; -x_9 = l_Lean_strLitKind; -x_10 = lean_name_eq(x_2, x_9); -if (x_10 == 0) -{ -lean_object* x_11; uint8_t x_12; -x_11 = l_Lean_numLitKind; -x_12 = lean_name_eq(x_2, x_11); -if (x_12 == 0) -{ -lean_object* x_13; uint8_t x_14; -x_13 = l_Lean_charLitKind; -x_14 = lean_name_eq(x_2, x_13); -return x_14; +uint8_t x_9; +x_9 = l_Lean_Parser_isLitKind(x_2); +return x_9; } else { -uint8_t x_15; -x_15 = 1; -return x_15; +uint8_t x_10; +x_10 = 1; +return x_10; } } else { -uint8_t x_16; -x_16 = 1; -return x_16; -} -} -else -{ -uint8_t x_17; -x_17 = 1; -return x_17; -} -} -else -{ -uint8_t x_18; -x_18 = 1; -return x_18; +uint8_t x_11; +x_11 = 1; +return x_11; } } } @@ -36385,7 +36784,7 @@ lean_dec(x_12); x_20 = lean_ctor_get(x_18, 0); lean_inc(x_20); lean_dec(x_18); -x_21 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_20); +x_21 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_20); lean_dec(x_20); x_22 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_22, 0, x_21); @@ -36652,7 +37051,7 @@ x_6 = l_Lean_Parser_declareBuiltinParser(x_1, x_5, x_2, x_3, x_4); return x_6; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__1() { _start: { lean_object* x_1; @@ -36660,7 +37059,7 @@ x_1 = lean_mk_string("' (`Parser` or `TrailingParser` expected"); return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2() { _start: { lean_object* x_1; lean_object* x_2; @@ -36670,7 +37069,7 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7) { _start: { uint8_t x_8; @@ -36710,7 +37109,7 @@ lean_object* x_28; lean_object* x_29; lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_28 = l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2; +x_28 = l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; x_29 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_29, 0, x_28); lean_ctor_set(x_29, 1, x_7); @@ -37189,7 +37588,7 @@ x_19 = l_Lean_Name_toStringWithSep___main(x_18, x_4); x_20 = l_Lean_Parser_mkParserOfConstantUnsafe___closed__1; x_21 = lean_string_append(x_20, x_19); lean_dec(x_19); -x_22 = l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__1; +x_22 = l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__1; x_23 = lean_string_append(x_21, x_22); x_24 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_24, 0, x_23); @@ -37222,13 +37621,13 @@ return x_104; } } } -lean_object* l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { uint8_t x_8; lean_object* x_9; x_8 = lean_unbox(x_6); lean_dec(x_6); -x_9 = l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add(x_1, x_2, x_3, x_4, x_5, x_8, x_7); +x_9 = l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add(x_1, x_2, x_3, x_4, x_5, x_8, x_7); lean_dec(x_5); return x_9; } @@ -37246,7 +37645,7 @@ _start: { lean_object* x_5; lean_inc(x_2); -x_5 = l___private_Init_Lean_Parser_Parser_16__addBuiltinParserCategory(x_2, x_3, x_4); +x_5 = l___private_Init_Lean_Parser_Parser_18__addBuiltinParserCategory(x_2, x_3, x_4); if (lean_obj_tag(x_5) == 0) { lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; lean_object* x_11; @@ -37254,7 +37653,7 @@ x_6 = lean_ctor_get(x_5, 1); lean_inc(x_6); lean_dec(x_5); lean_inc(x_1); -x_7 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___boxed), 7, 2); +x_7 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___boxed), 7, 2); lean_closure_set(x_7, 0, x_1); lean_closure_set(x_7, 1, x_2); x_8 = l_Lean_Parser_registerBuiltinParserAttribute___closed__1; @@ -37303,7 +37702,7 @@ x_6 = l_Lean_Parser_registerBuiltinParserAttribute(x_1, x_2, x_5, x_4); return x_6; } } -lean_object* _init_l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1___closed__1() { +lean_object* _init_l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1___closed__1() { _start: { lean_object* x_1; @@ -37311,7 +37710,7 @@ x_1 = lean_mk_string("invalid parser '"); return x_1; } } -lean_object* l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { if (lean_obj_tag(x_3) == 0) @@ -37341,7 +37740,7 @@ lean_inc(x_9); lean_dec(x_8); x_10 = l_Lean_Name_toString___closed__1; x_11 = l_Lean_Name_toStringWithSep___main(x_10, x_1); -x_12 = l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1___closed__1; +x_12 = l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1___closed__1; x_13 = lean_string_append(x_12, x_11); lean_dec(x_11); x_14 = l_Lean_registerTagAttribute___lambda__4___closed__3; @@ -37368,7 +37767,7 @@ goto _start; } } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; uint8_t x_6; @@ -37405,7 +37804,7 @@ lean_object* x_13; lean_object* x_14; x_13 = lean_ctor_get(x_7, 0); lean_inc(x_13); lean_dec(x_7); -x_14 = l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__3(x_13, x_4); +x_14 = l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__3(x_13, x_4); lean_dec(x_13); x_3 = x_9; x_4 = x_14; @@ -37420,7 +37819,7 @@ goto _start; } } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; uint8_t x_6; @@ -37446,7 +37845,7 @@ goto _start; } } } -lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__3(lean_object* x_1, lean_object* x_2) { +lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__3(lean_object* x_1, lean_object* x_2) { _start: { if (lean_obj_tag(x_1) == 0) @@ -37454,7 +37853,7 @@ if (lean_obj_tag(x_1) == 0) lean_object* x_3; lean_object* x_4; lean_object* x_5; x_3 = lean_ctor_get(x_1, 0); x_4 = lean_unsigned_to_nat(0u); -x_5 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__4(x_3, x_3, x_4, x_2); +x_5 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__4(x_3, x_3, x_4, x_2); return x_5; } else @@ -37462,21 +37861,21 @@ else lean_object* x_6; lean_object* x_7; lean_object* x_8; x_6 = lean_ctor_get(x_1, 0); x_7 = lean_unsigned_to_nat(0u); -x_8 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__5(x_6, x_6, x_7, x_2); +x_8 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__5(x_6, x_6, x_7, x_2); return x_8; } } } -lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__2(lean_object* x_1, lean_object* x_2) { +lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__2(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; x_3 = lean_ctor_get(x_1, 0); -x_4 = l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__3(x_3, x_2); +x_4 = l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__3(x_3, x_2); return x_4; } } -lean_object* l___private_Init_Lean_Parser_Parser_26__ParserAttribute_add(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_28__ParserAttribute_add(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7) { _start: { uint8_t x_8; @@ -37529,7 +37928,7 @@ lean_inc(x_20); x_21 = lean_box(0); x_22 = lean_apply_1(x_20, x_21); lean_inc(x_4); -x_23 = l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1(x_4, x_3, x_22, x_7); +x_23 = l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1(x_4, x_3, x_22, x_7); if (lean_obj_tag(x_23) == 0) { uint8_t x_24; @@ -37543,7 +37942,7 @@ lean_inc(x_26); lean_dec(x_19); x_27 = l_PersistentHashMap_empty___at_Lean_Parser_mkBuiltinSyntaxNodeKindSetRef___spec__1; x_28 = lean_apply_1(x_26, x_27); -x_29 = l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__2(x_28, x_25); +x_29 = l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__2(x_28, x_25); lean_dec(x_28); x_30 = lean_unbox(x_17); lean_inc(x_18); @@ -37595,7 +37994,7 @@ lean_inc(x_39); lean_dec(x_19); x_40 = l_PersistentHashMap_empty___at_Lean_Parser_mkBuiltinSyntaxNodeKindSetRef___spec__1; x_41 = lean_apply_1(x_39, x_40); -x_42 = l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__2(x_41, x_37); +x_42 = l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__2(x_41, x_37); lean_dec(x_41); x_43 = lean_unbox(x_17); lean_inc(x_18); @@ -37690,51 +38089,51 @@ return x_63; } } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__4(x_1, x_2, x_3, x_4); +x_5 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__4(x_1, x_2, x_3, x_4); lean_dec(x_2); lean_dec(x_1); return x_5; } } -lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__5(x_1, x_2, x_3, x_4); +x_5 = l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__5(x_1, x_2, x_3, x_4); lean_dec(x_2); lean_dec(x_1); return x_5; } } -lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__3___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__3___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__3(x_1, x_2); +x_3 = l_PersistentHashMap_foldlMAux___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__3(x_1, x_2); lean_dec(x_1); return x_3; } } -lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__2___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__2___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__2(x_1, x_2); +x_3 = l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__2(x_1, x_2); lean_dec(x_1); return x_3; } } -lean_object* l___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { uint8_t x_8; lean_object* x_9; x_8 = lean_unbox(x_6); lean_dec(x_6); -x_9 = l___private_Init_Lean_Parser_Parser_26__ParserAttribute_add(x_1, x_2, x_3, x_4, x_5, x_8, x_7); +x_9 = l___private_Init_Lean_Parser_Parser_28__ParserAttribute_add(x_1, x_2, x_3, x_4, x_5, x_8, x_7); lean_dec(x_5); return x_9; } @@ -37743,7 +38142,7 @@ lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1(lean_object* x_1, _start: { lean_object* x_8; -x_8 = l___private_Init_Lean_Parser_Parser_26__ParserAttribute_add(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l___private_Init_Lean_Parser_Parser_28__ParserAttribute_add(x_1, x_2, x_3, x_4, x_5, x_6, x_7); return x_8; } } @@ -37793,7 +38192,7 @@ x_5 = l_Lean_registerBuiltinAttribute(x_4, x_3); return x_5; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__1() { _start: { lean_object* x_1; @@ -37801,23 +38200,23 @@ x_1 = lean_mk_string("invalid parser attribute implementation builder arguments" return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__1; +x_1 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__1; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1(lean_object* x_1) { _start: { if (lean_obj_tag(x_1) == 0) { lean_object* x_2; -x_2 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2; +x_2 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2; return x_2; } else @@ -37835,7 +38234,7 @@ if (lean_obj_tag(x_4) == 0) { lean_object* x_5; lean_dec(x_3); -x_5 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2; +x_5 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2; return x_5; } else @@ -37869,7 +38268,7 @@ lean_object* x_12; lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); -x_12 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2; +x_12 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2; return x_12; } } @@ -37879,7 +38278,7 @@ lean_object* x_13; lean_dec(x_6); lean_dec(x_4); lean_dec(x_3); -x_13 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2; +x_13 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2; return x_13; } } @@ -37889,13 +38288,13 @@ else lean_object* x_14; lean_dec(x_3); lean_dec(x_1); -x_14 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2; +x_14 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2; return x_14; } } } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__1() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__1() { _start: { lean_object* x_1; @@ -37903,30 +38302,30 @@ x_1 = lean_mk_string("parserAttr"); return x_1; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__2() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__3() { +lean_object* _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__3() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1), 1, 0); +x_1 = lean_alloc_closure((void*)(l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1), 1, 0); return x_1; } } -lean_object* l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder(lean_object* x_1) { +lean_object* l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_2 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__2; -x_3 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__3; +x_2 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__2; +x_3 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__3; x_4 = l_Lean_registerAttributeImplBuilder(x_2, x_3, x_1); return x_4; } @@ -37958,7 +38357,7 @@ lean_ctor_set(x_13, 1, x_12); x_14 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_14, 0, x_10); lean_ctor_set(x_14, 1, x_13); -x_15 = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__2; +x_15 = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__2; x_16 = l_Lean_registerAttributeOfBuilder(x_8, x_15, x_14, x_9); return x_16; } @@ -39163,7 +39562,6 @@ lean_object* initialize_Init_Lean_ToExpr(lean_object*); lean_object* initialize_Init_Lean_Environment(lean_object*); lean_object* initialize_Init_Lean_Attributes(lean_object*); lean_object* initialize_Init_Lean_Message(lean_object*); -lean_object* initialize_Init_Lean_Parser_Identifier(lean_object*); lean_object* initialize_Init_Lean_Compiler_InitAttr(lean_object*); static bool _G_initialized = false; lean_object* initialize_Init_Lean_Parser_Parser(lean_object* w) { @@ -39191,9 +39589,6 @@ lean_dec_ref(res); res = initialize_Init_Lean_Message(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -res = initialize_Init_Lean_Parser_Identifier(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); res = initialize_Init_Lean_Compiler_InitAttr(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); @@ -39287,6 +39682,8 @@ l_Lean_Parser_mkTokenAndFixPos___closed__1 = _init_l_Lean_Parser_mkTokenAndFixPo lean_mark_persistent(l_Lean_Parser_mkTokenAndFixPos___closed__1); l_Lean_Parser_identFnAux___main___closed__1 = _init_l_Lean_Parser_identFnAux___main___closed__1(); lean_mark_persistent(l_Lean_Parser_identFnAux___main___closed__1); +l___private_Init_Lean_Parser_Parser_6__nameLitAux___closed__1 = _init_l___private_Init_Lean_Parser_Parser_6__nameLitAux___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_6__nameLitAux___closed__1); l_Lean_Parser_symbolInfo___closed__1 = _init_l_Lean_Parser_symbolInfo___closed__1(); lean_mark_persistent(l_Lean_Parser_symbolInfo___closed__1); l_Lean_Parser_nonReservedSymbolInfo___closed__1 = _init_l_Lean_Parser_nonReservedSymbolInfo___closed__1(); @@ -39323,6 +39720,10 @@ l_Lean_Parser_charLitFn___rarg___closed__1 = _init_l_Lean_Parser_charLitFn___rar lean_mark_persistent(l_Lean_Parser_charLitFn___rarg___closed__1); l_Lean_Parser_charLitNoAntiquot___closed__1 = _init_l_Lean_Parser_charLitNoAntiquot___closed__1(); lean_mark_persistent(l_Lean_Parser_charLitNoAntiquot___closed__1); +l_Lean_Parser_nameLitFn___rarg___closed__1 = _init_l_Lean_Parser_nameLitFn___rarg___closed__1(); +lean_mark_persistent(l_Lean_Parser_nameLitFn___rarg___closed__1); +l_Lean_Parser_nameLitNoAntiquot___closed__1 = _init_l_Lean_Parser_nameLitNoAntiquot___closed__1(); +lean_mark_persistent(l_Lean_Parser_nameLitNoAntiquot___closed__1); l_Lean_Parser_identFn___rarg___closed__1 = _init_l_Lean_Parser_identFn___rarg___closed__1(); lean_mark_persistent(l_Lean_Parser_identFn___rarg___closed__1); l_Lean_Parser_identNoAntiquot___closed__1 = _init_l_Lean_Parser_identNoAntiquot___closed__1(); @@ -39393,26 +39794,26 @@ l_Lean_Parser_dollarSymbol___closed__1 = _init_l_Lean_Parser_dollarSymbol___clos lean_mark_persistent(l_Lean_Parser_dollarSymbol___closed__1); l_Lean_Parser_dollarSymbol___closed__2 = _init_l_Lean_Parser_dollarSymbol___closed__2(); lean_mark_persistent(l_Lean_Parser_dollarSymbol___closed__2); -l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___closed__1 = _init_l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_9__noImmediateColon___elambda__1___rarg___closed__1); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__3 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__3(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__3); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__4 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__4(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__4); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6); -l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__7 = _init_l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__7(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__7); +l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___closed__1 = _init_l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_11__noImmediateColon___elambda__1___rarg___closed__1); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__3 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__3(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__3); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__4 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__4(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__4); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6); +l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__7 = _init_l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__7(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__7); l_Lean_Parser_mkAntiquot___closed__1 = _init_l_Lean_Parser_mkAntiquot___closed__1(); lean_mark_persistent(l_Lean_Parser_mkAntiquot___closed__1); l_Lean_Parser_mkAntiquot___closed__2 = _init_l_Lean_Parser_mkAntiquot___closed__2(); @@ -39453,6 +39854,8 @@ l_Lean_Parser_strLit___closed__1 = _init_l_Lean_Parser_strLit___closed__1(); lean_mark_persistent(l_Lean_Parser_strLit___closed__1); l_Lean_Parser_charLit___closed__1 = _init_l_Lean_Parser_charLit___closed__1(); lean_mark_persistent(l_Lean_Parser_charLit___closed__1); +l_Lean_Parser_nameLit___closed__1 = _init_l_Lean_Parser_nameLit___closed__1(); +lean_mark_persistent(l_Lean_Parser_nameLit___closed__1); l_Lean_Parser_categoryParserOfStackFn___closed__1 = _init_l_Lean_Parser_categoryParserOfStackFn___closed__1(); lean_mark_persistent(l_Lean_Parser_categoryParserOfStackFn___closed__1); l_Lean_Parser_categoryParserOfStackFn___closed__2 = _init_l_Lean_Parser_categoryParserOfStackFn___closed__2(); @@ -39476,30 +39879,30 @@ if (lean_io_result_is_error(res)) return res; l_Lean_Parser_builtinParserCategoriesRef = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_Parser_builtinParserCategoriesRef); lean_dec_ref(res); -l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__1 = _init_l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__1); -l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2 = _init_l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_14__throwParserCategoryAlreadyDefined___rarg___closed__2); +l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__1 = _init_l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__1); +l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2 = _init_l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_16__throwParserCategoryAlreadyDefined___rarg___closed__2); l_Lean_Parser_ParserExtensionState_inhabited___closed__1 = _init_l_Lean_Parser_ParserExtensionState_inhabited___closed__1(); lean_mark_persistent(l_Lean_Parser_ParserExtensionState_inhabited___closed__1); l_Lean_Parser_ParserExtensionState_inhabited = _init_l_Lean_Parser_ParserExtensionState_inhabited(); lean_mark_persistent(l_Lean_Parser_ParserExtensionState_inhabited); -l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__1 = _init_l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__1); -l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__2 = _init_l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__2(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__2); -l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__3 = _init_l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__3(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_18__mergePrecendences___closed__3); -l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__1 = _init_l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__1); -l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__2 = _init_l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__2(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__2); -l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__3 = _init_l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__3(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_19__addTokenConfig___closed__3); +l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__1 = _init_l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__1); +l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__2 = _init_l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__2); +l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__3 = _init_l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__3(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_20__mergePrecendences___closed__3); +l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__1 = _init_l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__1); +l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__2 = _init_l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__2); +l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__3 = _init_l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__3(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_21__addTokenConfig___closed__3); l_Lean_Parser_throwUnknownParserCategory___rarg___closed__1 = _init_l_Lean_Parser_throwUnknownParserCategory___rarg___closed__1(); lean_mark_persistent(l_Lean_Parser_throwUnknownParserCategory___rarg___closed__1); -l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens___closed__1 = _init_l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_21__updateBuiltinTokens___closed__1); +l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens___closed__1 = _init_l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_23__updateBuiltinTokens___closed__1); l_Lean_Parser_compileParserDescr___main___closed__1 = _init_l_Lean_Parser_compileParserDescr___main___closed__1(); lean_mark_persistent(l_Lean_Parser_compileParserDescr___main___closed__1); l_Lean_Parser_mkParserOfConstantUnsafe___closed__1 = _init_l_Lean_Parser_mkParserOfConstantUnsafe___closed__1(); @@ -39582,27 +39985,27 @@ l_Lean_Parser_declareTrailingBuiltinParser___closed__1 = _init_l_Lean_Parser_dec lean_mark_persistent(l_Lean_Parser_declareTrailingBuiltinParser___closed__1); l_Lean_Parser_declareTrailingBuiltinParser___closed__2 = _init_l_Lean_Parser_declareTrailingBuiltinParser___closed__2(); lean_mark_persistent(l_Lean_Parser_declareTrailingBuiltinParser___closed__2); -l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__1 = _init_l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__1); -l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2 = _init_l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_25__BuiltinParserAttribute_add___closed__2); +l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__1 = _init_l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__1); +l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2 = _init_l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2); l_Lean_Parser_registerBuiltinParserAttribute___closed__1 = _init_l_Lean_Parser_registerBuiltinParserAttribute___closed__1(); lean_mark_persistent(l_Lean_Parser_registerBuiltinParserAttribute___closed__1); -l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1___closed__1 = _init_l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1___closed__1(); -lean_mark_persistent(l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_26__ParserAttribute_add___spec__1___closed__1); +l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1___closed__1 = _init_l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1___closed__1(); +lean_mark_persistent(l_List_foldlM___main___at___private_Init_Lean_Parser_Parser_28__ParserAttribute_add___spec__1___closed__1); l_Lean_Parser_mkParserAttributeImpl___closed__1 = _init_l_Lean_Parser_mkParserAttributeImpl___closed__1(); lean_mark_persistent(l_Lean_Parser_mkParserAttributeImpl___closed__1); -l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__1 = _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__1); -l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2 = _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___lambda__1___closed__2); -l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__1 = _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__1(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__1); -l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__2 = _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__2(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__2); -l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__3 = _init_l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__3(); -lean_mark_persistent(l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder___closed__3); -res = l___private_Init_Lean_Parser_Parser_27__registerParserAttributeImplBuilder(lean_io_mk_world()); +l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__1 = _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__1); +l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2 = _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___lambda__1___closed__2); +l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__1 = _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__1); +l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__2 = _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__2); +l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__3 = _init_l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__3(); +lean_mark_persistent(l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder___closed__3); +res = l___private_Init_Lean_Parser_Parser_29__registerParserAttributeImplBuilder(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); l_Lean_Parser_regBuiltinTermParserAttr___closed__1 = _init_l_Lean_Parser_regBuiltinTermParserAttr___closed__1(); diff --git a/stage0/stdlib/Init/Lean/Parser/Syntax.c b/stage0/stdlib/Init/Lean/Parser/Syntax.c index 38ecba9997..d71c312799 100644 --- a/stage0/stdlib/Init/Lean/Parser/Syntax.c +++ b/stage0/stdlib/Init/Lean/Parser/Syntax.c @@ -33,7 +33,6 @@ lean_object* l_Lean_Parser_Command_notation___closed__7; lean_object* l_Lean_Parser_Command_macroArgSimple___closed__3; lean_object* l_Lean_Parser_Command_macroTailTactic___closed__1; lean_object* l_Lean_Parser_precedence___elambda__1___closed__6; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_Command_macro__rules___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_mixfixKind___closed__2; lean_object* l_Lean_Parser_Command_infixr___elambda__1___closed__3; @@ -66,6 +65,7 @@ lean_object* l_Lean_Parser_Command_macroTailDefault___closed__8; lean_object* l_Lean_Parser_Command_reserve___elambda__1___closed__7; lean_object* l_Lean_Parser_regBuiltinSyntaxParserAttr___closed__2; lean_object* l_Lean_Parser_Command_infixr___elambda__1(lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; extern lean_object* l_Lean_Parser_regBuiltinCommandParserAttr___closed__4; lean_object* l_Lean_Parser_Syntax_paren___elambda__1___closed__5; lean_object* l_Lean_Parser_Command_quotedSymbolPrec___closed__5; @@ -286,7 +286,6 @@ lean_object* l_Lean_Parser_Command_notation; lean_object* l___regBuiltinParser_Lean_Parser_Command_notation(lean_object*); lean_object* l_Lean_Parser_Syntax_ident___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_macro___closed__7; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Command_macro__rules(lean_object*); lean_object* l_Lean_Parser_Syntax_paren___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_macro__rules___elambda__1___closed__6; @@ -332,7 +331,6 @@ lean_object* l_Lean_Parser_Syntax_optional___elambda__1___closed__4; lean_object* l_Lean_Parser_orelseInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_Syntax_char___closed__4; lean_object* l_Lean_Parser_Command_syntax___elambda__1___closed__3; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_Syntax_lookahead___closed__3; lean_object* l_Lean_Parser_Term_matchAlt___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_mixfixSymbol___closed__2; @@ -344,6 +342,7 @@ extern lean_object* l_Lean_Parser_Level_num___elambda__1___closed__5; extern 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_maxPrec; +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Syntax_str(lean_object*); lean_object* l_Lean_Parser_Syntax_ident___elambda__1___closed__3; extern lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; @@ -391,7 +390,6 @@ extern lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_notation___elambda__1___closed__6; lean_object* l_Lean_Parser_Command_reserve; lean_object* l_Lean_Parser_Syntax_sepBy___closed__1; -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_Command_mixfixKind; lean_object* l_Lean_Parser_Syntax_ident___closed__2; lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); @@ -432,6 +430,7 @@ lean_object* l_Lean_Parser_precedence; lean_object* l_Lean_Parser_quotedSymbolFn___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Syntax_sepBy1___elambda__1___closed__2; lean_object* l_Lean_Parser_precedenceLit___closed__3; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Syntax_optional; lean_object* l_Lean_Parser_Syntax_atom___closed__1; lean_object* l_Lean_Parser_Command_macroTailTactic___closed__4; @@ -441,7 +440,6 @@ lean_object* l_Lean_Parser_Command_syntaxCat___closed__6; lean_object* l_Lean_Parser_Command_infix___elambda__1___closed__6; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Syntax_paren___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_mixfix___closed__5; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_sepBy1(lean_object*); lean_object* l_Lean_Parser_Command_identPrec___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_reserve___elambda__1___closed__8; @@ -477,6 +475,7 @@ lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_ob lean_object* l_Lean_Parser_Syntax_cat___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_reserve___closed__6; lean_object* l_Lean_Parser_Syntax_sepBy1___closed__1; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; extern lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__9; uint8_t lean_nat_dec_le(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__8; @@ -513,6 +512,7 @@ extern lean_object* l_Lean_Parser_epsilonInfo; lean_object* l_Lean_Parser_Command_macroTailDefault; lean_object* l_Lean_Parser_Command_mixfix___closed__6; lean_object* l_Lean_Parser_unquotedSymbol(uint8_t); +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_Command_macro___elambda__1___closed__7; lean_object* l_Lean_Parser_Syntax_ident___closed__1; extern lean_object* l_Lean_Parser_Term_typeAscription___closed__1; @@ -552,6 +552,7 @@ lean_object* l_Lean_Parser_Command_notation___elambda__1___closed__3; lean_object* l_Lean_Parser_Command_mixfixKind___closed__6; lean_object* l_Lean_Parser_Command_macro___elambda__1___closed__8; extern lean_object* l_Lean_Level_LevelToFormat_Result_format___main___closed__3; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_Syntax_orelse___closed__2; lean_object* l_Lean_Parser_Command_syntax___elambda__1___closed__4; lean_object* l_Lean_Parser_Syntax_char___closed__3; @@ -596,7 +597,6 @@ lean_object* l_Lean_Parser_mkAntiquot(uint8_t, lean_object*, lean_object*, uint8 lean_object* l_Lean_Parser_Command_macroTailCommand; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Command_macro__rules___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_syntaxCat___closed__1; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_Command_macro__rules; lean_object* l_Lean_Parser_Command_syntaxCat___elambda__1___closed__2; lean_object* l_Lean_Parser_Command_infix___elambda__1___closed__7; @@ -1204,7 +1204,7 @@ if (lean_obj_tag(x_28) == 0) lean_object* x_29; lean_object* x_30; x_29 = lean_ctor_get(x_27, 0); lean_inc(x_29); -x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_29); +x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_29); lean_dec(x_29); if (lean_obj_tag(x_30) == 2) { @@ -1562,7 +1562,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Syntax_paren___elambda__1___closed__2; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -1582,7 +1582,7 @@ _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; x_1 = 0; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3 = l_Lean_Parser_Syntax_paren___elambda__1___closed__4; x_4 = 1; x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); @@ -1653,7 +1653,7 @@ if (lean_obj_tag(x_68) == 0) lean_object* x_69; lean_object* x_70; x_69 = lean_ctor_get(x_67, 0); lean_inc(x_69); -x_70 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_69); +x_70 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_69); lean_dec(x_69); if (lean_obj_tag(x_70) == 2) { @@ -1661,7 +1661,7 @@ lean_object* x_71; lean_object* x_72; uint8_t x_73; x_71 = lean_ctor_get(x_70, 1); lean_inc(x_71); lean_dec(x_70); -x_72 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_72 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_73 = lean_string_dec_eq(x_71, x_72); lean_dec(x_71); if (x_73 == 0) @@ -1718,7 +1718,7 @@ 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); +x_23 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_22); lean_dec(x_22); if (lean_obj_tag(x_23) == 2) { @@ -1726,7 +1726,7 @@ 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___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_25 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_26 = lean_string_dec_eq(x_24, x_25); lean_dec(x_24); if (x_26 == 0) @@ -1865,7 +1865,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Syntax_paren___closed__1; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -1874,7 +1874,7 @@ lean_object* _init_l_Lean_Parser_Syntax_paren___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; x_2 = l_Lean_Parser_Syntax_paren___closed__2; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -4507,7 +4507,7 @@ if (lean_obj_tag(x_10) == 0) lean_object* x_11; lean_object* x_12; x_11 = lean_ctor_get(x_9, 0); lean_inc(x_11); -x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_11); +x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_11); lean_dec(x_11); if (lean_obj_tag(x_12) == 2) { @@ -4664,7 +4664,7 @@ if (lean_obj_tag(x_10) == 0) lean_object* x_11; lean_object* x_12; x_11 = lean_ctor_get(x_9, 0); lean_inc(x_11); -x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_11); +x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_11); lean_dec(x_11); if (lean_obj_tag(x_12) == 2) { @@ -4834,7 +4834,7 @@ if (lean_obj_tag(x_10) == 0) lean_object* x_11; lean_object* x_12; x_11 = lean_ctor_get(x_9, 0); lean_inc(x_11); -x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_11); +x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_11); lean_dec(x_11); if (lean_obj_tag(x_12) == 2) { @@ -5324,7 +5324,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -5589,7 +5589,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -5854,7 +5854,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -6119,7 +6119,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -6384,7 +6384,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -6948,7 +6948,7 @@ if (lean_obj_tag(x_33) == 0) lean_object* x_34; lean_object* x_35; x_34 = lean_ctor_get(x_32, 0); lean_inc(x_34); -x_35 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_34); +x_35 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_34); lean_dec(x_34); if (lean_obj_tag(x_35) == 2) { @@ -7373,7 +7373,7 @@ if (lean_obj_tag(x_53) == 0) lean_object* x_54; lean_object* x_55; x_54 = lean_ctor_get(x_52, 0); lean_inc(x_54); -x_55 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_54); +x_55 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_54); lean_dec(x_54); if (lean_obj_tag(x_55) == 2) { @@ -8296,7 +8296,7 @@ if (lean_obj_tag(x_78) == 0) lean_object* x_79; lean_object* x_80; x_79 = lean_ctor_get(x_77, 0); lean_inc(x_79); -x_80 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_79); +x_80 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_79); lean_dec(x_79); if (lean_obj_tag(x_80) == 2) { @@ -8380,7 +8380,7 @@ if (lean_obj_tag(x_58) == 0) lean_object* x_59; lean_object* x_60; x_59 = lean_ctor_get(x_57, 0); lean_inc(x_59); -x_60 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_59); +x_60 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_59); lean_dec(x_59); if (lean_obj_tag(x_60) == 2) { @@ -9067,7 +9067,7 @@ if (lean_obj_tag(x_53) == 0) lean_object* x_54; lean_object* x_55; x_54 = lean_ctor_get(x_52, 0); lean_inc(x_54); -x_55 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_54); +x_55 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_54); lean_dec(x_54); if (lean_obj_tag(x_55) == 2) { @@ -9748,7 +9748,7 @@ if (lean_obj_tag(x_166) == 0) lean_object* x_167; lean_object* x_168; x_167 = lean_ctor_get(x_165, 0); lean_inc(x_167); -x_168 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_167); +x_168 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_167); lean_dec(x_167); if (lean_obj_tag(x_168) == 2) { @@ -9814,7 +9814,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -9973,7 +9973,7 @@ if (lean_obj_tag(x_142) == 0) lean_object* x_143; lean_object* x_144; x_143 = lean_ctor_get(x_141, 0); lean_inc(x_143); -x_144 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_143); +x_144 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_143); lean_dec(x_143); if (lean_obj_tag(x_144) == 2) { @@ -10155,7 +10155,7 @@ if (lean_obj_tag(x_107) == 0) lean_object* x_108; lean_object* x_109; x_108 = lean_ctor_get(x_106, 0); lean_inc(x_108); -x_109 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_108); +x_109 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_108); lean_dec(x_108); if (lean_obj_tag(x_109) == 2) { @@ -10601,7 +10601,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -11213,7 +11213,7 @@ if (lean_obj_tag(x_26) == 0) lean_object* x_27; lean_object* x_28; x_27 = lean_ctor_get(x_25, 0); lean_inc(x_27); -x_28 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_27); +x_28 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_27); lean_dec(x_27); if (lean_obj_tag(x_28) == 2) { @@ -11806,7 +11806,7 @@ if (lean_obj_tag(x_73) == 0) lean_object* x_74; lean_object* x_75; x_74 = lean_ctor_get(x_72, 0); lean_inc(x_74); -x_75 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_74); +x_75 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_74); lean_dec(x_74); if (lean_obj_tag(x_75) == 2) { @@ -11880,7 +11880,7 @@ if (lean_obj_tag(x_12) == 0) lean_object* x_13; lean_object* x_14; x_13 = lean_ctor_get(x_11, 0); lean_inc(x_13); -x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_13); +x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_13); lean_dec(x_13); if (lean_obj_tag(x_14) == 2) { @@ -11888,7 +11888,7 @@ lean_object* x_15; lean_object* x_16; uint8_t x_17; x_15 = lean_ctor_get(x_14, 1); lean_inc(x_15); lean_dec(x_14); -x_16 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_16 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_17 = lean_string_dec_eq(x_15, x_16); lean_dec(x_15); if (x_17 == 0) @@ -11962,7 +11962,7 @@ if (lean_obj_tag(x_31) == 0) lean_object* x_32; lean_object* x_33; x_32 = lean_ctor_get(x_30, 0); lean_inc(x_32); -x_33 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_32); +x_33 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_32); lean_dec(x_32); if (lean_obj_tag(x_33) == 2) { @@ -12244,7 +12244,7 @@ if (lean_obj_tag(x_94) == 0) lean_object* x_95; lean_object* x_96; x_95 = lean_ctor_get(x_93, 0); lean_inc(x_95); -x_96 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_95); +x_96 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_95); lean_dec(x_95); if (lean_obj_tag(x_96) == 2) { @@ -12309,7 +12309,7 @@ if (lean_obj_tag(x_8) == 0) lean_object* x_9; lean_object* x_10; x_9 = lean_ctor_get(x_7, 0); lean_inc(x_9); -x_10 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_9); +x_10 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_9); lean_dec(x_9); if (lean_obj_tag(x_10) == 2) { @@ -12317,7 +12317,7 @@ lean_object* x_11; lean_object* x_12; uint8_t x_13; x_11 = lean_ctor_get(x_10, 1); lean_inc(x_11); lean_dec(x_10); -x_12 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_12 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_13 = lean_string_dec_eq(x_11, x_12); lean_dec(x_11); if (x_13 == 0) @@ -12468,7 +12468,7 @@ if (lean_obj_tag(x_52) == 0) lean_object* x_53; lean_object* x_54; x_53 = lean_ctor_get(x_51, 0); lean_inc(x_53); -x_54 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_53); +x_54 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_53); lean_dec(x_53); if (lean_obj_tag(x_54) == 2) { @@ -12649,7 +12649,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Term_stxQuot___closed__2; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -12745,7 +12745,7 @@ if (lean_obj_tag(x_87) == 0) lean_object* x_88; lean_object* x_89; x_88 = lean_ctor_get(x_86, 0); lean_inc(x_88); -x_89 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_88); +x_89 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_88); lean_dec(x_88); if (lean_obj_tag(x_89) == 2) { @@ -12822,7 +12822,7 @@ if (lean_obj_tag(x_46) == 0) lean_object* x_47; lean_object* x_48; x_47 = lean_ctor_get(x_45, 0); lean_inc(x_47); -x_48 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_47); +x_48 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_47); lean_dec(x_47); if (lean_obj_tag(x_48) == 2) { @@ -12942,7 +12942,7 @@ if (lean_obj_tag(x_32) == 0) lean_object* x_33; lean_object* x_34; x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); -x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_33); lean_dec(x_33); if (lean_obj_tag(x_34) == 2) { @@ -12950,7 +12950,7 @@ lean_object* x_35; lean_object* x_36; uint8_t x_37; x_35 = lean_ctor_get(x_34, 1); lean_inc(x_35); lean_dec(x_34); -x_36 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_36 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_37 = lean_string_dec_eq(x_35, x_36); lean_dec(x_35); if (x_37 == 0) @@ -13162,7 +13162,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Command_macroTailDefault___closed__2; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -13614,7 +13614,7 @@ if (lean_obj_tag(x_43) == 0) lean_object* x_44; lean_object* x_45; x_44 = lean_ctor_get(x_42, 0); lean_inc(x_44); -x_45 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_44); +x_45 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_44); lean_dec(x_44); if (lean_obj_tag(x_45) == 2) { diff --git a/stage0/stdlib/Init/Lean/Parser/Tactic.c b/stage0/stdlib/Init/Lean/Parser/Tactic.c index 0eb866c7df..d1666f1b69 100644 --- a/stage0/stdlib/Init/Lean/Parser/Tactic.c +++ b/stage0/stdlib/Init/Lean/Parser/Tactic.c @@ -29,7 +29,6 @@ lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__ lean_object* l_Lean_Parser_Term_tacticStxQuot___closed__4; lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4; extern lean_object* l_Lean_Parser_manyAux___main___closed__1; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_Term_tacticStxQuot___closed__5; lean_object* l_Lean_Parser_Tactic_case___closed__6; lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*); @@ -51,6 +50,7 @@ extern lean_object* l_Lean_Parser_Term_have___elambda__1___closed__10; lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_seq; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_Tactic_skip___closed__3; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_traceState___elambda__1___closed__5; @@ -175,7 +175,6 @@ lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__3; lean_object* l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot(lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__6; lean_object* l_Lean_Parser_Tactic_nonEmptySeq___elambda__1___boxed(lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_intros___closed__2; lean_object* l_Lean_Parser_Tactic_allGoals___elambda__1___closed__7; @@ -195,7 +194,6 @@ lean_object* l_Lean_Parser_Tactic_intro___elambda__1(lean_object*, lean_object*, lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__1; lean_object* l_Lean_Parser_Tactic_exact___elambda__1___closed__1; lean_object* l_Lean_Parser_orelseInfo(lean_object*, lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Term_tacticBlock(lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__10; extern lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__13; @@ -203,6 +201,7 @@ extern lean_object* l_Lean_Parser_termParser___closed__2; lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__6; lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__7; +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); lean_object* l_Lean_Parser_Tactic_exact___closed__3; lean_object* l_Lean_Parser_Tactic_paren___closed__5; extern lean_object* l_Lean_Parser_Level_paren___elambda__1___closed__11; @@ -236,7 +235,6 @@ lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1(lean_object*, l extern lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_apply; lean_object* l_Lean_Parser_Tactic_assumption___closed__5; -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_paren___closed__1; lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7; @@ -257,9 +255,9 @@ lean_object* l_Lean_Parser_categoryParserFn(lean_object*, lean_object*, lean_obj lean_object* l_Lean_Parser_Tactic_intros___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot___closed__2; lean_object* l_Lean_Parser_sepBy1Info(lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_skip___elambda__1___closed__6; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Tactic_underscoreFn(uint8_t, lean_object*); lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_refine___closed__1; @@ -273,6 +271,7 @@ lean_object* l_Lean_Parser_Tactic_skip___elambda__1___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_allGoals(lean_object*); lean_object* l_Lean_Parser_Tactic_underscoreFn___rarg___closed__3; lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; lean_object* l_Lean_Parser_Tactic_refine___closed__4; lean_object* l_Lean_Parser_categoryParser(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_exact; @@ -290,6 +289,7 @@ lean_object* l_Lean_Parser_Tactic_orelse___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__4; lean_object* l_Lean_Parser_Tactic_assumption___closed__3; lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__7; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; extern lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__11; lean_object* l_Lean_Parser_Term_tacticBlock___closed__4; lean_object* l_Lean_Parser_Term_tacticBlock___closed__1; @@ -307,6 +307,7 @@ lean_object* l_Lean_Parser_Tactic_intros; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__5; lean_object* l_Lean_Parser_Tactic_case___closed__7; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_exact___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_paren(lean_object*); @@ -332,7 +333,6 @@ lean_object* l_Lean_Parser_mkAntiquot(uint8_t, lean_object*, lean_object*, uint8 lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__5; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__7; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__3; lean_object* l_Lean_Parser_Tactic_allGoals___closed__4; lean_object* l_Lean_Parser_Tactic_intro___closed__1; @@ -536,7 +536,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_14; lean_object* x_15; x_14 = lean_ctor_get(x_4, 0); lean_inc(x_14); -x_15 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_14); +x_15 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_14); lean_dec(x_14); if (lean_obj_tag(x_15) == 2) { @@ -586,7 +586,7 @@ block_13: lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_7 = lean_ctor_get(x_6, 0); lean_inc(x_7); -x_8 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_7); +x_8 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_7); lean_dec(x_7); x_9 = l_Lean_Parser_ParserState_popSyntax(x_6); x_10 = l_Lean_Parser_Tactic_underscoreFn___rarg___closed__4; @@ -772,7 +772,7 @@ if (lean_obj_tag(x_34) == 0) lean_object* x_35; lean_object* x_36; x_35 = lean_ctor_get(x_33, 0); lean_inc(x_35); -x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_35); lean_dec(x_35); if (lean_obj_tag(x_36) == 2) { @@ -3675,7 +3675,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -3695,7 +3695,7 @@ _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; x_1 = 0; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3 = l_Lean_Parser_Tactic_paren___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); @@ -3766,7 +3766,7 @@ if (lean_obj_tag(x_55) == 0) lean_object* x_56; lean_object* x_57; x_56 = lean_ctor_get(x_54, 0); lean_inc(x_56); -x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_56); lean_dec(x_56); if (lean_obj_tag(x_57) == 2) { @@ -3774,7 +3774,7 @@ lean_object* x_58; lean_object* x_59; uint8_t x_60; x_58 = lean_ctor_get(x_57, 1); lean_inc(x_58); lean_dec(x_57); -x_59 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_59 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_60 = lean_string_dec_eq(x_58, x_59); lean_dec(x_58); if (x_60 == 0) @@ -3839,7 +3839,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -3847,7 +3847,7 @@ lean_object* x_26; lean_object* x_27; uint8_t x_28; x_26 = lean_ctor_get(x_25, 1); lean_inc(x_26); lean_dec(x_25); -x_27 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_27 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_28 = lean_string_dec_eq(x_26, x_27); lean_dec(x_26); if (x_28 == 0) @@ -3934,7 +3934,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Tactic_nonEmptySeq; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -3943,7 +3943,7 @@ lean_object* _init_l_Lean_Parser_Tactic_paren___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; x_2 = l_Lean_Parser_Tactic_paren___closed__1; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -4213,7 +4213,7 @@ if (lean_obj_tag(x_55) == 0) lean_object* x_56; lean_object* x_57; x_56 = lean_ctor_get(x_54, 0); lean_inc(x_56); -x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_56); lean_dec(x_56); if (lean_obj_tag(x_57) == 2) { @@ -4286,7 +4286,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -4582,7 +4582,7 @@ if (lean_obj_tag(x_55) == 0) lean_object* x_56; lean_object* x_57; x_56 = lean_ctor_get(x_54, 0); lean_inc(x_56); -x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_56); lean_dec(x_56); if (lean_obj_tag(x_57) == 2) { @@ -4655,7 +4655,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -4905,7 +4905,7 @@ if (lean_obj_tag(x_10) == 0) lean_object* x_11; lean_object* x_12; x_11 = lean_ctor_get(x_9, 0); lean_inc(x_11); -x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_11); +x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_11); lean_dec(x_11); if (lean_obj_tag(x_12) == 2) { @@ -5171,7 +5171,7 @@ if (lean_obj_tag(x_55) == 0) lean_object* x_56; lean_object* x_57; x_56 = lean_ctor_get(x_54, 0); lean_inc(x_56); -x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_56); lean_dec(x_56); if (lean_obj_tag(x_57) == 2) { @@ -5244,7 +5244,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -5500,7 +5500,7 @@ if (lean_obj_tag(x_41) == 0) lean_object* x_42; lean_object* x_43; x_42 = lean_ctor_get(x_40, 0); lean_inc(x_42); -x_43 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_42); +x_43 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_42); lean_dec(x_42); if (lean_obj_tag(x_43) == 2) { @@ -5572,7 +5572,7 @@ if (lean_obj_tag(x_14) == 0) lean_object* x_15; lean_object* x_16; x_15 = lean_ctor_get(x_13, 0); lean_inc(x_15); -x_16 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_15); +x_16 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_15); lean_dec(x_15); if (lean_obj_tag(x_16) == 2) { @@ -5580,7 +5580,7 @@ lean_object* x_17; lean_object* x_18; uint8_t x_19; x_17 = lean_ctor_get(x_16, 1); lean_inc(x_17); lean_dec(x_16); -x_18 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_18 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_19 = lean_string_dec_eq(x_17, x_18); lean_dec(x_17); if (x_19 == 0) @@ -5660,7 +5660,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Tactic_seq___closed__2; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } diff --git a/stage0/stdlib/Init/Lean/Parser/Term.c b/stage0/stdlib/Init/Lean/Parser/Term.c index eacd0ef6a9..a8751a5933 100644 --- a/stage0/stdlib/Init/Lean/Parser/Term.c +++ b/stage0/stdlib/Init/Lean/Parser/Term.c @@ -57,7 +57,6 @@ lean_object* l_Lean_Parser_Term_or___closed__1; lean_object* l_Lean_Parser_sepByFn___at_Lean_Parser_Term_listLit___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_namedPattern___elambda__1___closed__2; extern lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__4; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_Term_cdot___closed__2; lean_object* l_Lean_Parser_Term_char___closed__2; lean_object* l_Lean_Parser_Term_bor; @@ -88,6 +87,7 @@ lean_object* l_Lean_Parser_Term_bnot___closed__4; lean_object* l_Lean_Parser_Term_sub___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_mkError(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_optType___closed__2; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__7; lean_object* l_Lean_Parser_Term_sort___elambda__1___closed__8; lean_object* l___regBuiltinParser_Lean_Parser_Term_dollarProj(lean_object*); lean_object* l_Lean_Parser_darrow___elambda__1___boxed(lean_object*); @@ -174,6 +174,7 @@ lean_object* l_Lean_Parser_Term_seqLeft___closed__2; lean_object* l_Lean_Parser_Term_namedArgument___closed__5; lean_object* l_Lean_Parser_Term_letEqns___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_show___elambda__1___closed__8; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_Term_match; lean_object* l_Lean_Parser_Term_depArrow; lean_object* l_Lean_Parser_Term_heq___elambda__1___closed__1; @@ -208,6 +209,7 @@ lean_object* l_Lean_Parser_Term_simpleBinder___closed__1; lean_object* l_Lean_Parser_Term_do___closed__3; lean_object* l_Lean_Parser_Term_div___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_if___closed__10; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__3; lean_object* l_Lean_Parser_Term_namedPattern___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_leftArrow___elambda__1___rarg___closed__5; lean_object* l_Lean_Parser_Term_prop; @@ -285,7 +287,6 @@ lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__6; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_listLit___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_fromTerm___elambda__1___closed__2; -extern lean_object* l_Lean_formatDataValue___closed__1; lean_object* l_Lean_Parser_Term_quotedName___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_beq___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_subtype___closed__2; @@ -318,7 +319,6 @@ lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__9; 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_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; @@ -354,7 +354,6 @@ lean_object* l_Lean_Parser_Term_match___elambda__1___closed__11; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match__syntax___spec__1(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_let___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_not___closed__3; -lean_object* l_Lean_Parser_Term_quotedName___closed__6; lean_object* l_Lean_Parser_addBuiltinParser(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_letEqns___closed__3; lean_object* l_Lean_Parser_Term_optIdent___closed__4; @@ -432,7 +431,6 @@ lean_object* l_Lean_Parser_darrow___elambda__1___rarg___closed__4; lean_object* l_Lean_Parser_Term_proj___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_bnot___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_instBinder___closed__7; -lean_object* l_Lean_Parser_Term_quotedName___elambda__1___closed__9; lean_object* lean_string_utf8_byte_size(lean_object*); lean_object* l_Lean_Parser_Term_leftArrow___elambda__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_if; @@ -573,7 +571,6 @@ extern lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__1; lean_object* l_Lean_Parser_Term_let___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Term_app(lean_object*); lean_object* l_Lean_Parser_Term_structInst___closed__9; -lean_object* l_Lean_Parser_Term_quotedName___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_dollarProj___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_tupleTail___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_hole___closed__4; @@ -699,7 +696,6 @@ lean_object* l_Lean_Parser_Term_namedPattern___elambda__1___closed__7; lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_binderTactic; lean_object* l_Lean_Parser_Term_namedArgument___elambda__1___closed__3; -lean_object* l_Lean_Parser_Term_quotedName___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_mapRev___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Term_forall(lean_object*); lean_object* l_Lean_Parser_Term_proj___closed__8; @@ -776,7 +772,6 @@ lean_object* l_Lean_Parser_Term_typeSpec; lean_object* l_Lean_Parser_Term_orM___closed__2; lean_object* l_Lean_Parser_Term_letPatDecl___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_fcomp___elambda__1___closed__3; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; lean_object* l_Lean_Parser_Term_paren___closed__8; lean_object* l_Lean_Parser_Term_append___closed__2; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___spec__1(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); @@ -832,6 +827,7 @@ lean_object* l_Lean_Parser_Term_sorry___closed__5; lean_object* l_Lean_Parser_Term_sub___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_fromTerm___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_show___closed__4; +lean_object* l_Lean_Parser_nameLit(uint8_t); lean_object* l_Lean_Parser_Term_subtype; lean_object* l_Lean_Parser_Term_suffices___elambda__1___closed__9; lean_object* l_Lean_Parser_Term_emptyC___elambda__1___closed__9; @@ -918,7 +914,6 @@ lean_object* l_Lean_Parser_Term_andthen___elambda__1(lean_object*, lean_object*, lean_object* l_Lean_Parser_Term_fcomp___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_cons; lean_object* l_Lean_Parser_Term_dollarProj___elambda__1___closed__5; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_Term_nomatch___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_explicitBinder___elambda__1___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Term_type(lean_object*); @@ -959,12 +954,12 @@ lean_object* l_Lean_Parser_Term_add___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_doElem___closed__2; lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_or___elambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); lean_object* l_Lean_Parser_Term_structInstSource___closed__3; lean_object* l___regBuiltinParser_Lean_Parser_Term_seq(lean_object*); lean_object* l_Lean_Parser_Term_equation; lean_object* l_Lean_Parser_Term_sub___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_bindOp___closed__2; -lean_object* l_Lean_Parser_rawIdent(uint8_t); lean_object* l_Lean_Parser_Term_uminus___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_uminus___closed__5; lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__2; @@ -1118,7 +1113,6 @@ lean_object* l_Lean_Parser_Term_and___closed__2; lean_object* l_Lean_Parser_Term_prop___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Term_mul(lean_object*); lean_object* l_Lean_Parser_Term_subtype___elambda__1___closed__5; -lean_object* l_Lean_Parser_Term_quotedName___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_sortApp___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_binderType___elambda__2(lean_object*); extern lean_object* l_Lean_Parser_Level_ident___elambda__1___closed__4; @@ -1136,7 +1130,6 @@ lean_object* l___regBuiltinParser_Lean_Parser_Term_mod(lean_object*); lean_object* l_Lean_Parser_Term_emptyC___closed__1; lean_object* l_Lean_Parser_Term_not___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_match__syntax___closed__4; -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_Term_show___closed__7; lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_arrayRef___elambda__1___closed__1; @@ -1238,6 +1231,7 @@ lean_object* l_Lean_Parser_Term_cdot___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_fcomp___closed__1; lean_object* l_Lean_Parser_Term_where___closed__5; lean_object* l_Lean_Parser_Term_dollar___closed__6; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Term_match__syntax___closed__2; lean_object* l_Lean_Parser_Term_tparser_x21___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_explicit___closed__3; @@ -1265,6 +1259,7 @@ 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; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; extern lean_object* l_Lean_Parser_appPrec; lean_object* l_Lean_Parser_Term_bnot___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_namedArgument___closed__8; @@ -1277,7 +1272,6 @@ lean_object* l_Lean_Parser_Term_cdot___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_mul___closed__1; lean_object* l_Lean_Parser_Term_proj___closed__7; lean_object* l_Lean_Parser_Term_if___elambda__1___closed__4; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Term_prop___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_tupleTail; lean_object* l_Lean_Parser_Term_typeAscription___closed__5; @@ -1328,7 +1322,6 @@ lean_object* l_Lean_Parser_Term_sub___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Term_proj(lean_object*); extern lean_object* l_PersistentArray_Stats_toString___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Term_band(lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l_Lean_Parser_Term_uminus___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_bor___closed__2; lean_object* l_Lean_Parser_Term_cdot___elambda__1___closed__4; @@ -1375,6 +1368,7 @@ lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_ob lean_object* l_Lean_Parser_Term_structInstSource___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_prod___closed__1; lean_object* l_Lean_Parser_Term_subst___closed__3; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; lean_object* l_Lean_Parser_Term_arrayLit___closed__5; lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__9; lean_object* l_Lean_Parser_Term_if___closed__5; @@ -1490,6 +1484,7 @@ lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___spec__2( lean_object* l_Lean_Parser_Term_num___closed__3; lean_object* l_Lean_Parser_Term_letIdDecl___closed__5; lean_object* l_Lean_Parser_Term_match___closed__4; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; lean_object* l_Lean_Parser_Term_app___closed__5; lean_object* l_Lean_Parser_Term_if___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_explicitUniv___closed__1; @@ -1530,7 +1525,6 @@ lean_object* l_Lean_Parser_Term_dollar___closed__4; lean_object* l_Lean_Parser_Term_arrayRef___closed__1; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___elambda__1___spec__1___closed__1; lean_object* l_Lean_Parser_Term_fromTerm___closed__5; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__7; lean_object* l_Lean_Parser_Term_mapConst___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_map___closed__2; lean_object* l_Lean_Parser_Term_or; @@ -1582,6 +1576,7 @@ lean_object* l_Lean_Parser_Term_app___closed__1; lean_object* l_Lean_Parser_Term_emptyC___closed__5; lean_object* l_Lean_Parser_Term_if___closed__4; lean_object* l_Lean_Parser_Term_forall___elambda__1___closed__3; +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; lean_object* l_Lean_Parser_Term_haveAssign___closed__5; lean_object* l_Lean_Parser_Term_letIdDecl___closed__1; lean_object* l_Lean_Parser_Term_arrayLit___elambda__1___closed__8; @@ -1681,13 +1676,11 @@ lean_object* l___regBuiltinParser_Lean_Parser_Term_listLit(lean_object*); lean_object* l_Lean_Parser_Term_type___elambda__1___closed__6; lean_object* l_Lean_Parser_mkAntiquot(uint8_t, lean_object*, lean_object*, uint8_t); lean_object* l_Lean_Parser_Term_dollarProj___elambda__1___closed__6; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__3; lean_object* l_Lean_Parser_Term_explicit; lean_object* l_Lean_Parser_Term_match__syntax___elambda__1___closed__7; lean_object* l___regBuiltinParser_Lean_Parser_Term_arrow(lean_object*); lean_object* l_Lean_Parser_Term_modN___closed__3; lean_object* l___regBuiltinParser_Lean_Parser_Term_sortApp(lean_object*); -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; lean_object* l_Lean_Parser_Term_typeAscription___closed__6; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_explicitUniv___elambda__1___spec__2___closed__3; lean_object* l_Lean_Parser_Term_lt; @@ -2463,7 +2456,7 @@ if (lean_obj_tag(x_34) == 0) lean_object* x_35; lean_object* x_36; x_35 = lean_ctor_get(x_33, 0); lean_inc(x_35); -x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_35); lean_dec(x_35); if (lean_obj_tag(x_36) == 2) { @@ -2847,7 +2840,7 @@ if (lean_obj_tag(x_60) == 0) lean_object* x_61; lean_object* x_62; x_61 = lean_ctor_get(x_59, 0); lean_inc(x_61); -x_62 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_61); +x_62 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_61); lean_dec(x_61); if (lean_obj_tag(x_62) == 2) { @@ -2922,7 +2915,7 @@ if (lean_obj_tag(x_28) == 0) lean_object* x_29; lean_object* x_30; x_29 = lean_ctor_get(x_27, 0); lean_inc(x_29); -x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_29); +x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_29); lean_dec(x_29); if (lean_obj_tag(x_30) == 2) { @@ -3338,7 +3331,7 @@ if (lean_obj_tag(x_33) == 0) lean_object* x_34; lean_object* x_35; x_34 = lean_ctor_get(x_32, 0); lean_inc(x_34); -x_35 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_34); +x_35 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_34); lean_dec(x_34); if (lean_obj_tag(x_35) == 2) { @@ -4511,7 +4504,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -4796,7 +4789,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -5081,7 +5074,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -5299,7 +5292,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -5585,7 +5578,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -5890,7 +5883,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -6175,7 +6168,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -6460,7 +6453,7 @@ if (lean_obj_tag(x_18) == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_19); +x_20 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_19); lean_dec(x_19); if (lean_obj_tag(x_20) == 2) { @@ -6738,7 +6731,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -6937,7 +6930,7 @@ if (lean_obj_tag(x_34) == 0) lean_object* x_35; lean_object* x_36; x_35 = lean_ctor_get(x_33, 0); lean_inc(x_35); -x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_35); lean_dec(x_35); if (lean_obj_tag(x_36) == 2) { @@ -7216,7 +7209,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -7549,7 +7542,7 @@ lean_object* _init_l_Lean_Parser_Term_paren___elambda__1___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -7560,7 +7553,7 @@ _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; x_1 = 0; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__1; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__1; x_3 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); @@ -7631,7 +7624,7 @@ if (lean_obj_tag(x_81) == 0) lean_object* x_82; lean_object* x_83; x_82 = lean_ctor_get(x_80, 0); lean_inc(x_82); -x_83 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_82); +x_83 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_82); lean_dec(x_82); if (lean_obj_tag(x_83) == 2) { @@ -7639,7 +7632,7 @@ lean_object* x_84; lean_object* x_85; uint8_t x_86; x_84 = lean_ctor_get(x_83, 1); lean_inc(x_84); lean_dec(x_83); -x_85 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_85 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_86 = lean_string_dec_eq(x_84, x_85); lean_dec(x_84); if (x_86 == 0) @@ -7696,7 +7689,7 @@ 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); +x_23 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_22); lean_dec(x_22); if (lean_obj_tag(x_23) == 2) { @@ -7704,7 +7697,7 @@ 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___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_25 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_26 = lean_string_dec_eq(x_24, x_25); lean_dec(x_24); if (x_26 == 0) @@ -7712,7 +7705,7 @@ 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__8; x_28 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_27, x_19); -x_29 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_29 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_30 = l_Lean_Parser_ParserState_mkNode(x_28, x_29, x_16); x_31 = l_Lean_Parser_mergeOrElseErrors(x_30, x_11, x_8); lean_dec(x_8); @@ -7722,7 +7715,7 @@ else { lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_dec(x_19); -x_32 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_32 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_33 = l_Lean_Parser_ParserState_mkNode(x_20, x_32, x_16); x_34 = l_Lean_Parser_mergeOrElseErrors(x_33, x_11, x_8); lean_dec(x_8); @@ -7735,7 +7728,7 @@ lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean lean_dec(x_23); x_35 = l_Lean_Parser_Level_paren___elambda__1___closed__8; x_36 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_35, x_19); -x_37 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_37 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_16); x_39 = l_Lean_Parser_mergeOrElseErrors(x_38, x_11, x_8); lean_dec(x_8); @@ -7748,7 +7741,7 @@ lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean lean_dec(x_21); x_40 = l_Lean_Parser_Level_paren___elambda__1___closed__8; x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_20, x_40, x_19); -x_42 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_42 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_43 = l_Lean_Parser_ParserState_mkNode(x_41, x_42, x_16); x_44 = l_Lean_Parser_mergeOrElseErrors(x_43, x_11, x_8); lean_dec(x_8); @@ -7760,7 +7753,7 @@ else lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_dec(x_18); lean_dec(x_2); -x_45 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_45 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_46 = l_Lean_Parser_ParserState_mkNode(x_17, x_45, x_16); x_47 = l_Lean_Parser_mergeOrElseErrors(x_46, x_11, x_8); lean_dec(x_8); @@ -7866,7 +7859,7 @@ lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_dec(x_50); lean_dec(x_2); lean_dec(x_1); -x_76 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_76 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_77 = l_Lean_Parser_ParserState_mkNode(x_49, x_76, x_16); x_78 = l_Lean_Parser_mergeOrElseErrors(x_77, x_11, x_8); lean_dec(x_8); @@ -7905,7 +7898,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_paren___closed__2; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } @@ -7924,7 +7917,7 @@ lean_object* _init_l_Lean_Parser_Term_paren___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_2 = l_Lean_Parser_Term_paren___closed__4; x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); return x_3; @@ -7976,7 +7969,7 @@ _start: uint8_t x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_2 = 0; x_3 = l_Lean_Parser_termParser___closed__2; -x_4 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_4 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_5 = l_Lean_Parser_Term_paren; x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); return x_6; @@ -8182,7 +8175,7 @@ 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); +x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_58); lean_dec(x_58); if (lean_obj_tag(x_59) == 2) { @@ -8257,7 +8250,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -8502,7 +8495,7 @@ if (lean_obj_tag(x_36) == 0) lean_object* x_37; lean_object* x_38; x_37 = lean_ctor_get(x_35, 0); lean_inc(x_37); -x_38 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_37); +x_38 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_37); lean_dec(x_37); if (lean_obj_tag(x_38) == 2) { @@ -8989,7 +8982,7 @@ if (lean_obj_tag(x_93) == 0) lean_object* x_94; lean_object* x_95; x_94 = lean_ctor_get(x_92, 0); lean_inc(x_94); -x_95 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_94); +x_95 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_94); lean_dec(x_94); if (lean_obj_tag(x_95) == 2) { @@ -9064,7 +9057,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -9186,7 +9179,7 @@ if (lean_obj_tag(x_67) == 0) lean_object* x_68; lean_object* x_69; x_68 = lean_ctor_get(x_66, 0); lean_inc(x_68); -x_69 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_68); +x_69 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_68); lean_dec(x_68); if (lean_obj_tag(x_69) == 2) { @@ -9587,7 +9580,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -9881,7 +9874,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -10227,7 +10220,7 @@ if (lean_obj_tag(x_109) == 0) lean_object* x_110; lean_object* x_111; x_110 = lean_ctor_get(x_108, 0); lean_inc(x_110); -x_111 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_110); +x_111 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_110); lean_dec(x_110); if (lean_obj_tag(x_111) == 2) { @@ -10293,7 +10286,7 @@ 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); +x_23 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_22); lean_dec(x_22); if (lean_obj_tag(x_23) == 2) { @@ -10423,7 +10416,7 @@ if (lean_obj_tag(x_67) == 0) lean_object* x_68; lean_object* x_69; x_68 = lean_ctor_get(x_66, 0); lean_inc(x_68); -x_69 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_68); +x_69 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_68); lean_dec(x_68); if (lean_obj_tag(x_69) == 2) { @@ -10868,7 +10861,7 @@ if (lean_obj_tag(x_68) == 0) lean_object* x_69; lean_object* x_70; x_69 = lean_ctor_get(x_67, 0); lean_inc(x_69); -x_70 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_69); +x_70 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_69); lean_dec(x_69); if (lean_obj_tag(x_70) == 2) { @@ -10958,7 +10951,7 @@ if (lean_obj_tag(x_29) == 0) lean_object* x_30; lean_object* x_31; x_30 = lean_ctor_get(x_28, 0); lean_inc(x_30); -x_31 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_30); +x_31 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_30); lean_dec(x_30); if (lean_obj_tag(x_31) == 2) { @@ -11347,7 +11340,7 @@ if (lean_obj_tag(x_35) == 0) lean_object* x_36; lean_object* x_37; x_36 = lean_ctor_get(x_34, 0); lean_inc(x_36); -x_37 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_36); +x_37 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_36); lean_dec(x_36); if (lean_obj_tag(x_37) == 2) { @@ -12160,7 +12153,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -12444,7 +12437,7 @@ if (lean_obj_tag(x_49) == 0) lean_object* x_50; lean_object* x_51; x_50 = lean_ctor_get(x_48, 0); lean_inc(x_50); -x_51 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_50); +x_51 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_50); lean_dec(x_50); if (lean_obj_tag(x_51) == 2) { @@ -12727,7 +12720,7 @@ if (lean_obj_tag(x_32) == 0) lean_object* x_33; lean_object* x_34; x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); -x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_33); lean_dec(x_33); if (lean_obj_tag(x_34) == 2) { @@ -13105,7 +13098,7 @@ if (lean_obj_tag(x_122) == 0) lean_object* x_123; lean_object* x_124; x_123 = lean_ctor_get(x_121, 0); lean_inc(x_123); -x_124 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_123); +x_124 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_123); lean_dec(x_123); if (lean_obj_tag(x_124) == 2) { @@ -13179,7 +13172,7 @@ if (lean_obj_tag(x_27) == 0) lean_object* x_28; lean_object* x_29; x_28 = lean_ctor_get(x_26, 0); lean_inc(x_28); -x_29 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_28); +x_29 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_28); lean_dec(x_28); if (lean_obj_tag(x_29) == 2) { @@ -13296,7 +13289,7 @@ if (lean_obj_tag(x_90) == 0) lean_object* x_91; lean_object* x_92; x_91 = lean_ctor_get(x_89, 0); lean_inc(x_91); -x_92 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_91); +x_92 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_91); lean_dec(x_91); if (lean_obj_tag(x_92) == 2) { @@ -13778,7 +13771,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -14153,7 +14146,7 @@ if (lean_obj_tag(x_89) == 0) lean_object* x_90; lean_object* x_91; x_90 = lean_ctor_get(x_88, 0); lean_inc(x_90); -x_91 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_90); +x_91 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_90); lean_dec(x_90); if (lean_obj_tag(x_91) == 2) { @@ -14227,7 +14220,7 @@ if (lean_obj_tag(x_27) == 0) lean_object* x_28; lean_object* x_29; x_28 = lean_ctor_get(x_26, 0); lean_inc(x_28); -x_29 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_28); +x_29 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_28); lean_dec(x_28); if (lean_obj_tag(x_29) == 2) { @@ -14344,7 +14337,7 @@ if (lean_obj_tag(x_66) == 0) lean_object* x_67; lean_object* x_68; x_67 = lean_ctor_get(x_65, 0); lean_inc(x_67); -x_68 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_67); +x_68 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_67); lean_dec(x_67); if (lean_obj_tag(x_68) == 2) { @@ -14648,7 +14641,7 @@ if (lean_obj_tag(x_34) == 0) lean_object* x_35; lean_object* x_36; x_35 = lean_ctor_get(x_33, 0); lean_inc(x_35); -x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_35); +x_36 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_35); lean_dec(x_35); if (lean_obj_tag(x_36) == 2) { @@ -15010,7 +15003,7 @@ 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); +x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_58); lean_dec(x_58); if (lean_obj_tag(x_59) == 2) { @@ -15085,7 +15078,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -15472,7 +15465,7 @@ 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); +x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_58); lean_dec(x_58); if (lean_obj_tag(x_59) == 2) { @@ -15547,7 +15540,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -15821,7 +15814,7 @@ if (lean_obj_tag(x_28) == 0) lean_object* x_29; lean_object* x_30; x_29 = lean_ctor_get(x_27, 0); lean_inc(x_29); -x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_29); +x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_29); lean_dec(x_29); if (lean_obj_tag(x_30) == 2) { @@ -16134,7 +16127,7 @@ 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); +x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_58); lean_dec(x_58); if (lean_obj_tag(x_59) == 2) { @@ -16208,7 +16201,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -16216,7 +16209,7 @@ 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___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_29 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_30 = lean_string_dec_eq(x_28, x_29); lean_dec(x_28); if (x_30 == 0) @@ -16312,7 +16305,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Term_typeAscription___closed__2; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -16509,7 +16502,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -16659,7 +16652,7 @@ if (lean_obj_tag(x_17) == 0) lean_object* x_18; lean_object* x_19; x_18 = lean_ctor_get(x_16, 0); lean_inc(x_18); -x_19 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_18); +x_19 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_18); lean_dec(x_18); if (lean_obj_tag(x_19) == 2) { @@ -16944,7 +16937,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -17175,7 +17168,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -17484,7 +17477,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_explicitBinder___closed__4; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; } @@ -17494,7 +17487,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_explicitBinder___closed__5; -x_2 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__7; +x_2 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__7; x_3 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -17525,9 +17518,9 @@ x_12 = l_Lean_Parser_Term_explicitBinder___closed__1; x_13 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_13, 0, x_12); lean_closure_set(x_13, 1, x_10); -x_14 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; +x_14 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; x_15 = l_Lean_Parser_andthenInfo(x_14, x_11); -x_16 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__3; +x_16 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__3; x_17 = lean_alloc_closure((void*)(l_Lean_Parser_andthenFn___rarg), 5, 2); lean_closure_set(x_17, 0, x_16); lean_closure_set(x_17, 1, x_13); @@ -17840,7 +17833,7 @@ if (lean_obj_tag(x_62) == 0) lean_object* x_63; lean_object* x_64; x_63 = lean_ctor_get(x_61, 0); lean_inc(x_63); -x_64 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_63); +x_64 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_63); lean_dec(x_63); if (lean_obj_tag(x_64) == 2) { @@ -17921,7 +17914,7 @@ if (lean_obj_tag(x_27) == 0) lean_object* x_28; lean_object* x_29; x_28 = lean_ctor_get(x_26, 0); lean_inc(x_28); -x_29 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_28); +x_29 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_28); lean_dec(x_28); if (lean_obj_tag(x_29) == 2) { @@ -19225,7 +19218,7 @@ if (lean_obj_tag(x_71) == 0) lean_object* x_72; lean_object* x_73; x_72 = lean_ctor_get(x_70, 0); lean_inc(x_72); -x_73 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_72); +x_73 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_72); lean_dec(x_72); if (lean_obj_tag(x_73) == 2) { @@ -19337,7 +19330,7 @@ if (lean_obj_tag(x_109) == 0) lean_object* x_110; lean_object* x_111; x_110 = lean_ctor_get(x_108, 0); lean_inc(x_110); -x_111 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_110); +x_111 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_110); lean_dec(x_110); if (lean_obj_tag(x_111) == 2) { @@ -19482,7 +19475,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -19845,7 +19838,7 @@ if (lean_obj_tag(x_42) == 0) lean_object* x_43; lean_object* x_44; x_43 = lean_ctor_get(x_41, 0); lean_inc(x_43); -x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_43); +x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_43); lean_dec(x_43); if (lean_obj_tag(x_44) == 2) { @@ -20531,7 +20524,7 @@ if (lean_obj_tag(x_85) == 0) lean_object* x_86; lean_object* x_87; x_86 = lean_ctor_get(x_84, 0); lean_inc(x_86); -x_87 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_86); +x_87 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_86); lean_dec(x_86); if (lean_obj_tag(x_87) == 2) { @@ -20708,7 +20701,7 @@ if (lean_obj_tag(x_62) == 0) lean_object* x_63; lean_object* x_64; x_63 = lean_ctor_get(x_61, 0); lean_inc(x_63); -x_64 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_63); +x_64 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_63); lean_dec(x_63); if (lean_obj_tag(x_64) == 2) { @@ -21375,7 +21368,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -21689,7 +21682,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -22003,7 +21996,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -22327,7 +22320,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -22545,58 +22538,17 @@ return x_5; lean_object* _init_l_Lean_Parser_Term_quotedName___elambda__1___closed__5() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_formatDataValue___closed__1; -x_2 = l_String_trim(x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Parser_Term_quotedName___elambda__1___closed__6() { -_start: -{ uint8_t x_1; lean_object* x_2; x_1 = 0; -x_2 = l_Lean_Parser_rawIdent(x_1); +x_2 = l_Lean_Parser_nameLit(x_1); return x_2; } } -lean_object* _init_l_Lean_Parser_Term_quotedName___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_quotedName___elambda__1___closed__5; -x_3 = lean_string_append(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_quotedName___elambda__1___closed__8() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_quotedName___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_quotedName___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_quotedName___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_quotedName___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; lean_object* x_11; lean_object* x_12; -x_4 = l_Lean_Parser_Term_quotedName___elambda__1___closed__6; +x_4 = l_Lean_Parser_Term_quotedName___elambda__1___closed__5; x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); x_6 = l_Lean_Parser_Term_quotedName___elambda__1___closed__4; @@ -22644,7 +22596,7 @@ return x_11; } else { -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_29; lean_object* x_30; +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_inc(x_10); x_16 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); lean_dec(x_9); @@ -22652,91 +22604,12 @@ x_17 = lean_ctor_get(x_16, 0); lean_inc(x_17); x_18 = lean_array_get_size(x_17); lean_dec(x_17); -lean_inc(x_2); -x_29 = l_Lean_Parser_tokenFn(x_2, x_16); -x_30 = lean_ctor_get(x_29, 3); -lean_inc(x_30); -if (lean_obj_tag(x_30) == 0) -{ -lean_object* x_31; lean_object* x_32; -x_31 = lean_ctor_get(x_29, 0); -lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); -lean_dec(x_31); -if (lean_obj_tag(x_32) == 2) -{ -lean_object* x_33; lean_object* x_34; uint8_t x_35; -x_33 = lean_ctor_get(x_32, 1); -lean_inc(x_33); -lean_dec(x_32); -x_34 = l_Lean_Parser_Term_quotedName___elambda__1___closed__5; -x_35 = lean_string_dec_eq(x_33, x_34); -lean_dec(x_33); -if (x_35 == 0) -{ -lean_object* x_36; lean_object* x_37; -x_36 = l_Lean_Parser_Term_quotedName___elambda__1___closed__9; -lean_inc(x_10); -x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_36, x_10); -x_19 = x_37; -goto block_28; -} -else -{ -x_19 = x_29; -goto block_28; -} -} -else -{ -lean_object* x_38; lean_object* x_39; -lean_dec(x_32); -x_38 = l_Lean_Parser_Term_quotedName___elambda__1___closed__9; -lean_inc(x_10); -x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_38, x_10); -x_19 = x_39; -goto block_28; -} -} -else -{ -lean_object* x_40; lean_object* x_41; -lean_dec(x_30); -x_40 = l_Lean_Parser_Term_quotedName___elambda__1___closed__9; -lean_inc(x_10); -x_41 = l_Lean_Parser_ParserState_mkErrorsAt(x_29, x_40, x_10); -x_19 = x_41; -goto block_28; -} -block_28: -{ -lean_object* x_20; -x_20 = lean_ctor_get(x_19, 3); -lean_inc(x_20); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_21 = lean_apply_3(x_5, x_1, x_2, x_19); -x_22 = l_Lean_Parser_Term_quotedName___elambda__1___closed__2; -x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_18); -x_24 = l_Lean_Parser_mergeOrElseErrors(x_23, x_13, x_10); +x_19 = lean_apply_3(x_5, x_1, x_2, x_16); +x_20 = l_Lean_Parser_Term_quotedName___elambda__1___closed__2; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_18); +x_22 = l_Lean_Parser_mergeOrElseErrors(x_21, x_13, x_10); lean_dec(x_10); -return x_24; -} -else -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -lean_dec(x_20); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_25 = l_Lean_Parser_Term_quotedName___elambda__1___closed__2; -x_26 = l_Lean_Parser_ParserState_mkNode(x_19, x_25, x_18); -x_27 = l_Lean_Parser_mergeOrElseErrors(x_26, x_13, x_10); -lean_dec(x_10); -return x_27; -} -} +return x_22; } } } @@ -22744,48 +22617,28 @@ return x_27; lean_object* _init_l_Lean_Parser_Term_quotedName___closed__1() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Term_quotedName___elambda__1___closed__5; -x_2 = l_Lean_Parser_Level_paren___closed__1; -x_3 = l_Lean_Parser_symbolInfo(x_1, x_2); -return x_3; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Term_quotedName___elambda__1___closed__2; +x_4 = l_Lean_Parser_nodeInfo(x_3, x_2); +return x_4; } } lean_object* _init_l_Lean_Parser_Term_quotedName___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Term_quotedName___elambda__1___closed__6; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -x_3 = l_Lean_Parser_Term_quotedName___closed__1; -x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); -return x_4; -} -} -lean_object* _init_l_Lean_Parser_Term_quotedName___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_quotedName___elambda__1___closed__2; -x_2 = l_Lean_Parser_Term_quotedName___closed__2; -x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Term_quotedName___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_quotedName___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Term_quotedName___closed__3; +x_3 = l_Lean_Parser_Term_quotedName___closed__1; x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); return x_4; } } -lean_object* _init_l_Lean_Parser_Term_quotedName___closed__5() { +lean_object* _init_l_Lean_Parser_Term_quotedName___closed__3() { _start: { lean_object* x_1; @@ -22793,12 +22646,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_quotedName___elambda__1), 3, return x_1; } } -lean_object* _init_l_Lean_Parser_Term_quotedName___closed__6() { +lean_object* _init_l_Lean_Parser_Term_quotedName___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_quotedName___closed__4; -x_2 = l_Lean_Parser_Term_quotedName___closed__5; +x_1 = l_Lean_Parser_Term_quotedName___closed__2; +x_2 = l_Lean_Parser_Term_quotedName___closed__3; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -22809,7 +22662,7 @@ lean_object* _init_l_Lean_Parser_Term_quotedName() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Term_quotedName___closed__6; +x_1 = l_Lean_Parser_Term_quotedName___closed__4; return x_1; } } @@ -23268,7 +23121,7 @@ if (lean_obj_tag(x_80) == 0) lean_object* x_81; lean_object* x_82; x_81 = lean_ctor_get(x_79, 0); lean_inc(x_81); -x_82 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_81); +x_82 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_81); lean_dec(x_81); if (lean_obj_tag(x_82) == 2) { @@ -23437,7 +23290,7 @@ if (lean_obj_tag(x_60) == 0) lean_object* x_61; lean_object* x_62; x_61 = lean_ctor_get(x_59, 0); lean_inc(x_61); -x_62 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_61); +x_62 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_61); lean_dec(x_61); if (lean_obj_tag(x_62) == 2) { @@ -24176,7 +24029,7 @@ if (lean_obj_tag(x_42) == 0) lean_object* x_43; lean_object* x_44; x_43 = lean_ctor_get(x_41, 0); lean_inc(x_43); -x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_43); +x_44 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_43); lean_dec(x_43); if (lean_obj_tag(x_44) == 2) { @@ -24800,7 +24653,7 @@ if (lean_obj_tag(x_72) == 0) lean_object* x_73; lean_object* x_74; x_73 = lean_ctor_get(x_71, 0); lean_inc(x_73); -x_74 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_73); +x_74 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_73); lean_dec(x_73); if (lean_obj_tag(x_74) == 2) { @@ -25514,7 +25367,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -26052,7 +25905,7 @@ if (lean_obj_tag(x_58) == 0) lean_object* x_59; lean_object* x_60; x_59 = lean_ctor_get(x_57, 0); lean_inc(x_59); -x_60 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_59); +x_60 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_59); lean_dec(x_59); if (lean_obj_tag(x_60) == 2) { @@ -26125,7 +25978,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_object* x_25; x_24 = lean_ctor_get(x_22, 0); lean_inc(x_24); -x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_24); lean_dec(x_24); if (lean_obj_tag(x_25) == 2) { @@ -26582,7 +26435,7 @@ if (lean_obj_tag(x_28) == 0) lean_object* x_29; lean_object* x_30; x_29 = lean_ctor_get(x_27, 0); lean_inc(x_29); -x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_29); +x_30 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_29); lean_dec(x_29); if (lean_obj_tag(x_30) == 2) { @@ -27279,7 +27132,7 @@ if (lean_obj_tag(x_63) == 0) lean_object* x_64; lean_object* x_65; x_64 = lean_ctor_get(x_62, 0); lean_inc(x_64); -x_65 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_64); +x_65 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_64); lean_dec(x_64); if (lean_obj_tag(x_65) == 2) { @@ -27967,7 +27820,7 @@ if (lean_obj_tag(x_32) == 0) lean_object* x_33; lean_object* x_34; x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); -x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_33); +x_34 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_33); lean_dec(x_33); if (lean_obj_tag(x_34) == 2) { @@ -28328,7 +28181,7 @@ 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); +x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_58); lean_dec(x_58); if (lean_obj_tag(x_59) == 2) { @@ -28402,7 +28255,7 @@ 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); +x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_26); lean_dec(x_26); if (lean_obj_tag(x_27) == 2) { @@ -28715,7 +28568,7 @@ if (lean_obj_tag(x_46) == 0) lean_object* x_47; lean_object* x_48; x_47 = lean_ctor_get(x_45, 0); lean_inc(x_47); -x_48 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_47); +x_48 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_47); lean_dec(x_47); if (lean_obj_tag(x_48) == 2) { @@ -29100,7 +28953,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -29435,7 +29288,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -29741,7 +29594,7 @@ if (lean_obj_tag(x_30) == 0) lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 0); lean_inc(x_31); -x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_31); +x_32 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_31); lean_dec(x_31); if (lean_obj_tag(x_32) == 2) { @@ -29965,7 +29818,7 @@ if (lean_obj_tag(x_87) == 0) lean_object* x_88; lean_object* x_89; x_88 = lean_ctor_get(x_86, 0); lean_inc(x_88); -x_89 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_88); +x_89 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_88); lean_dec(x_88); if (lean_obj_tag(x_89) == 2) { @@ -29973,7 +29826,7 @@ lean_object* x_90; lean_object* x_91; uint8_t x_92; x_90 = lean_ctor_get(x_89, 1); lean_inc(x_90); lean_dec(x_89); -x_91 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__1; +x_91 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__1; x_92 = lean_string_dec_eq(x_90, x_91); lean_dec(x_90); if (x_92 == 0) @@ -30039,7 +29892,7 @@ if (lean_obj_tag(x_17) == 0) lean_object* x_18; lean_object* x_19; x_18 = lean_ctor_get(x_16, 0); lean_inc(x_18); -x_19 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_18); +x_19 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_18); lean_dec(x_18); if (lean_obj_tag(x_19) == 2) { @@ -30047,7 +29900,7 @@ lean_object* x_20; lean_object* x_21; uint8_t x_22; x_20 = lean_ctor_get(x_19, 1); lean_inc(x_20); lean_dec(x_19); -x_21 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__5; +x_21 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__5; x_22 = lean_string_dec_eq(x_20, x_21); lean_dec(x_20); if (x_22 == 0) @@ -30160,7 +30013,7 @@ if (lean_obj_tag(x_55) == 0) lean_object* x_56; lean_object* x_57; x_56 = lean_ctor_get(x_54, 0); lean_inc(x_56); -x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_56); lean_dec(x_56); if (lean_obj_tag(x_57) == 2) { @@ -30297,7 +30150,7 @@ lean_object* _init_l_Lean_Parser_Term_namedArgument___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__2; +x_1 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__2; x_2 = l_Lean_Parser_Term_namedArgument___closed__1; x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); return x_3; @@ -30321,7 +30174,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Term_namedArgument___closed__3; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___closed__6; +x_3 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___closed__6; x_4 = l_Lean_Parser_andthenInfo(x_2, x_3); return x_4; } @@ -31561,7 +31414,7 @@ if (lean_obj_tag(x_16) == 0) lean_object* x_17; lean_object* x_18; x_17 = lean_ctor_get(x_15, 0); lean_inc(x_17); -x_18 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_17); +x_18 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_17); lean_dec(x_17); if (lean_obj_tag(x_18) == 2) { @@ -32064,7 +31917,7 @@ if (lean_obj_tag(x_45) == 0) lean_object* x_46; lean_object* x_47; x_46 = lean_ctor_get(x_44, 0); lean_inc(x_46); -x_47 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_46); +x_47 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_46); lean_dec(x_46); if (lean_obj_tag(x_47) == 2) { @@ -32409,7 +32262,7 @@ if (lean_obj_tag(x_50) == 0) lean_object* x_51; lean_object* x_52; x_51 = lean_ctor_get(x_49, 0); lean_inc(x_51); -x_52 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_51); +x_52 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_51); lean_dec(x_51); if (lean_obj_tag(x_52) == 2) { @@ -32533,7 +32386,7 @@ if (lean_obj_tag(x_36) == 0) lean_object* x_37; lean_object* x_38; x_37 = lean_ctor_get(x_35, 0); lean_inc(x_37); -x_38 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_37); +x_38 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_37); lean_dec(x_37); if (lean_obj_tag(x_38) == 2) { @@ -32703,7 +32556,7 @@ if (lean_obj_tag(x_10) == 0) lean_object* x_11; lean_object* x_12; x_11 = lean_ctor_get(x_9, 0); lean_inc(x_11); -x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_11); +x_12 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_11); lean_dec(x_11); if (lean_obj_tag(x_12) == 2) { @@ -38968,14 +38821,6 @@ l_Lean_Parser_Term_quotedName___elambda__1___closed__4 = _init_l_Lean_Parser_Ter lean_mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___closed__4); l_Lean_Parser_Term_quotedName___elambda__1___closed__5 = _init_l_Lean_Parser_Term_quotedName___elambda__1___closed__5(); lean_mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___closed__5); -l_Lean_Parser_Term_quotedName___elambda__1___closed__6 = _init_l_Lean_Parser_Term_quotedName___elambda__1___closed__6(); -lean_mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___closed__6); -l_Lean_Parser_Term_quotedName___elambda__1___closed__7 = _init_l_Lean_Parser_Term_quotedName___elambda__1___closed__7(); -lean_mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___closed__7); -l_Lean_Parser_Term_quotedName___elambda__1___closed__8 = _init_l_Lean_Parser_Term_quotedName___elambda__1___closed__8(); -lean_mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___closed__8); -l_Lean_Parser_Term_quotedName___elambda__1___closed__9 = _init_l_Lean_Parser_Term_quotedName___elambda__1___closed__9(); -lean_mark_persistent(l_Lean_Parser_Term_quotedName___elambda__1___closed__9); l_Lean_Parser_Term_quotedName___closed__1 = _init_l_Lean_Parser_Term_quotedName___closed__1(); lean_mark_persistent(l_Lean_Parser_Term_quotedName___closed__1); l_Lean_Parser_Term_quotedName___closed__2 = _init_l_Lean_Parser_Term_quotedName___closed__2(); @@ -38984,10 +38829,6 @@ l_Lean_Parser_Term_quotedName___closed__3 = _init_l_Lean_Parser_Term_quotedName_ lean_mark_persistent(l_Lean_Parser_Term_quotedName___closed__3); l_Lean_Parser_Term_quotedName___closed__4 = _init_l_Lean_Parser_Term_quotedName___closed__4(); lean_mark_persistent(l_Lean_Parser_Term_quotedName___closed__4); -l_Lean_Parser_Term_quotedName___closed__5 = _init_l_Lean_Parser_Term_quotedName___closed__5(); -lean_mark_persistent(l_Lean_Parser_Term_quotedName___closed__5); -l_Lean_Parser_Term_quotedName___closed__6 = _init_l_Lean_Parser_Term_quotedName___closed__6(); -lean_mark_persistent(l_Lean_Parser_Term_quotedName___closed__6); l_Lean_Parser_Term_quotedName = _init_l_Lean_Parser_Term_quotedName(); lean_mark_persistent(l_Lean_Parser_Term_quotedName); res = l___regBuiltinParser_Lean_Parser_Term_quotedName(lean_io_mk_world()); diff --git a/stage0/stdlib/Init/Lean/Parser/Transform.c b/stage0/stdlib/Init/Lean/Parser/Transform.c index 3a9efe997b..90ea7e84c1 100644 --- a/stage0/stdlib/Init/Lean/Parser/Transform.c +++ b/stage0/stdlib/Init/Lean/Parser/Transform.c @@ -30,11 +30,11 @@ lean_object* l_Lean_Syntax_removeParen___boxed(lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SourceInfo_truncateTrailing(lean_object*); +lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(lean_object*); lean_object* l_Lean_Syntax_manyToSepBy(lean_object*, lean_object*); -lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; extern lean_object* l_Option_HasRepr___rarg___closed__3; extern lean_object* l_Lean_Syntax_inhabited; -extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; lean_object* l_Lean_Syntax_getNumArgs(lean_object*); lean_object* l_Lean_Syntax_removeParen(lean_object*); uint8_t l_Lean_Syntax_isNone(lean_object*); @@ -61,7 +61,7 @@ else { lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_8 = lean_array_fget(x_3, x_4); -x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_5); +x_9 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__nameLitAux___spec__1(x_5); x_10 = l_Lean_Syntax_getTailInfo___main(x_9); x_11 = lean_unsigned_to_nat(1u); x_12 = lean_nat_add(x_4, x_11); @@ -210,7 +210,7 @@ if (lean_obj_tag(x_1) == 1) lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5; x_2 = lean_ctor_get(x_1, 0); x_3 = lean_ctor_get(x_1, 1); -x_4 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___rarg___closed__2; +x_4 = l___private_Init_Lean_Parser_Parser_14__antiquotNestedExpr___elambda__1___rarg___closed__2; x_5 = lean_name_eq(x_2, x_4); if (x_5 == 0) { diff --git a/stage0/stdlib/Init/LeanInit.c b/stage0/stdlib/Init/LeanInit.c index c976172810..e1a1888243 100644 --- a/stage0/stdlib/Init/LeanInit.c +++ b/stage0/stdlib/Init/LeanInit.c @@ -48,6 +48,7 @@ lean_object* l_Lean_fieldIdxKind___closed__2; lean_object* l_Lean_ParserDescr_orelse(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_MacroM_monadQuotation___lambda__2(lean_object*); lean_object* l___private_Init_LeanInit_8__decodeHexDigit___boxed(lean_object*, lean_object*); +uint32_t l_Lean_idBeginEscape; lean_object* l___private_Init_LeanInit_10__decodeDecimalLitAux___main(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_LeanInit_4__extractMainModule(lean_object*, lean_object*, lean_object*); uint8_t lean_name_eq(lean_object*, lean_object*); @@ -61,19 +62,25 @@ lean_object* l___private_Init_LeanInit_5__extractMacroScopesAux(lean_object*, le extern lean_object* l_Array_empty___closed__1; lean_object* l_Lean_Syntax_isOfKind___boxed(lean_object*, lean_object*); lean_object* l_Lean_Name_HasBeq; +lean_object* l___private_Init_LeanInit_13__decodeNameLitAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_fieldIdxKind___closed__1; uint8_t l_Char_isDigit(uint32_t); lean_object* l_Lean_charLitKind___closed__2; lean_object* l_Lean_ParserDescr_many(uint8_t, lean_object*); +lean_object* l_Lean_isGreek___boxed(lean_object*); +uint32_t l_Lean_idEndEscape; lean_object* l___private_Init_LeanInit_7__decodeOctalLitAux(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_isIdRest___boxed(lean_object*); lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*); +uint8_t l_Lean_isIdBeginEscape(uint32_t); lean_object* l_Lean_ParserDescr_ident(uint8_t); lean_object* l___private_Init_LeanInit_9__decodeHexLitAux___main(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserDescr_strLit(uint8_t); lean_object* l_Lean_Name_HasToString___closed__1; lean_object* l_Lean_mkNameSimple(lean_object*); +lean_object* l_Lean_isIdFirst___boxed(lean_object*); lean_object* l_Lean_mkHole___boxed(lean_object*); lean_object* l_Lean_ParserDescr_andthen___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserDescr_char(uint8_t); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_charLitKind___closed__1; @@ -83,6 +90,7 @@ lean_object* l_Lean_Syntax_termIdToAntiquot___closed__3; lean_object* l___private_Init_LeanInit_12__decodeQuotedChar___boxed__const__4; lean_object* lean_string_utf8_extract(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_inhabited; +lean_object* l_Lean_ParserDescr_charLit(uint8_t); extern lean_object* l_String_splitAux___main___closed__1; lean_object* l_Lean_Syntax_identToStrLit(lean_object*); lean_object* l___private_Init_LeanInit_6__decodeBinLitAux___main(lean_object*, lean_object*, lean_object*); @@ -97,10 +105,13 @@ lean_object* l_Lean_Syntax_decodeStrLitAux___main___boxed(lean_object*, lean_obj lean_object* l_Lean_NameGenerator_Inhabited; lean_object* l_Lean_mkTermIdFromIdent___closed__1; lean_object* l_Lean_ParserDescr_try(uint8_t, lean_object*); +lean_object* l_Lean_nameLitKind; lean_object* l_Lean_Syntax_termIdToAntiquot___closed__2; lean_object* l_Lean_mkAppStx___closed__8; +lean_object* l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkAppStx___closed__7; lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Lean_isSubScriptAlnum___boxed(lean_object*); lean_object* l___private_Init_LeanInit_4__extractMainModule___main(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Array_getSepElems___spec__1(lean_object*); lean_object* l_Lean_Name_toStringWithSep(lean_object*, lean_object*); @@ -110,14 +121,15 @@ lean_object* l_Lean_Syntax_getKind___closed__1; lean_object* l_Lean_Name_hashable; lean_object* l_Lean_mkTermIdFromIdent___closed__2; lean_object* lean_string_utf8_next(lean_object*, lean_object*); -lean_object* l_Lean_ParserDescr_str(uint8_t); lean_object* l_Lean_Syntax_strLitToAtom(lean_object*); +lean_object* l_Lean_Syntax_isLit_x3f___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_hasArgs___boxed(lean_object*); lean_object* l_Lean_mkStxNumLit(lean_object*, lean_object*); lean_object* l_Lean_ParserDescrCore_inhabited(uint8_t); lean_object* l_Lean_Name_HasAppend___closed__1; uint8_t l_Lean_Name_hasMacroScopes(lean_object*); lean_object* l_Lean_MacroM_monadQuotation___lambda__3(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_isLit_x3f(lean_object*, lean_object*); lean_object* l_Lean_Syntax_getKind___closed__4; lean_object* l_Lean_Syntax_termIdToAntiquot___closed__4; lean_object* l_Lean_ParserDescr_many1(uint8_t, lean_object*); @@ -133,13 +145,15 @@ lean_object* l_Lean_choiceKind___closed__1; lean_object* l___private_Init_LeanInit_7__decodeOctalLitAux___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_choiceKind___closed__2; -lean_object* l_Lean_ParserDescr_num___boxed(lean_object*); lean_object* l_Lean_MacroM_monadQuotation___lambda__2___boxed(lean_object*); lean_object* l_Lean_strLitKind; lean_object* l_Lean_Syntax_isStrLit_x3f(lean_object*); lean_object* l_Array_getSepElems(lean_object*); lean_object* l_Lean_Name_append___main(lean_object*, lean_object*); +lean_object* l___private_Init_LeanInit_13__decodeNameLitAux(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserDescr_numLit___boxed(lean_object*); lean_object* l_Lean_Syntax_isFieldIdx_x3f(lean_object*); +lean_object* l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_many1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Macro_addMacroScope(lean_object*, lean_object*); lean_object* l_Lean_mkTermIdFrom___boxed(lean_object*, lean_object*); @@ -165,12 +179,15 @@ size_t l_Lean_Name_hash(lean_object*); lean_object* l_Lean_ParserDescr_parser(uint8_t, lean_object*, lean_object*); lean_object* l_Nat_repr(lean_object*); lean_object* l_Lean_Name_HasToString; +lean_object* l___private_Init_LeanInit_13__decodeNameLitAux___main___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_lookahead___boxed(lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_sepBy(uint8_t, lean_object*, lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_choiceKind; lean_object* l_Lean_charLitKind; +lean_object* l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_andthen(uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_ParserDescr_charLit___boxed(lean_object*); lean_object* l___private_Init_LeanInit_6__decodeBinLitAux___main___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_symbol___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_LeanInit_9__decodeHexLitAux___boxed(lean_object*, lean_object*, lean_object*); @@ -181,9 +198,9 @@ lean_object* l_Lean_mkAppStx___closed__6; lean_object* l_Lean_ParserDescr_try___boxed(lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_ident___boxed(lean_object*); lean_object* l_Lean_mkOptionalNode(lean_object*); -lean_object* l_Lean_ParserDescr_str___boxed(lean_object*); lean_object* l_Lean_Name_toStringWithSep___boxed(lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_node___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserDescr_nameLit___boxed(lean_object*); lean_object* l_Lean_NameGenerator_mkChild(lean_object*); lean_object* l_Lean_ParserDescr_parser___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isCharLit_x3f___boxed(lean_object*); @@ -193,20 +210,25 @@ lean_object* l_Lean_nullKind___closed__1; lean_object* l_Lean_Syntax_decodeStrLit___boxed(lean_object*); lean_object* l_Lean_addMacroScope(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_nonReservedSymbol___boxed(lean_object*, lean_object*); +uint8_t l_Lean_isIdEndEscape(uint32_t); lean_object* l_Lean_Syntax_decodeCharLit(lean_object*); lean_object* l_Lean_MacroScopesView_inhabited___closed__1; +uint8_t l_Char_isAlpha(uint32_t); lean_object* l_Lean_Name_toStringWithSep___main___boxed(lean_object*, lean_object*); lean_object* l___private_Init_LeanInit_7__decodeOctalLitAux___main___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_nullKind___closed__2; lean_object* l_Lean_MacroM_monadQuotation___closed__3; +uint8_t l_Lean_isLetterLike(uint32_t); lean_object* l_Lean_Syntax_isStrLit_x3f___boxed(lean_object*); lean_object* l_Lean_Name_toStringWithSep___main___closed__1; lean_object* l_Lean_mkAtomFrom(lean_object*, lean_object*); lean_object* l_Lean_Syntax_getHeadInfo___main(lean_object*); lean_object* l_Lean_mkAppStx___closed__3; +lean_object* l_Lean_isLetterLike___boxed(lean_object*); lean_object* l_Lean_Syntax_isIdOrAtom_x3f(lean_object*); lean_object* l_Lean_ParserDescrCore_inhabited___boxed(lean_object*); uint8_t l_Lean_Name_hasMacroScopes___main(lean_object*); +lean_object* l_Lean_ParserDescr_strLit___boxed(lean_object*); lean_object* l_Lean_ParserDescr_sepBy1(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_mkCTermId(lean_object*); uint8_t l_UInt32_decEq(uint32_t, uint32_t); @@ -215,13 +237,14 @@ lean_object* l_Lean_mkAppStx___closed__5; lean_object* l_Lean_mkHole(lean_object*); lean_object* l_Lean_MacroM_monadQuotation___lambda__1___boxed(lean_object*); lean_object* l___private_Init_LeanInit_3__extractImported(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserDescr_char___boxed(lean_object*); lean_object* l___private_Init_LeanInit_5__extractMacroScopesAux___main(lean_object*, lean_object*); uint8_t l_Lean_Syntax_hasArgs(lean_object*); lean_object* l_String_quote(lean_object*); +uint8_t l_Char_isAlphanum(uint32_t); lean_object* l___private_Init_LeanInit_12__decodeQuotedChar(lean_object*, lean_object*); lean_object* l_Lean_Syntax_getArgs(lean_object*); lean_object* l_Lean_Name_append(lean_object*, lean_object*); +uint8_t l_Lean_isGreek(uint32_t); lean_object* l_Lean_Syntax_getKind(lean_object*); lean_object* l_Lean_MacroScopesView_review(lean_object*); lean_object* l_Lean_Syntax_getArg___boxed(lean_object*, lean_object*); @@ -233,29 +256,40 @@ lean_object* l___private_Init_LeanInit_11__decodeNatLitVal___closed__1; extern lean_object* l___private_Init_Util_1__mkPanicMessage___closed__2; lean_object* l___private_Init_LeanInit_7__decodeOctalLitAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_NameGenerator_curr(lean_object*); +lean_object* l_Lean_Syntax_isNameLit_x3f___boxed(lean_object*); lean_object* l___private_Init_LeanInit_12__decodeQuotedChar___boxed__const__2; lean_object* l_Lean_mkHole___closed__1; lean_object* l_Lean_Name_hasMacroScopes___boxed(lean_object*); +lean_object* l_Lean_isIdBeginEscape___boxed(lean_object*); +lean_object* l_Lean_ParserDescr_numLit(uint8_t); lean_object* l_Lean_mkStxStrLit(lean_object*, lean_object*); lean_object* lean_nat_mul(lean_object*, lean_object*); +lean_object* l___private_Init_LeanInit_13__decodeNameLitAux___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkCAppStx(lean_object*, lean_object*); lean_object* l_Lean_mkAppStx___closed__9; lean_object* l_Lean_Name_HasBeq___closed__1; lean_object* l_Lean_Name_append___main___boxed(lean_object*, lean_object*); lean_object* l_Lean_mkTermIdFrom(lean_object*, lean_object*); +lean_object* l_Lean_Syntax_decodeNameLit(lean_object*); lean_object* l_Lean_mkOptionalNode___closed__1; +lean_object* l_Lean_Syntax_isNameLit_x3f(lean_object*); lean_object* l_Lean_ParserDescr_orelse___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_isIdEndEscape___boxed(lean_object*); lean_object* l___private_Init_LeanInit_10__decodeDecimalLitAux___main___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_termIdToAntiquot(lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeStrLit(lean_object*); +uint8_t l_Lean_isIdFirst(uint32_t); uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); size_t lean_usize_mix_hash(size_t, size_t); lean_object* l_Lean_mkCIdentFrom___boxed(lean_object*, lean_object*); lean_object* l_Lean_mkHole___closed__2; lean_object* l_Lean_mkCIdentFrom___closed__1; +lean_object* l_Lean_Syntax_decodeNameLit___boxed(lean_object*); lean_object* lean_string_length(lean_object*); lean_object* l_Lean_MacroM_monadQuotation___closed__1; lean_object* l_Lean_Syntax_getKind___closed__3; +lean_object* l_Lean_nameLitKind___closed__2; +uint8_t l_Lean_isSubScriptAlnum(uint32_t); lean_object* l_List_foldl___main___at_Lean_MacroScopesView_review___spec__1(lean_object*, lean_object*); lean_object* l_Lean_ParserDescr_sepBy___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Macro_throwUnsupported(lean_object*, lean_object*); @@ -264,10 +298,10 @@ lean_object* l_Lean_mkStxLit(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l_Lean_Syntax_toNat(lean_object*); lean_object* l_Lean_mkOptionalNode___closed__2; -lean_object* l_Lean_ParserDescr_num(uint8_t); lean_object* l_Lean_mkCIdentFrom___closed__2; lean_object* l_Lean_Name_eraseMacroScopes___boxed(lean_object*); lean_object* l_Lean_mkCTermIdFrom(lean_object*, lean_object*); +lean_object* l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_strLitToAtom___boxed(lean_object*); lean_object* l_Lean_Syntax_decodeStrLitAux___boxed(lean_object*, lean_object*, lean_object*); uint8_t l_List_isEmpty___rarg(lean_object*); @@ -297,12 +331,670 @@ size_t lean_string_hash(lean_object*); lean_object* l_Lean_ParserDescr_sepBy1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_LeanInit_1__eraseMacroScopesAux___main___boxed(lean_object*); lean_object* l_Lean_Name_append___boxed(lean_object*, lean_object*); +uint8_t l_Lean_isIdRest(uint32_t); lean_object* l_Lean_NameGenerator_Inhabited___closed__3; lean_object* l_Lean_MacroM_monadQuotation___closed__4; +lean_object* l_Lean_nameLitKind___closed__1; uint8_t lean_string_dec_eq(lean_object*, lean_object*); uint32_t l_Char_ofNat(lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l___private_Init_LeanInit_12__decodeQuotedChar___boxed__const__3; +lean_object* l_Lean_ParserDescr_nameLit(uint8_t); +uint8_t l_Lean_isGreek(uint32_t x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; +x_2 = 913; +x_3 = x_2 <= x_1; +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = 0; +return x_4; +} +else +{ +uint32_t x_5; uint8_t x_6; +x_5 = 989; +x_6 = x_1 <= x_5; +return x_6; +} +} +} +lean_object* l_Lean_isGreek___boxed(lean_object* x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; lean_object* x_4; +x_2 = lean_unbox_uint32(x_1); +lean_dec(x_1); +x_3 = l_Lean_isGreek(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_isLetterLike(uint32_t x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; uint8_t x_19; uint8_t x_27; uint8_t x_35; uint8_t x_59; +x_2 = 945; +x_59 = x_2 <= x_1; +if (x_59 == 0) +{ +uint8_t x_60; +x_60 = 0; +x_35 = x_60; +goto block_58; +} +else +{ +uint32_t x_61; uint8_t x_62; +x_61 = 969; +x_62 = x_1 <= x_61; +if (x_62 == 0) +{ +uint8_t x_63; +x_63 = 0; +x_35 = x_63; +goto block_58; +} +else +{ +uint32_t x_64; uint8_t x_65; +x_64 = 955; +x_65 = x_1 == x_64; +if (x_65 == 0) +{ +uint8_t x_66; +x_66 = 1; +return x_66; +} +else +{ +uint8_t x_67; +x_67 = 0; +x_35 = x_67; +goto block_58; +} +} +} +block_18: +{ +uint32_t x_4; uint8_t x_5; +x_4 = 8448; +x_5 = x_4 <= x_1; +if (x_5 == 0) +{ +if (x_3 == 0) +{ +uint32_t x_6; uint8_t x_7; +x_6 = 119964; +x_7 = x_6 <= x_1; +if (x_7 == 0) +{ +return x_3; +} +else +{ +uint32_t x_8; uint8_t x_9; +x_8 = 120223; +x_9 = x_1 <= x_8; +return x_9; +} +} +else +{ +uint8_t x_10; +x_10 = 1; +return x_10; +} +} +else +{ +uint32_t x_11; uint8_t x_12; +x_11 = 8527; +x_12 = x_1 <= x_11; +if (x_12 == 0) +{ +uint32_t x_13; uint8_t x_14; +x_13 = 119964; +x_14 = x_13 <= x_1; +if (x_14 == 0) +{ +return x_12; +} +else +{ +uint32_t x_15; uint8_t x_16; +x_15 = 120223; +x_16 = x_1 <= x_15; +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = 1; +return x_17; +} +} +} +block_26: +{ +uint32_t x_20; uint8_t x_21; +x_20 = 7936; +x_21 = x_20 <= x_1; +if (x_21 == 0) +{ +if (x_19 == 0) +{ +x_3 = x_19; +goto block_18; +} +else +{ +uint8_t x_22; +x_22 = 1; +return x_22; +} +} +else +{ +uint32_t x_23; uint8_t x_24; +x_23 = 8190; +x_24 = x_1 <= x_23; +if (x_24 == 0) +{ +x_3 = x_24; +goto block_18; +} +else +{ +uint8_t x_25; +x_25 = 1; +return x_25; +} +} +} +block_34: +{ +uint32_t x_28; uint8_t x_29; +x_28 = 970; +x_29 = x_28 <= x_1; +if (x_29 == 0) +{ +if (x_27 == 0) +{ +x_19 = x_27; +goto block_26; +} +else +{ +uint8_t x_30; +x_30 = 1; +return x_30; +} +} +else +{ +uint32_t x_31; uint8_t x_32; +x_31 = 1019; +x_32 = x_1 <= x_31; +if (x_32 == 0) +{ +x_19 = x_32; +goto block_26; +} +else +{ +uint8_t x_33; +x_33 = 1; +return x_33; +} +} +} +block_58: +{ +uint32_t x_36; uint8_t x_37; +x_36 = 913; +x_37 = x_36 <= x_1; +if (x_37 == 0) +{ +if (x_35 == 0) +{ +x_27 = x_35; +goto block_34; +} +else +{ +uint32_t x_38; uint8_t x_39; +x_38 = 928; +x_39 = x_1 == x_38; +if (x_39 == 0) +{ +uint32_t x_40; uint8_t x_41; +x_40 = 931; +x_41 = x_1 == x_40; +if (x_41 == 0) +{ +uint8_t x_42; +x_42 = 1; +return x_42; +} +else +{ +uint8_t x_43; +x_43 = 0; +x_27 = x_43; +goto block_34; +} +} +else +{ +uint8_t x_44; +x_44 = 1; +return x_44; +} +} +} +else +{ +uint32_t x_45; uint8_t x_46; +x_45 = 937; +x_46 = x_1 <= x_45; +if (x_46 == 0) +{ +if (x_35 == 0) +{ +x_27 = x_35; +goto block_34; +} +else +{ +uint32_t x_47; uint8_t x_48; +x_47 = 931; +x_48 = x_1 == x_47; +if (x_48 == 0) +{ +uint8_t x_49; +x_49 = 1; +return x_49; +} +else +{ +uint8_t x_50; +x_50 = 0; +x_27 = x_50; +goto block_34; +} +} +} +else +{ +uint32_t x_51; uint8_t x_52; +x_51 = 928; +x_52 = x_1 == x_51; +if (x_52 == 0) +{ +uint32_t x_53; uint8_t x_54; +x_53 = 931; +x_54 = x_1 == x_53; +if (x_54 == 0) +{ +uint8_t x_55; +x_55 = 1; +return x_55; +} +else +{ +uint8_t x_56; +x_56 = 0; +x_27 = x_56; +goto block_34; +} +} +else +{ +if (x_35 == 0) +{ +x_27 = x_35; +goto block_34; +} +else +{ +uint8_t x_57; +x_57 = 1; +return x_57; +} +} +} +} +} +} +} +lean_object* l_Lean_isLetterLike___boxed(lean_object* x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; lean_object* x_4; +x_2 = lean_unbox_uint32(x_1); +lean_dec(x_1); +x_3 = l_Lean_isLetterLike(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_isSubScriptAlnum(uint32_t x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; uint8_t x_19; +x_2 = 8320; +x_19 = x_2 <= x_1; +if (x_19 == 0) +{ +uint8_t x_20; +x_20 = 0; +x_3 = x_20; +goto block_18; +} +else +{ +uint32_t x_21; uint8_t x_22; +x_21 = 8329; +x_22 = x_1 <= x_21; +if (x_22 == 0) +{ +x_3 = x_22; +goto block_18; +} +else +{ +uint8_t x_23; +x_23 = 1; +return x_23; +} +} +block_18: +{ +uint32_t x_4; uint8_t x_5; +x_4 = 8336; +x_5 = x_4 <= x_1; +if (x_5 == 0) +{ +if (x_3 == 0) +{ +uint32_t x_6; uint8_t x_7; +x_6 = 7522; +x_7 = x_6 <= x_1; +if (x_7 == 0) +{ +return x_3; +} +else +{ +uint32_t x_8; uint8_t x_9; +x_8 = 7530; +x_9 = x_1 <= x_8; +return x_9; +} +} +else +{ +uint8_t x_10; +x_10 = 1; +return x_10; +} +} +else +{ +uint32_t x_11; uint8_t x_12; +x_11 = 8348; +x_12 = x_1 <= x_11; +if (x_12 == 0) +{ +uint32_t x_13; uint8_t x_14; +x_13 = 7522; +x_14 = x_13 <= x_1; +if (x_14 == 0) +{ +return x_12; +} +else +{ +uint32_t x_15; uint8_t x_16; +x_15 = 7530; +x_16 = x_1 <= x_15; +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = 1; +return x_17; +} +} +} +} +} +lean_object* l_Lean_isSubScriptAlnum___boxed(lean_object* x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; lean_object* x_4; +x_2 = lean_unbox_uint32(x_1); +lean_dec(x_1); +x_3 = l_Lean_isSubScriptAlnum(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_isIdFirst(uint32_t x_1) { +_start: +{ +uint8_t x_2; +x_2 = l_Char_isAlpha(x_1); +if (x_2 == 0) +{ +uint32_t x_3; uint8_t x_4; +x_3 = 95; +x_4 = x_1 == x_3; +if (x_4 == 0) +{ +uint8_t x_5; +x_5 = l_Lean_isLetterLike(x_1); +return x_5; +} +else +{ +uint8_t x_6; +x_6 = 1; +return x_6; +} +} +else +{ +uint8_t x_7; +x_7 = 1; +return x_7; +} +} +} +lean_object* l_Lean_isIdFirst___boxed(lean_object* x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; lean_object* x_4; +x_2 = lean_unbox_uint32(x_1); +lean_dec(x_1); +x_3 = l_Lean_isIdFirst(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_isIdRest(uint32_t x_1) { +_start: +{ +uint8_t x_2; +x_2 = l_Char_isAlphanum(x_1); +if (x_2 == 0) +{ +uint32_t x_3; uint8_t x_4; +x_3 = 95; +x_4 = x_1 == x_3; +if (x_4 == 0) +{ +uint32_t x_5; uint8_t x_6; +x_5 = 39; +x_6 = x_1 == x_5; +if (x_6 == 0) +{ +uint32_t x_7; uint8_t x_8; +x_7 = 33; +x_8 = x_1 == x_7; +if (x_8 == 0) +{ +uint32_t x_9; uint8_t x_10; +x_9 = 63; +x_10 = x_1 == x_9; +if (x_10 == 0) +{ +uint8_t x_11; +x_11 = l_Lean_isLetterLike(x_1); +if (x_11 == 0) +{ +uint8_t x_12; +x_12 = l_Lean_isSubScriptAlnum(x_1); +return x_12; +} +else +{ +uint8_t x_13; +x_13 = 1; +return x_13; +} +} +else +{ +uint8_t x_14; +x_14 = 1; +return x_14; +} +} +else +{ +uint8_t x_15; +x_15 = 1; +return x_15; +} +} +else +{ +uint8_t x_16; +x_16 = 1; +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = 1; +return x_17; +} +} +else +{ +uint8_t x_18; +x_18 = 1; +return x_18; +} +} +} +lean_object* l_Lean_isIdRest___boxed(lean_object* x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; lean_object* x_4; +x_2 = lean_unbox_uint32(x_1); +lean_dec(x_1); +x_3 = l_Lean_isIdRest(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint32_t _init_l_Lean_idBeginEscape() { +_start: +{ +uint32_t x_1; +x_1 = 171; +return x_1; +} +} +uint32_t _init_l_Lean_idEndEscape() { +_start: +{ +uint32_t x_1; +x_1 = 187; +return x_1; +} +} +uint8_t l_Lean_isIdBeginEscape(uint32_t x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; +x_2 = l_Lean_idBeginEscape; +x_3 = x_1 == x_2; +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = 0; +return x_4; +} +else +{ +uint8_t x_5; +x_5 = 1; +return x_5; +} +} +} +lean_object* l_Lean_isIdBeginEscape___boxed(lean_object* x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; lean_object* x_4; +x_2 = lean_unbox_uint32(x_1); +lean_dec(x_1); +x_3 = l_Lean_isIdBeginEscape(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_isIdEndEscape(uint32_t x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; +x_2 = l_Lean_idEndEscape; +x_3 = x_1 == x_2; +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = 0; +return x_4; +} +else +{ +uint8_t x_5; +x_5 = 1; +return x_5; +} +} +} +lean_object* l_Lean_isIdEndEscape___boxed(lean_object* x_1) { +_start: +{ +uint32_t x_2; uint8_t x_3; lean_object* x_4; +x_2 = lean_unbox_uint32(x_1); +lean_dec(x_1); +x_3 = l_Lean_isIdEndEscape(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} lean_object* _init_l_Lean_Name_inhabited() { _start: { @@ -1025,7 +1717,7 @@ x_5 = l_Lean_ParserDescr_symbol(x_4, x_2, x_3); return x_5; } } -lean_object* l_Lean_ParserDescr_num(uint8_t x_1) { +lean_object* l_Lean_ParserDescr_numLit(uint8_t x_1) { _start: { lean_object* x_2; @@ -1034,17 +1726,17 @@ lean_ctor_set_uint8(x_2, 0, x_1); return x_2; } } -lean_object* l_Lean_ParserDescr_num___boxed(lean_object* x_1) { +lean_object* l_Lean_ParserDescr_numLit___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l_Lean_ParserDescr_num(x_2); +x_3 = l_Lean_ParserDescr_numLit(x_2); return x_3; } } -lean_object* l_Lean_ParserDescr_str(uint8_t x_1) { +lean_object* l_Lean_ParserDescr_strLit(uint8_t x_1) { _start: { lean_object* x_2; @@ -1053,17 +1745,17 @@ lean_ctor_set_uint8(x_2, 0, x_1); return x_2; } } -lean_object* l_Lean_ParserDescr_str___boxed(lean_object* x_1) { +lean_object* l_Lean_ParserDescr_strLit___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l_Lean_ParserDescr_str(x_2); +x_3 = l_Lean_ParserDescr_strLit(x_2); return x_3; } } -lean_object* l_Lean_ParserDescr_char(uint8_t x_1) { +lean_object* l_Lean_ParserDescr_charLit(uint8_t x_1) { _start: { lean_object* x_2; @@ -1072,13 +1764,32 @@ lean_ctor_set_uint8(x_2, 0, x_1); return x_2; } } -lean_object* l_Lean_ParserDescr_char___boxed(lean_object* x_1) { +lean_object* l_Lean_ParserDescr_charLit___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l_Lean_ParserDescr_char(x_2); +x_3 = l_Lean_ParserDescr_charLit(x_2); +return x_3; +} +} +lean_object* l_Lean_ParserDescr_nameLit(uint8_t x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_ctor(15, 0, 1); +lean_ctor_set_uint8(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_ParserDescr_nameLit___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = lean_unbox(x_1); +lean_dec(x_1); +x_3 = l_Lean_ParserDescr_nameLit(x_2); return x_3; } } @@ -1086,7 +1797,7 @@ lean_object* l_Lean_ParserDescr_ident(uint8_t x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_ctor(15, 0, 1); +x_2 = lean_alloc_ctor(16, 0, 1); lean_ctor_set_uint8(x_2, 0, x_1); return x_2; } @@ -1125,7 +1836,7 @@ lean_object* _init_l_Lean_ParserDescr_pushLeading() { _start: { lean_object* x_1; -x_1 = lean_box(16); +x_1 = lean_box(17); return x_1; } } @@ -1133,7 +1844,7 @@ lean_object* l_Lean_ParserDescr_parser(uint8_t x_1, lean_object* x_2, lean_objec _start: { lean_object* x_4; -x_4 = lean_alloc_ctor(17, 2, 1); +x_4 = lean_alloc_ctor(18, 2, 1); lean_ctor_set(x_4, 0, x_2); lean_ctor_set(x_4, 1, x_3); lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_1); @@ -2303,6 +3014,32 @@ x_1 = l_Lean_numLitKind___closed__2; return x_1; } } +lean_object* _init_l_Lean_nameLitKind___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("nameLit"); +return x_1; +} +} +lean_object* _init_l_Lean_nameLitKind___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_nameLitKind___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_nameLitKind() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_nameLitKind___closed__2; +return x_1; +} +} lean_object* _init_l_Lean_fieldIdxKind___closed__1() { _start: { @@ -3542,7 +4279,7 @@ lean_dec(x_1); return x_2; } } -lean_object* l_Lean_Syntax_isNatLitAux(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_Syntax_isLit_x3f(lean_object* x_1, lean_object* x_2) { _start: { if (lean_obj_tag(x_2) == 1) @@ -3582,8 +4319,8 @@ lean_object* x_14; lean_object* x_15; x_14 = lean_ctor_get(x_13, 1); lean_inc(x_14); lean_dec(x_13); -x_15 = l___private_Init_LeanInit_11__decodeNatLitVal(x_14); -lean_dec(x_14); +x_15 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_15, 0, x_14); return x_15; } else @@ -3604,6 +4341,39 @@ return x_17; } } } +lean_object* l_Lean_Syntax_isLit_x3f___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Syntax_isLit_x3f(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_Syntax_isNatLitAux(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Syntax_isLit_x3f(x_1, x_2); +if (lean_obj_tag(x_3) == 0) +{ +lean_object* x_4; +x_4 = lean_box(0); +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +lean_dec(x_3); +x_6 = l___private_Init_LeanInit_11__decodeNatLitVal(x_5); +lean_dec(x_5); +return x_6; +} +} +} lean_object* l_Lean_Syntax_isNatLitAux___boxed(lean_object* x_1, lean_object* x_2) { _start: { @@ -4316,64 +5086,24 @@ return x_2; lean_object* l_Lean_Syntax_isStrLit_x3f(lean_object* x_1) { _start: { -if (lean_obj_tag(x_1) == 1) +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_strLitKind; +x_3 = l_Lean_Syntax_isLit_x3f(x_2, x_1); +if (lean_obj_tag(x_3) == 0) { -lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5; -x_2 = lean_ctor_get(x_1, 0); -x_3 = lean_ctor_get(x_1, 1); -x_4 = l_Lean_strLitKind; -x_5 = lean_name_eq(x_2, x_4); -if (x_5 == 0) -{ -lean_object* x_6; -x_6 = lean_box(0); -return x_6; +return x_3; } else { -lean_object* x_7; lean_object* x_8; uint8_t x_9; -x_7 = lean_array_get_size(x_3); -x_8 = lean_unsigned_to_nat(1u); -x_9 = lean_nat_dec_eq(x_7, x_8); -lean_dec(x_7); -if (x_9 == 0) -{ -lean_object* x_10; -x_10 = lean_box(0); -return x_10; -} -else -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_11 = l_Lean_Syntax_inhabited; -x_12 = lean_unsigned_to_nat(0u); -x_13 = lean_array_get(x_11, x_3, x_12); -if (lean_obj_tag(x_13) == 2) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_13, 1); -lean_inc(x_14); -lean_dec(x_13); -x_15 = l_String_splitAux___main___closed__1; -x_16 = l_Lean_Syntax_decodeStrLitAux___main(x_14, x_8, x_15); -lean_dec(x_14); -return x_16; -} -else -{ -lean_object* x_17; -lean_dec(x_13); -x_17 = lean_box(0); -return x_17; -} -} -} -} -else -{ -lean_object* x_18; -x_18 = lean_box(0); -return x_18; +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +lean_dec(x_3); +x_5 = lean_unsigned_to_nat(1u); +x_6 = l_String_splitAux___main___closed__1; +x_7 = l_Lean_Syntax_decodeStrLitAux___main(x_4, x_5, x_6); +lean_dec(x_4); +return x_7; } } } @@ -4456,64 +5186,25 @@ return x_2; lean_object* l_Lean_Syntax_isCharLit_x3f(lean_object* x_1) { _start: { -if (lean_obj_tag(x_1) == 1) +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_charLitKind; +x_3 = l_Lean_Syntax_isLit_x3f(x_2, x_1); +if (lean_obj_tag(x_3) == 0) { -lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5; -x_2 = lean_ctor_get(x_1, 0); -x_3 = lean_ctor_get(x_1, 1); -x_4 = l_Lean_charLitKind; -x_5 = lean_name_eq(x_2, x_4); -if (x_5 == 0) +lean_object* x_4; +x_4 = lean_box(0); +return x_4; +} +else { -lean_object* x_6; -x_6 = lean_box(0); +lean_object* x_5; lean_object* x_6; +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +lean_dec(x_3); +x_6 = l_Lean_Syntax_decodeCharLit(x_5); +lean_dec(x_5); return x_6; } -else -{ -lean_object* x_7; lean_object* x_8; uint8_t x_9; -x_7 = lean_array_get_size(x_3); -x_8 = lean_unsigned_to_nat(1u); -x_9 = lean_nat_dec_eq(x_7, x_8); -lean_dec(x_7); -if (x_9 == 0) -{ -lean_object* x_10; -x_10 = lean_box(0); -return x_10; -} -else -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_11 = l_Lean_Syntax_inhabited; -x_12 = lean_unsigned_to_nat(0u); -x_13 = lean_array_get(x_11, x_3, x_12); -if (lean_obj_tag(x_13) == 2) -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_13, 1); -lean_inc(x_14); -lean_dec(x_13); -x_15 = l_Lean_Syntax_decodeCharLit(x_14); -lean_dec(x_14); -return x_15; -} -else -{ -lean_object* x_16; -lean_dec(x_13); -x_16 = lean_box(0); -return x_16; -} -} -} -} -else -{ -lean_object* x_17; -x_17 = lean_box(0); -return x_17; -} } } lean_object* l_Lean_Syntax_isCharLit_x3f___boxed(lean_object* x_1) { @@ -4525,6 +5216,280 @@ lean_dec(x_1); return x_2; } } +lean_object* l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = lean_nat_dec_eq(x_3, x_2); +if (x_4 == 0) +{ +uint32_t x_5; uint8_t x_6; +x_5 = lean_string_utf8_get(x_1, x_3); +x_6 = l_Lean_isIdRest(x_5); +if (x_6 == 0) +{ +return x_3; +} +else +{ +lean_object* x_7; +x_7 = lean_string_utf8_next(x_1, x_3); +lean_dec(x_3); +x_3 = x_7; +goto _start; +} +} +else +{ +return x_3; +} +} +} +lean_object* l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = lean_nat_dec_eq(x_3, x_2); +if (x_4 == 0) +{ +uint32_t x_5; uint8_t x_6; +x_5 = lean_string_utf8_get(x_1, x_3); +x_6 = l_Lean_isIdEndEscape(x_5); +if (x_6 == 0) +{ +lean_object* x_7; +x_7 = lean_string_utf8_next(x_1, x_3); +lean_dec(x_3); +x_3 = x_7; +goto _start; +} +else +{ +return x_3; +} +} +else +{ +return x_3; +} +} +} +lean_object* l___private_Init_LeanInit_13__decodeNameLitAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; uint32_t x_15; uint8_t x_16; +x_15 = lean_string_utf8_get(x_1, x_2); +x_16 = l_Lean_isIdBeginEscape(x_15); +if (x_16 == 0) +{ +uint8_t x_17; +x_17 = l_Lean_isIdFirst(x_15); +if (x_17 == 0) +{ +lean_object* x_18; +lean_dec(x_3); +lean_dec(x_2); +x_18 = lean_box(0); +return x_18; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_19 = lean_string_utf8_byte_size(x_1); +lean_inc(x_2); +x_20 = l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__1(x_1, x_19, x_2); +lean_dec(x_19); +x_21 = lean_string_utf8_extract(x_1, x_2, x_20); +lean_dec(x_2); +x_22 = lean_name_mk_string(x_3, x_21); +x_4 = x_20; +x_5 = x_22; +goto block_14; +} +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; uint32_t x_26; uint8_t x_27; +x_23 = lean_string_utf8_next(x_1, x_2); +lean_dec(x_2); +x_24 = lean_string_utf8_byte_size(x_1); +lean_inc(x_23); +x_25 = l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__2(x_1, x_24, x_23); +lean_dec(x_24); +x_26 = lean_string_utf8_get(x_1, x_25); +x_27 = l_Lean_isIdEndEscape(x_26); +if (x_27 == 0) +{ +lean_object* x_28; +lean_dec(x_25); +lean_dec(x_23); +lean_dec(x_3); +x_28 = lean_box(0); +return x_28; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_string_utf8_next(x_1, x_25); +x_30 = lean_string_utf8_extract(x_1, x_23, x_25); +lean_dec(x_25); +lean_dec(x_23); +x_31 = lean_name_mk_string(x_3, x_30); +x_4 = x_29; +x_5 = x_31; +goto block_14; +} +} +block_14: +{ +uint32_t x_6; uint32_t x_7; uint8_t x_8; +x_6 = lean_string_utf8_get(x_1, x_4); +x_7 = 46; +x_8 = x_6 == x_7; +if (x_8 == 0) +{ +uint8_t x_9; +x_9 = lean_string_utf8_at_end(x_1, x_4); +lean_dec(x_4); +if (x_9 == 0) +{ +lean_object* x_10; +lean_dec(x_5); +x_10 = lean_box(0); +return x_10; +} +else +{ +lean_object* x_11; +x_11 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_11, 0, x_5); +return x_11; +} +} +else +{ +lean_object* x_12; +x_12 = lean_string_utf8_next(x_1, x_4); +lean_dec(x_4); +x_2 = x_12; +x_3 = x_5; +goto _start; +} +} +} +} +lean_object* l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__1(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Substring_takeWhileAux___main___at___private_Init_LeanInit_13__decodeNameLitAux___main___spec__2(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l___private_Init_LeanInit_13__decodeNameLitAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Init_LeanInit_13__decodeNameLitAux___main(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l___private_Init_LeanInit_13__decodeNameLitAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Init_LeanInit_13__decodeNameLitAux___main(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l___private_Init_LeanInit_13__decodeNameLitAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Init_LeanInit_13__decodeNameLitAux(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_Syntax_decodeNameLit(lean_object* x_1) { +_start: +{ +lean_object* x_2; uint32_t x_3; uint32_t x_4; uint8_t x_5; +x_2 = lean_unsigned_to_nat(0u); +x_3 = lean_string_utf8_get(x_1, x_2); +x_4 = 96; +x_5 = x_3 == x_4; +if (x_5 == 0) +{ +lean_object* x_6; +x_6 = lean_box(0); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_unsigned_to_nat(1u); +x_8 = lean_box(0); +x_9 = l___private_Init_LeanInit_13__decodeNameLitAux___main(x_1, x_7, x_8); +return x_9; +} +} +} +lean_object* l_Lean_Syntax_decodeNameLit___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Syntax_decodeNameLit(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_Syntax_isNameLit_x3f(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_nameLitKind; +x_3 = l_Lean_Syntax_isLit_x3f(x_2, x_1); +if (lean_obj_tag(x_3) == 0) +{ +lean_object* x_4; +x_4 = lean_box(0); +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +lean_dec(x_3); +x_6 = l_Lean_Syntax_decodeNameLit(x_5); +lean_dec(x_5); +return x_6; +} +} +} +lean_object* l_Lean_Syntax_isNameLit_x3f___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Syntax_isNameLit_x3f(x_1); +lean_dec(x_1); +return x_2; +} +} uint8_t l_Lean_Syntax_hasArgs(lean_object* x_1) { _start: { @@ -4769,6 +5734,8 @@ lean_dec_ref(res); res = initialize_Init_Control_Except(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l_Lean_idBeginEscape = _init_l_Lean_idBeginEscape(); +l_Lean_idEndEscape = _init_l_Lean_idEndEscape(); l_Lean_Name_inhabited = _init_l_Lean_Name_inhabited(); lean_mark_persistent(l_Lean_Name_inhabited); l_Lean_Name_hashable___closed__1 = _init_l_Lean_Name_hashable___closed__1(); @@ -4861,6 +5828,12 @@ l_Lean_numLitKind___closed__2 = _init_l_Lean_numLitKind___closed__2(); lean_mark_persistent(l_Lean_numLitKind___closed__2); l_Lean_numLitKind = _init_l_Lean_numLitKind(); lean_mark_persistent(l_Lean_numLitKind); +l_Lean_nameLitKind___closed__1 = _init_l_Lean_nameLitKind___closed__1(); +lean_mark_persistent(l_Lean_nameLitKind___closed__1); +l_Lean_nameLitKind___closed__2 = _init_l_Lean_nameLitKind___closed__2(); +lean_mark_persistent(l_Lean_nameLitKind___closed__2); +l_Lean_nameLitKind = _init_l_Lean_nameLitKind(); +lean_mark_persistent(l_Lean_nameLitKind); l_Lean_fieldIdxKind___closed__1 = _init_l_Lean_fieldIdxKind___closed__1(); lean_mark_persistent(l_Lean_fieldIdxKind___closed__1); l_Lean_fieldIdxKind___closed__2 = _init_l_Lean_fieldIdxKind___closed__2();