diff --git a/stage0/src/Lean/Parser/Basic.lean b/stage0/src/Lean/Parser/Basic.lean index 0dd0bfbb92..a2b3f2a419 100644 --- a/stage0/src/Lean/Parser/Basic.lean +++ b/stage0/src/Lean/Parser/Basic.lean @@ -1306,7 +1306,8 @@ fun c s => else invalidLongestMatchParser s -def longestMatchStep (left? : Option Syntax) (startSize : Nat) (startPos : String.Pos) (p : ParserFn) : ParserFn := +def longestMatchStep (left? : Option Syntax) (startSize : Nat) (startPos : String.Pos) (prevPrio : Nat) (prio : Nat) (p : ParserFn) + : ParserContext → ParserState → ParserState × Nat := fun c s => let prevErrorMsg := s.errorMsg; let prevStopPos := s.pos; @@ -1315,41 +1316,41 @@ let s := s.restore prevSize startPos; let s := runLongestMatchParser left? p c s; match prevErrorMsg, s.errorMsg with | none, none => -- both succeeded - if s.pos > prevStopPos then s.replaceLongest startSize - else if s.pos < prevStopPos then s.restore prevSize prevStopPos -- keep prev - else s + if s.pos > prevStopPos || (s.pos == prevStopPos && prio > prevPrio) then (s.replaceLongest startSize, prio) + else if s.pos < prevStopPos || (s.pos == prevStopPos && prio < prevPrio) then (s.restore prevSize prevStopPos, prevPrio) -- keep prev + else (s, prio) | none, some _ => -- prev succeeded, current failed - s.restore prevSize prevStopPos + (s.restore prevSize prevStopPos, prevPrio) | some oldError, some _ => -- both failed - if s.pos > prevStopPos then s.keepNewError prevSize - else if s.pos < prevStopPos then s.keepPrevError prevSize prevStopPos prevErrorMsg - else s.mergeErrors prevSize oldError + if s.pos > prevStopPos || (s.pos == prevStopPos && prio > prevPrio) then (s.keepNewError prevSize, prio) + else if s.pos < prevStopPos || (s.pos == prevStopPos && prio < prevPrio) then (s.keepPrevError prevSize prevStopPos prevErrorMsg, prevPrio) + else (s.mergeErrors prevSize oldError, prio) | some _, none => -- prev failed, current succeeded let successNode := s.stxStack.back; let s := s.shrinkStack startSize; -- restore stack to initial size to make sure (failure) nodes are removed from the stack - s.pushSyntax successNode -- put successNode back on the stack + (s.pushSyntax successNode, prio) -- put successNode back on the stack def longestMatchMkResult (startSize : Nat) (s : ParserState) : ParserState := if !s.hasError && s.stackSize > startSize + 1 then s.mkNode choiceKind startSize else s -def longestMatchFnAux (left? : Option Syntax) (startSize : Nat) (startPos : String.Pos) : List Parser → ParserFn -| [] => fun _ s => longestMatchMkResult startSize s -| p::ps => fun c s => - let s := longestMatchStep left? startSize startPos p.fn c s; - longestMatchFnAux ps c s +def longestMatchFnAux (left? : Option Syntax) (startSize : Nat) (startPos : String.Pos) : Nat → List (Parser × Nat) → ParserFn +| prevPrio, [] => fun _ s => longestMatchMkResult startSize s +| prevPrio, p::ps => fun c s => + let (s, prevPrio) := longestMatchStep left? startSize startPos prevPrio p.2 p.1.fn c s; + longestMatchFnAux prevPrio ps c s -def longestMatchFn (left? : Option Syntax) : List Parser → ParserFn +def longestMatchFn (left? : Option Syntax) : List (Parser × Nat) → ParserFn | [] => fun _ s => s.mkError "longestMatch: empty list" -| [p] => runLongestMatchParser left? p.fn +| [p] => runLongestMatchParser left? p.1.fn | p::ps => fun c s => let startSize := s.stackSize; let startPos := s.pos; - let s := runLongestMatchParser left? p.fn c s; + let s := runLongestMatchParser left? p.1.fn c s; if s.hasError then let s := s.shrinkStack startSize; - longestMatchFnAux left? startSize startPos ps c s + longestMatchFnAux left? startSize startPos p.2 ps c s else - longestMatchFnAux left? startSize startPos ps c s + longestMatchFnAux left? startSize startPos p.2 ps c s def anyOfFn : List Parser → ParserFn | [], _, s => s.mkError "anyOf: empty list" @@ -1393,10 +1394,10 @@ instance {α : Type} : HasEmptyc (TokenMap α) := ⟨RBMap.empty⟩ end TokenMap structure PrattParsingTables := -(leadingTable : TokenMap Parser := {}) -(leadingParsers : List Parser := []) -- for supporting parsers we cannot obtain first token -(trailingTable : TokenMap TrailingParser := {}) -(trailingParsers : List TrailingParser := []) -- for supporting parsers such as function application +(leadingTable : TokenMap (Parser × Nat) := {}) +(leadingParsers : List (Parser × Nat) := []) -- for supporting parsers we cannot obtain first token +(trailingTable : TokenMap (Parser × Nat) := {}) +(trailingParsers : List (Parser × Nat) := []) -- for supporting parsers such as function application instance PrattParsingTables.inhabited : Inhabited PrattParsingTables := ⟨{}⟩ @@ -1608,7 +1609,7 @@ fun c s => @[inline] def leadingParser (kind : Name) (tables : PrattParsingTables) (leadingIdentAsSymbol : Bool) (antiquotParser : ParserFn) : ParserFn := withAntiquotFn antiquotParser (leadingParserAux kind tables leadingIdentAsSymbol) -def trailingLoopStep (tables : PrattParsingTables) (left : Syntax) (ps : List Parser) : ParserFn := +def trailingLoopStep (tables : PrattParsingTables) (left : Syntax) (ps : List (Parser × Nat)) : ParserFn := fun c s => longestMatchFn left (ps ++ tables.trailingParsers) c s private def mkTrailingResult (s : ParserState) (iniSz : Nat) : ParserState := diff --git a/stage0/src/Lean/Parser/Extension.lean b/stage0/src/Lean/Parser/Extension.lean index 042d6b63c7..fc9609c504 100644 --- a/stage0/src/Lean/Parser/Extension.lean +++ b/stage0/src/Lean/Parser/Extension.lean @@ -53,13 +53,13 @@ inductive ParserExtensionOleanEntry | token (val : Token) : ParserExtensionOleanEntry | kind (val : SyntaxNodeKind) : ParserExtensionOleanEntry | category (catName : Name) (leadingIdentAsSymbol : Bool) -| parser (catName : Name) (declName : Name) : ParserExtensionOleanEntry +| parser (catName : Name) (declName : Name) (prio : Nat) : ParserExtensionOleanEntry inductive ParserExtensionEntry | token (val : Token) : ParserExtensionEntry | kind (val : SyntaxNodeKind) : ParserExtensionEntry | category (catName : Name) (leadingIdentAsSymbol : Bool) -| parser (catName : Name) (declName : Name) (leading : Bool) (p : Parser) : ParserExtensionEntry +| parser (catName : Name) (declName : Name) (leading : Bool) (p : Parser) (prio : Nat) : ParserExtensionEntry structure ParserExtensionState := (tokens : TokenTable := {}) @@ -89,40 +89,40 @@ throw ("unknown parser category '" ++ toString catName ++ "'") abbrev getCategory (categories : ParserCategories) (catName : Name) : Option ParserCategory := categories.find? catName -def addLeadingParser (categories : ParserCategories) (catName : Name) (parserName : Name) (p : Parser) : Except String ParserCategories := +def addLeadingParser (categories : ParserCategories) (catName : Name) (parserName : Name) (p : Parser) (prio : Nat) : Except String ParserCategories := match getCategory categories catName with | none => throwUnknownParserCategory catName | some cat => let addTokens (tks : List Token) : Except String ParserCategories := let tks := tks.map $ fun tk => mkNameSimple tk; - let tables := tks.eraseDups.foldl (fun (tables : PrattParsingTables) tk => { tables with leadingTable := tables.leadingTable.insert tk p }) cat.tables; + let tables := tks.eraseDups.foldl (fun (tables : PrattParsingTables) tk => { tables with leadingTable := tables.leadingTable.insert tk (p, prio) }) cat.tables; pure $ categories.insert catName { cat with tables := tables }; match p.info.firstTokens with | FirstTokens.tokens tks => addTokens tks | FirstTokens.optTokens tks => addTokens tks | _ => - let tables := { cat.tables with leadingParsers := p :: cat.tables.leadingParsers }; + let tables := { cat.tables with leadingParsers := (p, prio) :: cat.tables.leadingParsers }; pure $ categories.insert catName { cat with tables := tables } -private def addTrailingParserAux (tables : PrattParsingTables) (p : TrailingParser) : PrattParsingTables := +private def addTrailingParserAux (tables : PrattParsingTables) (p : TrailingParser) (prio : Nat) : PrattParsingTables := let addTokens (tks : List Token) : PrattParsingTables := let tks := tks.map $ fun tk => mkNameSimple tk; - tks.eraseDups.foldl (fun (tables : PrattParsingTables) tk => { tables with trailingTable := tables.trailingTable.insert tk p }) tables; + tks.eraseDups.foldl (fun (tables : PrattParsingTables) tk => { tables with trailingTable := tables.trailingTable.insert tk (p, prio) }) tables; match p.info.firstTokens with | FirstTokens.tokens tks => addTokens tks | FirstTokens.optTokens tks => addTokens tks -| _ => { tables with trailingParsers := p :: tables.trailingParsers } +| _ => { tables with trailingParsers := (p, prio) :: tables.trailingParsers } -def addTrailingParser (categories : ParserCategories) (catName : Name) (p : TrailingParser) : Except String ParserCategories := +def addTrailingParser (categories : ParserCategories) (catName : Name) (p : TrailingParser) (prio : Nat) : Except String ParserCategories := match getCategory categories catName with | none => throwUnknownParserCategory catName -| some cat => pure $ categories.insert catName { cat with tables := addTrailingParserAux cat.tables p } +| some cat => pure $ categories.insert catName { cat with tables := addTrailingParserAux cat.tables p prio } -def addParser (categories : ParserCategories) (catName : Name) (declName : Name) (leading : Bool) (p : Parser) : Except String ParserCategories := +def addParser (categories : ParserCategories) (catName : Name) (declName : Name) (leading : Bool) (p : Parser) (prio : Nat) : Except String ParserCategories := match leading, p with -| true, p => addLeadingParser categories catName declName p -| false, p => addTrailingParser categories catName p +| true, p => addLeadingParser categories catName declName p prio +| false, p => addTrailingParser categories catName p prio def addParserTokens (tokenTable : TokenTable) (info : ParserInfo) : Except String TokenTable := let newTokens := info.collectTokens []; @@ -134,18 +134,24 @@ match addParserTokens tokenTable info with | Except.ok tokenTable => builtinTokenTable.set tokenTable | Except.error msg => throw (IO.userError ("invalid builtin parser '" ++ toString declName ++ "', " ++ msg)) -def addBuiltinParser (catName : Name) (declName : Name) (leading : Bool) (p : Parser) : IO Unit := do +def addBuiltinParser (catName : Name) (declName : Name) (leading : Bool) (p : Parser) (prio : Nat) : IO Unit := do categories ← builtinParserCategoriesRef.get; -categories ← IO.ofExcept $ addParser categories catName declName leading p; +categories ← IO.ofExcept $ addParser categories catName declName leading p prio; builtinParserCategoriesRef.set categories; builtinSyntaxNodeKindSetRef.modify p.info.collectKinds; updateBuiltinTokens p.info declName +def addBuiltinLeadingParserNew (catName : Name) (declName : Name) (p : Parser) (prio : Nat) : IO Unit := +addBuiltinParser catName declName true p prio + +def addBuiltinTrailingParserNew (catName : Name) (declName : Name) (p : TrailingParser) (prio : Nat) : IO Unit := +addBuiltinParser catName declName false p prio + def addBuiltinLeadingParser (catName : Name) (declName : Name) (p : Parser) : IO Unit := -addBuiltinParser catName declName true p +addBuiltinParser catName declName true p 0 def addBuiltinTrailingParser (catName : Name) (declName : Name) (p : TrailingParser) : IO Unit := -addBuiltinParser catName declName false p +addBuiltinParser catName declName false p 0 private def ParserExtension.addEntry (s : ParserExtensionState) (e : ParserExtensionEntry) : ParserExtensionState := match e with @@ -160,9 +166,9 @@ match e with else { s with categories := s.categories.insert catName { tables := {}, leadingIdentAsSymbol := leadingIdentAsSymbol }, newEntries := ParserExtensionOleanEntry.category catName leadingIdentAsSymbol :: s.newEntries } -| ParserExtensionEntry.parser catName declName leading parser => - match addParser s.categories catName declName leading parser with - | Except.ok categories => { s with categories := categories, newEntries := ParserExtensionOleanEntry.parser catName declName :: s.newEntries } +| ParserExtensionEntry.parser catName declName leading parser prio => + match addParser s.categories catName declName leading parser prio with + | Except.ok categories => { s with categories := categories, newEntries := ParserExtensionOleanEntry.parser catName declName prio :: s.newEntries } | _ => unreachable! unsafe def mkParserOfConstantUnsafe @@ -261,9 +267,9 @@ es.foldlM | ParserExtensionOleanEntry.category catName leadingIdentAsSymbol => do categories ← IO.ofExcept (addParserCategoryCore s.categories catName { tables := {}, leadingIdentAsSymbol := leadingIdentAsSymbol}); pure { s with categories := categories } - | ParserExtensionOleanEntry.parser catName declName => do + | ParserExtensionOleanEntry.parser catName declName prio => do p ← IO.ofExcept $ mkParserOfConstant env s.categories declName; - categories ← IO.ofExcept $ addParser s.categories catName declName p.1 p.2; + categories ← IO.ofExcept $ addParser s.categories catName declName p.1 p.2 prio; -- discard result env; all environment side effects should already have happened when the parser was declared initially _ ← (runParserAttributeHooks catName declName /- builtin -/ false).toIO {} { env := env }; pure { s with categories := categories }) @@ -362,34 +368,42 @@ else if input.atEnd s.pos then else Except.error ((s.mkError "end of input").toErrorMsg c) -def declareBuiltinParser (env : Environment) (addFnName : Name) (catName : Name) (declName : Name) : IO Environment := +def declareBuiltinParser (env : Environment) (addFnName : Name) (catName : Name) (declName : Name) (prio : Nat) : IO Environment := let name := `_regBuiltinParser ++ declName; let type := mkApp (mkConst `IO) (mkConst `Unit); -let val := mkAppN (mkConst addFnName) #[toExpr catName, toExpr declName, mkConst declName]; +let val := mkAppN (mkConst addFnName) #[toExpr catName, toExpr declName, mkConst declName, mkNatLit prio]; let decl := Declaration.defnDecl { name := name, lparams := [], type := type, value := val, hints := ReducibilityHints.opaque, isUnsafe := false }; match env.addAndCompile {} decl with -- TODO: pretty print error | Except.error _ => throw (IO.userError ("failed to emit registration code for builtin parser '" ++ toString declName ++ "'")) | Except.ok env => IO.ofExcept (setInitAttr env name) -def declareLeadingBuiltinParser (env : Environment) (catName : Name) (declName : Name) : IO Environment := -- TODO: use CoreM? -declareBuiltinParser env `Lean.Parser.addBuiltinLeadingParser catName declName +def declareLeadingBuiltinParser (env : Environment) (catName : Name) (declName : Name) (prio : Nat) : IO Environment := -- TODO: use CoreM? +declareBuiltinParser env `Lean.Parser.addBuiltinLeadingParserNew catName declName prio -def declareTrailingBuiltinParser (env : Environment) (catName : Name) (declName : Name) : IO Environment := -- TODO: use CoreM? -declareBuiltinParser env `Lean.Parser.addBuiltinTrailingParser catName declName +def declareTrailingBuiltinParser (env : Environment) (catName : Name) (declName : Name) (prio : Nat) : IO Environment := -- TODO: use CoreM? +declareBuiltinParser env `Lean.Parser.addBuiltinTrailingParserNew catName declName prio + +def getParserPriority (args : Syntax) : Except String Nat := +match args.getNumArgs with +| 0 => pure 0 +| 1 => match (args.getArg 0).isNatLit? with + | some prio => pure prio + | none => throw "invalid parser attribute, numeral expected" +| _ => throw "invalid parser attribute, no argument or numeral expected" private def BuiltinParserAttribute.add (attrName : Name) (catName : Name) (declName : Name) (args : Syntax) (persistent : Bool) : CoreM Unit := do -when args.hasArgs $ throwError ("invalid attribute '" ++ attrName ++ "', unexpected argument"); +prio ← ofExcept (getParserPriority args); unless persistent $ throwError ("invalid attribute '" ++ attrName ++ "', must be persistent"); decl ← getConstInfo declName; env ← getEnv; match decl.type with | Expr.const `Lean.Parser.TrailingParser _ _ => do - env ← liftIO $ declareTrailingBuiltinParser env catName declName; + env ← liftIO $ declareTrailingBuiltinParser env catName declName prio; setEnv env | Expr.const `Lean.Parser.Parser _ _ => do - env ← liftIO $ declareLeadingBuiltinParser env catName declName; + env ← liftIO $ declareLeadingBuiltinParser env catName declName prio; setEnv env | _ => throwError ("unexpected parser type at '" ++ declName ++ "' (`Parser` or `TrailingParser` expected"); runParserAttributeHooks catName declName /- builtin -/ true @@ -407,7 +421,7 @@ registerBuiltinAttribute { } private def ParserAttribute.add (attrName : Name) (catName : Name) (declName : Name) (args : Syntax) (persistent : Bool) : CoreM Unit := do -when args.hasArgs $ throwError ("invalid attribute '" ++ attrName ++ "', unexpected argument"); +prio ← ofExcept (getParserPriority args); env ← getEnv; let categories := (parserExtension.getState env).categories; match mkParserOfConstant env categories declName with @@ -424,8 +438,8 @@ match mkParserOfConstant env categories declName with }; let kinds := parser.info.collectKinds {}; kinds.forM fun kind _ => modifyEnv fun env => addSyntaxNodeKind env kind; - match addParser categories catName declName leading parser with - | Except.ok _ => modifyEnv fun env => parserExtension.addEntry env $ ParserExtensionEntry.parser catName declName leading parser + match addParser categories catName declName leading parser prio with + | Except.ok _ => modifyEnv fun env => parserExtension.addEntry env $ ParserExtensionEntry.parser catName declName leading parser prio | Except.error ex => throwError ex; runParserAttributeHooks catName declName /- builtin -/ false diff --git a/stage0/stdlib/Lean/Delaborator.c b/stage0/stdlib/Lean/Delaborator.c index 5edc4e8b24..6c38e65a23 100644 --- a/stage0/stdlib/Lean/Delaborator.c +++ b/stage0/stdlib/Lean/Delaborator.c @@ -359,6 +359,7 @@ lean_object* l___regBuiltin_Lean_Delaborator_delabModN___closed__5; lean_object* l_Lean_Delaborator_delabMap___lambda__1___closed__4; extern lean_object* l_Lean_Elab_Level_elabLevel___main___closed__6; lean_object* l_Lean_Delaborator_delabSort___closed__7; +extern lean_object* l_Lean_Elab_Term_tryCoe___closed__4; lean_object* l_Lean_Delaborator_annotateCurPos(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Delaborator_delabModN___closed__3; lean_object* l_Lean_Delaborator_HasOrelse___closed__1; @@ -1163,7 +1164,6 @@ lean_object* l_Lean_Delaborator_delabNot___lambda__1___closed__2; lean_object* l_Lean_Delaborator_delabAndM___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Delaborator_delabOfNat___closed__1; lean_object* l_Lean_getPPBinderTypes___boxed(lean_object*); -extern lean_object* l_Lean_Elab_Term_tryCoe___closed__3; lean_object* l_ReaderT_bind___at_Lean_Level_quote___main___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -19633,7 +19633,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Delaborator_getExprKind___closed__5; -x_2 = l_Lean_Elab_Term_tryCoe___closed__3; +x_2 = l_Lean_Elab_Term_tryCoe___closed__4; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } diff --git a/stage0/stdlib/Lean/Elab/Command.c b/stage0/stdlib/Lean/Elab/Command.c index 8ec9b2ef38..897589a4be 100644 --- a/stage0/stdlib/Lean/Elab/Command.c +++ b/stage0/stdlib/Lean/Elab/Command.c @@ -120,7 +120,6 @@ lean_object* l_Lean_Elab_Command_elabInitQuot___rarg___boxed(lean_object*, lean_ lean_object* l_Array_foldlStepMAux___main___at_Lean_Elab_Command_elabOpenRenaming___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_ensureNoUnassignedMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_addMessageContextPartial___at_Lean_Elab_Command_Lean_AddMessageContext___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__3; lean_object* l_Lean_ofExcept___at_Lean_Elab_Command_elabEvalUnsafe___spec__3(lean_object*); lean_object* l_Lean_Elab_checkNotAlreadyDeclared___at_Lean_Elab_Command_expandDeclId___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabOpen___closed__2; @@ -708,6 +707,7 @@ lean_object* l_Lean_addAndCompile___at_Lean_Elab_Command_elabEvalUnsafe___spec__ lean_object* l_Lean_Elab_Command_getRef___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_monadInhabited___rarg(lean_object*, lean_object*); lean_object* lean_add_decl(lean_object*, lean_object*); +extern lean_object* l_Lean_Elab_Term_tryCoe___closed__3; lean_object* _init_l_Lean_Elab_Command_Scope_inhabited___closed__1() { _start: { @@ -15953,7 +15953,7 @@ _start: 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; x_12 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__1; x_13 = lean_name_mk_string(x_1, x_12); -x_14 = l_Lean_Parser_declareBuiltinParser___closed__3; +x_14 = l_Lean_Elab_Term_tryCoe___closed__3; lean_inc(x_2); x_15 = lean_array_push(x_14, x_2); lean_inc(x_4); diff --git a/stage0/stdlib/Lean/Elab/LetRec.c b/stage0/stdlib/Lean/Elab/LetRec.c index e7b95e6ab9..f52a62d765 100644 --- a/stage0/stdlib/Lean/Elab/LetRec.c +++ b/stage0/stdlib/Lean/Elab/LetRec.c @@ -36,7 +36,6 @@ extern lean_object* l___private_Lean_Elab_Quotation_4__getHeadInfo___elambda__3_ lean_object* lean_private_to_user_name(lean_object*); extern lean_object* l_Lean_MessageData_arrayExpr_toMessageData___main___closed__1; lean_object* l_Lean_Meta_mkLambdaFVars___at___private_Lean_Elab_Term_15__elabImplicitLambdaAux___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_ReaderT_Monad___rarg(lean_object*); lean_object* l___private_Lean_Elab_LetRec_5__abortIfContainsSyntheticSorry(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLetDecl___at_Lean_Elab_Term_elabLetDeclAux___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); @@ -85,13 +84,13 @@ extern lean_object* l_Lean_mkAppStx___closed__6; lean_object* l_Array_umapMAux___main___at___private_Lean_Elab_LetRec_1__mkLetRecDeclView___spec__7___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTermEnsuringType___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, 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*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Lean_Meta_Basic_12__withNewLocalInstancesImp___main___rarg___closed__3; lean_object* l___private_Lean_Meta_Basic_21__forallBoundedTelescopeImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_applyAttributesImp(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_LetRec_2__withAuxLocalDeclsAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_LetRec_1__mkLetRecDeclView___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Term_termElabAttribute; lean_object* l_Lean_Meta_mkLambdaFVars___at___private_Lean_Elab_Term_15__elabImplicitLambdaAux___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1; lean_object* l_Lean_Syntax_isIdOrAtom_x3f(lean_object*); extern lean_object* l_Lean_Elab_elabAttr___rarg___closed__3; uint8_t l_Lean_isAttribute(lean_object*, lean_object*); @@ -126,14 +125,12 @@ lean_object* l___private_Lean_Elab_LetRec_3__withAuxLocalDecls___rarg(lean_objec lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_LetRec_2__withAuxLocalDeclsAux(lean_object*); extern lean_object* l_Lean_Elab_elabAttr___rarg___lambda__2___closed__3; -lean_object* l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__2; lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Util_4__expandMacro_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Term_elabLetRec___closed__2; lean_object* l_Lean_throwError___at_Lean_Elab_Term_throwErrorIfErrors___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkForallFVars___at_Lean_Elab_Term_elabForall___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_elabAttr___at___private_Lean_Elab_LetRec_1__mkLetRecDeclView___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__1; lean_object* l_Lean_Elab_throwAbort___at_Lean_Elab_Term_ensureNoUnassignedMVars___spec__2___rarg(lean_object*); lean_object* l_Array_umapMAux___main___at___private_Lean_Elab_LetRec_1__mkLetRecDeclView___spec__7___closed__2; lean_object* l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -2021,24 +2018,6 @@ return x_24; } } } -lean_object* _init_l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} -lean_object* _init_l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__1; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} lean_object* l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { @@ -2047,7 +2026,7 @@ x_9 = lean_ctor_get(x_1, 0); lean_inc(x_9); lean_dec(x_1); x_10 = x_9; -x_11 = l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__2; +x_11 = l___private_Lean_Meta_Basic_12__withNewLocalInstancesImp___main___rarg___closed__3; x_12 = lean_unsigned_to_nat(0u); x_13 = lean_alloc_closure((void*)(l_Array_umapMAux___main___at___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___spec__2), 10, 3); lean_closure_set(x_13, 0, x_11); @@ -2584,10 +2563,6 @@ l_Array_umapMAux___main___at___private_Lean_Elab_LetRec_1__mkLetRecDeclView___sp lean_mark_persistent(l_Array_umapMAux___main___at___private_Lean_Elab_LetRec_1__mkLetRecDeclView___spec__7___closed__2); l_Array_umapMAux___main___at___private_Lean_Elab_LetRec_1__mkLetRecDeclView___spec__7___closed__3 = _init_l_Array_umapMAux___main___at___private_Lean_Elab_LetRec_1__mkLetRecDeclView___spec__7___closed__3(); lean_mark_persistent(l_Array_umapMAux___main___at___private_Lean_Elab_LetRec_1__mkLetRecDeclView___spec__7___closed__3); -l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__1 = _init_l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__1); -l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__2 = _init_l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_LetRec_4__elabLetRecDeclValues___closed__2); l___regBuiltin_Lean_Elab_Term_elabLetRec___closed__1 = _init_l___regBuiltin_Lean_Elab_Term_elabLetRec___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_Elab_Term_elabLetRec___closed__1); l___regBuiltin_Lean_Elab_Term_elabLetRec___closed__2 = _init_l___regBuiltin_Lean_Elab_Term_elabLetRec___closed__2(); diff --git a/stage0/stdlib/Lean/Elab/StructInst.c b/stage0/stdlib/Lean/Elab/StructInst.c index 8346369e96..33494e4b34 100644 --- a/stage0/stdlib/Lean/Elab/StructInst.c +++ b/stage0/stdlib/Lean/Elab/StructInst.c @@ -112,7 +112,6 @@ uint8_t l_List_foldr___main___at_Lean_Elab_Term_StructInst_Struct_allDefault___m lean_object* l_Lean_Elab_Term_StructInst_FieldLHS_inhabited___closed__1; lean_object* l___private_Lean_Elab_StructInst_16__mkSubstructSource___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*); -extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__3; lean_object* l_List_mapM___main___at___private_Lean_Elab_StructInst_10__expandParentFields___spec__2___closed__5; lean_object* l_List_foldlM___main___at___private_Lean_Elab_StructInst_12__mkFieldMap___spec__10___closed__2; lean_object* l_Lean_Elab_Term_StructInst_Struct_ref(lean_object*); @@ -585,6 +584,7 @@ uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_StructInst_4__elabModifyOp___closed__27; lean_object* l_monadInhabited___rarg(lean_object*, lean_object*); uint8_t l_Lean_Syntax_isIdent(lean_object*); +extern lean_object* l_Lean_Elab_Term_tryCoe___closed__3; lean_object* l___private_Lean_Elab_StructInst_13__isSimpleField_x3f(lean_object*); lean_object* l_Lean_Elab_Term_StructInst_expandStructInstExpectedType(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: @@ -13890,7 +13890,7 @@ lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_obj x_3 = l_System_FilePath_dirName___closed__1; x_4 = l_Lean_mkAtomFrom(x_1, x_3); x_5 = l_Lean_mkIdentFrom(x_1, x_2); -x_6 = l_Lean_Parser_declareBuiltinParser___closed__3; +x_6 = l_Lean_Elab_Term_tryCoe___closed__3; x_7 = lean_array_push(x_6, x_1); x_8 = lean_array_push(x_7, x_4); x_9 = lean_array_push(x_8, x_5); diff --git a/stage0/stdlib/Lean/Elab/Tactic/Induction.c b/stage0/stdlib/Lean/Elab/Tactic/Induction.c index 974d7bf41f..1dd1b928a9 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Induction.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Induction.c @@ -84,7 +84,6 @@ lean_object* l___private_Lean_Elab_Tactic_Induction_5__getGeneralizingFVarIds(le extern lean_object* l_Lean_Name_inhabited; lean_object* l_Lean_Elab_Tactic_getInductiveValFromMajor___lambda__1___closed__1; lean_object* l___private_Lean_Elab_Tactic_Induction_15__processResult___closed__4; -extern lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__5; lean_object* l_List_foldlM___main___at___private_Lean_Elab_Tactic_Induction_13__getRecInfoDefault___spec__3___lambda__1___closed__1; lean_object* l_List_foldlM___main___at___private_Lean_Elab_Tactic_Induction_13__getRecInfoDefault___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_1__inferAppType___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -282,6 +281,7 @@ lean_object* l_Lean_Elab_Tactic_elabTerm___boxed(lean_object*, lean_object*, lea lean_object* l_Nat_foldMAux___main___at___private_Lean_Elab_Tactic_Induction_15__processResult___spec__1___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Tactic_Induction_8__getAltName___boxed(lean_object*); extern lean_object* l___private_Lean_Elab_Tactic_Basic_2__expandTacticMacroFns___main___closed__6; +extern lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__5; lean_object* l_Lean_Elab_Tactic_liftMetaTacticAux___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Lean_Elab_Util_5__regTraceClasses___closed__1; lean_object* l_Lean_Meta_induction(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -3080,7 +3080,7 @@ x_31 = l_Lean_Elab_Tactic_getRecFromUsing___closed__6; x_32 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_32, 0, x_31); lean_ctor_set(x_32, 1, x_30); -x_33 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__5; +x_33 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__5; x_34 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_34, 0, x_32); lean_ctor_set(x_34, 1, x_33); diff --git a/stage0/stdlib/Lean/Elab/Tactic/Rewrite.c b/stage0/stdlib/Lean/Elab/Tactic/Rewrite.c index 843d8366c4..272d142229 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Rewrite.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Rewrite.c @@ -30,7 +30,6 @@ extern lean_object* l___private_Lean_Elab_Tactic_Basic_5__sortFVarIds___closed__ lean_object* l_List_append___rarg(lean_object*, lean_object*); lean_object* l_Array_forMAux___main___at_Lean_Elab_Tactic_evalRewrite___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_rewrite___closed__2; -extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__3; lean_object* lean_local_ctx_find_from_user_name(lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); @@ -104,6 +103,7 @@ lean_object* l_Lean_Elab_Tactic_evalRewrite___boxed(lean_object*, lean_object*, lean_object* l_Lean_Elab_Tactic_expandRewriteTactic(lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Array_forMAux___main___at_Lean_Elab_Tactic_evalRewrite___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Elab_Term_tryCoe___closed__3; lean_object* _init_l_Array_umapMAux___main___at_Lean_Elab_Tactic_expandRewriteTactic___spec__1___closed__1() { _start: { @@ -146,7 +146,7 @@ x_9 = lean_array_fset(x_3, x_2, x_8); x_10 = x_7; x_11 = l_Array_umapMAux___main___at_Lean_Elab_Tactic_expandRewriteTactic___spec__1___closed__2; x_12 = l_Lean_mkAtomFrom(x_10, x_11); -x_13 = l_Lean_Parser_declareBuiltinParser___closed__3; +x_13 = l_Lean_Elab_Term_tryCoe___closed__3; x_14 = lean_array_push(x_13, x_12); x_15 = lean_array_push(x_14, x_10); lean_inc(x_1); diff --git a/stage0/stdlib/Lean/Elab/Term.c b/stage0/stdlib/Lean/Elab/Term.c index 870f8fbab3..dd146b709d 100644 --- a/stage0/stdlib/Lean/Elab/Term.c +++ b/stage0/stdlib/Lean/Elab/Term.c @@ -169,7 +169,6 @@ lean_object* l_Lean_Elab_Term_ensureNoUnassignedMVars(lean_object*, lean_object* lean_object* l_Lean_Meta_mkFreshExprMVar___at_Lean_Elab_Term_tryCoe___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_Term_16__elabImplicitLambda___main___spec__1(lean_object*); lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*); -extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__3; lean_object* l_Lean_Elab_Term_withoutPostponing(lean_object*); lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__13; lean_object* l___private_Lean_Elab_Term_17__elabTermAux___main___closed__1; @@ -827,6 +826,7 @@ lean_object* l_Lean_Elab_Term_ensureHasTypeAux___boxed(lean_object*, lean_object uint8_t l_List_isEmpty___rarg(lean_object*); lean_object* l_Lean_Elab_Term_mkTermElabAttribute___closed__2; lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_tryCoe___closed__5; lean_object* l_Lean_Elab_Term_applyResult(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_local_ctx_find(lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); @@ -9361,17 +9361,26 @@ return x_3; lean_object* _init_l_Lean_Elab_Term_tryCoe___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("coe"); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(3u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; } } lean_object* _init_l_Lean_Elab_Term_tryCoe___closed__4() { _start: { +lean_object* x_1; +x_1 = lean_mk_string("coe"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_tryCoe___closed__5() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Elab_Term_tryCoe___closed__3; +x_2 = l_Lean_Elab_Term_tryCoe___closed__4; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -9438,7 +9447,7 @@ lean_ctor_set(x_24, 1, x_23); x_25 = l_Lean_Elab_Term_tryCoe___closed__2; lean_inc(x_24); x_26 = l_Lean_mkConst(x_25, x_24); -x_27 = l_Lean_Parser_declareBuiltinParser___closed__3; +x_27 = l_Lean_Elab_Term_tryCoe___closed__3; lean_inc(x_2); x_28 = lean_array_push(x_27, x_2); lean_inc(x_3); @@ -9459,7 +9468,7 @@ lean_inc(x_37); x_38 = lean_ctor_get(x_36, 1); lean_inc(x_38); lean_dec(x_36); -x_39 = l_Lean_Elab_Term_tryCoe___closed__4; +x_39 = l_Lean_Elab_Term_tryCoe___closed__5; x_40 = l_Lean_mkConst(x_39, x_24); x_41 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; lean_inc(x_2); @@ -13403,7 +13412,7 @@ lean_ctor_set(x_91, 0, x_85); lean_ctor_set(x_91, 1, x_90); x_92 = l_Lean_Elab_Term_tryCoe___closed__2; x_93 = l_Lean_mkConst(x_92, x_91); -x_94 = l_Lean_Parser_declareBuiltinParser___closed__3; +x_94 = l_Lean_Elab_Term_tryCoe___closed__3; lean_inc(x_39); x_95 = lean_array_push(x_94, x_39); x_96 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_1__isDefEqEta___spec__4___closed__1; @@ -14050,7 +14059,7 @@ lean_ctor_set(x_245, 0, x_239); lean_ctor_set(x_245, 1, x_244); x_246 = l_Lean_Elab_Term_tryCoe___closed__2; x_247 = l_Lean_mkConst(x_246, x_245); -x_248 = l_Lean_Parser_declareBuiltinParser___closed__3; +x_248 = l_Lean_Elab_Term_tryCoe___closed__3; lean_inc(x_193); x_249 = lean_array_push(x_248, x_193); x_250 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_1__isDefEqEta___spec__4___closed__1; @@ -14846,7 +14855,7 @@ lean_ctor_set(x_424, 0, x_418); lean_ctor_set(x_424, 1, x_423); x_425 = l_Lean_Elab_Term_tryCoe___closed__2; x_426 = l_Lean_mkConst(x_425, x_424); -x_427 = l_Lean_Parser_declareBuiltinParser___closed__3; +x_427 = l_Lean_Elab_Term_tryCoe___closed__3; lean_inc(x_372); x_428 = lean_array_push(x_427, x_372); x_429 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_1__isDefEqEta___spec__4___closed__1; @@ -29022,7 +29031,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Lean_Elab_Util_5__regTraceClasses___closed__1; -x_2 = l_Lean_Elab_Term_tryCoe___closed__3; +x_2 = l_Lean_Elab_Term_tryCoe___closed__4; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -29405,6 +29414,8 @@ l_Lean_Elab_Term_tryCoe___closed__3 = _init_l_Lean_Elab_Term_tryCoe___closed__3( lean_mark_persistent(l_Lean_Elab_Term_tryCoe___closed__3); l_Lean_Elab_Term_tryCoe___closed__4 = _init_l_Lean_Elab_Term_tryCoe___closed__4(); lean_mark_persistent(l_Lean_Elab_Term_tryCoe___closed__4); +l_Lean_Elab_Term_tryCoe___closed__5 = _init_l_Lean_Elab_Term_tryCoe___closed__5(); +lean_mark_persistent(l_Lean_Elab_Term_tryCoe___closed__5); l___private_Lean_Elab_Term_4__isMonad_x3f___closed__1 = _init_l___private_Lean_Elab_Term_4__isMonad_x3f___closed__1(); lean_mark_persistent(l___private_Lean_Elab_Term_4__isMonad_x3f___closed__1); l___private_Lean_Elab_Term_4__isMonad_x3f___closed__2 = _init_l___private_Lean_Elab_Term_4__isMonad_x3f___closed__2(); diff --git a/stage0/stdlib/Lean/Parser/Basic.c b/stage0/stdlib/Lean/Parser/Basic.c index 0b7cec10a8..9ceb0a5bde 100644 --- a/stage0/stdlib/Lean/Parser/Basic.c +++ b/stage0/stdlib/Lean/Parser/Basic.c @@ -323,7 +323,7 @@ lean_object* l_Lean_Parser_takeUntilFn___boxed(lean_object*, lean_object*, lean_ lean_object* l_Std_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg(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_Lean_Parser_takeUntilFn___main___at_Lean_Parser_identFnAux___main___spec__3(lean_object*, lean_object*); -lean_object* l_Lean_Parser_longestMatchFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_longestMatchFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_lookaheadFn(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_dollarSymbol___elambda__1___closed__2; lean_object* l_Lean_Parser_withResultOfInfo___elambda__2(lean_object*, lean_object*); @@ -415,7 +415,7 @@ lean_object* l_Lean_Parser_charLitFn(lean_object*, lean_object*); lean_object* l_Lean_Parser_trailingLoopStep(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_charLitNoAntiquot___closed__2; 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_longestMatchStep(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_longestMatchStep(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_setExpectedFn(lean_object*); lean_object* l_Lean_Parser_strLitFn(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__12; @@ -863,7 +863,7 @@ lean_object* l_Lean_Parser_takeWhileFn___at_Lean_Parser_identFnAux___main___spec lean_object* l_Lean_Syntax_foldArgs___rarg___boxed(lean_object*, lean_object*, lean_object*); uint8_t lean_string_utf8_at_end(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_replaceLongest___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Parser_longestMatchStep___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_longestMatchStep___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Error_toString___closed__1; lean_object* l_Std_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(lean_object*, lean_object*, lean_object*); @@ -906,7 +906,7 @@ uint8_t lean_string_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Parser_isLitKind___boxed(lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_longestMatchFnAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_longestMatchFnAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Syntax_isIdent(lean_object*); lean_object* l_Std_RBNode_find___main___at_Lean_Parser_indexed___spec__2___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot___closed__1; @@ -12218,240 +12218,420 @@ return x_18; } } } -lean_object* l_Lean_Parser_longestMatchStep(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_Lean_Parser_longestMatchStep(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_7 = lean_ctor_get(x_6, 3); -lean_inc(x_7); -x_8 = lean_ctor_get(x_6, 1); -lean_inc(x_8); -x_9 = lean_ctor_get(x_6, 0); +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_69; lean_object* x_70; lean_object* x_71; +x_9 = lean_ctor_get(x_8, 3); lean_inc(x_9); -x_10 = lean_array_get_size(x_9); -lean_dec(x_9); -x_32 = l_Lean_Parser_ParserState_restore(x_6, x_10, x_3); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -x_34 = lean_array_get_size(x_33); -lean_dec(x_33); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +x_11 = lean_ctor_get(x_8, 0); +lean_inc(x_11); +x_12 = lean_array_get_size(x_11); +lean_dec(x_11); +x_69 = l_Lean_Parser_ParserState_restore(x_8, x_12, x_3); +x_70 = lean_ctor_get(x_69, 0); +lean_inc(x_70); +x_71 = lean_array_get_size(x_70); +lean_dec(x_70); if (lean_obj_tag(x_1) == 0) { -lean_object* x_35; lean_object* x_36; -x_35 = lean_apply_2(x_4, x_5, x_32); -x_36 = lean_ctor_get(x_35, 3); -lean_inc(x_36); -if (lean_obj_tag(x_36) == 0) +lean_object* x_72; lean_object* x_73; +x_72 = lean_apply_2(x_6, x_7, x_69); +x_73 = lean_ctor_get(x_72, 3); +lean_inc(x_73); +if (lean_obj_tag(x_73) == 0) { -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; -x_37 = lean_ctor_get(x_35, 0); -lean_inc(x_37); -x_38 = lean_array_get_size(x_37); -lean_dec(x_37); -x_39 = lean_unsigned_to_nat(1u); -x_40 = lean_nat_add(x_34, x_39); -lean_dec(x_34); -x_41 = lean_nat_dec_eq(x_38, x_40); -lean_dec(x_40); -lean_dec(x_38); -if (x_41 == 0) +lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; uint8_t x_78; +x_74 = lean_ctor_get(x_72, 0); +lean_inc(x_74); +x_75 = lean_array_get_size(x_74); +lean_dec(x_74); +x_76 = lean_unsigned_to_nat(1u); +x_77 = lean_nat_add(x_71, x_76); +lean_dec(x_71); +x_78 = lean_nat_dec_eq(x_75, x_77); +lean_dec(x_77); +lean_dec(x_75); +if (x_78 == 0) { -lean_object* x_42; lean_object* x_43; -x_42 = l_Lean_Parser_invalidLongestMatchParser___closed__1; -x_43 = l_Lean_Parser_ParserState_mkError(x_35, x_42); -x_11 = x_43; -goto block_31; +lean_object* x_79; lean_object* x_80; +x_79 = l_Lean_Parser_invalidLongestMatchParser___closed__1; +x_80 = l_Lean_Parser_ParserState_mkError(x_72, x_79); +x_13 = x_80; +goto block_68; } else { -x_11 = x_35; -goto block_31; +x_13 = x_72; +goto block_68; } } else { -lean_dec(x_36); -lean_dec(x_34); -x_11 = x_35; -goto block_31; +lean_dec(x_73); +lean_dec(x_71); +x_13 = x_72; +goto block_68; } } else { -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_44 = lean_ctor_get(x_1, 0); -lean_inc(x_44); +lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; +x_81 = lean_ctor_get(x_1, 0); +lean_inc(x_81); lean_dec(x_1); -x_45 = l_Lean_Parser_ParserState_pushSyntax(x_32, x_44); -x_46 = lean_apply_2(x_4, x_5, x_45); -x_47 = lean_ctor_get(x_46, 3); -lean_inc(x_47); -if (lean_obj_tag(x_47) == 0) +x_82 = l_Lean_Parser_ParserState_pushSyntax(x_69, x_81); +x_83 = lean_apply_2(x_6, x_7, x_82); +x_84 = lean_ctor_get(x_83, 3); +lean_inc(x_84); +if (lean_obj_tag(x_84) == 0) { -lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; -x_48 = lean_ctor_get(x_46, 0); -lean_inc(x_48); -x_49 = lean_array_get_size(x_48); -x_50 = lean_unsigned_to_nat(2u); -x_51 = lean_nat_add(x_34, x_50); -x_52 = lean_nat_dec_eq(x_49, x_51); -lean_dec(x_51); -lean_dec(x_49); -if (x_52 == 0) +lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; uint8_t x_89; +x_85 = lean_ctor_get(x_83, 0); +lean_inc(x_85); +x_86 = lean_array_get_size(x_85); +x_87 = lean_unsigned_to_nat(2u); +x_88 = lean_nat_add(x_71, x_87); +x_89 = lean_nat_dec_eq(x_86, x_88); +lean_dec(x_88); +lean_dec(x_86); +if (x_89 == 0) { -lean_object* x_53; lean_object* x_54; -lean_dec(x_48); -lean_dec(x_34); -x_53 = l_Lean_Parser_invalidLongestMatchParser___closed__1; -x_54 = l_Lean_Parser_ParserState_mkError(x_46, x_53); -x_11 = x_54; -goto block_31; +lean_object* x_90; lean_object* x_91; +lean_dec(x_85); +lean_dec(x_71); +x_90 = l_Lean_Parser_invalidLongestMatchParser___closed__1; +x_91 = l_Lean_Parser_ParserState_mkError(x_83, x_90); +x_13 = x_91; +goto block_68; } else { -lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_55 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_48); -lean_dec(x_48); -x_56 = l_Lean_Parser_ParserState_shrinkStack(x_46, x_34); -lean_dec(x_34); -x_57 = l_Lean_Parser_ParserState_pushSyntax(x_56, x_55); -x_11 = x_57; -goto block_31; +lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_92 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_85); +lean_dec(x_85); +x_93 = l_Lean_Parser_ParserState_shrinkStack(x_83, x_71); +lean_dec(x_71); +x_94 = l_Lean_Parser_ParserState_pushSyntax(x_93, x_92); +x_13 = x_94; +goto block_68; } } else { -lean_dec(x_47); -lean_dec(x_34); -x_11 = x_46; -goto block_31; +lean_dec(x_84); +lean_dec(x_71); +x_13 = x_83; +goto block_68; } } -block_31: +block_68: { -if (lean_obj_tag(x_7) == 0) +if (lean_obj_tag(x_9) == 0) { -lean_object* x_12; -x_12 = lean_ctor_get(x_11, 3); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) +lean_object* x_14; +x_14 = lean_ctor_get(x_13, 3); +lean_inc(x_14); +if (lean_obj_tag(x_14) == 0) { -lean_object* x_13; uint8_t x_14; -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -x_14 = lean_nat_dec_lt(x_8, x_13); -if (x_14 == 0) -{ -uint8_t x_15; -x_15 = lean_nat_dec_lt(x_13, x_8); -lean_dec(x_13); -if (x_15 == 0) -{ -lean_dec(x_10); -lean_dec(x_8); -return x_11; -} -else -{ -lean_object* x_16; -x_16 = l_Lean_Parser_ParserState_restore(x_11, x_10, x_8); -lean_dec(x_10); -return x_16; -} -} -else -{ -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_8); -x_17 = l_Lean_Parser_ParserState_keepLatest(x_11, x_2); -return x_17; -} -} -else -{ -lean_object* x_18; -lean_dec(x_12); -x_18 = l_Lean_Parser_ParserState_restore(x_11, x_10, x_8); -lean_dec(x_10); -return x_18; -} -} -else -{ -lean_object* x_19; -x_19 = lean_ctor_get(x_11, 3); -lean_inc(x_19); -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_10); -lean_dec(x_8); -lean_dec(x_7); -x_20 = lean_ctor_get(x_11, 0); -lean_inc(x_20); -x_21 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_20); -lean_dec(x_20); -x_22 = l_Lean_Parser_ParserState_shrinkStack(x_11, x_2); -x_23 = l_Lean_Parser_ParserState_pushSyntax(x_22, x_21); -return x_23; -} -else -{ -lean_object* x_24; lean_object* x_25; uint8_t x_26; -lean_dec(x_19); -x_24 = lean_ctor_get(x_7, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_11, 1); -lean_inc(x_25); -x_26 = lean_nat_dec_lt(x_8, x_25); -if (x_26 == 0) -{ -uint8_t x_27; -x_27 = lean_nat_dec_lt(x_25, x_8); -lean_dec(x_25); +lean_object* x_15; lean_object* x_16; uint8_t x_27; +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +x_27 = lean_nat_dec_lt(x_10, x_15); if (x_27 == 0) { -lean_object* x_28; -lean_dec(x_8); -lean_dec(x_7); -x_28 = l_Lean_Parser_ParserState_mergeErrors(x_11, x_10, x_24); -lean_dec(x_10); -return x_28; -} -else +uint8_t x_28; +x_28 = lean_nat_dec_eq(x_15, x_10); +if (x_28 == 0) { lean_object* x_29; -lean_dec(x_24); -x_29 = l_Lean_Parser_ParserState_keepPrevError(x_11, x_10, x_8, x_7); +x_29 = lean_box(0); +x_16 = x_29; +goto block_26; +} +else +{ +uint8_t x_30; +x_30 = lean_nat_dec_lt(x_4, x_5); +if (x_30 == 0) +{ +lean_object* x_31; +x_31 = lean_box(0); +x_16 = x_31; +goto block_26; +} +else +{ +lean_object* x_32; lean_object* x_33; +lean_dec(x_15); +lean_dec(x_12); lean_dec(x_10); -return x_29; +lean_dec(x_4); +x_32 = l_Lean_Parser_ParserState_keepLatest(x_13, x_2); +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_32); +lean_ctor_set(x_33, 1, x_5); +return x_33; +} } } else { -lean_object* x_30; -lean_dec(x_25); -lean_dec(x_24); -lean_dec(x_8); -lean_dec(x_7); -x_30 = l_Lean_Parser_ParserState_keepNewError(x_11, x_10); +lean_object* x_34; lean_object* x_35; +lean_dec(x_15); +lean_dec(x_12); lean_dec(x_10); -return x_30; +lean_dec(x_4); +x_34 = l_Lean_Parser_ParserState_keepLatest(x_13, x_2); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_5); +return x_35; +} +block_26: +{ +uint8_t x_17; +lean_dec(x_16); +x_17 = lean_nat_dec_lt(x_15, x_10); +if (x_17 == 0) +{ +uint8_t x_18; +x_18 = lean_nat_dec_eq(x_15, x_10); +lean_dec(x_15); +if (x_18 == 0) +{ +lean_object* x_19; +lean_dec(x_12); +lean_dec(x_10); +lean_dec(x_4); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_13); +lean_ctor_set(x_19, 1, x_5); +return x_19; +} +else +{ +uint8_t x_20; +x_20 = lean_nat_dec_lt(x_5, x_4); +if (x_20 == 0) +{ +lean_object* x_21; +lean_dec(x_12); +lean_dec(x_10); +lean_dec(x_4); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_13); +lean_ctor_set(x_21, 1, x_5); +return x_21; +} +else +{ +lean_object* x_22; lean_object* x_23; +lean_dec(x_5); +x_22 = l_Lean_Parser_ParserState_restore(x_13, x_12, x_10); +lean_dec(x_12); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_4); +return x_23; +} +} +} +else +{ +lean_object* x_24; lean_object* x_25; +lean_dec(x_15); +lean_dec(x_5); +x_24 = l_Lean_Parser_ParserState_restore(x_13, x_12, x_10); +lean_dec(x_12); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_4); +return x_25; +} +} +} +else +{ +lean_object* x_36; lean_object* x_37; +lean_dec(x_14); +lean_dec(x_5); +x_36 = l_Lean_Parser_ParserState_restore(x_13, x_12, x_10); +lean_dec(x_12); +x_37 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_4); +return x_37; +} +} +else +{ +lean_object* x_38; +x_38 = lean_ctor_get(x_13, 3); +lean_inc(x_38); +if (lean_obj_tag(x_38) == 0) +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +lean_dec(x_12); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +x_39 = lean_ctor_get(x_13, 0); +lean_inc(x_39); +x_40 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_39); +lean_dec(x_39); +x_41 = l_Lean_Parser_ParserState_shrinkStack(x_13, x_2); +x_42 = l_Lean_Parser_ParserState_pushSyntax(x_41, x_40); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_5); +return x_43; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_59; +lean_dec(x_38); +x_44 = lean_ctor_get(x_9, 0); +lean_inc(x_44); +x_45 = lean_ctor_get(x_13, 1); +lean_inc(x_45); +x_59 = lean_nat_dec_lt(x_10, x_45); +if (x_59 == 0) +{ +uint8_t x_60; +x_60 = lean_nat_dec_eq(x_45, x_10); +if (x_60 == 0) +{ +lean_object* x_61; +x_61 = lean_box(0); +x_46 = x_61; +goto block_58; +} +else +{ +uint8_t x_62; +x_62 = lean_nat_dec_lt(x_4, x_5); +if (x_62 == 0) +{ +lean_object* x_63; +x_63 = lean_box(0); +x_46 = x_63; +goto block_58; +} +else +{ +lean_object* x_64; lean_object* x_65; +lean_dec(x_45); +lean_dec(x_44); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +x_64 = l_Lean_Parser_ParserState_keepNewError(x_13, x_12); +lean_dec(x_12); +x_65 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_65, 0, x_64); +lean_ctor_set(x_65, 1, x_5); +return x_65; +} +} +} +else +{ +lean_object* x_66; lean_object* x_67; +lean_dec(x_45); +lean_dec(x_44); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +x_66 = l_Lean_Parser_ParserState_keepNewError(x_13, x_12); +lean_dec(x_12); +x_67 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_67, 0, x_66); +lean_ctor_set(x_67, 1, x_5); +return x_67; +} +block_58: +{ +uint8_t x_47; +lean_dec(x_46); +x_47 = lean_nat_dec_lt(x_45, x_10); +if (x_47 == 0) +{ +uint8_t x_48; +x_48 = lean_nat_dec_eq(x_45, x_10); +lean_dec(x_45); +if (x_48 == 0) +{ +lean_object* x_49; lean_object* x_50; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +x_49 = l_Lean_Parser_ParserState_mergeErrors(x_13, x_12, x_44); +lean_dec(x_12); +x_50 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_50, 0, x_49); +lean_ctor_set(x_50, 1, x_5); +return x_50; +} +else +{ +uint8_t x_51; +x_51 = lean_nat_dec_lt(x_5, x_4); +if (x_51 == 0) +{ +lean_object* x_52; lean_object* x_53; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +x_52 = l_Lean_Parser_ParserState_mergeErrors(x_13, x_12, x_44); +lean_dec(x_12); +x_53 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_5); +return x_53; +} +else +{ +lean_object* x_54; lean_object* x_55; +lean_dec(x_44); +lean_dec(x_5); +x_54 = l_Lean_Parser_ParserState_keepPrevError(x_13, x_12, x_10, x_9); +lean_dec(x_12); +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_54); +lean_ctor_set(x_55, 1, x_4); +return x_55; +} +} +} +else +{ +lean_object* x_56; lean_object* x_57; +lean_dec(x_45); +lean_dec(x_44); +lean_dec(x_5); +x_56 = l_Lean_Parser_ParserState_keepPrevError(x_13, x_12, x_10, x_9); +lean_dec(x_12); +x_57 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_4); +return x_57; } } } } } } -lean_object* l_Lean_Parser_longestMatchStep___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_Lean_Parser_longestMatchStep___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_7; -x_7 = l_Lean_Parser_longestMatchStep(x_1, x_2, x_3, x_4, x_5, x_6); +lean_object* x_9; +x_9 = l_Lean_Parser_longestMatchStep(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_2); -return x_7; +return x_9; } } lean_object* l_Lean_Parser_longestMatchMkResult(lean_object* x_1, lean_object* x_2) { @@ -12493,45 +12673,57 @@ return x_2; } } } -lean_object* l_Lean_Parser_longestMatchFnAux___main(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_Lean_Parser_longestMatchFnAux___main(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: { -if (lean_obj_tag(x_4) == 0) +if (lean_obj_tag(x_5) == 0) { -lean_object* x_7; -lean_dec(x_5); +lean_object* x_8; +lean_dec(x_6); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_7 = l_Lean_Parser_longestMatchMkResult(x_2, x_6); -return x_7; +x_8 = l_Lean_Parser_longestMatchMkResult(x_2, x_7); +return x_8; } else { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_8 = lean_ctor_get(x_4, 0); -lean_inc(x_8); -x_9 = lean_ctor_get(x_4, 1); +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; +x_9 = lean_ctor_get(x_5, 0); lean_inc(x_9); -lean_dec(x_4); -x_10 = lean_ctor_get(x_8, 1); +x_10 = lean_ctor_get(x_5, 1); lean_inc(x_10); -lean_dec(x_8); -lean_inc(x_5); +lean_dec(x_5); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +x_12 = lean_ctor_get(x_9, 0); +lean_inc(x_12); +lean_dec(x_9); +x_13 = lean_ctor_get(x_12, 1); +lean_inc(x_13); +lean_dec(x_12); +lean_inc(x_6); lean_inc(x_3); lean_inc(x_1); -x_11 = l_Lean_Parser_longestMatchStep(x_1, x_2, x_3, x_10, x_5, x_6); -x_4 = x_9; -x_6 = x_11; +x_14 = l_Lean_Parser_longestMatchStep(x_1, x_2, x_3, x_4, x_11, x_13, x_6, x_7); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_4 = x_16; +x_5 = x_10; +x_7 = x_15; goto _start; } } } -lean_object* l_Lean_Parser_longestMatchFnAux(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_Lean_Parser_longestMatchFnAux(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: { -lean_object* x_7; -x_7 = l_Lean_Parser_longestMatchFnAux___main(x_1, x_2, x_3, x_4, x_5, x_6); -return x_7; +lean_object* x_8; +x_8 = l_Lean_Parser_longestMatchFnAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +return x_8; } } lean_object* _init_l_Lean_Parser_longestMatchFn___closed__1() { @@ -12561,228 +12753,241 @@ x_7 = lean_ctor_get(x_2, 1); lean_inc(x_7); if (lean_obj_tag(x_7) == 0) { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +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_2, 0); lean_inc(x_8); lean_dec(x_2); -x_9 = lean_ctor_get(x_8, 1); +x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); lean_dec(x_8); -x_10 = lean_ctor_get(x_4, 0); +x_10 = lean_ctor_get(x_9, 1); lean_inc(x_10); -x_11 = lean_array_get_size(x_10); -lean_dec(x_10); +lean_dec(x_9); +x_11 = lean_ctor_get(x_4, 0); +lean_inc(x_11); +x_12 = lean_array_get_size(x_11); +lean_dec(x_11); if (lean_obj_tag(x_1) == 0) { -lean_object* x_12; lean_object* x_13; -x_12 = lean_apply_2(x_9, x_3, x_4); -x_13 = lean_ctor_get(x_12, 3); -lean_inc(x_13); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_14 = lean_ctor_get(x_12, 0); +lean_object* x_13; lean_object* x_14; +x_13 = lean_apply_2(x_10, x_3, x_4); +x_14 = lean_ctor_get(x_13, 3); lean_inc(x_14); -x_15 = lean_array_get_size(x_14); -lean_dec(x_14); -x_16 = lean_unsigned_to_nat(1u); -x_17 = lean_nat_add(x_11, x_16); -lean_dec(x_11); -x_18 = lean_nat_dec_eq(x_15, x_17); -lean_dec(x_17); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_15 = lean_ctor_get(x_13, 0); +lean_inc(x_15); +x_16 = lean_array_get_size(x_15); lean_dec(x_15); -if (x_18 == 0) +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_add(x_12, x_17); +lean_dec(x_12); +x_19 = lean_nat_dec_eq(x_16, x_18); +lean_dec(x_18); +lean_dec(x_16); +if (x_19 == 0) { -lean_object* x_19; lean_object* x_20; -x_19 = l_Lean_Parser_invalidLongestMatchParser___closed__1; -x_20 = l_Lean_Parser_ParserState_mkError(x_12, x_19); -return x_20; +lean_object* x_20; lean_object* x_21; +x_20 = l_Lean_Parser_invalidLongestMatchParser___closed__1; +x_21 = l_Lean_Parser_ParserState_mkError(x_13, x_20); +return x_21; } else { -return x_12; +return x_13; } } else { -lean_dec(x_13); -lean_dec(x_11); -return x_12; +lean_dec(x_14); +lean_dec(x_12); +return x_13; } } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_21 = lean_ctor_get(x_1, 0); -lean_inc(x_21); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_22 = lean_ctor_get(x_1, 0); +lean_inc(x_22); lean_dec(x_1); -x_22 = l_Lean_Parser_ParserState_pushSyntax(x_4, x_21); -x_23 = lean_apply_2(x_9, x_3, x_22); -x_24 = lean_ctor_get(x_23, 3); -lean_inc(x_24); -if (lean_obj_tag(x_24) == 0) -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; -x_25 = lean_ctor_get(x_23, 0); +x_23 = l_Lean_Parser_ParserState_pushSyntax(x_4, x_22); +x_24 = lean_apply_2(x_10, x_3, x_23); +x_25 = lean_ctor_get(x_24, 3); lean_inc(x_25); -x_26 = lean_array_get_size(x_25); -x_27 = lean_unsigned_to_nat(2u); -x_28 = lean_nat_add(x_11, x_27); -x_29 = lean_nat_dec_eq(x_26, x_28); -lean_dec(x_28); +if (lean_obj_tag(x_25) == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; +x_26 = lean_ctor_get(x_24, 0); +lean_inc(x_26); +x_27 = lean_array_get_size(x_26); +x_28 = lean_unsigned_to_nat(2u); +x_29 = lean_nat_add(x_12, x_28); +x_30 = lean_nat_dec_eq(x_27, x_29); +lean_dec(x_29); +lean_dec(x_27); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; lean_dec(x_26); -if (x_29 == 0) +lean_dec(x_12); +x_31 = l_Lean_Parser_invalidLongestMatchParser___closed__1; +x_32 = l_Lean_Parser_ParserState_mkError(x_24, x_31); +return x_32; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_33 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_26); +lean_dec(x_26); +x_34 = l_Lean_Parser_ParserState_shrinkStack(x_24, x_12); +lean_dec(x_12); +x_35 = l_Lean_Parser_ParserState_pushSyntax(x_34, x_33); +return x_35; +} +} +else { -lean_object* x_30; lean_object* x_31; lean_dec(x_25); -lean_dec(x_11); -x_30 = l_Lean_Parser_invalidLongestMatchParser___closed__1; -x_31 = l_Lean_Parser_ParserState_mkError(x_23, x_30); -return x_31; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_25); -lean_dec(x_25); -x_33 = l_Lean_Parser_ParserState_shrinkStack(x_23, x_11); -lean_dec(x_11); -x_34 = l_Lean_Parser_ParserState_pushSyntax(x_33, x_32); -return x_34; -} -} -else -{ -lean_dec(x_24); -lean_dec(x_11); -return x_23; +lean_dec(x_12); +return x_24; } } } else { -lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_35 = lean_ctor_get(x_2, 0); -lean_inc(x_35); -lean_dec(x_2); -x_36 = lean_ctor_get(x_4, 0); +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_36 = lean_ctor_get(x_2, 0); lean_inc(x_36); -x_37 = lean_array_get_size(x_36); -lean_dec(x_36); -x_38 = lean_ctor_get(x_4, 1); -lean_inc(x_38); +lean_dec(x_2); +x_37 = lean_ctor_get(x_4, 0); +lean_inc(x_37); +x_38 = lean_array_get_size(x_37); +lean_dec(x_37); +x_39 = lean_ctor_get(x_4, 1); +lean_inc(x_39); if (lean_obj_tag(x_1) == 0) { -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_35, 1); -lean_inc(x_45); -lean_dec(x_35); -lean_inc(x_3); -x_46 = lean_apply_2(x_45, x_3, x_4); -x_47 = lean_ctor_get(x_46, 3); -lean_inc(x_47); -if (lean_obj_tag(x_47) == 0) -{ -lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; -x_48 = lean_ctor_get(x_46, 0); +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_48 = lean_ctor_get(x_36, 0); lean_inc(x_48); -x_49 = lean_array_get_size(x_48); +x_49 = lean_ctor_get(x_48, 1); +lean_inc(x_49); lean_dec(x_48); -x_50 = lean_unsigned_to_nat(1u); -x_51 = lean_nat_add(x_37, x_50); -x_52 = lean_nat_dec_eq(x_49, x_51); -lean_dec(x_51); -lean_dec(x_49); -if (x_52 == 0) -{ -lean_object* x_53; lean_object* x_54; -x_53 = l_Lean_Parser_invalidLongestMatchParser___closed__1; -x_54 = l_Lean_Parser_ParserState_mkError(x_46, x_53); -x_39 = x_54; -goto block_44; -} -else -{ -x_39 = x_46; -goto block_44; -} -} -else -{ -lean_dec(x_47); -x_39 = x_46; -goto block_44; -} -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_55 = lean_ctor_get(x_35, 1); -lean_inc(x_55); -lean_dec(x_35); -x_56 = lean_ctor_get(x_1, 0); -lean_inc(x_56); -x_57 = l_Lean_Parser_ParserState_pushSyntax(x_4, x_56); lean_inc(x_3); -x_58 = lean_apply_2(x_55, x_3, x_57); -x_59 = lean_ctor_get(x_58, 3); +x_50 = lean_apply_2(x_49, x_3, x_4); +x_51 = lean_ctor_get(x_50, 3); +lean_inc(x_51); +if (lean_obj_tag(x_51) == 0) +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; uint8_t x_56; +x_52 = lean_ctor_get(x_50, 0); +lean_inc(x_52); +x_53 = lean_array_get_size(x_52); +lean_dec(x_52); +x_54 = lean_unsigned_to_nat(1u); +x_55 = lean_nat_add(x_38, x_54); +x_56 = lean_nat_dec_eq(x_53, x_55); +lean_dec(x_55); +lean_dec(x_53); +if (x_56 == 0) +{ +lean_object* x_57; lean_object* x_58; +x_57 = l_Lean_Parser_invalidLongestMatchParser___closed__1; +x_58 = l_Lean_Parser_ParserState_mkError(x_50, x_57); +x_40 = x_58; +goto block_47; +} +else +{ +x_40 = x_50; +goto block_47; +} +} +else +{ +lean_dec(x_51); +x_40 = x_50; +goto block_47; +} +} +else +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_59 = lean_ctor_get(x_36, 0); lean_inc(x_59); -if (lean_obj_tag(x_59) == 0) -{ -lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; uint8_t x_64; -x_60 = lean_ctor_get(x_58, 0); +x_60 = lean_ctor_get(x_59, 1); lean_inc(x_60); -x_61 = lean_array_get_size(x_60); -x_62 = lean_unsigned_to_nat(2u); -x_63 = lean_nat_add(x_37, x_62); -x_64 = lean_nat_dec_eq(x_61, x_63); -lean_dec(x_63); -lean_dec(x_61); -if (x_64 == 0) -{ -lean_object* x_65; lean_object* x_66; -lean_dec(x_60); -x_65 = l_Lean_Parser_invalidLongestMatchParser___closed__1; -x_66 = l_Lean_Parser_ParserState_mkError(x_58, x_65); -x_39 = x_66; -goto block_44; -} -else -{ -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_60); -lean_dec(x_60); -x_68 = l_Lean_Parser_ParserState_shrinkStack(x_58, x_37); -x_69 = l_Lean_Parser_ParserState_pushSyntax(x_68, x_67); -x_39 = x_69; -goto block_44; -} -} -else -{ lean_dec(x_59); -x_39 = x_58; -goto block_44; -} -} -block_44: +x_61 = lean_ctor_get(x_1, 0); +lean_inc(x_61); +x_62 = l_Lean_Parser_ParserState_pushSyntax(x_4, x_61); +lean_inc(x_3); +x_63 = lean_apply_2(x_60, x_3, x_62); +x_64 = lean_ctor_get(x_63, 3); +lean_inc(x_64); +if (lean_obj_tag(x_64) == 0) { -lean_object* x_40; -x_40 = lean_ctor_get(x_39, 3); -lean_inc(x_40); -if (lean_obj_tag(x_40) == 0) +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t x_69; +x_65 = lean_ctor_get(x_63, 0); +lean_inc(x_65); +x_66 = lean_array_get_size(x_65); +x_67 = lean_unsigned_to_nat(2u); +x_68 = lean_nat_add(x_38, x_67); +x_69 = lean_nat_dec_eq(x_66, x_68); +lean_dec(x_68); +lean_dec(x_66); +if (x_69 == 0) +{ +lean_object* x_70; lean_object* x_71; +lean_dec(x_65); +x_70 = l_Lean_Parser_invalidLongestMatchParser___closed__1; +x_71 = l_Lean_Parser_ParserState_mkError(x_63, x_70); +x_40 = x_71; +goto block_47; +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; +x_72 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_65); +lean_dec(x_65); +x_73 = l_Lean_Parser_ParserState_shrinkStack(x_63, x_38); +x_74 = l_Lean_Parser_ParserState_pushSyntax(x_73, x_72); +x_40 = x_74; +goto block_47; +} +} +else +{ +lean_dec(x_64); +x_40 = x_63; +goto block_47; +} +} +block_47: { lean_object* x_41; -x_41 = l_Lean_Parser_longestMatchFnAux___main(x_1, x_37, x_38, x_7, x_3, x_39); -return x_41; +x_41 = lean_ctor_get(x_40, 3); +lean_inc(x_41); +if (lean_obj_tag(x_41) == 0) +{ +lean_object* x_42; lean_object* x_43; +x_42 = lean_ctor_get(x_36, 1); +lean_inc(x_42); +lean_dec(x_36); +x_43 = l_Lean_Parser_longestMatchFnAux___main(x_1, x_38, x_39, x_42, x_7, x_3, x_40); +return x_43; } else { -lean_object* x_42; lean_object* x_43; -lean_dec(x_40); -x_42 = l_Lean_Parser_ParserState_shrinkStack(x_39, x_37); -x_43 = l_Lean_Parser_longestMatchFnAux___main(x_1, x_37, x_38, x_7, x_3, x_42); -return x_43; +lean_object* x_44; lean_object* x_45; lean_object* x_46; +lean_dec(x_41); +x_44 = l_Lean_Parser_ParserState_shrinkStack(x_40, x_38); +x_45 = lean_ctor_get(x_36, 1); +lean_inc(x_45); +lean_dec(x_36); +x_46 = l_Lean_Parser_longestMatchFnAux___main(x_1, x_38, x_39, x_45, x_7, x_3, x_44); +return x_46; } } } diff --git a/stage0/stdlib/Lean/Parser/Command.c b/stage0/stdlib/Lean/Parser/Command.c index eafbc666fb..1a7426c08e 100644 --- a/stage0/stdlib/Lean/Parser/Command.c +++ b/stage0/stdlib/Lean/Parser/Command.c @@ -425,7 +425,7 @@ lean_object* l_Lean_Parser_Term_quot_formatter___closed__1; lean_object* l_Lean_Parser_Command_example___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_attribute___closed__10; lean_object* l_Lean_Parser_Command_open_parenthesizer___closed__3; -lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_Parser_Command_declId_formatter___closed__1; lean_object* l_Lean_Parser_Command_structFields; @@ -2947,13 +2947,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_quot(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_quot___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Term_quot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_commandParser_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -23895,13 +23896,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_declaration(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_declaration___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_declaration; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_docComment_formatter___closed__1() { @@ -29884,13 +29886,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_section(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_section___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_section; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_section_formatter___closed__1() { @@ -30498,13 +30501,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_namespace(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_namespace___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_namespace; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_namespace_formatter___closed__1() { @@ -31182,13 +31186,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_end(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_end___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_end; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_end_formatter___closed__1() { @@ -31773,13 +31778,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_variable(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_variable___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_variable; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_variable_formatter___closed__1() { @@ -32432,13 +32438,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_variables(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_variables___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_variables; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_variables_formatter___closed__1() { @@ -33046,13 +33053,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_universe(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_universe___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_universe; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_universe_formatter___closed__1() { @@ -33680,13 +33688,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_universes(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_universes___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_universes; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_universes_formatter___closed__1() { @@ -34278,13 +34287,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_check(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_check___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_check; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_check_formatter___closed__1() { @@ -34864,13 +34874,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_check__failure(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_check__failure___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_check__failure; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_check__failure_formatter___closed__1() { @@ -35450,13 +35461,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_eval(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_eval___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_eval; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_eval_formatter___closed__1() { @@ -36036,13 +36048,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_synth(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_synth___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_synth; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_synth_formatter___closed__1() { @@ -36572,13 +36585,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_exit(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_exit___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_exit; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_exit_formatter___closed__1() { @@ -37260,13 +37274,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_print(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_print___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_print; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_print_formatter___closed__1() { @@ -38016,13 +38031,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_printAxioms(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_printAxioms___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_printAxioms; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_printAxioms_formatter___closed__1() { @@ -38622,13 +38638,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_resolve__name(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_resolve__name___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_resolve__name; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_resolve__name_formatter___closed__1() { @@ -39150,13 +39167,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_init__quot(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_init__quot___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_init__quot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_init__quot_formatter___closed__1() { @@ -40190,13 +40208,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_set__option(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_set__option___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_set__option; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_set__option_formatter___closed__1() { @@ -41623,13 +41642,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_attribute(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_attribute___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_attribute; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_attribute_formatter___closed__1() { @@ -42753,13 +42773,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_export(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_export___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_export; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_export_formatter___closed__1() { @@ -46697,13 +46718,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_open(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_open___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_open; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_openHiding_formatter___closed__1() { @@ -48551,13 +48573,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_mutual(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_mutual___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_mutual; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_mutual_formatter___closed__1() { @@ -49052,13 +49075,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_in(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_in___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Command_in; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_in_formatter___closed__1() { diff --git a/stage0/stdlib/Lean/Parser/Extension.c b/stage0/stdlib/Lean/Parser/Extension.c index 46b8e7e187..3a1739bd18 100644 --- a/stage0/stdlib/Lean/Parser/Extension.c +++ b/stage0/stdlib/Lean/Parser/Extension.c @@ -25,6 +25,7 @@ lean_object* l_Array_iterateMAux___main___at___private_Lean_Parser_Extension_10_ size_t l_USize_add(size_t, size_t); lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; lean_object* l_Lean_Parser_mkParserExtension___closed__1; +lean_object* l_Lean_Syntax_isNatLitAux(lean_object*, lean_object*); lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_leadingIdentAsSymbol___boxed(lean_object*, lean_object*); uint8_t l_Std_PersistentHashMap_containsAtAux___main___at_Lean_Parser_isValidSyntaxNodeKind___spec__3(lean_object*, lean_object*, lean_object*); @@ -34,9 +35,8 @@ lean_object* l_Lean_Parser_mkParserContext(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_findAtAux___main___at_Lean_Parser_getCategory___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_Parser_sepByInfo(lean_object*, lean_object*); -extern lean_object* l_Lean_registerTagAttribute___lambda__4___closed__12; lean_object* l_Lean_Parser_mkParserAttributeHooks(lean_object*); -lean_object* l___private_Lean_Parser_Extension_7__addTrailingParserAux(lean_object*, lean_object*); +lean_object* l___private_Lean_Parser_Extension_7__addTrailingParserAux(lean_object*, lean_object*, lean_object*); lean_object* l_unreachable_x21___rarg(lean_object*); lean_object* l_Lean_Parser_mkParserExtension___closed__2; lean_object* l_Array_iterateMAux___main___at___private_Lean_Parser_Extension_10__ParserExtension_addImported___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -60,7 +60,7 @@ lean_object* l_Lean_Parser_getTokenTable___boxed(lean_object*); lean_object* l___private_Lean_Parser_Extension_6__addTokenConfig___closed__1; uint8_t l_List_elem___main___at_Lean_NameHashSet_insert___spec__2(lean_object*, lean_object*); extern lean_object* l_Lean_registerInternalExceptionId___closed__2; -lean_object* l_Lean_Parser_addParser(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); +lean_object* l_Lean_Parser_addParser(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_categoryParserFnRef; lean_object* l_Lean_Parser_parserExtension___elambda__3___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserExtensionState_inhabited___closed__1; @@ -73,17 +73,15 @@ lean_object* l_Lean_Parser_parserExtension; extern lean_object* l_Lean_Parser_ident; lean_object* l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_parserExtension___closed__2; -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__3; lean_object* lean_st_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolFn(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_2__throwParserCategoryAlreadyDefined___rarg___closed__1; lean_object* l_Lean_Parser_mkParserState(lean_object*); lean_object* l_Lean_Parser_mkParserExtension___lambda__2(lean_object*); -lean_object* l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__4(lean_object*, lean_object*, lean_object*); +lean_object* l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_notFollowedByFn(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_13__registerParserAttributeImplBuilder___closed__1; lean_object* l_Lean_Parser_declareBuiltinParser___closed__3; -lean_object* l_ReaderT_Monad___rarg(lean_object*); lean_object* l_Std_PersistentHashMap_contains___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_orelseFn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_registerBuiltinDynamicParserAttribute(lean_object*, lean_object*, lean_object*); @@ -91,8 +89,8 @@ lean_object* l___private_Lean_Parser_Extension_4__addBuiltinParserCategory(lean_ lean_object* l_Array_iterateMAux___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_8__updateBuiltinTokens(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkInputContext(lean_object*, lean_object*); -lean_object* l_Lean_Parser_addBuiltinParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addBuiltinParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_8__updateBuiltinTokens___closed__2; lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); @@ -108,7 +106,6 @@ extern lean_object* l_String_splitAux___main___closed__1; lean_object* l_Lean_Parser_categoryParserFnImpl(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_6__addTokenConfig(lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__4; -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__5; lean_object* l_Std_PersistentHashMap_find_x3f___at_Lean_Parser_getCategory___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_checkPrecFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_foldlM___at_Lean_Parser_getSyntaxNodeKinds___spec__1___boxed(lean_object*, lean_object*); @@ -120,8 +117,8 @@ lean_object* l_Lean_Parser_declareBuiltinParser___closed__2; lean_object* l_Lean_Parser_registerRunParserAttributeHooksAttribute___closed__3; extern lean_object* l_Lean_mkAppStx___closed__4; lean_object* l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__1; +lean_object* l_Lean_Parser_addBuiltinLeadingParserNew(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_parserExtension___closed__1; -lean_object* l_Lean_Parser_declareBuiltinParser___closed__4; extern lean_object* l___private_Init_LeanInit_14__quoteName___main___closed__2; extern lean_object* l_Lean_nameLitKind; extern lean_object* l_Lean_LocalContext_Inhabited___closed__1; @@ -132,11 +129,12 @@ lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Lean_Parser_addParserCategory(lean_object*, lean_object*, uint8_t); lean_object* l_Lean_Parser_many1Fn(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Lean_Environment_8__persistentEnvExtensionsRef; +lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___rarg(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_parserExtension___closed__3; lean_object* l_Lean_Parser_parserExtension___elambda__2___boxed(lean_object*); uint8_t l_Std_PersistentHashMap_containsAux___main___at_Lean_Parser_isValidSyntaxNodeKind___spec__2(lean_object*, size_t, lean_object*); lean_object* l_Lean_Parser_declareTrailingBuiltinParser___closed__1; -lean_object* l_List_foldl___main___at___private_Lean_Parser_Extension_7__addTrailingParserAux___spec__1(lean_object*, lean_object*, lean_object*); +lean_object* l_List_foldl___main___at___private_Lean_Parser_Extension_7__addTrailingParserAux___spec__1(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_Lean_Parser_parserExtension___closed__5; @@ -161,7 +159,7 @@ lean_object* l_Lean_Parser_addSyntaxNodeKind(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Trie_HasEmptyc___closed__1; lean_object* l_Array_iterateMAux___main___at_Lean_Parser_getSyntaxNodeKinds___spec__3(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__3; -lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1(lean_object*); lean_object* l_Lean_Parser_mkParserExtension___closed__6; lean_object* lean_array_fget(lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); @@ -178,7 +176,7 @@ lean_object* l_Lean_Parser_categoryParserFnImpl___closed__1; lean_object* l_EStateM_bind___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_13__registerParserAttributeImplBuilder___lambda__1(lean_object*); -lean_object* l_Lean_Parser_declareBuiltinParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_declareBuiltinParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_noFirstTokenInfo(lean_object*); lean_object* l_Std_PersistentHashMap_insertAux___main___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_KeyedDeclsAttribute_declareBuiltin___rarg___closed__6; @@ -194,6 +192,7 @@ lean_object* l_Lean_Parser_mkParserOfConstantUnsafe(lean_object*, lean_object*, lean_object* l_Lean_registerAttributeOfBuilder(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_append___main(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_findAux___main___at_Lean_Parser_getCategory___spec__2(lean_object*, size_t, lean_object*); +lean_object* l_Lean_ofExcept___at___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_nameToExpr___closed__1; lean_object* l_Lean_Parser_regTermParserAttribute___closed__1; lean_object* l_Lean_Parser_mkParserExtension___closed__8; @@ -209,7 +208,7 @@ extern lean_object* l_Lean_Parser_nameLit; lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_parserExtension___elambda__4(lean_object*, lean_object*); lean_object* l_Lean_Parser_throwUnknownParserCategory___rarg(lean_object*); -lean_object* l_Lean_Parser_addLeadingParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addLeadingParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension___lambda__2___boxed(lean_object*); lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__4; size_t l_Lean_Name_hash(lean_object*); @@ -239,7 +238,7 @@ lean_object* l_IO_ofExcept___at___private_Lean_Parser_Extension_10__ParserExtens lean_object* l_Lean_Parser_ParserExtensionState_inhabited; extern lean_object* l_Lean_Parser_ParserState_mkEOIError___closed__1; lean_object* l_Lean_Parser_compileParserDescr(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_declareTrailingBuiltinParser(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_declareTrailingBuiltinParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_setCategoryParserFnRef___closed__1; lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Parser_mkParserExtension___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_addParserTokens(lean_object*, lean_object*); @@ -250,23 +249,25 @@ lean_object* l_Lean_Parser_compileParserDescr___main___closed__1; 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_mkParserOfConstantAux(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_getCategory___boxed(lean_object*, lean_object*); lean_object* l_Lean_registerBuiltinAttribute(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_foldlM___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_getParserPriority___closed__4; lean_object* l_IO_ofExcept___at___private_Lean_Parser_Extension_10__ParserExtension_addImported___spec__1___boxed(lean_object*, lean_object*); size_t l_USize_mul(size_t, size_t); lean_object* l_Lean_FileMap_ofString(lean_object*); lean_object* l_List_redLength___main___rarg(lean_object*); lean_object* l___private_Lean_Parser_Extension_4__addBuiltinParserCategory___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_getTokenTable(lean_object*); +lean_object* l_Lean_Parser_getParserPriority___closed__2; lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_isValidSyntaxNodeKind___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Data_Trie_2__insertAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserExtension(lean_object*); lean_object* l_Lean_Parser_sepByFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkBuiltinTokenTable(lean_object*); -lean_object* l_Lean_Parser_addTrailingParser(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addTrailingParser(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__4; lean_object* l_Lean_ConstantInfo_type(lean_object*); lean_object* l_Lean_Parser_trailingNodeFn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_addBuiltinLeadingParser(lean_object*, lean_object*, lean_object*, lean_object*); @@ -278,28 +279,32 @@ lean_object* l_Lean_Parser_parserExtension___elambda__4___boxed(lean_object*, le lean_object* l_Lean_Parser_registerRunParserAttributeHooksAttribute___closed__4; lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_mkParserExtension___spec__3___closed__1; lean_object* l___private_Lean_Parser_Extension_3__addParserCategoryCore(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_getParserPriority___boxed(lean_object*); +lean_object* l_Lean_Parser_getParserPriority___closed__1; lean_object* l_Lean_ParametricAttribute_setParam___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Lean_Environment_5__envExtensionsRef; -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*); +lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_sepBy1Info(lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1Fn___boxed(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_Lean_Parser_Extension_12__ParserAttribute_add___closed__1; -lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_declareLeadingBuiltinParser(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__2; +lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___boxed(lean_object*); +lean_object* l_Lean_Parser_declareLeadingBuiltinParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_registerParserCategory(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Parser_mkParserExtension___closed__3; extern lean_object* l_Lean_identKind; +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__1; extern lean_object* l_Lean_Parser_numLit; +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__1; lean_object* l_Lean_Parser_compileParserDescr___main___closed__2; -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_registerRunParserAttributeHooksAttribute___closed__1; +lean_object* l_Lean_Syntax_getNumArgs(lean_object*); lean_object* l_Lean_Parser_registerRunParserAttributeHooksAttribute___closed__2; lean_object* l_Array_iterateMAux___main___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__6(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__4___closed__2; -uint8_t l_Lean_Syntax_hasArgs(lean_object*); lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_tryFn(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Parser_isParserCategory(lean_object*, lean_object*); @@ -307,20 +312,22 @@ uint8_t l_USize_decLe(size_t, size_t); lean_object* l_Std_PersistentHashMap_containsAtAux___main___at_Lean_Parser_isValidSyntaxNodeKind___spec__3___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParser(lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParserFnImpl___closed__3; -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Environment_addAndCompile(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1___rarg(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Parser_isValidSyntaxNodeKind(lean_object*, lean_object*); 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_Lean_Parser_addLeadingParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; lean_object* l_Lean_Name_toExprAux___main(lean_object*); lean_object* l_Lean_Parser_mkParserExtension___closed__5; -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolInfo(lean_object*); lean_object* l_Lean_Parser_parserAttributeHooks; lean_object* l___private_Lean_Parser_Extension_13__registerParserAttributeImplBuilder(lean_object*); extern lean_object* l_Lean_Parser_epsilonInfo; lean_object* l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__2(lean_object*); +lean_object* l_Lean_Parser_getParserPriority(lean_object*); lean_object* l_Lean_Parser_builtinSyntaxNodeKindSetRef; lean_object* l_Lean_Parser_registerBuiltinNodeKind(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkParserState___boxed(lean_object*); @@ -328,13 +335,13 @@ lean_object* l___private_Lean_Parser_Extension_13__registerParserAttributeImplBu extern lean_object* l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; extern lean_object* l_Lean_registerTagAttribute___lambda__4___closed__9; lean_object* l___private_Lean_Parser_Extension_5__ParserExtension_mkInitial(lean_object*); -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__4; lean_object* l___private_Lean_Parser_Extension_13__registerParserAttributeImplBuilder___lambda__1___closed__1; lean_object* l_Lean_getConstInfo___at_Lean_mkInitAttr___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_10__ParserExtension_addImported___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_runParserAttributeHooks(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_foldlMAux___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_TraceState_Inhabited___closed__1; lean_object* l_IO_ofExcept___at___private_Lean_Parser_Extension_4__addBuiltinParserCategory___spec__1___boxed(lean_object*, lean_object*); lean_object* l_String_trim(lean_object*); @@ -356,32 +363,38 @@ lean_object* l_Lean_registerTagAttribute(lean_object*, lean_object*, lean_object lean_object* l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_parserExtension___elambda__1(lean_object*); +lean_object* l_Lean_Parser_addBuiltinTrailingParserNew(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_2__throwParserCategoryAlreadyDefined___rarg___closed__2; 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*); lean_object* l_Lean_Parser_mkAntiquot(lean_object*, lean_object*, uint8_t); -lean_object* l_Lean_Parser_addParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_IO_mkRef___at_Lean_Parser_mkBuiltinParserCategories___spec__1(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_forM___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_containsAux___main___at_Lean_Parser_isValidSyntaxNodeKind___spec__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_toErrorMsg(lean_object*, lean_object*); +lean_object* l_Lean_ofExcept___at___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_foldlMAux___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_findAtAux___main___at_Lean_Parser_getCategory___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_manyFn(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_getParserPriority___closed__3; extern lean_object* l_Lean_Unhygienic_run___rarg___closed__1; +lean_object* l_Lean_mkNatLit(lean_object*); lean_object* l___private_Lean_Parser_Extension_1__registerAuxiliaryNodeKindSets(lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Parser_getSyntaxNodeKinds___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_registerRunParserAttributeHooksAttribute(lean_object*); lean_object* l_List_toArrayAux___main___rarg(lean_object*, lean_object*); extern lean_object* l_System_FilePath_dirName___closed__1; lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_getParserPriority___closed__5; lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_forM___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_usize_to_nat(size_t); lean_object* l___private_Lean_Parser_Extension_9__ParserExtension_addEntry(lean_object*, lean_object*); -lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add(lean_object*); lean_object* l_Lean_registerAttributeImplBuilder(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_mkUnexpectedError(lean_object*, lean_object*); extern lean_object* l_Lean_Environment_addAttribute___closed__1; @@ -393,10 +406,10 @@ lean_object* l_IO_ofExcept___at_Lean_KeyedDeclsAttribute_declareBuiltin___spec__ lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__5; uint8_t lean_string_utf8_at_end(lean_object*, lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__3; lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__2; lean_object* l_Std_PersistentHashMap_insertAtCollisionNodeAux___main___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_compileParserDescr___main___closed__4; -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__2; lean_object* l___private_Lean_Data_Trie_3__findAux_x3f___main___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_IO_ofExcept___at___private_Lean_Parser_Extension_10__ParserExtension_addImported___spec__2(lean_object*, lean_object*); lean_object* l_Lean_setEnv___at_Lean_registerTagAttribute___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); @@ -404,16 +417,14 @@ extern lean_object* l_Lean_initAttr; lean_object* l_Std_PersistentHashMap_containsAux___main___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_10__ParserExtension_addImported(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkAppStx___closed__1; +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__5; lean_object* l_Lean_Parser_getCategory(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_strLit; -extern lean_object* l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; lean_object* l_IO_ofExcept___at___private_Lean_Parser_Extension_4__addBuiltinParserCategory___spec__1(lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__5; -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__1; lean_object* l_Array_iterateMAux___main___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_NameGenerator_Inhabited___closed__3; lean_object* l_Lean_Parser_parserExtension___elambda__3(lean_object*, lean_object*); -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_compileParserDescr___main___closed__5; uint8_t lean_string_dec_eq(lean_object*, lean_object*); @@ -1860,60 +1871,428 @@ x_3 = l_List_eraseDupsAux___main___at_Lean_Parser_addLeadingParser___spec__3(x_1 return x_3; } } -lean_object* l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -if (lean_obj_tag(x_3) == 0) +if (lean_obj_tag(x_4) == 0) { +lean_dec(x_2); lean_dec(x_1); -return x_2; +return x_3; } else { -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 = lean_ctor_get(x_3, 1); +lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_5 = lean_ctor_get(x_4, 0); lean_inc(x_5); -lean_dec(x_3); -x_6 = !lean_is_exclusive(x_2); -if (x_6 == 0) +x_6 = lean_ctor_get(x_4, 1); +lean_inc(x_6); +lean_dec(x_4); +x_7 = !lean_is_exclusive(x_3); +if (x_7 == 0) { -lean_object* x_7; lean_object* x_8; -x_7 = lean_ctor_get(x_2, 0); +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = lean_ctor_get(x_3, 0); +lean_inc(x_2); lean_inc(x_1); -x_8 = l_Lean_Parser_TokenMap_insert___rarg(x_7, x_4, x_1); -lean_ctor_set(x_2, 0, x_8); -x_3 = x_5; +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_1); +lean_ctor_set(x_9, 1, x_2); +x_10 = l_Lean_Parser_TokenMap_insert___rarg(x_8, x_5, x_9); +lean_ctor_set(x_3, 0, x_10); +x_4 = x_6; goto _start; } else { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_10 = lean_ctor_get(x_2, 0); -x_11 = lean_ctor_get(x_2, 1); -x_12 = lean_ctor_get(x_2, 2); -x_13 = lean_ctor_get(x_2, 3); +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; +x_12 = lean_ctor_get(x_3, 0); +x_13 = lean_ctor_get(x_3, 1); +x_14 = lean_ctor_get(x_3, 2); +x_15 = lean_ctor_get(x_3, 3); +lean_inc(x_15); +lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_dec(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_1); +lean_ctor_set(x_16, 1, x_2); +x_17 = l_Lean_Parser_TokenMap_insert___rarg(x_12, x_5, x_16); +x_18 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_13); +lean_ctor_set(x_18, 2, x_14); +lean_ctor_set(x_18, 3, x_15); +x_3 = x_18; +x_4 = x_6; +goto _start; +} +} +} +} +lean_object* l_Lean_Parser_addLeadingParser(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_inc(x_1); +x_6 = l_Std_PersistentHashMap_find_x3f___at_Lean_Parser_getCategory___spec__1(x_1, x_2); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_7 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_2); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_41; lean_object* x_57; lean_object* x_58; +x_8 = lean_ctor_get(x_6, 0); +lean_inc(x_8); +lean_dec(x_6); +x_57 = lean_ctor_get(x_4, 0); +lean_inc(x_57); +x_58 = lean_ctor_get(x_57, 2); +lean_inc(x_58); +lean_dec(x_57); +switch (lean_obj_tag(x_58)) { +case 2: +{ +lean_object* x_59; +x_59 = lean_ctor_get(x_58, 0); +lean_inc(x_59); +lean_dec(x_58); +x_41 = x_59; +goto block_56; +} +case 3: +{ +lean_object* x_60; +x_60 = lean_ctor_get(x_58, 0); +lean_inc(x_60); +lean_dec(x_58); +x_41 = x_60; +goto block_56; +} +default: +{ +lean_object* x_61; +lean_dec(x_58); +x_61 = lean_box(0); +x_9 = x_61; +goto block_40; +} +} +block_40: +{ +uint8_t x_10; +lean_dec(x_9); +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 0) +{ +lean_object* x_11; uint8_t x_12; +x_11 = lean_ctor_get(x_8, 0); +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_13 = lean_ctor_get(x_11, 1); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_4); +lean_ctor_set(x_14, 1, x_5); +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_13); +lean_ctor_set(x_11, 1, x_15); +x_16 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__3(x_1, x_2, x_8); +x_17 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_17, 0, x_16); +return x_17; +} +else +{ +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; +x_18 = lean_ctor_get(x_11, 0); +x_19 = lean_ctor_get(x_11, 1); +x_20 = lean_ctor_get(x_11, 2); +x_21 = lean_ctor_get(x_11, 3); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_11); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_4); +lean_ctor_set(x_22, 1, x_5); +x_23 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_19); +x_24 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_24, 0, x_18); +lean_ctor_set(x_24, 1, x_23); +lean_ctor_set(x_24, 2, x_20); +lean_ctor_set(x_24, 3, x_21); +lean_ctor_set(x_8, 0, x_24); +x_25 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__3(x_1, x_2, x_8); +x_26 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_26, 0, x_25); +return x_26; +} +} +else +{ +lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_27 = lean_ctor_get(x_8, 0); +x_28 = lean_ctor_get_uint8(x_8, sizeof(void*)*1); +lean_inc(x_27); +lean_dec(x_8); +x_29 = lean_ctor_get(x_27, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_27, 1); +lean_inc(x_30); +x_31 = lean_ctor_get(x_27, 2); +lean_inc(x_31); +x_32 = lean_ctor_get(x_27, 3); +lean_inc(x_32); +if (lean_is_exclusive(x_27)) { + lean_ctor_release(x_27, 0); + lean_ctor_release(x_27, 1); + lean_ctor_release(x_27, 2); + lean_ctor_release(x_27, 3); + x_33 = x_27; +} else { + lean_dec_ref(x_27); + x_33 = lean_box(0); +} +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_4); +lean_ctor_set(x_34, 1, x_5); +x_35 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_30); +if (lean_is_scalar(x_33)) { + x_36 = lean_alloc_ctor(0, 4, 0); +} else { + x_36 = x_33; +} +lean_ctor_set(x_36, 0, x_29); +lean_ctor_set(x_36, 1, x_35); +lean_ctor_set(x_36, 2, x_31); +lean_ctor_set(x_36, 3, x_32); +x_37 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set_uint8(x_37, sizeof(void*)*1, x_28); +x_38 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__3(x_1, x_2, x_37); +x_39 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_39, 0, x_38); +return x_39; +} +} +block_56: +{ +lean_object* x_42; uint8_t x_43; +x_42 = l_List_map___main___at_Lean_Parser_addLeadingParser___spec__1(x_41); +x_43 = !lean_is_exclusive(x_8); +if (x_43 == 0) +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_44 = lean_ctor_get(x_8, 0); +x_45 = l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__2(x_42); +x_46 = l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__4(x_4, x_5, x_44, x_45); +lean_ctor_set(x_8, 0, x_46); +x_47 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__3(x_1, x_2, x_8); +x_48 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_48, 0, x_47); +return x_48; +} +else +{ +lean_object* x_49; uint8_t x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_49 = lean_ctor_get(x_8, 0); +x_50 = lean_ctor_get_uint8(x_8, sizeof(void*)*1); +lean_inc(x_49); +lean_dec(x_8); +x_51 = l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__2(x_42); +x_52 = l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__4(x_4, x_5, x_49, x_51); +x_53 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set_uint8(x_53, sizeof(void*)*1, x_50); +x_54 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__3(x_1, x_2, x_53); +x_55 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_55, 0, x_54); +return x_55; +} +} +} +} +} +lean_object* l_Lean_Parser_addLeadingParser___boxed(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; +x_6 = l_Lean_Parser_addLeadingParser(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_3); +return x_6; +} +} +lean_object* l_List_foldl___main___at___private_Lean_Parser_Extension_7__addTrailingParserAux___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +if (lean_obj_tag(x_4) == 0) +{ +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +else +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_5 = lean_ctor_get(x_4, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_4, 1); +lean_inc(x_6); +lean_dec(x_4); +x_7 = !lean_is_exclusive(x_3); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = lean_ctor_get(x_3, 2); +lean_inc(x_2); +lean_inc(x_1); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_1); +lean_ctor_set(x_9, 1, x_2); +x_10 = l_Lean_Parser_TokenMap_insert___rarg(x_8, x_5, x_9); +lean_ctor_set(x_3, 2, x_10); +x_4 = x_6; +goto _start; +} +else +{ +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; +x_12 = lean_ctor_get(x_3, 0); +x_13 = lean_ctor_get(x_3, 1); +x_14 = lean_ctor_get(x_3, 2); +x_15 = lean_ctor_get(x_3, 3); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_1); +lean_ctor_set(x_16, 1, x_2); +x_17 = l_Lean_Parser_TokenMap_insert___rarg(x_14, x_5, x_16); +x_18 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_18, 0, x_12); +lean_ctor_set(x_18, 1, x_13); +lean_ctor_set(x_18, 2, x_17); +lean_ctor_set(x_18, 3, x_15); +x_3 = x_18; +x_4 = x_6; +goto _start; +} +} +} +} +lean_object* l___private_Lean_Parser_Extension_7__addTrailingParserAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_17; lean_object* x_22; lean_object* x_23; +x_22 = lean_ctor_get(x_2, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_22, 2); +lean_inc(x_23); +lean_dec(x_22); +switch (lean_obj_tag(x_23)) { +case 2: +{ +lean_object* x_24; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +lean_dec(x_23); +x_17 = x_24; +goto block_21; +} +case 3: +{ +lean_object* x_25; +x_25 = lean_ctor_get(x_23, 0); +lean_inc(x_25); +lean_dec(x_23); +x_17 = x_25; +goto block_21; +} +default: +{ +lean_object* x_26; +lean_dec(x_23); +x_26 = lean_box(0); +x_4 = x_26; +goto block_16; +} +} +block_16: +{ +uint8_t x_5; +lean_dec(x_4); +x_5 = !lean_is_exclusive(x_1); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_ctor_get(x_1, 3); +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_2); +lean_ctor_set(x_7, 1, x_3); +x_8 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_8, 0, x_7); +lean_ctor_set(x_8, 1, x_6); +lean_ctor_set(x_1, 3, x_8); +return x_1; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_9 = lean_ctor_get(x_1, 0); +x_10 = lean_ctor_get(x_1, 1); +x_11 = lean_ctor_get(x_1, 2); +x_12 = lean_ctor_get(x_1, 3); +lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -lean_dec(x_2); -lean_inc(x_1); -x_14 = l_Lean_Parser_TokenMap_insert___rarg(x_10, x_4, x_1); +lean_inc(x_9); +lean_dec(x_1); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_2); +lean_ctor_set(x_13, 1, x_3); +x_14 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_14, 0, x_13); +lean_ctor_set(x_14, 1, x_12); x_15 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_11); -lean_ctor_set(x_15, 2, x_12); -lean_ctor_set(x_15, 3, x_13); -x_2 = x_15; -x_3 = x_5; -goto _start; +lean_ctor_set(x_15, 0, x_9); +lean_ctor_set(x_15, 1, x_10); +lean_ctor_set(x_15, 2, x_11); +lean_ctor_set(x_15, 3, x_14); +return x_15; +} +} +block_21: +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = l_List_map___main___at_Lean_Parser_addLeadingParser___spec__1(x_17); +x_19 = l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__2(x_18); +x_20 = l_List_foldl___main___at___private_Lean_Parser_Extension_7__addTrailingParserAux___spec__1(x_2, x_3, x_1, x_19); +return x_20; } } } -} -lean_object* l_Lean_Parser_addLeadingParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Parser_addTrailingParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; @@ -1923,407 +2302,74 @@ if (lean_obj_tag(x_5) == 0) { lean_object* x_6; lean_dec(x_4); +lean_dec(x_3); lean_dec(x_1); x_6 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_2); return x_6; } else { -lean_object* x_7; lean_object* x_8; lean_object* x_37; lean_object* x_53; lean_object* x_54; +lean_object* x_7; uint8_t x_8; x_7 = lean_ctor_get(x_5, 0); lean_inc(x_7); lean_dec(x_5); -x_53 = lean_ctor_get(x_4, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_53, 2); -lean_inc(x_54); -lean_dec(x_53); -switch (lean_obj_tag(x_54)) { -case 2: +x_8 = !lean_is_exclusive(x_7); +if (x_8 == 0) { -lean_object* x_55; -x_55 = lean_ctor_get(x_54, 0); -lean_inc(x_55); -lean_dec(x_54); -x_37 = x_55; -goto block_52; -} -case 3: -{ -lean_object* x_56; -x_56 = lean_ctor_get(x_54, 0); -lean_inc(x_56); -lean_dec(x_54); -x_37 = x_56; -goto block_52; -} -default: -{ -lean_object* x_57; -lean_dec(x_54); -x_57 = lean_box(0); -x_8 = x_57; -goto block_36; -} -} -block_36: -{ -uint8_t x_9; -lean_dec(x_8); -x_9 = !lean_is_exclusive(x_7); -if (x_9 == 0) -{ -lean_object* x_10; uint8_t x_11; -x_10 = lean_ctor_get(x_7, 0); -x_11 = !lean_is_exclusive(x_10); -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = lean_ctor_get(x_10, 1); -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_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__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; -} -else -{ -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; -x_16 = lean_ctor_get(x_10, 0); -x_17 = lean_ctor_get(x_10, 1); -x_18 = lean_ctor_get(x_10, 2); -x_19 = lean_ctor_get(x_10, 3); -lean_inc(x_19); -lean_inc(x_18); -lean_inc(x_17); -lean_inc(x_16); -lean_dec(x_10); -x_20 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_20, 0, x_4); -lean_ctor_set(x_20, 1, x_17); -x_21 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_21, 0, x_16); -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_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__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; -} -} -else -{ -lean_object* x_24; uint8_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_24 = lean_ctor_get(x_7, 0); -x_25 = lean_ctor_get_uint8(x_7, sizeof(void*)*1); -lean_inc(x_24); -lean_dec(x_7); -x_26 = lean_ctor_get(x_24, 0); -lean_inc(x_26); -x_27 = lean_ctor_get(x_24, 1); -lean_inc(x_27); -x_28 = lean_ctor_get(x_24, 2); -lean_inc(x_28); -x_29 = lean_ctor_get(x_24, 3); -lean_inc(x_29); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - lean_ctor_release(x_24, 2); - lean_ctor_release(x_24, 3); - x_30 = x_24; -} else { - lean_dec_ref(x_24); - x_30 = lean_box(0); -} -x_31 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_31, 0, x_4); -lean_ctor_set(x_31, 1, x_27); -if (lean_is_scalar(x_30)) { - x_32 = lean_alloc_ctor(0, 4, 0); -} else { - x_32 = x_30; -} -lean_ctor_set(x_32, 0, x_26); -lean_ctor_set(x_32, 1, x_31); -lean_ctor_set(x_32, 2, x_28); -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_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__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; -} -} -block_52: -{ -lean_object* x_38; uint8_t x_39; -x_38 = l_List_map___main___at_Lean_Parser_addLeadingParser___spec__1(x_37); -x_39 = !lean_is_exclusive(x_7); -if (x_39 == 0) -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_40 = lean_ctor_get(x_7, 0); -x_41 = l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__2(x_38); -x_42 = l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__4(x_4, x_40, x_41); -lean_ctor_set(x_7, 0, x_42); -x_43 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__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; -} -else -{ -lean_object* x_45; uint8_t x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_45 = lean_ctor_get(x_7, 0); -x_46 = lean_ctor_get_uint8(x_7, sizeof(void*)*1); -lean_inc(x_45); -lean_dec(x_7); -x_47 = l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__2(x_38); -x_48 = l_List_foldl___main___at_Lean_Parser_addLeadingParser___spec__4(x_4, x_45, x_47); -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_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__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; -} -} -} -} -} -lean_object* l_Lean_Parser_addLeadingParser___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_Lean_Parser_addLeadingParser(x_1, x_2, x_3, x_4); -lean_dec(x_3); -return x_5; -} -} -lean_object* l_List_foldl___main___at___private_Lean_Parser_Extension_7__addTrailingParserAux___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_3) == 0) -{ -lean_dec(x_1); -return x_2; -} -else -{ -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 = lean_ctor_get(x_3, 1); -lean_inc(x_5); -lean_dec(x_3); -x_6 = !lean_is_exclusive(x_2); -if (x_6 == 0) -{ -lean_object* x_7; lean_object* x_8; -x_7 = lean_ctor_get(x_2, 2); -lean_inc(x_1); -x_8 = l_Lean_Parser_TokenMap_insert___rarg(x_7, x_4, x_1); -lean_ctor_set(x_2, 2, x_8); -x_3 = x_5; -goto _start; -} -else -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_10 = lean_ctor_get(x_2, 0); -x_11 = lean_ctor_get(x_2, 1); -x_12 = lean_ctor_get(x_2, 2); -x_13 = lean_ctor_get(x_2, 3); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_dec(x_2); -lean_inc(x_1); -x_14 = l_Lean_Parser_TokenMap_insert___rarg(x_12, x_4, x_1); -x_15 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_15, 0, x_10); -lean_ctor_set(x_15, 1, x_11); -lean_ctor_set(x_15, 2, x_14); -lean_ctor_set(x_15, 3, x_13); -x_2 = x_15; -x_3 = x_5; -goto _start; -} -} -} -} -lean_object* l___private_Lean_Parser_Extension_7__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; -x_19 = lean_ctor_get(x_2, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_19, 2); -lean_inc(x_20); -lean_dec(x_19); -switch (lean_obj_tag(x_20)) { -case 2: -{ -lean_object* x_21; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -lean_dec(x_20); -x_14 = x_21; -goto block_18; -} -case 3: -{ -lean_object* x_22; -x_22 = lean_ctor_get(x_20, 0); -lean_inc(x_22); -lean_dec(x_20); -x_14 = x_22; -goto block_18; -} -default: -{ -lean_object* x_23; -lean_dec(x_20); -x_23 = lean_box(0); -x_3 = x_23; -goto block_13; -} -} -block_13: -{ -uint8_t x_4; -lean_dec(x_3); -x_4 = !lean_is_exclusive(x_1); -if (x_4 == 0) -{ -lean_object* x_5; lean_object* x_6; -x_5 = lean_ctor_get(x_1, 3); -x_6 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_6, 0, x_2); -lean_ctor_set(x_6, 1, x_5); -lean_ctor_set(x_1, 3, x_6); -return x_1; -} -else -{ -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_1, 0); -x_8 = lean_ctor_get(x_1, 1); -x_9 = lean_ctor_get(x_1, 2); -x_10 = lean_ctor_get(x_1, 3); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_dec(x_1); -x_11 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_11, 0, x_2); -lean_ctor_set(x_11, 1, x_10); -x_12 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_12, 0, x_7); -lean_ctor_set(x_12, 1, x_8); -lean_ctor_set(x_12, 2, x_9); -lean_ctor_set(x_12, 3, x_11); +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = lean_ctor_get(x_7, 0); +x_10 = l___private_Lean_Parser_Extension_7__addTrailingParserAux(x_9, x_3, x_4); +lean_ctor_set(x_7, 0, x_10); +x_11 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__3(x_1, x_2, x_7); +x_12 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_12, 0, x_11); return x_12; } -} -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__1(x_14); -x_16 = l_List_eraseDups___at_Lean_Parser_addLeadingParser___spec__2(x_15); -x_17 = l_List_foldl___main___at___private_Lean_Parser_Extension_7__addTrailingParserAux___spec__1(x_2, x_1, x_16); -return x_17; -} -} -} -lean_object* l_Lean_Parser_addTrailingParser(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -lean_object* x_4; -lean_inc(x_1); -x_4 = l_Std_PersistentHashMap_find_x3f___at_Lean_Parser_getCategory___spec__1(x_1, x_2); -if (lean_obj_tag(x_4) == 0) -{ -lean_object* x_5; -lean_dec(x_3); -lean_dec(x_1); -x_5 = l_Lean_Parser_throwUnknownParserCategory___rarg(x_2); -return x_5; -} else { -lean_object* x_6; uint8_t x_7; -x_6 = lean_ctor_get(x_4, 0); -lean_inc(x_6); -lean_dec(x_4); -x_7 = !lean_is_exclusive(x_6); -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_Lean_Parser_Extension_7__addTrailingParserAux(x_8, x_3); -lean_ctor_set(x_6, 0, x_9); -x_10 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__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; -} -else -{ -lean_object* x_12; uint8_t x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -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_Lean_Parser_Extension_7__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_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__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; +lean_object* x_13; uint8_t x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_13 = lean_ctor_get(x_7, 0); +x_14 = lean_ctor_get_uint8(x_7, sizeof(void*)*1); +lean_inc(x_13); +lean_dec(x_7); +x_15 = l___private_Lean_Parser_Extension_7__addTrailingParserAux(x_13, x_3, x_4); +x_16 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set_uint8(x_16, sizeof(void*)*1, x_14); +x_17 = l_Std_PersistentHashMap_insert___at___private_Lean_Parser_Extension_3__addParserCategoryCore___spec__3(x_1, x_2, x_16); +x_18 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_18, 0, x_17); +return x_18; } } } } -lean_object* l_Lean_Parser_addParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_addParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6) { _start: { if (x_4 == 0) { -lean_object* x_6; -x_6 = l_Lean_Parser_addTrailingParser(x_1, x_2, x_5); -return x_6; +lean_object* x_7; +x_7 = l_Lean_Parser_addTrailingParser(x_1, x_2, x_5, x_6); +return x_7; } else { -lean_object* x_7; -x_7 = l_Lean_Parser_addLeadingParser(x_1, x_2, x_3, x_5); -return x_7; +lean_object* x_8; +x_8 = l_Lean_Parser_addLeadingParser(x_1, x_2, x_3, x_5, x_6); +return x_8; } } } -lean_object* l_Lean_Parser_addParser___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_addParser___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_6; lean_object* x_7; -x_6 = lean_unbox(x_4); +uint8_t x_7; lean_object* x_8; +x_7 = lean_unbox(x_4); lean_dec(x_4); -x_7 = l_Lean_Parser_addParser(x_1, x_2, x_3, x_6, x_5); +x_8 = l_Lean_Parser_addParser(x_1, x_2, x_3, x_7, x_5, x_6); lean_dec(x_3); -return x_7; +return x_8; } } lean_object* l_List_foldlM___main___at_Lean_Parser_addParserTokens___spec__1(lean_object* x_1, lean_object* x_2) { @@ -2534,105 +2580,125 @@ return x_44; } } } -lean_object* l_Lean_Parser_addBuiltinParser(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_addBuiltinParser(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_6 = l_Lean_Parser_builtinParserCategoriesRef; -x_7 = lean_st_ref_get(x_6, x_5); -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_ctor_get(x_7, 1); +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 = l_Lean_Parser_builtinParserCategoriesRef; +x_8 = lean_st_ref_get(x_7, x_6); +x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -lean_dec(x_7); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); lean_inc(x_4); -x_10 = l_Lean_Parser_addParser(x_8, x_1, x_2, x_3, x_4); -x_11 = l_IO_ofExcept___at___private_Lean_Parser_Extension_4__addBuiltinParserCategory___spec__1(x_10, x_9); -lean_dec(x_10); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; 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; -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); +x_11 = l_Lean_Parser_addParser(x_9, x_1, x_2, x_3, x_4, x_5); +x_12 = l_IO_ofExcept___at___private_Lean_Parser_Extension_4__addBuiltinParserCategory___spec__1(x_11, x_10); lean_dec(x_11); -x_14 = lean_st_ref_set(x_6, x_12, x_13); -x_15 = lean_ctor_get(x_14, 1); -lean_inc(x_15); -lean_dec(x_14); -x_16 = lean_ctor_get(x_4, 0); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; 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; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); +x_15 = lean_st_ref_set(x_7, x_13, x_14); +x_16 = lean_ctor_get(x_15, 1); lean_inc(x_16); -lean_dec(x_4); -x_17 = lean_ctor_get(x_16, 1); +lean_dec(x_15); +x_17 = lean_ctor_get(x_4, 0); lean_inc(x_17); -x_18 = l_Lean_Parser_builtinSyntaxNodeKindSetRef; -x_19 = lean_st_ref_take(x_18, x_15); -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_19, 1); +lean_dec(x_4); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +x_19 = l_Lean_Parser_builtinSyntaxNodeKindSetRef; +x_20 = lean_st_ref_take(x_19, x_16); +x_21 = lean_ctor_get(x_20, 0); lean_inc(x_21); -lean_dec(x_19); -x_22 = lean_apply_1(x_17, x_20); -x_23 = lean_st_ref_set(x_18, x_22, x_21); -x_24 = lean_ctor_get(x_23, 1); -lean_inc(x_24); -lean_dec(x_23); -x_25 = l___private_Lean_Parser_Extension_8__updateBuiltinTokens(x_16, x_2, x_24); -return x_25; +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +x_23 = lean_apply_1(x_18, x_21); +x_24 = lean_st_ref_set(x_19, x_23, x_22); +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +lean_dec(x_24); +x_26 = l___private_Lean_Parser_Extension_8__updateBuiltinTokens(x_17, x_2, x_25); +return x_26; } else { -uint8_t x_26; +uint8_t x_27; lean_dec(x_4); lean_dec(x_2); -x_26 = !lean_is_exclusive(x_11); -if (x_26 == 0) +x_27 = !lean_is_exclusive(x_12); +if (x_27 == 0) { -return x_11; +return x_12; } else { -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_11, 0); -x_28 = lean_ctor_get(x_11, 1); +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_12, 0); +x_29 = lean_ctor_get(x_12, 1); +lean_inc(x_29); lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_11); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; +lean_dec(x_12); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; } } } } -lean_object* l_Lean_Parser_addBuiltinParser___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_addBuiltinParser___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +uint8_t x_7; lean_object* x_8; +x_7 = lean_unbox(x_3); +lean_dec(x_3); +x_8 = l_Lean_Parser_addBuiltinParser(x_1, x_2, x_7, x_4, x_5, x_6); +return x_8; +} +} +lean_object* l_Lean_Parser_addBuiltinLeadingParserNew(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { uint8_t x_6; lean_object* x_7; -x_6 = lean_unbox(x_3); -lean_dec(x_3); -x_7 = l_Lean_Parser_addBuiltinParser(x_1, x_2, x_6, x_4, x_5); +x_6 = 1; +x_7 = l_Lean_Parser_addBuiltinParser(x_1, x_2, x_6, x_3, x_4, x_5); +return x_7; +} +} +lean_object* l_Lean_Parser_addBuiltinTrailingParserNew(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +uint8_t x_6; lean_object* x_7; +x_6 = 0; +x_7 = l_Lean_Parser_addBuiltinParser(x_1, x_2, x_6, x_3, x_4, x_5); return x_7; } } lean_object* l_Lean_Parser_addBuiltinLeadingParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -uint8_t x_5; lean_object* x_6; +uint8_t x_5; lean_object* x_6; lean_object* x_7; x_5 = 1; -x_6 = l_Lean_Parser_addBuiltinParser(x_1, x_2, x_5, x_3, x_4); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_1, x_2, x_5, x_3, x_6, x_4); +return x_7; } } lean_object* l_Lean_Parser_addBuiltinTrailingParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -uint8_t x_5; lean_object* x_6; +uint8_t x_5; lean_object* x_6; lean_object* x_7; x_5 = 0; -x_6 = l_Lean_Parser_addBuiltinParser(x_1, x_2, x_5, x_3, x_4); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_1, x_2, x_5, x_3, x_6, x_4); +return x_7; } } lean_object* l___private_Lean_Parser_Extension_9__ParserExtension_addEntry(lean_object* x_1, lean_object* x_2) { @@ -2866,101 +2932,109 @@ return x_1; } default: { -lean_object* x_66; lean_object* x_67; uint8_t x_68; lean_object* x_69; uint8_t x_70; +lean_object* x_66; lean_object* x_67; uint8_t x_68; lean_object* x_69; lean_object* x_70; uint8_t x_71; x_66 = lean_ctor_get(x_2, 0); lean_inc(x_66); x_67 = lean_ctor_get(x_2, 1); lean_inc(x_67); -x_68 = lean_ctor_get_uint8(x_2, sizeof(void*)*3); +x_68 = lean_ctor_get_uint8(x_2, sizeof(void*)*4); x_69 = lean_ctor_get(x_2, 2); lean_inc(x_69); +x_70 = lean_ctor_get(x_2, 3); +lean_inc(x_70); lean_dec(x_2); -x_70 = !lean_is_exclusive(x_1); -if (x_70 == 0) +x_71 = !lean_is_exclusive(x_1); +if (x_71 == 0) { -lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_71 = lean_ctor_get(x_1, 0); -x_72 = lean_ctor_get(x_1, 1); -x_73 = lean_ctor_get(x_1, 2); -x_74 = lean_ctor_get(x_1, 3); +lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_72 = lean_ctor_get(x_1, 0); +x_73 = lean_ctor_get(x_1, 1); +x_74 = lean_ctor_get(x_1, 2); +x_75 = lean_ctor_get(x_1, 3); +lean_inc(x_70); lean_inc(x_66); -x_75 = l_Lean_Parser_addParser(x_73, x_66, x_67, x_68, x_69); -if (lean_obj_tag(x_75) == 0) +x_76 = l_Lean_Parser_addParser(x_74, x_66, x_67, x_68, x_69, x_70); +if (lean_obj_tag(x_76) == 0) { -lean_object* x_76; lean_object* x_77; -lean_dec(x_75); +lean_object* x_77; lean_object* x_78; +lean_dec(x_76); lean_free_object(x_1); -lean_dec(x_74); +lean_dec(x_75); +lean_dec(x_73); lean_dec(x_72); -lean_dec(x_71); +lean_dec(x_70); lean_dec(x_67); lean_dec(x_66); -x_76 = l_Lean_Parser_ParserExtensionState_inhabited; -x_77 = l_unreachable_x21___rarg(x_76); -return x_77; +x_77 = l_Lean_Parser_ParserExtensionState_inhabited; +x_78 = l_unreachable_x21___rarg(x_77); +return x_78; } else { -lean_object* x_78; lean_object* x_79; lean_object* x_80; -x_78 = lean_ctor_get(x_75, 0); -lean_inc(x_78); -lean_dec(x_75); -x_79 = lean_alloc_ctor(3, 2, 0); -lean_ctor_set(x_79, 0, x_66); -lean_ctor_set(x_79, 1, x_67); -x_80 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_80, 0, x_79); -lean_ctor_set(x_80, 1, x_74); -lean_ctor_set(x_1, 3, x_80); -lean_ctor_set(x_1, 2, x_78); +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_ctor_get(x_76, 0); +lean_inc(x_79); +lean_dec(x_76); +x_80 = lean_alloc_ctor(3, 3, 0); +lean_ctor_set(x_80, 0, x_66); +lean_ctor_set(x_80, 1, x_67); +lean_ctor_set(x_80, 2, x_70); +x_81 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_81, 0, x_80); +lean_ctor_set(x_81, 1, x_75); +lean_ctor_set(x_1, 3, x_81); +lean_ctor_set(x_1, 2, x_79); return x_1; } } else { -lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; -x_81 = lean_ctor_get(x_1, 0); -x_82 = lean_ctor_get(x_1, 1); -x_83 = lean_ctor_get(x_1, 2); -x_84 = lean_ctor_get(x_1, 3); +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +x_82 = lean_ctor_get(x_1, 0); +x_83 = lean_ctor_get(x_1, 1); +x_84 = lean_ctor_get(x_1, 2); +x_85 = lean_ctor_get(x_1, 3); +lean_inc(x_85); lean_inc(x_84); lean_inc(x_83); lean_inc(x_82); -lean_inc(x_81); lean_dec(x_1); +lean_inc(x_70); lean_inc(x_66); -x_85 = l_Lean_Parser_addParser(x_83, x_66, x_67, x_68, x_69); -if (lean_obj_tag(x_85) == 0) +x_86 = l_Lean_Parser_addParser(x_84, x_66, x_67, x_68, x_69, x_70); +if (lean_obj_tag(x_86) == 0) { -lean_object* x_86; lean_object* x_87; +lean_object* x_87; lean_object* x_88; +lean_dec(x_86); lean_dec(x_85); -lean_dec(x_84); +lean_dec(x_83); lean_dec(x_82); -lean_dec(x_81); +lean_dec(x_70); lean_dec(x_67); lean_dec(x_66); -x_86 = l_Lean_Parser_ParserExtensionState_inhabited; -x_87 = l_unreachable_x21___rarg(x_86); -return x_87; +x_87 = l_Lean_Parser_ParserExtensionState_inhabited; +x_88 = l_unreachable_x21___rarg(x_87); +return x_88; } else { -lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; -x_88 = lean_ctor_get(x_85, 0); -lean_inc(x_88); -lean_dec(x_85); -x_89 = lean_alloc_ctor(3, 2, 0); -lean_ctor_set(x_89, 0, x_66); -lean_ctor_set(x_89, 1, x_67); -x_90 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_90, 0, x_89); -lean_ctor_set(x_90, 1, x_84); -x_91 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_91, 0, x_81); -lean_ctor_set(x_91, 1, x_82); -lean_ctor_set(x_91, 2, x_88); -lean_ctor_set(x_91, 3, x_90); -return x_91; +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_89 = lean_ctor_get(x_86, 0); +lean_inc(x_89); +lean_dec(x_86); +x_90 = lean_alloc_ctor(3, 3, 0); +lean_ctor_set(x_90, 0, x_66); +lean_ctor_set(x_90, 1, x_67); +lean_ctor_set(x_90, 2, x_70); +x_91 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_91, 0, x_90); +lean_ctor_set(x_91, 1, x_85); +x_92 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_92, 0, x_82); +lean_ctor_set(x_92, 1, x_83); +lean_ctor_set(x_92, 2, x_89); +lean_ctor_set(x_92, 3, x_91); +return x_92; } } } @@ -5690,526 +5764,530 @@ return x_89; } default: { -lean_object* x_90; lean_object* x_91; uint8_t x_92; +lean_object* x_90; lean_object* x_91; lean_object* x_92; uint8_t x_93; x_90 = lean_ctor_get(x_10, 0); lean_inc(x_90); x_91 = lean_ctor_get(x_10, 1); lean_inc(x_91); +x_92 = lean_ctor_get(x_10, 2); +lean_inc(x_92); lean_dec(x_10); -x_92 = !lean_is_exclusive(x_5); -if (x_92 == 0) +x_93 = !lean_is_exclusive(x_5); +if (x_93 == 0) { -lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; -x_93 = lean_ctor_get(x_5, 0); -x_94 = lean_ctor_get(x_5, 1); -x_95 = lean_ctor_get(x_5, 2); -x_96 = lean_ctor_get(x_5, 3); +lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; +x_94 = lean_ctor_get(x_5, 0); +x_95 = lean_ctor_get(x_5, 1); +x_96 = lean_ctor_get(x_5, 2); +x_97 = lean_ctor_get(x_5, 3); lean_inc(x_91); -lean_inc(x_95); +lean_inc(x_96); lean_inc(x_1); -x_97 = l_Lean_Parser_mkParserOfConstant(x_1, x_95, x_91); -x_98 = l_IO_ofExcept___at___private_Lean_Parser_Extension_10__ParserExtension_addImported___spec__2(x_97, x_6); -lean_dec(x_97); -if (lean_obj_tag(x_98) == 0) -{ -lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; uint8_t x_103; lean_object* x_104; lean_object* x_105; -x_99 = lean_ctor_get(x_98, 0); -lean_inc(x_99); -x_100 = lean_ctor_get(x_98, 1); -lean_inc(x_100); +x_98 = l_Lean_Parser_mkParserOfConstant(x_1, x_96, x_91); +x_99 = l_IO_ofExcept___at___private_Lean_Parser_Extension_10__ParserExtension_addImported___spec__2(x_98, x_6); lean_dec(x_98); -x_101 = lean_ctor_get(x_99, 0); +if (lean_obj_tag(x_99) == 0) +{ +lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; lean_object* x_105; lean_object* x_106; +x_100 = lean_ctor_get(x_99, 0); +lean_inc(x_100); +x_101 = lean_ctor_get(x_99, 1); lean_inc(x_101); -x_102 = lean_ctor_get(x_99, 1); -lean_inc(x_102); lean_dec(x_99); -x_103 = lean_unbox(x_101); -lean_dec(x_101); +x_102 = lean_ctor_get(x_100, 0); +lean_inc(x_102); +x_103 = lean_ctor_get(x_100, 1); +lean_inc(x_103); +lean_dec(x_100); +x_104 = lean_unbox(x_102); +lean_dec(x_102); lean_inc(x_90); -x_104 = l_Lean_Parser_addParser(x_95, x_90, x_91, x_103, x_102); -x_105 = l_IO_ofExcept___at___private_Lean_Parser_Extension_4__addBuiltinParserCategory___spec__1(x_104, x_100); -lean_dec(x_104); -if (lean_obj_tag(x_105) == 0) -{ -lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; uint8_t x_115; lean_object* x_116; lean_object* x_117; -x_106 = lean_ctor_get(x_105, 0); -lean_inc(x_106); -x_107 = lean_ctor_get(x_105, 1); -lean_inc(x_107); +x_105 = l_Lean_Parser_addParser(x_96, x_90, x_91, x_104, x_103, x_92); +x_106 = l_IO_ofExcept___at___private_Lean_Parser_Extension_4__addBuiltinParserCategory___spec__1(x_105, x_101); lean_dec(x_105); -x_108 = l_Lean_Unhygienic_run___rarg___closed__1; -x_109 = l_Lean_NameGenerator_Inhabited___closed__3; -x_110 = l_Lean_TraceState_Inhabited___closed__1; -lean_inc(x_1); -x_111 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_111, 0, x_1); -lean_ctor_set(x_111, 1, x_108); -lean_ctor_set(x_111, 2, x_109); -lean_ctor_set(x_111, 3, x_110); -x_112 = lean_st_mk_ref(x_111, x_107); -x_113 = lean_ctor_get(x_112, 0); -lean_inc(x_113); -x_114 = lean_ctor_get(x_112, 1); -lean_inc(x_114); -lean_dec(x_112); -x_115 = 0; -x_116 = l_Lean_Environment_addAttribute___closed__1; -lean_inc(x_113); -x_117 = l_Lean_Parser_runParserAttributeHooks(x_90, x_91, x_115, x_116, x_113, x_114); -if (lean_obj_tag(x_117) == 0) +if (lean_obj_tag(x_106) == 0) { -lean_object* x_118; lean_object* x_119; lean_object* x_120; -x_118 = lean_ctor_get(x_117, 1); -lean_inc(x_118); -lean_dec(x_117); -x_119 = lean_st_ref_get(x_113, x_118); +lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; uint8_t x_116; lean_object* x_117; lean_object* x_118; +x_107 = lean_ctor_get(x_106, 0); +lean_inc(x_107); +x_108 = lean_ctor_get(x_106, 1); +lean_inc(x_108); +lean_dec(x_106); +x_109 = l_Lean_Unhygienic_run___rarg___closed__1; +x_110 = l_Lean_NameGenerator_Inhabited___closed__3; +x_111 = l_Lean_TraceState_Inhabited___closed__1; +lean_inc(x_1); +x_112 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_112, 0, x_1); +lean_ctor_set(x_112, 1, x_109); +lean_ctor_set(x_112, 2, x_110); +lean_ctor_set(x_112, 3, x_111); +x_113 = lean_st_mk_ref(x_112, x_108); +x_114 = lean_ctor_get(x_113, 0); +lean_inc(x_114); +x_115 = lean_ctor_get(x_113, 1); +lean_inc(x_115); lean_dec(x_113); -x_120 = lean_ctor_get(x_119, 1); -lean_inc(x_120); -lean_dec(x_119); -lean_ctor_set(x_5, 2, x_106); +x_116 = 0; +x_117 = l_Lean_Environment_addAttribute___closed__1; +lean_inc(x_114); +x_118 = l_Lean_Parser_runParserAttributeHooks(x_90, x_91, x_116, x_117, x_114, x_115); +if (lean_obj_tag(x_118) == 0) +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; +x_119 = lean_ctor_get(x_118, 1); +lean_inc(x_119); +lean_dec(x_118); +x_120 = lean_st_ref_get(x_114, x_119); +lean_dec(x_114); +x_121 = lean_ctor_get(x_120, 1); +lean_inc(x_121); +lean_dec(x_120); +lean_ctor_set(x_5, 2, x_107); x_4 = x_12; -x_6 = x_120; +x_6 = x_121; goto _start; } else { -lean_object* x_122; -lean_dec(x_113); -lean_dec(x_106); +lean_object* x_123; +lean_dec(x_114); +lean_dec(x_107); lean_free_object(x_5); -lean_dec(x_96); +lean_dec(x_97); +lean_dec(x_95); lean_dec(x_94); -lean_dec(x_93); lean_dec(x_12); lean_dec(x_1); -x_122 = lean_ctor_get(x_117, 0); -lean_inc(x_122); -if (lean_obj_tag(x_122) == 0) -{ -lean_object* x_123; lean_object* x_124; lean_object* x_125; -x_123 = lean_ctor_get(x_117, 1); +x_123 = lean_ctor_get(x_118, 0); lean_inc(x_123); -lean_dec(x_117); -x_124 = lean_ctor_get(x_122, 1); +if (lean_obj_tag(x_123) == 0) +{ +lean_object* x_124; lean_object* x_125; lean_object* x_126; +x_124 = lean_ctor_get(x_118, 1); lean_inc(x_124); -lean_dec(x_122); -x_125 = l_Lean_MessageData_toString(x_124, x_123); -if (lean_obj_tag(x_125) == 0) +lean_dec(x_118); +x_125 = lean_ctor_get(x_123, 1); +lean_inc(x_125); +lean_dec(x_123); +x_126 = l_Lean_MessageData_toString(x_125, x_124); +if (lean_obj_tag(x_126) == 0) { -uint8_t x_126; -x_126 = !lean_is_exclusive(x_125); -if (x_126 == 0) +uint8_t x_127; +x_127 = !lean_is_exclusive(x_126); +if (x_127 == 0) { -lean_object* x_127; lean_object* x_128; -x_127 = lean_ctor_get(x_125, 0); -x_128 = lean_alloc_ctor(18, 1, 0); -lean_ctor_set(x_128, 0, x_127); -lean_ctor_set_tag(x_125, 1); -lean_ctor_set(x_125, 0, x_128); -return x_125; +lean_object* x_128; lean_object* x_129; +x_128 = lean_ctor_get(x_126, 0); +x_129 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_129, 0, x_128); +lean_ctor_set_tag(x_126, 1); +lean_ctor_set(x_126, 0, x_129); +return x_126; } else { -lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; -x_129 = lean_ctor_get(x_125, 0); -x_130 = lean_ctor_get(x_125, 1); +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; +x_130 = lean_ctor_get(x_126, 0); +x_131 = lean_ctor_get(x_126, 1); +lean_inc(x_131); lean_inc(x_130); -lean_inc(x_129); -lean_dec(x_125); -x_131 = lean_alloc_ctor(18, 1, 0); -lean_ctor_set(x_131, 0, x_129); -x_132 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_132, 0, x_131); -lean_ctor_set(x_132, 1, x_130); -return x_132; +lean_dec(x_126); +x_132 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_132, 0, x_130); +x_133 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_133, 0, x_132); +lean_ctor_set(x_133, 1, x_131); +return x_133; } } else { -uint8_t x_133; -x_133 = !lean_is_exclusive(x_125); -if (x_133 == 0) +uint8_t x_134; +x_134 = !lean_is_exclusive(x_126); +if (x_134 == 0) { -return x_125; +return x_126; } else { -lean_object* x_134; lean_object* x_135; lean_object* x_136; -x_134 = lean_ctor_get(x_125, 0); -x_135 = lean_ctor_get(x_125, 1); +lean_object* x_135; lean_object* x_136; lean_object* x_137; +x_135 = lean_ctor_get(x_126, 0); +x_136 = lean_ctor_get(x_126, 1); +lean_inc(x_136); lean_inc(x_135); -lean_inc(x_134); -lean_dec(x_125); -x_136 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_136, 0, x_134); -lean_ctor_set(x_136, 1, x_135); -return x_136; +lean_dec(x_126); +x_137 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_137, 0, x_135); +lean_ctor_set(x_137, 1, x_136); +return x_137; } } } else { -uint8_t x_137; -x_137 = !lean_is_exclusive(x_117); -if (x_137 == 0) +uint8_t x_138; +x_138 = !lean_is_exclusive(x_118); +if (x_138 == 0) { -lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; -x_138 = lean_ctor_get(x_117, 0); -lean_dec(x_138); -x_139 = lean_ctor_get(x_122, 0); -lean_inc(x_139); -lean_dec(x_122); -x_140 = l_Nat_repr(x_139); -x_141 = l_Lean_InternalExceptionId_toString___closed__1; -x_142 = lean_string_append(x_141, x_140); -lean_dec(x_140); -x_143 = lean_alloc_ctor(18, 1, 0); -lean_ctor_set(x_143, 0, x_142); -lean_ctor_set(x_117, 0, x_143); -return x_117; +lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; +x_139 = lean_ctor_get(x_118, 0); +lean_dec(x_139); +x_140 = lean_ctor_get(x_123, 0); +lean_inc(x_140); +lean_dec(x_123); +x_141 = l_Nat_repr(x_140); +x_142 = l_Lean_InternalExceptionId_toString___closed__1; +x_143 = lean_string_append(x_142, x_141); +lean_dec(x_141); +x_144 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_144, 0, x_143); +lean_ctor_set(x_118, 0, x_144); +return x_118; } else { -lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; -x_144 = lean_ctor_get(x_117, 1); -lean_inc(x_144); -lean_dec(x_117); -x_145 = lean_ctor_get(x_122, 0); +lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; +x_145 = lean_ctor_get(x_118, 1); lean_inc(x_145); -lean_dec(x_122); -x_146 = l_Nat_repr(x_145); -x_147 = l_Lean_InternalExceptionId_toString___closed__1; -x_148 = lean_string_append(x_147, x_146); -lean_dec(x_146); -x_149 = lean_alloc_ctor(18, 1, 0); -lean_ctor_set(x_149, 0, x_148); -x_150 = lean_alloc_ctor(1, 2, 0); +lean_dec(x_118); +x_146 = lean_ctor_get(x_123, 0); +lean_inc(x_146); +lean_dec(x_123); +x_147 = l_Nat_repr(x_146); +x_148 = l_Lean_InternalExceptionId_toString___closed__1; +x_149 = lean_string_append(x_148, x_147); +lean_dec(x_147); +x_150 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_150, 0, x_149); -lean_ctor_set(x_150, 1, x_144); -return x_150; +x_151 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_151, 0, x_150); +lean_ctor_set(x_151, 1, x_145); +return x_151; } } } } else { -uint8_t x_151; +uint8_t x_152; lean_free_object(x_5); -lean_dec(x_96); +lean_dec(x_97); +lean_dec(x_95); lean_dec(x_94); -lean_dec(x_93); lean_dec(x_91); lean_dec(x_90); lean_dec(x_12); lean_dec(x_1); -x_151 = !lean_is_exclusive(x_105); -if (x_151 == 0) +x_152 = !lean_is_exclusive(x_106); +if (x_152 == 0) { -return x_105; +return x_106; } else { -lean_object* x_152; lean_object* x_153; lean_object* x_154; -x_152 = lean_ctor_get(x_105, 0); -x_153 = lean_ctor_get(x_105, 1); +lean_object* x_153; lean_object* x_154; lean_object* x_155; +x_153 = lean_ctor_get(x_106, 0); +x_154 = lean_ctor_get(x_106, 1); +lean_inc(x_154); lean_inc(x_153); -lean_inc(x_152); -lean_dec(x_105); -x_154 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_154, 0, x_152); -lean_ctor_set(x_154, 1, x_153); -return x_154; +lean_dec(x_106); +x_155 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_155, 0, x_153); +lean_ctor_set(x_155, 1, x_154); +return x_155; } } } else { -uint8_t x_155; +uint8_t x_156; lean_free_object(x_5); +lean_dec(x_97); lean_dec(x_96); lean_dec(x_95); lean_dec(x_94); -lean_dec(x_93); +lean_dec(x_92); lean_dec(x_91); lean_dec(x_90); lean_dec(x_12); lean_dec(x_1); -x_155 = !lean_is_exclusive(x_98); -if (x_155 == 0) +x_156 = !lean_is_exclusive(x_99); +if (x_156 == 0) { -return x_98; +return x_99; } else { -lean_object* x_156; lean_object* x_157; lean_object* x_158; -x_156 = lean_ctor_get(x_98, 0); -x_157 = lean_ctor_get(x_98, 1); +lean_object* x_157; lean_object* x_158; lean_object* x_159; +x_157 = lean_ctor_get(x_99, 0); +x_158 = lean_ctor_get(x_99, 1); +lean_inc(x_158); lean_inc(x_157); -lean_inc(x_156); -lean_dec(x_98); -x_158 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_158, 0, x_156); -lean_ctor_set(x_158, 1, x_157); -return x_158; +lean_dec(x_99); +x_159 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_159, 0, x_157); +lean_ctor_set(x_159, 1, x_158); +return x_159; } } } else { -lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; -x_159 = lean_ctor_get(x_5, 0); -x_160 = lean_ctor_get(x_5, 1); -x_161 = lean_ctor_get(x_5, 2); -x_162 = lean_ctor_get(x_5, 3); +lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; +x_160 = lean_ctor_get(x_5, 0); +x_161 = lean_ctor_get(x_5, 1); +x_162 = lean_ctor_get(x_5, 2); +x_163 = lean_ctor_get(x_5, 3); +lean_inc(x_163); lean_inc(x_162); lean_inc(x_161); lean_inc(x_160); -lean_inc(x_159); lean_dec(x_5); lean_inc(x_91); -lean_inc(x_161); +lean_inc(x_162); lean_inc(x_1); -x_163 = l_Lean_Parser_mkParserOfConstant(x_1, x_161, x_91); -x_164 = l_IO_ofExcept___at___private_Lean_Parser_Extension_10__ParserExtension_addImported___spec__2(x_163, x_6); -lean_dec(x_163); -if (lean_obj_tag(x_164) == 0) -{ -lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; uint8_t x_169; lean_object* x_170; lean_object* x_171; -x_165 = lean_ctor_get(x_164, 0); -lean_inc(x_165); -x_166 = lean_ctor_get(x_164, 1); -lean_inc(x_166); +x_164 = l_Lean_Parser_mkParserOfConstant(x_1, x_162, x_91); +x_165 = l_IO_ofExcept___at___private_Lean_Parser_Extension_10__ParserExtension_addImported___spec__2(x_164, x_6); lean_dec(x_164); -x_167 = lean_ctor_get(x_165, 0); +if (lean_obj_tag(x_165) == 0) +{ +lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; uint8_t x_170; lean_object* x_171; lean_object* x_172; +x_166 = lean_ctor_get(x_165, 0); +lean_inc(x_166); +x_167 = lean_ctor_get(x_165, 1); lean_inc(x_167); -x_168 = lean_ctor_get(x_165, 1); -lean_inc(x_168); lean_dec(x_165); -x_169 = lean_unbox(x_167); -lean_dec(x_167); +x_168 = lean_ctor_get(x_166, 0); +lean_inc(x_168); +x_169 = lean_ctor_get(x_166, 1); +lean_inc(x_169); +lean_dec(x_166); +x_170 = lean_unbox(x_168); +lean_dec(x_168); lean_inc(x_90); -x_170 = l_Lean_Parser_addParser(x_161, x_90, x_91, x_169, x_168); -x_171 = l_IO_ofExcept___at___private_Lean_Parser_Extension_4__addBuiltinParserCategory___spec__1(x_170, x_166); -lean_dec(x_170); -if (lean_obj_tag(x_171) == 0) -{ -lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; uint8_t x_181; lean_object* x_182; lean_object* x_183; -x_172 = lean_ctor_get(x_171, 0); -lean_inc(x_172); -x_173 = lean_ctor_get(x_171, 1); -lean_inc(x_173); +x_171 = l_Lean_Parser_addParser(x_162, x_90, x_91, x_170, x_169, x_92); +x_172 = l_IO_ofExcept___at___private_Lean_Parser_Extension_4__addBuiltinParserCategory___spec__1(x_171, x_167); lean_dec(x_171); -x_174 = l_Lean_Unhygienic_run___rarg___closed__1; -x_175 = l_Lean_NameGenerator_Inhabited___closed__3; -x_176 = l_Lean_TraceState_Inhabited___closed__1; -lean_inc(x_1); -x_177 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_177, 0, x_1); -lean_ctor_set(x_177, 1, x_174); -lean_ctor_set(x_177, 2, x_175); -lean_ctor_set(x_177, 3, x_176); -x_178 = lean_st_mk_ref(x_177, x_173); -x_179 = lean_ctor_get(x_178, 0); -lean_inc(x_179); -x_180 = lean_ctor_get(x_178, 1); -lean_inc(x_180); -lean_dec(x_178); -x_181 = 0; -x_182 = l_Lean_Environment_addAttribute___closed__1; -lean_inc(x_179); -x_183 = l_Lean_Parser_runParserAttributeHooks(x_90, x_91, x_181, x_182, x_179, x_180); -if (lean_obj_tag(x_183) == 0) +if (lean_obj_tag(x_172) == 0) { -lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; -x_184 = lean_ctor_get(x_183, 1); -lean_inc(x_184); -lean_dec(x_183); -x_185 = lean_st_ref_get(x_179, x_184); +lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; uint8_t x_182; lean_object* x_183; lean_object* x_184; +x_173 = lean_ctor_get(x_172, 0); +lean_inc(x_173); +x_174 = lean_ctor_get(x_172, 1); +lean_inc(x_174); +lean_dec(x_172); +x_175 = l_Lean_Unhygienic_run___rarg___closed__1; +x_176 = l_Lean_NameGenerator_Inhabited___closed__3; +x_177 = l_Lean_TraceState_Inhabited___closed__1; +lean_inc(x_1); +x_178 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_178, 0, x_1); +lean_ctor_set(x_178, 1, x_175); +lean_ctor_set(x_178, 2, x_176); +lean_ctor_set(x_178, 3, x_177); +x_179 = lean_st_mk_ref(x_178, x_174); +x_180 = lean_ctor_get(x_179, 0); +lean_inc(x_180); +x_181 = lean_ctor_get(x_179, 1); +lean_inc(x_181); lean_dec(x_179); -x_186 = lean_ctor_get(x_185, 1); -lean_inc(x_186); -lean_dec(x_185); -x_187 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_187, 0, x_159); -lean_ctor_set(x_187, 1, x_160); -lean_ctor_set(x_187, 2, x_172); -lean_ctor_set(x_187, 3, x_162); +x_182 = 0; +x_183 = l_Lean_Environment_addAttribute___closed__1; +lean_inc(x_180); +x_184 = l_Lean_Parser_runParserAttributeHooks(x_90, x_91, x_182, x_183, x_180, x_181); +if (lean_obj_tag(x_184) == 0) +{ +lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; +x_185 = lean_ctor_get(x_184, 1); +lean_inc(x_185); +lean_dec(x_184); +x_186 = lean_st_ref_get(x_180, x_185); +lean_dec(x_180); +x_187 = lean_ctor_get(x_186, 1); +lean_inc(x_187); +lean_dec(x_186); +x_188 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_188, 0, x_160); +lean_ctor_set(x_188, 1, x_161); +lean_ctor_set(x_188, 2, x_173); +lean_ctor_set(x_188, 3, x_163); x_4 = x_12; -x_5 = x_187; -x_6 = x_186; +x_5 = x_188; +x_6 = x_187; goto _start; } else { -lean_object* x_189; -lean_dec(x_179); -lean_dec(x_172); -lean_dec(x_162); +lean_object* x_190; +lean_dec(x_180); +lean_dec(x_173); +lean_dec(x_163); +lean_dec(x_161); lean_dec(x_160); -lean_dec(x_159); lean_dec(x_12); lean_dec(x_1); -x_189 = lean_ctor_get(x_183, 0); -lean_inc(x_189); -if (lean_obj_tag(x_189) == 0) -{ -lean_object* x_190; lean_object* x_191; lean_object* x_192; -x_190 = lean_ctor_get(x_183, 1); +x_190 = lean_ctor_get(x_184, 0); lean_inc(x_190); -lean_dec(x_183); -x_191 = lean_ctor_get(x_189, 1); +if (lean_obj_tag(x_190) == 0) +{ +lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_191 = lean_ctor_get(x_184, 1); lean_inc(x_191); -lean_dec(x_189); -x_192 = l_Lean_MessageData_toString(x_191, x_190); -if (lean_obj_tag(x_192) == 0) +lean_dec(x_184); +x_192 = lean_ctor_get(x_190, 1); +lean_inc(x_192); +lean_dec(x_190); +x_193 = l_Lean_MessageData_toString(x_192, x_191); +if (lean_obj_tag(x_193) == 0) { -lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; -x_193 = lean_ctor_get(x_192, 0); -lean_inc(x_193); -x_194 = lean_ctor_get(x_192, 1); +lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; +x_194 = lean_ctor_get(x_193, 0); lean_inc(x_194); -if (lean_is_exclusive(x_192)) { - lean_ctor_release(x_192, 0); - lean_ctor_release(x_192, 1); - x_195 = x_192; +x_195 = lean_ctor_get(x_193, 1); +lean_inc(x_195); +if (lean_is_exclusive(x_193)) { + lean_ctor_release(x_193, 0); + lean_ctor_release(x_193, 1); + x_196 = x_193; } else { - lean_dec_ref(x_192); - x_195 = lean_box(0); + lean_dec_ref(x_193); + x_196 = lean_box(0); } -x_196 = lean_alloc_ctor(18, 1, 0); -lean_ctor_set(x_196, 0, x_193); -if (lean_is_scalar(x_195)) { - x_197 = lean_alloc_ctor(1, 2, 0); +x_197 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_197, 0, x_194); +if (lean_is_scalar(x_196)) { + x_198 = lean_alloc_ctor(1, 2, 0); } else { - x_197 = x_195; - lean_ctor_set_tag(x_197, 1); + x_198 = x_196; + lean_ctor_set_tag(x_198, 1); } -lean_ctor_set(x_197, 0, x_196); -lean_ctor_set(x_197, 1, x_194); -return x_197; +lean_ctor_set(x_198, 0, x_197); +lean_ctor_set(x_198, 1, x_195); +return x_198; } else { -lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; -x_198 = lean_ctor_get(x_192, 0); -lean_inc(x_198); -x_199 = lean_ctor_get(x_192, 1); +lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; +x_199 = lean_ctor_get(x_193, 0); lean_inc(x_199); -if (lean_is_exclusive(x_192)) { - lean_ctor_release(x_192, 0); - lean_ctor_release(x_192, 1); - x_200 = x_192; +x_200 = lean_ctor_get(x_193, 1); +lean_inc(x_200); +if (lean_is_exclusive(x_193)) { + lean_ctor_release(x_193, 0); + lean_ctor_release(x_193, 1); + x_201 = x_193; } else { - lean_dec_ref(x_192); - x_200 = lean_box(0); + lean_dec_ref(x_193); + x_201 = lean_box(0); } -if (lean_is_scalar(x_200)) { - x_201 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_201)) { + x_202 = lean_alloc_ctor(1, 2, 0); } else { - x_201 = x_200; + x_202 = x_201; } -lean_ctor_set(x_201, 0, x_198); -lean_ctor_set(x_201, 1, x_199); -return x_201; +lean_ctor_set(x_202, 0, x_199); +lean_ctor_set(x_202, 1, x_200); +return x_202; } } else { -lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; -x_202 = lean_ctor_get(x_183, 1); -lean_inc(x_202); -if (lean_is_exclusive(x_183)) { - lean_ctor_release(x_183, 0); - lean_ctor_release(x_183, 1); - x_203 = x_183; +lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; +x_203 = lean_ctor_get(x_184, 1); +lean_inc(x_203); +if (lean_is_exclusive(x_184)) { + lean_ctor_release(x_184, 0); + lean_ctor_release(x_184, 1); + x_204 = x_184; } else { - lean_dec_ref(x_183); - x_203 = lean_box(0); -} -x_204 = lean_ctor_get(x_189, 0); -lean_inc(x_204); -lean_dec(x_189); -x_205 = l_Nat_repr(x_204); -x_206 = l_Lean_InternalExceptionId_toString___closed__1; -x_207 = lean_string_append(x_206, x_205); -lean_dec(x_205); -x_208 = lean_alloc_ctor(18, 1, 0); -lean_ctor_set(x_208, 0, x_207); -if (lean_is_scalar(x_203)) { - x_209 = lean_alloc_ctor(1, 2, 0); -} else { - x_209 = x_203; + lean_dec_ref(x_184); + x_204 = lean_box(0); } +x_205 = lean_ctor_get(x_190, 0); +lean_inc(x_205); +lean_dec(x_190); +x_206 = l_Nat_repr(x_205); +x_207 = l_Lean_InternalExceptionId_toString___closed__1; +x_208 = lean_string_append(x_207, x_206); +lean_dec(x_206); +x_209 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_209, 0, x_208); -lean_ctor_set(x_209, 1, x_202); -return x_209; +if (lean_is_scalar(x_204)) { + x_210 = lean_alloc_ctor(1, 2, 0); +} else { + x_210 = x_204; +} +lean_ctor_set(x_210, 0, x_209); +lean_ctor_set(x_210, 1, x_203); +return x_210; } } } else { -lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; -lean_dec(x_162); +lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; +lean_dec(x_163); +lean_dec(x_161); lean_dec(x_160); -lean_dec(x_159); lean_dec(x_91); lean_dec(x_90); lean_dec(x_12); lean_dec(x_1); -x_210 = lean_ctor_get(x_171, 0); -lean_inc(x_210); -x_211 = lean_ctor_get(x_171, 1); +x_211 = lean_ctor_get(x_172, 0); lean_inc(x_211); -if (lean_is_exclusive(x_171)) { - lean_ctor_release(x_171, 0); - lean_ctor_release(x_171, 1); - x_212 = x_171; +x_212 = lean_ctor_get(x_172, 1); +lean_inc(x_212); +if (lean_is_exclusive(x_172)) { + lean_ctor_release(x_172, 0); + lean_ctor_release(x_172, 1); + x_213 = x_172; } else { - lean_dec_ref(x_171); - x_212 = lean_box(0); + lean_dec_ref(x_172); + x_213 = lean_box(0); } -if (lean_is_scalar(x_212)) { - x_213 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_213)) { + x_214 = lean_alloc_ctor(1, 2, 0); } else { - x_213 = x_212; + x_214 = x_213; } -lean_ctor_set(x_213, 0, x_210); -lean_ctor_set(x_213, 1, x_211); -return x_213; +lean_ctor_set(x_214, 0, x_211); +lean_ctor_set(x_214, 1, x_212); +return x_214; } } else { -lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; +lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; +lean_dec(x_163); lean_dec(x_162); lean_dec(x_161); lean_dec(x_160); -lean_dec(x_159); +lean_dec(x_92); lean_dec(x_91); lean_dec(x_90); lean_dec(x_12); lean_dec(x_1); -x_214 = lean_ctor_get(x_164, 0); -lean_inc(x_214); -x_215 = lean_ctor_get(x_164, 1); +x_215 = lean_ctor_get(x_165, 0); lean_inc(x_215); -if (lean_is_exclusive(x_164)) { - lean_ctor_release(x_164, 0); - lean_ctor_release(x_164, 1); - x_216 = x_164; +x_216 = lean_ctor_get(x_165, 1); +lean_inc(x_216); +if (lean_is_exclusive(x_165)) { + lean_ctor_release(x_165, 0); + lean_ctor_release(x_165, 1); + x_217 = x_165; } else { - lean_dec_ref(x_164); - x_216 = lean_box(0); + lean_dec_ref(x_165); + x_217 = lean_box(0); } -if (lean_is_scalar(x_216)) { - x_217 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_217)) { + x_218 = lean_alloc_ctor(1, 2, 0); } else { - x_217 = x_216; + x_218 = x_217; } -lean_ctor_set(x_217, 0, x_214); -lean_ctor_set(x_217, 1, x_215); -return x_217; +lean_ctor_set(x_218, 0, x_215); +lean_ctor_set(x_218, 1, x_216); +return x_218; } } } @@ -7979,90 +8057,83 @@ return x_3; lean_object* _init_l_Lean_Parser_declareBuiltinParser___closed__3() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = lean_unsigned_to_nat(3u); -x_2 = lean_mk_empty_array_with_capacity(x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Parser_declareBuiltinParser___closed__4() { -_start: -{ lean_object* x_1; x_1 = lean_mk_string("failed to emit registration code for builtin parser '"); return x_1; } } -lean_object* l_Lean_Parser_declareBuiltinParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Parser_declareBuiltinParser(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_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; uint8_t x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_6 = l_Lean_Parser_declareBuiltinParser___closed__2; +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; uint8_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_7 = l_Lean_Parser_declareBuiltinParser___closed__2; lean_inc(x_4); -x_7 = l_Lean_Name_append___main(x_6, x_4); -x_8 = lean_box(0); -x_9 = l_Lean_mkConst(x_2, x_8); -x_10 = l_Lean_Name_toExprAux___main(x_3); +x_8 = l_Lean_Name_append___main(x_7, x_4); +x_9 = lean_box(0); +x_10 = l_Lean_mkConst(x_2, x_9); +x_11 = l_Lean_Name_toExprAux___main(x_3); lean_inc(x_4); -x_11 = l_Lean_Name_toExprAux___main(x_4); +x_12 = l_Lean_Name_toExprAux___main(x_4); lean_inc(x_4); -x_12 = l_Lean_mkConst(x_4, x_8); -x_13 = l_Lean_Parser_declareBuiltinParser___closed__3; -x_14 = lean_array_push(x_13, x_10); -x_15 = lean_array_push(x_14, x_11); -x_16 = lean_array_push(x_15, x_12); -x_17 = lean_unsigned_to_nat(0u); -x_18 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_16, x_16, x_17, x_9); -lean_dec(x_16); -x_19 = l_Lean_KeyedDeclsAttribute_declareBuiltin___rarg___closed__6; -lean_inc(x_7); -x_20 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_20, 0, x_7); -lean_ctor_set(x_20, 1, x_8); -lean_ctor_set(x_20, 2, x_19); -x_21 = lean_box(0); -x_22 = 0; -x_23 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_23, 0, x_20); -lean_ctor_set(x_23, 1, x_18); -lean_ctor_set(x_23, 2, x_21); -lean_ctor_set_uint8(x_23, sizeof(void*)*3, x_22); -x_24 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_24, 0, x_23); -x_25 = l_Lean_Environment_addAndCompile(x_1, x_8, x_24); -lean_dec(x_24); -if (lean_obj_tag(x_25) == 0) -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -lean_dec(x_25); -lean_dec(x_7); -x_26 = l_System_FilePath_dirName___closed__1; -x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_4); -x_28 = l_Lean_Parser_declareBuiltinParser___closed__4; -x_29 = lean_string_append(x_28, x_27); +x_13 = l_Lean_mkConst(x_4, x_9); +x_14 = l_Lean_mkNatLit(x_5); +x_15 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; +x_16 = lean_array_push(x_15, x_11); +x_17 = lean_array_push(x_16, x_12); +x_18 = lean_array_push(x_17, x_13); +x_19 = lean_array_push(x_18, x_14); +x_20 = lean_unsigned_to_nat(0u); +x_21 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_19, x_19, x_20, x_10); +lean_dec(x_19); +x_22 = l_Lean_KeyedDeclsAttribute_declareBuiltin___rarg___closed__6; +lean_inc(x_8); +x_23 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_23, 0, x_8); +lean_ctor_set(x_23, 1, x_9); +lean_ctor_set(x_23, 2, x_22); +x_24 = lean_box(0); +x_25 = 0; +x_26 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_26, 0, x_23); +lean_ctor_set(x_26, 1, x_21); +lean_ctor_set(x_26, 2, x_24); +lean_ctor_set_uint8(x_26, sizeof(void*)*3, x_25); +x_27 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_27, 0, x_26); +x_28 = l_Lean_Environment_addAndCompile(x_1, x_9, x_27); lean_dec(x_27); -x_30 = l_Char_HasRepr___closed__1; -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); -x_33 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_5); -return x_33; +if (lean_obj_tag(x_28) == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_28); +lean_dec(x_8); +x_29 = l_System_FilePath_dirName___closed__1; +x_30 = l_Lean_Name_toStringWithSep___main(x_29, x_4); +x_31 = l_Lean_Parser_declareBuiltinParser___closed__3; +x_32 = lean_string_append(x_31, x_30); +lean_dec(x_30); +x_33 = l_Char_HasRepr___closed__1; +x_34 = lean_string_append(x_32, x_33); +x_35 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_35, 0, x_34); +x_36 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_36, 0, x_35); +lean_ctor_set(x_36, 1, x_6); +return x_36; } else { -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_dec(x_4); -x_34 = lean_ctor_get(x_25, 0); -lean_inc(x_34); -lean_dec(x_25); -x_35 = l_Lean_initAttr; -x_36 = lean_box(0); -x_37 = l_Lean_ParametricAttribute_setParam___rarg(x_35, x_34, x_7, x_36); -x_38 = l_IO_ofExcept___at_Lean_KeyedDeclsAttribute_declareBuiltin___spec__1(x_37, x_5); -lean_dec(x_37); -return x_38; +x_37 = lean_ctor_get(x_28, 0); +lean_inc(x_37); +lean_dec(x_28); +x_38 = l_Lean_initAttr; +x_39 = lean_box(0); +x_40 = l_Lean_ParametricAttribute_setParam___rarg(x_38, x_37, x_8, x_39); +x_41 = l_IO_ofExcept___at_Lean_KeyedDeclsAttribute_declareBuiltin___spec__1(x_40, x_6); +lean_dec(x_40); +return x_41; } } } @@ -8070,7 +8141,7 @@ lean_object* _init_l_Lean_Parser_declareLeadingBuiltinParser___closed__1() { _start: { lean_object* x_1; -x_1 = lean_mk_string("addBuiltinLeadingParser"); +x_1 = lean_mk_string("addBuiltinLeadingParserNew"); return x_1; } } @@ -8084,20 +8155,20 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* l_Lean_Parser_declareLeadingBuiltinParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Parser_declareLeadingBuiltinParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_5; lean_object* x_6; -x_5 = l_Lean_Parser_declareLeadingBuiltinParser___closed__2; -x_6 = l_Lean_Parser_declareBuiltinParser(x_1, x_5, x_2, x_3, x_4); -return x_6; +lean_object* x_6; lean_object* x_7; +x_6 = l_Lean_Parser_declareLeadingBuiltinParser___closed__2; +x_7 = l_Lean_Parser_declareBuiltinParser(x_1, x_6, x_2, x_3, x_4, x_5); +return x_7; } } lean_object* _init_l_Lean_Parser_declareTrailingBuiltinParser___closed__1() { _start: { lean_object* x_1; -x_1 = lean_mk_string("addBuiltinTrailingParser"); +x_1 = lean_mk_string("addBuiltinTrailingParserNew"); return x_1; } } @@ -8111,13 +8182,148 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* l_Lean_Parser_declareTrailingBuiltinParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Parser_declareTrailingBuiltinParser(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_5; lean_object* x_6; -x_5 = l_Lean_Parser_declareTrailingBuiltinParser___closed__2; -x_6 = l_Lean_Parser_declareBuiltinParser(x_1, x_5, x_2, x_3, x_4); -return x_6; +lean_object* x_6; lean_object* x_7; +x_6 = l_Lean_Parser_declareTrailingBuiltinParser___closed__2; +x_7 = l_Lean_Parser_declareBuiltinParser(x_1, x_6, x_2, x_3, x_4, x_5); +return x_7; +} +} +lean_object* _init_l_Lean_Parser_getParserPriority___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("invalid parser attribute, no argument or numeral expected"); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_getParserPriority___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_getParserPriority___closed__1; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_getParserPriority___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("invalid parser attribute, numeral expected"); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_getParserPriority___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_getParserPriority___closed__3; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_getParserPriority___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(0u); +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_Parser_getParserPriority(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; uint8_t x_4; +x_2 = l_Lean_Syntax_getNumArgs(x_1); +x_3 = lean_unsigned_to_nat(0u); +x_4 = lean_nat_dec_eq(x_2, x_3); +if (x_4 == 0) +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_unsigned_to_nat(1u); +x_6 = lean_nat_dec_eq(x_2, x_5); +lean_dec(x_2); +if (x_6 == 0) +{ +lean_object* x_7; +x_7 = l_Lean_Parser_getParserPriority___closed__2; +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = l_Lean_Syntax_getArg(x_1, x_3); +x_9 = l_Lean_numLitKind; +x_10 = l_Lean_Syntax_isNatLitAux(x_9, x_8); +lean_dec(x_8); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; +x_11 = l_Lean_Parser_getParserPriority___closed__4; +return x_11; +} +else +{ +lean_object* x_12; lean_object* x_13; +x_12 = lean_ctor_get(x_10, 0); +lean_inc(x_12); +lean_dec(x_10); +x_13 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_13, 0, x_12); +return x_13; +} +} +} +else +{ +lean_object* x_14; +lean_dec(x_2); +x_14 = l_Lean_Parser_getParserPriority___closed__5; +return x_14; +} +} +} +lean_object* l_Lean_Parser_getParserPriority___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Parser_getParserPriority(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_ofExcept___at___private_Lean_Parser_Extension_11__BuiltinParserAttribute_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_1) == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +x_6 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_6, 0, x_5); +x_7 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_7, 0, x_6); +x_8 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_7, x_2, x_3, x_4); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_1, 0); +lean_inc(x_9); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_4); +return x_10; +} } } lean_object* _init_l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__1() { @@ -8171,338 +8377,312 @@ return x_2; lean_object* l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_9; uint8_t x_99; -x_99 = l_Lean_Syntax_hasArgs(x_4); -if (x_99 == 0) -{ -if (x_5 == 0) -{ -lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; uint8_t x_106; -lean_dec(x_3); -lean_dec(x_2); -x_100 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_100, 0, x_1); -x_101 = l_Lean_registerTagAttribute___lambda__4___closed__3; -x_102 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_102, 0, x_101); -lean_ctor_set(x_102, 1, x_100); -x_103 = l_Lean_registerTagAttribute___lambda__4___closed__9; -x_104 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_104, 0, x_102); -lean_ctor_set(x_104, 1, x_103); -x_105 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_104, x_6, x_7, x_8); -lean_dec(x_7); -lean_dec(x_6); -x_106 = !lean_is_exclusive(x_105); -if (x_106 == 0) -{ -return x_105; -} -else -{ -lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_107 = lean_ctor_get(x_105, 0); -x_108 = lean_ctor_get(x_105, 1); -lean_inc(x_108); -lean_inc(x_107); -lean_dec(x_105); -x_109 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_109, 0, x_107); -lean_ctor_set(x_109, 1, x_108); -return x_109; -} -} -else -{ -lean_dec(x_1); -x_9 = x_8; -goto block_98; -} -} -else -{ -lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; uint8_t x_116; -lean_dec(x_3); -lean_dec(x_2); -x_110 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_110, 0, x_1); -x_111 = l_Lean_registerTagAttribute___lambda__4___closed__3; -x_112 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_112, 0, x_111); -lean_ctor_set(x_112, 1, x_110); -x_113 = l_Lean_registerTagAttribute___lambda__4___closed__12; -x_114 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_114, 0, x_112); -lean_ctor_set(x_114, 1, x_113); -x_115 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_114, x_6, x_7, x_8); -lean_dec(x_7); -lean_dec(x_6); -x_116 = !lean_is_exclusive(x_115); -if (x_116 == 0) -{ -return x_115; -} -else -{ -lean_object* x_117; lean_object* x_118; lean_object* x_119; -x_117 = lean_ctor_get(x_115, 0); -x_118 = lean_ctor_get(x_115, 1); -lean_inc(x_118); -lean_inc(x_117); -lean_dec(x_115); -x_119 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_119, 0, x_117); -lean_ctor_set(x_119, 1, x_118); -return x_119; -} -} -block_98: -{ -lean_object* x_10; -lean_inc(x_3); -x_10 = l_Lean_getConstInfo___at_Lean_mkInitAttr___spec__1(x_3, x_6, x_7, x_9); +lean_object* x_9; lean_object* x_10; +x_9 = l_Lean_Parser_getParserPriority(x_4); +x_10 = l_Lean_ofExcept___at___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___spec__1(x_9, x_6, x_7, x_8); +lean_dec(x_9); if (lean_obj_tag(x_10) == 0) { -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_29; +lean_object* x_11; lean_object* x_12; lean_object* x_13; x_11 = lean_ctor_get(x_10, 0); lean_inc(x_11); x_12 = lean_ctor_get(x_10, 1); lean_inc(x_12); lean_dec(x_10); -x_13 = lean_st_ref_get(x_7, x_12); -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); +if (x_5 == 0) +{ +lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; uint8_t x_109; +lean_dec(x_11); +lean_dec(x_3); +lean_dec(x_2); +x_103 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_103, 0, x_1); +x_104 = l_Lean_registerTagAttribute___lambda__4___closed__3; +x_105 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_105, 0, x_104); +lean_ctor_set(x_105, 1, x_103); +x_106 = l_Lean_registerTagAttribute___lambda__4___closed__9; +x_107 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_107, 0, x_105); +lean_ctor_set(x_107, 1, x_106); +x_108 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_107, x_6, x_7, x_12); +lean_dec(x_7); +lean_dec(x_6); +x_109 = !lean_is_exclusive(x_108); +if (x_109 == 0) +{ +return x_108; +} +else +{ +lean_object* x_110; lean_object* x_111; lean_object* x_112; +x_110 = lean_ctor_get(x_108, 0); +x_111 = lean_ctor_get(x_108, 1); +lean_inc(x_111); +lean_inc(x_110); +lean_dec(x_108); +x_112 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_112, 0, x_110); +lean_ctor_set(x_112, 1, x_111); +return x_112; +} +} +else +{ +lean_dec(x_1); +x_13 = x_12; +goto block_102; +} +block_102: +{ +lean_object* x_14; +lean_inc(x_3); +x_14 = l_Lean_getConstInfo___at_Lean_mkInitAttr___spec__1(x_3, x_6, x_7, x_13); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_33; +x_15 = lean_ctor_get(x_14, 0); lean_inc(x_15); -lean_dec(x_13); -x_16 = lean_ctor_get(x_14, 0); +x_16 = lean_ctor_get(x_14, 1); lean_inc(x_16); lean_dec(x_14); -x_29 = l_Lean_ConstantInfo_type(x_11); -lean_dec(x_11); -if (lean_obj_tag(x_29) == 4) +x_17 = lean_st_ref_get(x_7, x_16); +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); +lean_inc(x_19); +lean_dec(x_17); +x_20 = lean_ctor_get(x_18, 0); +lean_inc(x_20); +lean_dec(x_18); +x_33 = l_Lean_ConstantInfo_type(x_15); +lean_dec(x_15); +if (lean_obj_tag(x_33) == 4) { -lean_object* x_30; -x_30 = lean_ctor_get(x_29, 0); -lean_inc(x_30); -lean_dec(x_29); -if (lean_obj_tag(x_30) == 1) -{ -lean_object* x_31; -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -if (lean_obj_tag(x_31) == 1) -{ -lean_object* x_32; -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -if (lean_obj_tag(x_32) == 1) -{ -lean_object* x_33; -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -if (lean_obj_tag(x_33) == 0) -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; -x_34 = lean_ctor_get(x_30, 1); +lean_object* x_34; +x_34 = lean_ctor_get(x_33, 0); lean_inc(x_34); -lean_dec(x_30); -x_35 = lean_ctor_get(x_31, 1); +lean_dec(x_33); +if (lean_obj_tag(x_34) == 1) +{ +lean_object* x_35; +x_35 = lean_ctor_get(x_34, 0); lean_inc(x_35); -lean_dec(x_31); -x_36 = lean_ctor_get(x_32, 1); +if (lean_obj_tag(x_35) == 1) +{ +lean_object* x_36; +x_36 = lean_ctor_get(x_35, 0); lean_inc(x_36); -lean_dec(x_32); -x_37 = l_Lean_mkAppStx___closed__1; -x_38 = lean_string_dec_eq(x_36, x_37); +if (lean_obj_tag(x_36) == 1) +{ +lean_object* x_37; +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +if (lean_obj_tag(x_37) == 0) +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; +x_38 = lean_ctor_get(x_34, 1); +lean_inc(x_38); +lean_dec(x_34); +x_39 = lean_ctor_get(x_35, 1); +lean_inc(x_39); +lean_dec(x_35); +x_40 = lean_ctor_get(x_36, 1); +lean_inc(x_40); lean_dec(x_36); -if (x_38 == 0) +x_41 = l_Lean_mkAppStx___closed__1; +x_42 = lean_string_dec_eq(x_40, x_41); +lean_dec(x_40); +if (x_42 == 0) { -lean_object* x_39; -lean_dec(x_35); -lean_dec(x_34); -lean_dec(x_16); +lean_object* x_43; +lean_dec(x_39); +lean_dec(x_38); +lean_dec(x_20); +lean_dec(x_11); lean_dec(x_2); -x_39 = lean_box(0); -x_17 = x_39; -goto block_28; +x_43 = lean_box(0); +x_21 = x_43; +goto block_32; } else { -lean_object* x_40; uint8_t x_41; -x_40 = l_Lean_mkAppStx___closed__3; -x_41 = lean_string_dec_eq(x_35, x_40); -lean_dec(x_35); -if (x_41 == 0) -{ -lean_object* x_42; -lean_dec(x_34); -lean_dec(x_16); -lean_dec(x_2); -x_42 = lean_box(0); -x_17 = x_42; -goto block_28; -} -else -{ -lean_object* x_43; uint8_t x_44; -x_43 = l_Lean_Parser_mkParserOfConstantUnsafe___closed__5; -x_44 = lean_string_dec_eq(x_34, x_43); -if (x_44 == 0) -{ -uint8_t x_45; -x_45 = lean_string_dec_eq(x_34, x_40); -lean_dec(x_34); +lean_object* x_44; uint8_t x_45; +x_44 = l_Lean_mkAppStx___closed__3; +x_45 = lean_string_dec_eq(x_39, x_44); +lean_dec(x_39); if (x_45 == 0) { lean_object* x_46; -lean_dec(x_16); +lean_dec(x_38); +lean_dec(x_20); +lean_dec(x_11); lean_dec(x_2); x_46 = lean_box(0); -x_17 = x_46; -goto block_28; +x_21 = x_46; +goto block_32; } else { -lean_object* x_47; lean_object* x_48; -x_47 = lean_ctor_get(x_6, 3); -lean_inc(x_47); +lean_object* x_47; uint8_t x_48; +x_47 = l_Lean_Parser_mkParserOfConstantUnsafe___closed__5; +x_48 = lean_string_dec_eq(x_38, x_47); +if (x_48 == 0) +{ +uint8_t x_49; +x_49 = lean_string_dec_eq(x_38, x_44); +lean_dec(x_38); +if (x_49 == 0) +{ +lean_object* x_50; +lean_dec(x_20); +lean_dec(x_11); +lean_dec(x_2); +x_50 = lean_box(0); +x_21 = x_50; +goto block_32; +} +else +{ +lean_object* x_51; lean_object* x_52; +x_51 = lean_ctor_get(x_6, 3); +lean_inc(x_51); lean_inc(x_3); lean_inc(x_2); -x_48 = l_Lean_Parser_declareLeadingBuiltinParser(x_16, x_2, x_3, x_15); -if (lean_obj_tag(x_48) == 0) +x_52 = l_Lean_Parser_declareLeadingBuiltinParser(x_20, x_2, x_3, x_11, x_19); +if (lean_obj_tag(x_52) == 0) { -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; lean_object* x_54; -lean_dec(x_47); -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_48, 1); -lean_inc(x_50); -lean_dec(x_48); -x_51 = l_Lean_setEnv___at_Lean_registerTagAttribute___spec__5(x_49, x_6, x_7, x_50); -x_52 = lean_ctor_get(x_51, 1); -lean_inc(x_52); +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; lean_object* x_58; lean_dec(x_51); -x_53 = 1; -x_54 = l_Lean_Parser_runParserAttributeHooks(x_2, x_3, x_53, x_6, x_7, x_52); -return x_54; +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +lean_dec(x_52); +x_55 = l_Lean_setEnv___at_Lean_registerTagAttribute___spec__5(x_53, x_6, x_7, x_54); +x_56 = lean_ctor_get(x_55, 1); +lean_inc(x_56); +lean_dec(x_55); +x_57 = 1; +x_58 = l_Lean_Parser_runParserAttributeHooks(x_2, x_3, x_57, x_6, x_7, x_56); +return x_58; } else { -uint8_t x_55; +uint8_t x_59; lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_55 = !lean_is_exclusive(x_48); -if (x_55 == 0) +x_59 = !lean_is_exclusive(x_52); +if (x_59 == 0) { -lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_56 = lean_ctor_get(x_48, 0); -x_57 = lean_io_error_to_string(x_56); -x_58 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_58, 0, x_57); -x_59 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_59, 0, x_58); -x_60 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_60, 0, x_47); -lean_ctor_set(x_60, 1, x_59); -lean_ctor_set(x_48, 0, x_60); -return x_48; +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_60 = lean_ctor_get(x_52, 0); +x_61 = lean_io_error_to_string(x_60); +x_62 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_62, 0, x_61); +x_63 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_63, 0, x_62); +x_64 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_64, 0, x_51); +lean_ctor_set(x_64, 1, x_63); +lean_ctor_set(x_52, 0, x_64); +return x_52; } else { -lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; -x_61 = lean_ctor_get(x_48, 0); -x_62 = lean_ctor_get(x_48, 1); -lean_inc(x_62); -lean_inc(x_61); -lean_dec(x_48); -x_63 = lean_io_error_to_string(x_61); -x_64 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_64, 0, x_63); -x_65 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_65, 0, x_64); -x_66 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_66, 0, x_47); -lean_ctor_set(x_66, 1, x_65); -x_67 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_67, 0, x_66); -lean_ctor_set(x_67, 1, x_62); -return x_67; +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; +x_65 = lean_ctor_get(x_52, 0); +x_66 = lean_ctor_get(x_52, 1); +lean_inc(x_66); +lean_inc(x_65); +lean_dec(x_52); +x_67 = lean_io_error_to_string(x_65); +x_68 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_68, 0, x_67); +x_69 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_69, 0, x_68); +x_70 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_70, 0, x_51); +lean_ctor_set(x_70, 1, x_69); +x_71 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_71, 0, x_70); +lean_ctor_set(x_71, 1, x_66); +return x_71; } } } } else { -lean_object* x_68; lean_object* x_69; -lean_dec(x_34); -x_68 = lean_ctor_get(x_6, 3); -lean_inc(x_68); +lean_object* x_72; lean_object* x_73; +lean_dec(x_38); +x_72 = lean_ctor_get(x_6, 3); +lean_inc(x_72); lean_inc(x_3); lean_inc(x_2); -x_69 = l_Lean_Parser_declareTrailingBuiltinParser(x_16, x_2, x_3, x_15); -if (lean_obj_tag(x_69) == 0) +x_73 = l_Lean_Parser_declareTrailingBuiltinParser(x_20, x_2, x_3, x_11, x_19); +if (lean_obj_tag(x_73) == 0) { -lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; uint8_t x_74; lean_object* x_75; -lean_dec(x_68); -x_70 = lean_ctor_get(x_69, 0); -lean_inc(x_70); -x_71 = lean_ctor_get(x_69, 1); -lean_inc(x_71); -lean_dec(x_69); -x_72 = l_Lean_setEnv___at_Lean_registerTagAttribute___spec__5(x_70, x_6, x_7, x_71); -x_73 = lean_ctor_get(x_72, 1); -lean_inc(x_73); +lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; uint8_t x_78; lean_object* x_79; lean_dec(x_72); -x_74 = 1; -x_75 = l_Lean_Parser_runParserAttributeHooks(x_2, x_3, x_74, x_6, x_7, x_73); -return x_75; +x_74 = lean_ctor_get(x_73, 0); +lean_inc(x_74); +x_75 = lean_ctor_get(x_73, 1); +lean_inc(x_75); +lean_dec(x_73); +x_76 = l_Lean_setEnv___at_Lean_registerTagAttribute___spec__5(x_74, x_6, x_7, x_75); +x_77 = lean_ctor_get(x_76, 1); +lean_inc(x_77); +lean_dec(x_76); +x_78 = 1; +x_79 = l_Lean_Parser_runParserAttributeHooks(x_2, x_3, x_78, x_6, x_7, x_77); +return x_79; } else { -uint8_t x_76; +uint8_t x_80; lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_76 = !lean_is_exclusive(x_69); -if (x_76 == 0) +x_80 = !lean_is_exclusive(x_73); +if (x_80 == 0) { -lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_77 = lean_ctor_get(x_69, 0); -x_78 = lean_io_error_to_string(x_77); -x_79 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_79, 0, x_78); -x_80 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_80, 0, x_79); -x_81 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_81, 0, x_68); -lean_ctor_set(x_81, 1, x_80); -lean_ctor_set(x_69, 0, x_81); -return x_69; +lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_81 = lean_ctor_get(x_73, 0); +x_82 = lean_io_error_to_string(x_81); +x_83 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_83, 0, x_82); +x_84 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_84, 0, x_83); +x_85 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_85, 0, x_72); +lean_ctor_set(x_85, 1, x_84); +lean_ctor_set(x_73, 0, x_85); +return x_73; } else { -lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_82 = lean_ctor_get(x_69, 0); -x_83 = lean_ctor_get(x_69, 1); -lean_inc(x_83); -lean_inc(x_82); -lean_dec(x_69); -x_84 = lean_io_error_to_string(x_82); -x_85 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_85, 0, x_84); -x_86 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_86, 0, x_85); -x_87 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_87, 0, x_68); -lean_ctor_set(x_87, 1, x_86); -x_88 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_88, 0, x_87); -lean_ctor_set(x_88, 1, x_83); -return x_88; +lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_86 = lean_ctor_get(x_73, 0); +x_87 = lean_ctor_get(x_73, 1); +lean_inc(x_87); +lean_inc(x_86); +lean_dec(x_73); +x_88 = lean_io_error_to_string(x_86); +x_89 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_89, 0, x_88); +x_90 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_90, 0, x_89); +x_91 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_91, 0, x_72); +lean_ctor_set(x_91, 1, x_90); +x_92 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_92, 0, x_91); +lean_ctor_set(x_92, 1, x_87); +return x_92; } } } @@ -8511,129 +8691,174 @@ return x_88; } else { -lean_object* x_89; -lean_dec(x_33); -lean_dec(x_32); -lean_dec(x_31); -lean_dec(x_30); -lean_dec(x_16); -lean_dec(x_2); -x_89 = lean_box(0); -x_17 = x_89; -goto block_28; -} -} -else -{ -lean_object* x_90; -lean_dec(x_32); -lean_dec(x_31); -lean_dec(x_30); -lean_dec(x_16); -lean_dec(x_2); -x_90 = lean_box(0); -x_17 = x_90; -goto block_28; -} -} -else -{ -lean_object* x_91; -lean_dec(x_31); -lean_dec(x_30); -lean_dec(x_16); -lean_dec(x_2); -x_91 = lean_box(0); -x_17 = x_91; -goto block_28; -} -} -else -{ -lean_object* x_92; -lean_dec(x_30); -lean_dec(x_16); -lean_dec(x_2); -x_92 = lean_box(0); -x_17 = x_92; -goto block_28; -} -} -else -{ lean_object* x_93; -lean_dec(x_29); -lean_dec(x_16); +lean_dec(x_37); +lean_dec(x_36); +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_20); +lean_dec(x_11); lean_dec(x_2); x_93 = lean_box(0); -x_17 = x_93; -goto block_28; +x_21 = x_93; +goto block_32; } -block_28: +} +else { -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; -lean_dec(x_17); -x_18 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_18, 0, x_3); -x_19 = l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__2; -x_20 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -x_21 = l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__5; -x_22 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_22, 0, x_20); -lean_ctor_set(x_22, 1, x_21); -x_23 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_22, x_6, x_7, x_15); +lean_object* x_94; +lean_dec(x_36); +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_20); +lean_dec(x_11); +lean_dec(x_2); +x_94 = lean_box(0); +x_21 = x_94; +goto block_32; +} +} +else +{ +lean_object* x_95; +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_20); +lean_dec(x_11); +lean_dec(x_2); +x_95 = lean_box(0); +x_21 = x_95; +goto block_32; +} +} +else +{ +lean_object* x_96; +lean_dec(x_34); +lean_dec(x_20); +lean_dec(x_11); +lean_dec(x_2); +x_96 = lean_box(0); +x_21 = x_96; +goto block_32; +} +} +else +{ +lean_object* x_97; +lean_dec(x_33); +lean_dec(x_20); +lean_dec(x_11); +lean_dec(x_2); +x_97 = lean_box(0); +x_21 = x_97; +goto block_32; +} +block_32: +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; +lean_dec(x_21); +x_22 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_22, 0, x_3); +x_23 = l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__2; +x_24 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +x_25 = l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__5; +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +x_27 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_26, x_6, x_7, x_19); lean_dec(x_7); lean_dec(x_6); -x_24 = !lean_is_exclusive(x_23); -if (x_24 == 0) +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) { -return x_23; -} -else -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = lean_ctor_get(x_23, 0); -x_26 = lean_ctor_get(x_23, 1); -lean_inc(x_26); -lean_inc(x_25); -lean_dec(x_23); -x_27 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_27, 0, x_25); -lean_ctor_set(x_27, 1, x_26); return x_27; } +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_27, 0); +x_30 = lean_ctor_get(x_27, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_27); +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +return x_31; +} } } else { -uint8_t x_94; +uint8_t x_98; +lean_dec(x_11); lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_94 = !lean_is_exclusive(x_10); -if (x_94 == 0) +x_98 = !lean_is_exclusive(x_14); +if (x_98 == 0) +{ +return x_14; +} +else +{ +lean_object* x_99; lean_object* x_100; lean_object* x_101; +x_99 = lean_ctor_get(x_14, 0); +x_100 = lean_ctor_get(x_14, 1); +lean_inc(x_100); +lean_inc(x_99); +lean_dec(x_14); +x_101 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_101, 0, x_99); +lean_ctor_set(x_101, 1, x_100); +return x_101; +} +} +} +} +else +{ +uint8_t x_113; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_113 = !lean_is_exclusive(x_10); +if (x_113 == 0) { return x_10; } else { -lean_object* x_95; lean_object* x_96; lean_object* x_97; -x_95 = lean_ctor_get(x_10, 0); -x_96 = lean_ctor_get(x_10, 1); -lean_inc(x_96); -lean_inc(x_95); +lean_object* x_114; lean_object* x_115; lean_object* x_116; +x_114 = lean_ctor_get(x_10, 0); +x_115 = lean_ctor_get(x_10, 1); +lean_inc(x_115); +lean_inc(x_114); lean_dec(x_10); -x_97 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_97, 0, x_95); -lean_ctor_set(x_97, 1, x_96); -return x_97; +x_116 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_116, 0, x_114); +lean_ctor_set(x_116, 1, x_115); +return x_116; } } } } +lean_object* l_Lean_ofExcept___at___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___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_Lean_ofExcept___at___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} } lean_object* l___private_Lean_Parser_Extension_11__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* x_8) { _start: @@ -8716,7 +8941,7 @@ x_6 = l_Lean_Parser_registerBuiltinParserAttribute(x_1, x_2, x_5, x_4); return x_6; } } -lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__1() { +lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__1() { _start: { lean_object* x_1; @@ -8724,27 +8949,27 @@ x_1 = lean_mk_string("invalid parser '"); return x_1; } } -lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__2() { +lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__1; +x_1 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__3() { +lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__3() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__2; +x_1 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__2; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__4() { +lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__4() { _start: { lean_object* x_1; lean_object* x_2; @@ -8754,117 +8979,109 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__5() { +lean_object* _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__5() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__4; +x_1 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__4; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1(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_st_ref_get(x_4, x_5); -x_7 = lean_ctor_get(x_6, 0); -lean_inc(x_7); -x_8 = lean_ctor_get(x_6, 1); -lean_inc(x_8); -lean_dec(x_6); -x_9 = lean_ctor_get(x_7, 0); -lean_inc(x_9); -lean_dec(x_7); -x_10 = l_Lean_Parser_addToken(x_9, x_1); -if (lean_obj_tag(x_10) == 0) +if (lean_obj_tag(x_2) == 0) { -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_object* x_6; lean_object* x_7; +lean_dec(x_1); +x_6 = lean_box(0); +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_6); +lean_ctor_set(x_7, 1, x_5); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_8 = lean_ctor_get(x_2, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_2, 1); +lean_inc(x_9); +lean_dec(x_2); +x_10 = lean_st_ref_get(x_4, x_5); x_11 = lean_ctor_get(x_10, 0); lean_inc(x_11); -lean_dec(x_10); -x_12 = l_System_FilePath_dirName___closed__1; -x_13 = l_Lean_Name_toStringWithSep___main(x_12, x_2); -x_14 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_14, 0, x_13); -x_15 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_15, 0, x_14); -x_16 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__3; -x_17 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_15); -x_18 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__5; -x_19 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -x_20 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_20, 0, x_11); -x_21 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_21, 0, x_20); -x_22 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_22, 0, x_19); -lean_ctor_set(x_22, 1, x_21); -x_23 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_22, x_3, x_4, x_8); -return x_23; -} -else -{ -lean_object* x_24; lean_object* x_25; -lean_dec(x_2); -x_24 = lean_ctor_get(x_10, 0); -lean_inc(x_24); -lean_dec(x_10); -x_25 = l_Lean_setEnv___at_Lean_registerTagAttribute___spec__5(x_24, x_3, x_4, x_8); -return x_25; -} -} -} -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__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* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1(x_1, x_2, x_3, x_5, x_6, x_7); -return x_8; -} -} -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -if (lean_obj_tag(x_3) == 0) -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -lean_dec(x_1); -x_7 = lean_ctor_get(x_2, 0); -lean_inc(x_7); -lean_dec(x_2); -x_8 = lean_ctor_get(x_7, 1); -lean_inc(x_8); -lean_dec(x_7); -x_9 = lean_box(0); -x_10 = lean_apply_5(x_8, lean_box(0), x_9, x_4, x_5, x_6); -return x_10; -} -else -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_11 = lean_ctor_get(x_3, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_3, 1); +x_12 = lean_ctor_get(x_10, 1); lean_inc(x_12); -lean_dec(x_3); -x_13 = lean_ctor_get(x_2, 1); +lean_dec(x_10); +x_13 = lean_ctor_get(x_11, 0); lean_inc(x_13); -lean_inc(x_1); -x_14 = lean_alloc_closure((void*)(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___boxed), 5, 2); -lean_closure_set(x_14, 0, x_11); -lean_closure_set(x_14, 1, x_1); -x_15 = lean_alloc_closure((void*)(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__2___boxed), 7, 3); -lean_closure_set(x_15, 0, x_1); -lean_closure_set(x_15, 1, x_2); -lean_closure_set(x_15, 2, x_12); -x_16 = lean_apply_7(x_13, lean_box(0), lean_box(0), x_14, x_15, x_4, x_5, x_6); -return x_16; +lean_dec(x_11); +x_14 = l_Lean_Parser_addToken(x_13, x_8); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; +lean_dec(x_9); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +lean_dec(x_14); +x_16 = l_System_FilePath_dirName___closed__1; +x_17 = l_Lean_Name_toStringWithSep___main(x_16, x_1); +x_18 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_18, 0, x_17); +x_19 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_19, 0, x_18); +x_20 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__3; +x_21 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_19); +x_22 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__5; +x_23 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_23, 0, x_21); +lean_ctor_set(x_23, 1, x_22); +x_24 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_24, 0, x_15); +x_25 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_25, 0, x_24); +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_23); +lean_ctor_set(x_26, 1, x_25); +x_27 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_26, x_3, x_4, x_12); +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) +{ +return x_27; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_27, 0); +x_30 = lean_ctor_get(x_27, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_27); +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +return x_31; +} +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_14, 0); +lean_inc(x_32); +lean_dec(x_14); +x_33 = l_Lean_setEnv___at_Lean_registerTagAttribute___spec__5(x_32, x_3, x_4, x_12); +x_34 = lean_ctor_get(x_33, 1); +lean_inc(x_34); +lean_dec(x_33); +x_2 = x_9; +x_5 = x_34; +goto _start; +} } } } @@ -9095,306 +9312,287 @@ x_6 = l_Std_PersistentHashMap_foldlM___at___private_Lean_Parser_Extension_12__Pa return x_6; } } -lean_object* _init_l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1() { +lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: +lean_object* x_8; lean_object* x_9; +x_8 = l_Lean_Parser_getParserPriority(x_3); +x_9 = l_Lean_ofExcept___at___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___spec__1(x_8, x_5, x_6, x_7); +lean_dec(x_8); +if (lean_obj_tag(x_9) == 0) { -lean_object* x_9; lean_object* x_10; uint8_t x_74; -x_74 = l_Lean_Syntax_hasArgs(x_4); -if (x_74 == 0) -{ -lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; -lean_dec(x_1); -x_75 = lean_st_ref_get(x_7, x_8); -x_76 = lean_ctor_get(x_75, 0); -lean_inc(x_76); -x_77 = lean_ctor_get(x_75, 1); -lean_inc(x_77); -lean_dec(x_75); -x_78 = lean_ctor_get(x_76, 0); -lean_inc(x_78); -lean_dec(x_76); -x_9 = x_78; -x_10 = x_77; -goto block_73; -} -else -{ -lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; uint8_t x_85; -lean_dec(x_3); -lean_dec(x_2); -x_79 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_79, 0, x_1); -x_80 = l_Lean_registerTagAttribute___lambda__4___closed__3; -x_81 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_81, 0, x_80); -lean_ctor_set(x_81, 1, x_79); -x_82 = l_Lean_registerTagAttribute___lambda__4___closed__12; -x_83 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_83, 0, x_81); -lean_ctor_set(x_83, 1, x_82); -x_84 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_83, x_6, x_7, x_8); -lean_dec(x_7); -lean_dec(x_6); -x_85 = !lean_is_exclusive(x_84); -if (x_85 == 0) -{ -return x_84; -} -else -{ -lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_86 = lean_ctor_get(x_84, 0); -x_87 = lean_ctor_get(x_84, 1); -lean_inc(x_87); -lean_inc(x_86); -lean_dec(x_84); -x_88 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_88, 0, x_86); -lean_ctor_set(x_88, 1, x_87); -return x_88; -} -} -block_73: -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_11 = l_Lean_Parser_parserExtension; -x_12 = l_Lean_PersistentEnvExtension_getState___rarg(x_11, x_9); -x_13 = lean_ctor_get(x_12, 2); +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; +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = lean_st_ref_get(x_6, x_11); +x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); lean_dec(x_12); -lean_inc(x_3); -lean_inc(x_13); -x_14 = l_Lean_Parser_mkParserOfConstant(x_9, x_13, x_3); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -lean_dec(x_13); -lean_dec(x_3); -lean_dec(x_2); -x_15 = lean_ctor_get(x_14, 0); +x_15 = lean_ctor_get(x_13, 0); lean_inc(x_15); -lean_dec(x_14); -x_16 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_16, 0, x_15); -x_17 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_17, 0, x_16); -x_18 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_17, x_6, x_7, x_10); -lean_dec(x_7); -lean_dec(x_6); -return x_18; -} -else +lean_dec(x_13); +x_16 = l_Lean_Parser_parserExtension; +x_17 = l_Lean_PersistentEnvExtension_getState___rarg(x_16, x_15); +x_18 = lean_ctor_get(x_17, 2); +lean_inc(x_18); +lean_dec(x_17); +lean_inc(x_2); +lean_inc(x_18); +x_19 = l_Lean_Parser_mkParserOfConstant(x_15, x_18, x_2); +if (lean_obj_tag(x_19) == 0) { -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_19 = lean_ctor_get(x_14, 0); -lean_inc(x_19); -lean_dec(x_14); +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_dec(x_18); +lean_dec(x_10); +lean_dec(x_2); +lean_dec(x_1); x_20 = lean_ctor_get(x_19, 0); lean_inc(x_20); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); lean_dec(x_19); -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_box(0); -x_25 = lean_apply_1(x_23, x_24); -x_26 = l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1; -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_3); -x_27 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1(x_3, x_26, x_25, x_6, x_7, x_10); -if (lean_obj_tag(x_27) == 0) -{ -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_object* x_36; -x_28 = lean_ctor_get(x_27, 1); -lean_inc(x_28); -lean_dec(x_27); -x_29 = lean_ctor_get(x_22, 1); -lean_inc(x_29); -lean_dec(x_22); -x_30 = l_Lean_LocalContext_Inhabited___closed__1; -x_31 = lean_apply_1(x_29, x_30); -x_32 = lean_box(0); -x_33 = l_Std_PersistentHashMap_foldlM___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__3(x_31, x_32, x_6, x_7, x_28); -lean_dec(x_31); -x_34 = lean_ctor_get(x_33, 1); -lean_inc(x_34); -lean_dec(x_33); -x_35 = lean_unbox(x_20); -lean_inc(x_21); -lean_inc(x_2); -x_36 = l_Lean_Parser_addParser(x_13, x_2, x_3, x_35, x_21); -if (lean_obj_tag(x_36) == 0) -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; -lean_dec(x_21); -lean_dec(x_20); -lean_dec(x_3); -lean_dec(x_2); -x_37 = lean_ctor_get(x_36, 0); -lean_inc(x_37); -lean_dec(x_36); -x_38 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_38, 0, x_37); -x_39 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_39, 0, x_38); -x_40 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_39, x_6, x_7, x_34); -lean_dec(x_7); +x_21 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_21, 0, x_20); +x_22 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_22, 0, x_21); +x_23 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_22, x_5, x_6, x_14); lean_dec(x_6); -x_41 = !lean_is_exclusive(x_40); -if (x_41 == 0) -{ -return x_40; +lean_dec(x_5); +return x_23; } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = lean_ctor_get(x_40, 0); -x_43 = lean_ctor_get(x_40, 1); -lean_inc(x_43); -lean_inc(x_42); +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; +x_24 = lean_ctor_get(x_19, 0); +lean_inc(x_24); +lean_dec(x_19); +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 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_box(0); +x_30 = lean_apply_1(x_28, x_29); +lean_inc(x_2); +x_31 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1(x_2, x_30, x_5, x_6, x_14); +if (lean_obj_tag(x_31) == 0) +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; lean_object* x_40; +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_ctor_get(x_27, 1); +lean_inc(x_33); +lean_dec(x_27); +x_34 = l_Lean_LocalContext_Inhabited___closed__1; +x_35 = lean_apply_1(x_33, x_34); +x_36 = lean_box(0); +x_37 = l_Std_PersistentHashMap_foldlM___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__3(x_35, x_36, x_5, x_6, x_32); +lean_dec(x_35); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_unbox(x_25); +lean_inc(x_10); +lean_inc(x_26); +lean_inc(x_1); +x_40 = l_Lean_Parser_addParser(x_18, x_1, x_2, x_39, x_26, x_10); +if (lean_obj_tag(x_40) == 0) +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; uint8_t x_45; +lean_dec(x_26); +lean_dec(x_25); +lean_dec(x_10); +lean_dec(x_2); +lean_dec(x_1); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); lean_dec(x_40); -x_44 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_44, 0, x_42); -lean_ctor_set(x_44, 1, x_43); +x_42 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_42, 0, x_41); +x_43 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_43, 0, x_42); +x_44 = l_Lean_throwError___at_Lean_registerTagAttribute___spec__6___rarg(x_43, x_5, x_6, x_38); +lean_dec(x_6); +lean_dec(x_5); +x_45 = !lean_is_exclusive(x_44); +if (x_45 == 0) +{ return x_44; } -} else { -lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; -lean_dec(x_36); -x_45 = lean_st_ref_take(x_7, x_34); -x_46 = lean_ctor_get(x_45, 0); -lean_inc(x_46); -x_47 = lean_ctor_get(x_45, 1); +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_44, 0); +x_47 = lean_ctor_get(x_44, 1); lean_inc(x_47); -lean_dec(x_45); -x_48 = !lean_is_exclusive(x_46); -if (x_48 == 0) -{ -lean_object* x_49; lean_object* x_50; uint8_t x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; lean_object* x_56; -x_49 = lean_ctor_get(x_46, 0); -lean_inc(x_3); -lean_inc(x_2); -x_50 = lean_alloc_ctor(3, 3, 1); -lean_ctor_set(x_50, 0, x_2); -lean_ctor_set(x_50, 1, x_3); -lean_ctor_set(x_50, 2, x_21); -x_51 = lean_unbox(x_20); -lean_dec(x_20); -lean_ctor_set_uint8(x_50, sizeof(void*)*3, x_51); -x_52 = l_Lean_PersistentEnvExtension_addEntry___rarg(x_11, x_49, x_50); -lean_ctor_set(x_46, 0, x_52); -x_53 = lean_st_ref_set(x_7, x_46, x_47); -x_54 = lean_ctor_get(x_53, 1); -lean_inc(x_54); -lean_dec(x_53); -x_55 = 0; -x_56 = l_Lean_Parser_runParserAttributeHooks(x_2, x_3, x_55, x_6, x_7, x_54); -return x_56; +lean_inc(x_46); +lean_dec(x_44); +x_48 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_48, 0, x_46); +lean_ctor_set(x_48, 1, x_47); +return x_48; +} } else { -lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; uint8_t x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; uint8_t x_67; lean_object* x_68; -x_57 = lean_ctor_get(x_46, 0); -x_58 = lean_ctor_get(x_46, 1); -x_59 = lean_ctor_get(x_46, 2); -x_60 = lean_ctor_get(x_46, 3); -lean_inc(x_60); -lean_inc(x_59); +lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; +lean_dec(x_40); +x_49 = lean_st_ref_take(x_6, x_38); +x_50 = lean_ctor_get(x_49, 0); +lean_inc(x_50); +x_51 = lean_ctor_get(x_49, 1); +lean_inc(x_51); +lean_dec(x_49); +x_52 = !lean_is_exclusive(x_50); +if (x_52 == 0) +{ +lean_object* x_53; lean_object* x_54; uint8_t x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_59; lean_object* x_60; +x_53 = lean_ctor_get(x_50, 0); +lean_inc(x_2); +lean_inc(x_1); +x_54 = lean_alloc_ctor(3, 4, 1); +lean_ctor_set(x_54, 0, x_1); +lean_ctor_set(x_54, 1, x_2); +lean_ctor_set(x_54, 2, x_26); +lean_ctor_set(x_54, 3, x_10); +x_55 = lean_unbox(x_25); +lean_dec(x_25); +lean_ctor_set_uint8(x_54, sizeof(void*)*4, x_55); +x_56 = l_Lean_PersistentEnvExtension_addEntry___rarg(x_16, x_53, x_54); +lean_ctor_set(x_50, 0, x_56); +x_57 = lean_st_ref_set(x_6, x_50, x_51); +x_58 = lean_ctor_get(x_57, 1); lean_inc(x_58); -lean_inc(x_57); -lean_dec(x_46); -lean_inc(x_3); +lean_dec(x_57); +x_59 = 0; +x_60 = l_Lean_Parser_runParserAttributeHooks(x_1, x_2, x_59, x_5, x_6, x_58); +return x_60; +} +else +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; uint8_t x_71; lean_object* x_72; +x_61 = lean_ctor_get(x_50, 0); +x_62 = lean_ctor_get(x_50, 1); +x_63 = lean_ctor_get(x_50, 2); +x_64 = lean_ctor_get(x_50, 3); +lean_inc(x_64); +lean_inc(x_63); +lean_inc(x_62); +lean_inc(x_61); +lean_dec(x_50); lean_inc(x_2); -x_61 = lean_alloc_ctor(3, 3, 1); -lean_ctor_set(x_61, 0, x_2); -lean_ctor_set(x_61, 1, x_3); -lean_ctor_set(x_61, 2, x_21); -x_62 = lean_unbox(x_20); -lean_dec(x_20); -lean_ctor_set_uint8(x_61, sizeof(void*)*3, x_62); -x_63 = l_Lean_PersistentEnvExtension_addEntry___rarg(x_11, x_57, x_61); -x_64 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_64, 0, x_63); -lean_ctor_set(x_64, 1, x_58); -lean_ctor_set(x_64, 2, x_59); -lean_ctor_set(x_64, 3, x_60); -x_65 = lean_st_ref_set(x_7, x_64, x_47); -x_66 = lean_ctor_get(x_65, 1); -lean_inc(x_66); -lean_dec(x_65); -x_67 = 0; -x_68 = l_Lean_Parser_runParserAttributeHooks(x_2, x_3, x_67, x_6, x_7, x_66); -return x_68; -} -} -} -else -{ -uint8_t x_69; -lean_dec(x_22); -lean_dec(x_21); -lean_dec(x_20); -lean_dec(x_13); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -x_69 = !lean_is_exclusive(x_27); -if (x_69 == 0) -{ -return x_27; -} -else -{ -lean_object* x_70; lean_object* x_71; lean_object* x_72; -x_70 = lean_ctor_get(x_27, 0); -x_71 = lean_ctor_get(x_27, 1); -lean_inc(x_71); +lean_inc(x_1); +x_65 = lean_alloc_ctor(3, 4, 1); +lean_ctor_set(x_65, 0, x_1); +lean_ctor_set(x_65, 1, x_2); +lean_ctor_set(x_65, 2, x_26); +lean_ctor_set(x_65, 3, x_10); +x_66 = lean_unbox(x_25); +lean_dec(x_25); +lean_ctor_set_uint8(x_65, sizeof(void*)*4, x_66); +x_67 = l_Lean_PersistentEnvExtension_addEntry___rarg(x_16, x_61, x_65); +x_68 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_68, 0, x_67); +lean_ctor_set(x_68, 1, x_62); +lean_ctor_set(x_68, 2, x_63); +lean_ctor_set(x_68, 3, x_64); +x_69 = lean_st_ref_set(x_6, x_68, x_51); +x_70 = lean_ctor_get(x_69, 1); lean_inc(x_70); -lean_dec(x_27); -x_72 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_72, 0, x_70); -lean_ctor_set(x_72, 1, x_71); +lean_dec(x_69); +x_71 = 0; +x_72 = l_Lean_Parser_runParserAttributeHooks(x_1, x_2, x_71, x_5, x_6, x_70); return x_72; } } } +else +{ +uint8_t x_73; +lean_dec(x_27); +lean_dec(x_26); +lean_dec(x_25); +lean_dec(x_18); +lean_dec(x_10); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_73 = !lean_is_exclusive(x_31); +if (x_73 == 0) +{ +return x_31; +} +else +{ +lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_74 = lean_ctor_get(x_31, 0); +x_75 = lean_ctor_get(x_31, 1); +lean_inc(x_75); +lean_inc(x_74); +lean_dec(x_31); +x_76 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_76, 0, x_74); +lean_ctor_set(x_76, 1, x_75); +return x_76; } } } -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +} +else +{ +uint8_t x_77; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_77 = !lean_is_exclusive(x_9); +if (x_77 == 0) +{ +return x_9; +} +else +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_78 = lean_ctor_get(x_9, 0); +x_79 = lean_ctor_get(x_9, 1); +lean_inc(x_79); +lean_inc(x_78); +lean_dec(x_9); +x_80 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_80, 0, x_78); +lean_ctor_set(x_80, 1, x_79); +return x_80; +} +} +} +} +lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Parser_Extension_12__ParserAttribute_add___rarg___boxed), 7, 0); +return x_2; +} +} +lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___boxed(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; -x_6 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1(x_1, x_2, x_3, x_4, x_5); +x_6 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); return x_6; } } -lean_object* l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_4); -return x_8; -} -} lean_object* l_Array_iterateMAux___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__5___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: { @@ -9452,23 +9650,40 @@ lean_dec(x_1); return x_5; } } -lean_object* l___private_Lean_Parser_Extension_12__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* x_8) { +lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___rarg___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_9; lean_object* x_10; -x_9 = lean_unbox(x_5); -lean_dec(x_5); -x_10 = l___private_Lean_Parser_Extension_12__ParserAttribute_add(x_1, x_2, x_3, x_4, x_9, x_6, x_7, x_8); +uint8_t x_8; lean_object* x_9; +x_8 = lean_unbox(x_4); lean_dec(x_4); -return x_10; +x_9 = l___private_Lean_Parser_Extension_12__ParserAttribute_add___rarg(x_1, x_2, x_3, x_8, x_5, x_6, x_7); +lean_dec(x_3); +return x_9; } } -lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, uint8_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___boxed(lean_object* x_1) { _start: { -lean_object* x_9; -x_9 = l___private_Lean_Parser_Extension_12__ParserAttribute_add(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -return x_9; +lean_object* x_2; +x_2 = l___private_Lean_Parser_Extension_12__ParserAttribute_add(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l___private_Lean_Parser_Extension_12__ParserAttribute_add___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +return x_8; +} +} +lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Parser_mkParserAttributeImpl___elambda__1___rarg___boxed), 7, 0); +return x_2; } } lean_object* _init_l_Lean_Parser_mkParserAttributeImpl___closed__1() { @@ -9483,10 +9698,8 @@ lean_object* l_Lean_Parser_mkParserAttributeImpl(lean_object* x_1, lean_object* _start: { lean_object* x_3; lean_object* x_4; uint8_t x_5; lean_object* x_6; -lean_inc(x_1); -x_3 = lean_alloc_closure((void*)(l_Lean_Parser_mkParserAttributeImpl___elambda__1___boxed), 8, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); +x_3 = lean_alloc_closure((void*)(l_Lean_Parser_mkParserAttributeImpl___elambda__1___rarg___boxed), 7, 1); +lean_closure_set(x_3, 0, x_2); x_4 = l_Lean_Parser_mkParserAttributeImpl___closed__1; x_5 = 1; x_6 = lean_alloc_ctor(0, 3, 1); @@ -9497,15 +9710,24 @@ lean_ctor_set_uint8(x_6, sizeof(void*)*3, x_5); return x_6; } } -lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1___rarg___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_9; lean_object* x_10; -x_9 = lean_unbox(x_5); -lean_dec(x_5); -x_10 = l_Lean_Parser_mkParserAttributeImpl___elambda__1(x_1, x_2, x_3, x_4, x_9, x_6, x_7, x_8); +uint8_t x_8; lean_object* x_9; +x_8 = lean_unbox(x_4); lean_dec(x_4); -return x_10; +x_9 = l_Lean_Parser_mkParserAttributeImpl___elambda__1___rarg(x_1, x_2, x_3, x_8, x_5, x_6, x_7); +lean_dec(x_3); +return x_9; +} +} +lean_object* l_Lean_Parser_mkParserAttributeImpl___elambda__1___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Parser_mkParserAttributeImpl___elambda__1(x_1); +lean_dec(x_1); +return x_2; } } lean_object* l_Lean_Parser_registerBuiltinDynamicParserAttribute(lean_object* x_1, lean_object* x_2, lean_object* x_3) { @@ -9926,8 +10148,6 @@ l_Lean_Parser_declareBuiltinParser___closed__2 = _init_l_Lean_Parser_declareBuil lean_mark_persistent(l_Lean_Parser_declareBuiltinParser___closed__2); l_Lean_Parser_declareBuiltinParser___closed__3 = _init_l_Lean_Parser_declareBuiltinParser___closed__3(); lean_mark_persistent(l_Lean_Parser_declareBuiltinParser___closed__3); -l_Lean_Parser_declareBuiltinParser___closed__4 = _init_l_Lean_Parser_declareBuiltinParser___closed__4(); -lean_mark_persistent(l_Lean_Parser_declareBuiltinParser___closed__4); l_Lean_Parser_declareLeadingBuiltinParser___closed__1 = _init_l_Lean_Parser_declareLeadingBuiltinParser___closed__1(); lean_mark_persistent(l_Lean_Parser_declareLeadingBuiltinParser___closed__1); l_Lean_Parser_declareLeadingBuiltinParser___closed__2 = _init_l_Lean_Parser_declareLeadingBuiltinParser___closed__2(); @@ -9936,6 +10156,16 @@ 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_Lean_Parser_getParserPriority___closed__1 = _init_l_Lean_Parser_getParserPriority___closed__1(); +lean_mark_persistent(l_Lean_Parser_getParserPriority___closed__1); +l_Lean_Parser_getParserPriority___closed__2 = _init_l_Lean_Parser_getParserPriority___closed__2(); +lean_mark_persistent(l_Lean_Parser_getParserPriority___closed__2); +l_Lean_Parser_getParserPriority___closed__3 = _init_l_Lean_Parser_getParserPriority___closed__3(); +lean_mark_persistent(l_Lean_Parser_getParserPriority___closed__3); +l_Lean_Parser_getParserPriority___closed__4 = _init_l_Lean_Parser_getParserPriority___closed__4(); +lean_mark_persistent(l_Lean_Parser_getParserPriority___closed__4); +l_Lean_Parser_getParserPriority___closed__5 = _init_l_Lean_Parser_getParserPriority___closed__5(); +lean_mark_persistent(l_Lean_Parser_getParserPriority___closed__5); l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__1 = _init_l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__1(); lean_mark_persistent(l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__1); l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__2 = _init_l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__2(); @@ -9948,18 +10178,16 @@ l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__5 = _ lean_mark_persistent(l___private_Lean_Parser_Extension_11__BuiltinParserAttribute_add___closed__5); l_Lean_Parser_registerBuiltinParserAttribute___closed__1 = _init_l_Lean_Parser_registerBuiltinParserAttribute___closed__1(); lean_mark_persistent(l_Lean_Parser_registerBuiltinParserAttribute___closed__1); -l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__1 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__1(); -lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__1); -l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__2 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__2(); -lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__2); -l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__3 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__3(); -lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__3); -l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__4 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__4(); -lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__4); -l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__5 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__5(); -lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___lambda__1___closed__5); -l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1 = _init_l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1(); -lean_mark_persistent(l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1); +l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__1 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__1(); +lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__1); +l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__2 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__2(); +lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__2); +l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__3 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__3(); +lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__3); +l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__4 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__4(); +lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__4); +l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__5 = _init_l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__5(); +lean_mark_persistent(l_List_forM___main___at___private_Lean_Parser_Extension_12__ParserAttribute_add___spec__1___closed__5); l_Lean_Parser_mkParserAttributeImpl___closed__1 = _init_l_Lean_Parser_mkParserAttributeImpl___closed__1(); lean_mark_persistent(l_Lean_Parser_mkParserAttributeImpl___closed__1); l___private_Lean_Parser_Extension_13__registerParserAttributeImplBuilder___lambda__1___closed__1 = _init_l___private_Lean_Parser_Extension_13__registerParserAttributeImplBuilder___lambda__1___closed__1(); diff --git a/stage0/stdlib/Lean/Parser/Level.c b/stage0/stdlib/Lean/Parser/Level.c index e54739118e..eb34961d4e 100644 --- a/stage0/stdlib/Lean/Parser/Level.c +++ b/stage0/stdlib/Lean/Parser/Level.c @@ -88,7 +88,7 @@ lean_object* l_Lean_Parser_ParserState_mkTrailingNode(lean_object*, lean_object* lean_object* l_Lean_Parser_Level_hole___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___rarg___closed__18; lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__8; -lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___rarg___closed__25; lean_object* lean_string_append(lean_object*, lean_object*); @@ -972,13 +972,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Level_paren(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; x_3 = l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__1___closed__3; x_4 = 1; x_5 = l_Lean_Parser_Level_paren; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_dollarSymbol_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -2562,13 +2563,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Level_max(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; x_3 = l_Lean_Parser_Level_max___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Level_max; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Level_max_formatter___closed__1() { @@ -3111,13 +3113,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Level_imax(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; x_3 = l_Lean_Parser_Level_imax___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Level_imax; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Level_imax_formatter___closed__1() { @@ -3631,13 +3634,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Level_hole(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; x_3 = l_Lean_Parser_Level_hole___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Level_hole; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Level_hole_formatter___closed__1() { @@ -3847,13 +3851,14 @@ return x_3; lean_object* l___regBuiltinParser_Lean_Parser_Level_num(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; x_3 = l___regBuiltinParser_Lean_Parser_Level_num___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Level_num; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_numLit_formatter___closed__1() { @@ -4079,13 +4084,14 @@ return x_3; lean_object* l___regBuiltinParser_Lean_Parser_Level_ident(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; x_3 = l___regBuiltinParser_Lean_Parser_Level_ident___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Level_ident; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_ident_formatter___closed__1() { @@ -4454,13 +4460,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Level_addLit(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; x_3 = l_Lean_Parser_Level_addLit___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Level_addLit; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Level_addLit_formatter___closed__1() { diff --git a/stage0/stdlib/Lean/Parser/Module.c b/stage0/stdlib/Lean/Parser/Module.c index 17a63f58d8..a790c8322e 100644 --- a/stage0/stdlib/Lean/Parser/Module.c +++ b/stage0/stdlib/Lean/Parser/Module.c @@ -161,13 +161,13 @@ lean_object* l_Lean_Parser_Module_header_parenthesizer___closed__2; lean_object* l___private_Lean_Parser_Module_4__testModuleParserAux___main___closed__1; lean_object* l_Lean_Parser_Module_import___closed__1; lean_object* l_Std_PersistentArray_forMAux___main___at___private_Lean_Parser_Module_4__testModuleParserAux___main___spec__4___boxed(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; lean_object* l___private_Lean_Parser_Module_4__testModuleParserAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_import_formatter___closed__7; lean_object* l_Lean_FileMap_toPosition(lean_object*, lean_object*); uint8_t l_Std_PersistentArray_isEmpty___rarg(lean_object*); lean_object* l_Lean_Parser_Module_header_parenthesizer___closed__1; lean_object* l_Lean_Parser_Trie_Inhabited(lean_object*); +extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_object* l_IO_FS_readFile___at_Lean_Parser_parseFile___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_module; @@ -3206,7 +3206,7 @@ _start: lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); -x_3 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +x_3 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; x_4 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_4, 0, x_3); lean_ctor_set(x_4, 1, x_2); diff --git a/stage0/stdlib/Lean/Parser/Syntax.c b/stage0/stdlib/Lean/Parser/Syntax.c index 4e2763525e..2d9da62346 100644 --- a/stage0/stdlib/Lean/Parser/Syntax.c +++ b/stage0/stdlib/Lean/Parser/Syntax.c @@ -263,7 +263,7 @@ lean_object* l_Lean_Parser_Command_mixfix___elambda__1(lean_object*, lean_object lean_object* l_Lean_Parser_Syntax_cat___closed__2; lean_object* l_Lean_Parser_Command_notation___closed__10; lean_object* l_Lean_Parser_Command_identPrec_parenthesizer___closed__2; -lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_regBuiltinSyntaxParserAttr___closed__1; lean_object* l___regBuiltin_Lean_Parser_Syntax_atom_formatter___closed__1; lean_object* l___regBuiltin_Lean_Parser_Syntax_many_formatter(lean_object*); @@ -3098,13 +3098,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_paren(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_paren___elambda__1___closed__3; x_4 = 1; x_5 = l_Lean_Parser_Syntax_paren; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_syntaxParser_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -3607,13 +3608,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_cat(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_cat___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Syntax_cat; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_maxSymbol_formatter___closed__1() { @@ -4279,13 +4281,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_atom(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_atom___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Syntax_atom; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_atom_formatter___closed__1() { @@ -4652,13 +4655,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_num(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_num___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Syntax_num; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_num_formatter___closed__1() { @@ -5035,13 +5039,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_str(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_str___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Syntax_str; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_str_formatter___closed__1() { @@ -5418,13 +5423,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_char(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_char___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Syntax_char; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_char_formatter___closed__1() { @@ -5801,13 +5807,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_ident(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_ident___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Syntax_ident; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_ident_formatter___closed__1() { @@ -6262,13 +6269,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_try(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_try___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Syntax_try; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_try_formatter___closed__1() { @@ -6747,13 +6755,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_lookahead(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_lookahead___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Syntax_lookahead; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_lookahead_formatter___closed__1() { @@ -7256,13 +7265,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_sepBy(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_sepBy___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Syntax_sepBy; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_sepBy_formatter___closed__1() { @@ -7787,13 +7797,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_sepBy1(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_sepBy1___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Syntax_sepBy1; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_sepBy1_formatter___closed__1() { @@ -8242,13 +8253,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_notFollowedBy(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_notFollowedBy___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Syntax_notFollowedBy; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_notFollowedBy_formatter___closed__1() { @@ -8544,13 +8556,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_optional(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_optional___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Syntax_optional; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Syntax_optional_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -8770,13 +8783,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_many(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_many___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Syntax_many; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Syntax_many_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -9046,13 +9060,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_many1(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_many1___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Syntax_many1; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_many1_formatter___closed__1() { @@ -9315,13 +9330,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_orelse(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_Parser_categoryParserFnImpl___closed__4; x_3 = l_Lean_Parser_Syntax_orelse___elambda__1___closed__1; x_4 = 0; x_5 = l_Lean_Parser_Syntax_orelse; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Syntax_orelse_formatter___closed__1() { @@ -10023,13 +10039,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_stx_quot(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_stx_quot___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_stx_quot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_stx_quot_formatter___closed__1() { @@ -13258,13 +13275,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_mixfix(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_mixfix___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_mixfix; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_prefix_formatter___closed__1() { @@ -14730,13 +14748,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_reserve(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_reserve___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_reserve; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_reserve_formatter___closed__1() { @@ -16690,13 +16709,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_notation(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_notation___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_notation; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_identPrec_formatter___closed__1() { @@ -17655,13 +17675,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_macro__rules(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_macro__rules___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_macro__rules; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_optKind_formatter___closed__1() { @@ -18679,13 +18700,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_syntax(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_syntax___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Command_syntax; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_syntax_formatter___closed__1() { @@ -19565,13 +19587,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_syntaxAbbrev(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_syntaxAbbrev___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_syntaxAbbrev; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_syntaxAbbrev_formatter___closed__1() { @@ -20197,13 +20220,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_syntaxCat(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_syntaxCat___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_syntaxCat; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_syntaxCat_formatter___closed__1() { @@ -23358,13 +23382,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_macro(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_macro___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_macro; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_macroArgSimple_formatter___closed__1() { @@ -25330,13 +25355,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_elab__rules(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_elab__rules___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_elab__rules; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Command_elab__rules_formatter___closed__1() { @@ -26685,13 +26711,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Command_elab(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_formatCommand___closed__2; x_3 = l_Lean_Parser_Command_elab___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Command_elab; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Command_elabHead_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { diff --git a/stage0/stdlib/Lean/Parser/Tactic.c b/stage0/stdlib/Lean/Parser/Tactic.c index c021ae8233..1dd758dc5b 100644 --- a/stage0/stdlib/Lean/Parser/Tactic.c +++ b/stage0/stdlib/Lean/Parser/Tactic.c @@ -342,7 +342,7 @@ extern lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean lean_object* l_Lean_Parser_Tactic_failIfSuccess___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_refine_x21___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_exact___closed__1; -lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Parser_Tactic_apply_formatter___closed__1; lean_object* l_Lean_Parser_Tactic_rewrite_parenthesizer___closed__4; lean_object* l_Lean_Parser_Tactic_rewriteSeq_parenthesizer___closed__5; @@ -2793,13 +2793,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_intro(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_intro; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_intro_formatter___closed__1() { @@ -3411,13 +3412,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_intros(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_intros___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_intros; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_ident_x27_formatter___closed__1() { @@ -4068,13 +4070,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_revert(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_revert___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_revert; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_revert_formatter___closed__1() { @@ -4611,13 +4614,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_clear(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_clear___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_clear; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_clear_formatter___closed__1() { @@ -5114,13 +5118,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_subst(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_subst___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Tactic_subst; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_subst_formatter___closed__1() { @@ -5517,13 +5522,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_assumption(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_assumption___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_assumption; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_assumption_formatter___closed__1() { @@ -5968,13 +5974,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_apply(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_apply___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_apply; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_apply_formatter___closed__1() { @@ -6443,13 +6450,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_exact(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_exact___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_exact; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_exact_formatter___closed__1() { @@ -6906,13 +6914,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_refine(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_refine___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_refine; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_refine_formatter___closed__1() { @@ -7369,13 +7378,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_refine_x21(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_refine_x21___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_refine_x21; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_refine_x21_formatter___closed__1() { @@ -7929,13 +7939,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_case(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_case___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_case; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_case_formatter___closed__1() { @@ -8457,13 +8468,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_allGoals(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_allGoals___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_allGoals; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_allGoals_formatter___closed__1() { @@ -8872,13 +8884,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_skip(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_skip___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_skip; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_skip_formatter___closed__1() { @@ -9263,13 +9276,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_done(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_done___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_done; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_done_formatter___closed__1() { @@ -9654,13 +9668,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_admit(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_admit___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_admit; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_admit_formatter___closed__1() { @@ -10045,13 +10060,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_traceState(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_traceState___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_traceState; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_traceState_formatter___closed__1() { @@ -10501,13 +10517,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_failIfSuccess(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_failIfSuccess___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_failIfSuccess; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_failIfSuccess_formatter___closed__1() { @@ -11683,13 +11700,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_generalize(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_generalize___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_generalize; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_generalize_formatter___closed__1() { @@ -14061,13 +14079,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_change(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_change___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_change; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_locationWildcard_formatter___closed__1() { @@ -15335,13 +15354,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_changeWith(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_changeWith___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_changeWith; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_changeWith_formatter___closed__1() { @@ -17628,13 +17648,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_rewrite(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_rewrite___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_rewrite; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_rwRule_formatter___closed__1() { @@ -18521,13 +18542,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_rewriteSeq(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_rewriteSeq___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_rewriteSeq; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_rwRuleSeq_formatter___closed__1() { @@ -22667,13 +22689,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_induction(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_induction___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_induction; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_majorPremise_formatter___closed__1() { @@ -23837,13 +23860,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_cases(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_cases___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_cases; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_cases_formatter___closed__1() { @@ -26504,13 +26528,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_match(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_match___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Tactic_match; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_matchAlt_formatter___closed__1() { @@ -27250,13 +27275,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_introMatch(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_introMatch___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_introMatch; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_introMatch_formatter___closed__1() { @@ -28003,13 +28029,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_injection(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_injection___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_injection; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_withIds_formatter___closed__1() { @@ -28787,13 +28814,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_paren(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___lambda__1___closed__3; x_4 = 1; x_5 = l_Lean_Parser_Tactic_paren; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_seq1_formatter___closed__1() { @@ -29561,13 +29589,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_nestedTacticBlockCurly(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Tactic_nestedTacticBlockCurly; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_seq_formatter___closed__1() { @@ -30032,13 +30061,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_orelse(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_orelse___elambda__1___closed__1; x_4 = 0; x_5 = l_Lean_Parser_Tactic_orelse; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_orelse_formatter___closed__1() { @@ -30516,13 +30546,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_have(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_have___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Tactic_have; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_have_formatter___closed__1() { @@ -31034,13 +31065,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_suffices(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_suffices___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Tactic_suffices; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_suffices_formatter___closed__1() { @@ -31556,13 +31588,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_show(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_show___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Tactic_show; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_show_formatter___closed__1() { @@ -32059,13 +32092,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_let(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_let___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Tactic_let; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_let_formatter___closed__1() { @@ -32562,13 +32596,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_let_x21(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; x_3 = l_Lean_Parser_Tactic_let_x21___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Tactic_let_x21; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Tactic_let_x21_formatter___closed__1() { diff --git a/stage0/stdlib/Lean/Parser/Term.c b/stage0/stdlib/Lean/Parser/Term.c index da2e67e3b2..bc06360c43 100644 --- a/stage0/stdlib/Lean/Parser/Term.c +++ b/stage0/stdlib/Lean/Parser/Term.c @@ -811,7 +811,7 @@ lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser lean_object* l_Lean_Parser_Term_not___closed__3; lean_object* l_Lean_Parser_Term_return_parenthesizer___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_nameLitNoAntiquot_parenthesizer___boxed(lean_object*); -lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_Parser_addBuiltinParser(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Basic_2__sepByFnAux___main___at_Lean_Parser_Term_where___elambda__1___spec__2___closed__5; lean_object* l_Lean_Parser_Term_doElem_parenthesizer___closed__6; lean_object* l_Lean_Parser_Term_optIdent___closed__4; @@ -5752,13 +5752,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_byTactic(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_byTactic___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_byTactic; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_nodeWithAntiquot_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { @@ -6262,13 +6263,14 @@ return x_3; lean_object* l___regBuiltinParser_Lean_Parser_Term_ident(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l___regBuiltinParser_Lean_Parser_Term_ident___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Term_ident; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Term_ident_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -6392,13 +6394,14 @@ return x_3; lean_object* l___regBuiltinParser_Lean_Parser_Term_num(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l___regBuiltinParser_Lean_Parser_Term_num___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Term_num; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Term_num_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -6542,13 +6545,14 @@ return x_3; lean_object* l___regBuiltinParser_Lean_Parser_Term_str(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l___regBuiltinParser_Lean_Parser_Term_str___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_str; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_strLit_formatter___closed__1() { @@ -6772,13 +6776,14 @@ return x_3; lean_object* l___regBuiltinParser_Lean_Parser_Term_char(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l___regBuiltinParser_Lean_Parser_Term_char___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_char; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_charLit_formatter___closed__1() { @@ -7641,13 +7646,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_type(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_type___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_type; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_type_formatter___closed__1() { @@ -8575,13 +8581,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_sort(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_sort___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Term_sort; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_sort_formatter___closed__1() { @@ -9111,13 +9118,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_prop(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_prop___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_prop; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_prop_formatter___closed__1() { @@ -9559,13 +9567,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_hole(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_mkHole___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_hole; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_hole_formatter___closed__1() { @@ -10229,13 +10238,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_syntheticHole(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_syntheticHole___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_syntheticHole; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_syntheticHole_formatter___closed__1() { @@ -10793,13 +10803,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_sorry(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_sorry___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_sorry; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_sorry_formatter___closed__1() { @@ -11317,13 +11328,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_cdot(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_cdot___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_cdot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_cdot_formatter___closed__1() { @@ -12337,13 +12349,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_emptyC(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_emptyC___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_emptyC; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_emptyC_formatter___closed__1() { @@ -14443,13 +14456,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_paren(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_myMacro____x40_Lean_Util_Trace___hyg_45____closed__20; x_4 = 1; 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; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_tupleTail_formatter___closed__1() { @@ -15670,13 +15684,14 @@ return x_5; lean_object* l___regBuiltinParser_Lean_Parser_Term_anonymousCtor(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_anonymousCtor; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_anonymousCtor_formatter___closed__1() { @@ -17141,13 +17156,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_if(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_if___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_if; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_optIdent_formatter___closed__1() { @@ -19206,13 +19222,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_have(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_have___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_have; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_haveAssign_formatter___closed__1() { @@ -20442,13 +20459,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_suffices(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_suffices___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_suffices; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_sufficesDecl_formatter___closed__1() { @@ -21276,13 +21294,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_show(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_show___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_show; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_show_formatter___closed__1() { @@ -25152,13 +25171,14 @@ return x_5; lean_object* l___regBuiltinParser_Lean_Parser_Term_structInst(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_structInst___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_structInst; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_structInstArrayRef_formatter___closed__1() { @@ -27523,13 +27543,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_subtype(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_subtype___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_subtype; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_typeSpec_formatter___closed__1() { @@ -28683,13 +28704,14 @@ return x_5; lean_object* l___regBuiltinParser_Lean_Parser_Term_listLit(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_listLit___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_listLit; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_listLit_formatter___closed__1() { @@ -29435,13 +29457,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_arrayLit(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_arrayLit___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_arrayLit; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_arrayLit_formatter___closed__1() { @@ -30031,13 +30054,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_explicit(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_explicit___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_explicit; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_explicit_formatter___closed__1() { @@ -30803,13 +30827,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_inaccessible(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_inaccessible___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_inaccessible; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_inaccessible_formatter___closed__1() { @@ -34094,13 +34119,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_depArrow(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_depArrow___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_depArrow; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Term_binderIdent_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -36383,13 +36409,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_forall(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_forall___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_forall; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_simpleBinder_formatter___closed__1() { @@ -41521,13 +41548,14 @@ return x_5; lean_object* l___regBuiltinParser_Lean_Parser_Term_match(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_match___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_match; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_matchDiscr_formatter___closed__1() { @@ -42817,13 +42845,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_nomatch(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_nomatch___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_nomatch; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_nomatch_formatter___closed__1() { @@ -44338,13 +44367,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_fun(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_myMacro____x40_Lean_Util_Trace___hyg_45____closed__7; x_4 = 1; x_5 = l_Lean_Parser_Term_fun; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_funImplicitBinder_formatter___closed__1() { @@ -45581,13 +45611,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_parser_x21(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_parser_x21___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_parser_x21; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_optExprPrecedence_formatter___closed__1() { @@ -46315,13 +46346,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_tparser_x21(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_tparser_x21___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_tparser_x21; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_tparser_x21_formatter___closed__1() { @@ -46911,13 +46943,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_borrowed(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_borrowed___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_borrowed; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_borrowed_formatter___closed__1() { @@ -47295,13 +47328,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_quotedName(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_quotedName___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_quotedName; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_nameLit_formatter___closed__1() { @@ -48122,13 +48156,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_match__syntax(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_match__syntax___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_match__syntax; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_match__syntax_formatter___closed__1() { @@ -50016,13 +50051,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_let(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_let___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_let; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_letIdLhs_formatter___closed__1() { @@ -51392,13 +51428,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_let_x21(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_let_x21___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_let_x21; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_let_x21_formatter___closed__1() { @@ -53830,13 +53867,14 @@ return x_5; lean_object* l___regBuiltinParser_Lean_Parser_Term_letrec(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_letrec___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_letrec; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_attrArg_formatter___closed__1() { @@ -58207,13 +58245,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_liftMethod(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_liftMethod___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_liftMethod; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Term_leftArrow_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -58991,13 +59030,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_do(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_do___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_do; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_doLet_formatter___closed__1() { @@ -60557,13 +60597,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_nativeRefl(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_nativeRefl___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_nativeRefl; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_nativeRefl_formatter___closed__1() { @@ -61143,13 +61184,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_nativeDecide(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_nativeDecide___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_nativeDecide; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_nativeDecide_formatter___closed__1() { @@ -61729,13 +61771,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_decide(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_decide___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_decide; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_decide_formatter___closed__1() { @@ -62325,13 +62368,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_not(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_not___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_not; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_not_formatter___closed__1() { @@ -62933,13 +62977,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_bnot(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_bnot___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_bnot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_bnot_formatter___closed__1() { @@ -63521,13 +63566,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_uminus(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_uminus___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_uminus; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_uminus_formatter___closed__1() { @@ -65346,13 +65392,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_app(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_mkAppStx___closed__8; x_4 = 0; x_5 = l_Lean_Parser_Term_app; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_namedArgument_formatter___closed__1() { @@ -66112,13 +66159,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_proj(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_proj___elambda__1___closed__1; x_4 = 0; x_5 = l_Lean_Parser_Term_proj; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_proj_formatter___closed__1() { @@ -66362,13 +66410,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_arrow(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_arrow___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_arrow; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Term_unicodeInfixR_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { @@ -66820,13 +66869,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_arrayRef(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_arrayRef___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_arrayRef; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_arrayRef_formatter___closed__1() { @@ -67569,13 +67619,14 @@ return x_5; lean_object* l___regBuiltinParser_Lean_Parser_Term_explicitUniv(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_explicitUniv; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_explicitUniv_formatter___closed__1() { @@ -68039,13 +68090,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_namedPattern(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_namedPattern___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_namedPattern; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_namedPattern_formatter___closed__1() { @@ -68400,13 +68452,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_dollar(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_dollar___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_dollar; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_dollar_formatter___closed__1() { @@ -68890,13 +68943,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_dollarProj(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_dollarProj___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_dollarProj; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_dollarProj_formatter___closed__1() { @@ -69533,13 +69587,14 @@ return x_5; lean_object* l___regBuiltinParser_Lean_Parser_Term_where(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_where___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_where; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_where_formatter___closed__1() { @@ -69814,13 +69869,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_fcomp(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_fcomp___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_fcomp; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Term_infixR_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { @@ -70085,13 +70141,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_prod(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_prod___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_prod; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_prod_formatter___closed__1() { @@ -70290,13 +70347,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_add(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_add___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_add; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Term_infixL_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { @@ -70564,13 +70622,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_sub(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_sub___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_sub; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_sub_formatter___closed__1() { @@ -70767,13 +70826,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_mul(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_mul___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_mul; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_mul_formatter___closed__1() { @@ -70980,13 +71040,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_div(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_div___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_div; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_div_formatter___closed__1() { @@ -71183,13 +71244,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_mod(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_mod___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_mod; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_mod_formatter___closed__1() { @@ -71386,13 +71448,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_modN(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_modN___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_modN; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_modN_formatter___closed__1() { @@ -71589,13 +71652,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_pow(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_pow___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_pow; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_pow_formatter___closed__1() { @@ -71811,13 +71875,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_le(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_le___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_le; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Term_unicodeInfixL_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { @@ -72098,13 +72163,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_ge(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_ge___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_ge; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_ge_formatter___closed__1() { @@ -72303,13 +72369,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_lt(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_lt___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_lt; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_lt_formatter___closed__1() { @@ -72516,13 +72583,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_gt(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_gt___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_gt; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_gt_formatter___closed__1() { @@ -72719,13 +72787,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_eq(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_eq___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_eq; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_eq_formatter___closed__1() { @@ -72922,13 +72991,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_ne(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_ne___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_ne; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_ne_formatter___closed__1() { @@ -73125,13 +73195,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_beq(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_beq___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_beq; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_beq_formatter___closed__1() { @@ -73328,13 +73399,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_bne(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_bne___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_bne; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_bne_formatter___closed__1() { @@ -73540,13 +73612,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_heq(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_heq___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_heq; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_heq_formatter___closed__1() { @@ -73745,13 +73818,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_equiv(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_equiv___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_equiv; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_equiv_formatter___closed__1() { @@ -74281,13 +74355,14 @@ return x_5; lean_object* l___regBuiltinParser_Lean_Parser_Term_subst(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_subst___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_subst; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_subst_formatter___closed__1() { @@ -74549,13 +74624,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_and(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_and___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_and; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_and_formatter___closed__1() { @@ -74773,13 +74849,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_or(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_or___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_or; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_or_formatter___closed__1() { @@ -74997,13 +75074,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_iff(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_iff___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_iff; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_iff_formatter___closed__1() { @@ -75212,13 +75290,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_band(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_band___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_band; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_band_formatter___closed__1() { @@ -75425,13 +75504,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_bor(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_bor___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_bor; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_bor_formatter___closed__1() { @@ -75638,13 +75718,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_append(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_append___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_append; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_append_formatter___closed__1() { @@ -75833,13 +75914,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_cons(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_cons___elambda__1___closed__1; x_4 = 0; x_5 = l_Lean_Parser_Term_cons; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_cons_formatter___closed__1() { @@ -76046,13 +76128,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_orelse(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_orelse___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_orelse; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_orelse_formatter___closed__1() { @@ -76259,13 +76342,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_orM(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_orM___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_orM; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_orM_formatter___closed__1() { @@ -76472,13 +76556,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_andM(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_andM___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_andM; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_andM_formatter___closed__1() { @@ -76675,13 +76760,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_andthen(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_andthen___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_andthen; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_andthen_formatter___closed__1() { @@ -76888,13 +76974,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_bindOp(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_bindOp___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_bindOp; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_bindOp_formatter___closed__1() { @@ -77101,13 +77188,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_mapRev(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_mapRev___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_mapRev; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_mapRev_formatter___closed__1() { @@ -77306,13 +77394,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_seq(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_seq___elambda__1___closed__1; x_4 = 0; x_5 = l_Lean_Parser_Term_seq; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_seq_formatter___closed__1() { @@ -77519,13 +77608,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_seqLeft(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_seqLeft___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_seqLeft; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_seqLeft_formatter___closed__1() { @@ -77722,13 +77812,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_seqRight(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_seqRight___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_seqRight; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_seqRight_formatter___closed__1() { @@ -77925,13 +78016,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_map(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_map___elambda__1___closed__2; x_4 = 0; x_5 = l_Lean_Parser_Term_map; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_map_formatter___closed__1() { @@ -78607,13 +78699,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_funBinder_quot(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_funBinder_quot___elambda__1___closed__3; x_4 = 1; x_5 = l_Lean_Parser_Term_funBinder_quot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_funBinder_quot_formatter___closed__1() { @@ -79249,13 +79342,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_panic(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_panic___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_panic; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_panic_formatter___closed__1() { @@ -79777,13 +79871,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_unreachable(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_unreachable___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Term_unreachable; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_unreachable_formatter___closed__1() { @@ -80537,13 +80632,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_dbgTrace(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_dbgTrace___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_dbgTrace; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_dbgTrace_formatter___closed__1() { @@ -81297,13 +81393,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_assert(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_assert___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_assert; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_assert_formatter___closed__1() { @@ -81883,13 +81980,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Term_return(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Term_return___elambda__1___closed__2; x_4 = 1; x_5 = l_Lean_Parser_Term_return; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Term_return_formatter___closed__1() { @@ -82912,13 +83010,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_quot(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Tactic_quot___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Tactic_quot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* l_Lean_Parser_Tactic_seq1Unbox_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -83746,13 +83845,14 @@ return x_1; lean_object* l___regBuiltinParser_Lean_Parser_Level_quot(lean_object* 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_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; x_2 = l_Lean___kind_term____x40_Lean_Util_Trace___hyg_3____closed__15; x_3 = l_Lean_Parser_Level_quot___elambda__1___closed__1; x_4 = 1; x_5 = l_Lean_Parser_Level_quot; -x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); -return x_6; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; } } lean_object* _init_l_Lean_Parser_Level_quot_formatter___closed__1() { diff --git a/stage0/stdlib/Lean/PrettyPrinter/Formatter.c b/stage0/stdlib/Lean/PrettyPrinter/Formatter.c index c3985e97e0..65609ba7dc 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Formatter.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Formatter.c @@ -116,6 +116,7 @@ lean_object* l_Lean_throwError___at_Lean_PrettyPrinter_Formatter_formatterForKin lean_object* l_Lean_PrettyPrinter_Formatter_notFollowedBy_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5; lean_object* l_Lean_PrettyPrinter_Formatter_optional_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__9; lean_object* l_Lean_PrettyPrinter_Formatter_getStack___boxed(lean_object*); @@ -252,7 +253,6 @@ lean_object* l_Lean_PrettyPrinter_formatCommand___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_symbolNoWs_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__3; lean_object* l_Lean_PrettyPrinter_Formatter_withPosition_formatter___closed__1; extern lean_object* l_Lean_formatDataValue___closed__2; @@ -398,6 +398,7 @@ lean_object* l_Lean_Name_components(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_andthen_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__1; +extern lean_object* l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_ppLine_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_pushTokenCore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCombinatorFormatterAttribute___closed__2; @@ -3444,7 +3445,7 @@ lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___clo _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1; +x_1 = l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } @@ -3454,12 +3455,21 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__1; +x_2 = l_ReaderT_Monad___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___boxed), 7, 1); lean_closure_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3() { +lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4() { _start: { lean_object* x_1; @@ -3467,12 +3477,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getCur___at_Lean_P return x_1; } } -lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4() { +lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3; -x_2 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; +x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4; +x_2 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3; x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__4___rarg), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -3560,7 +3570,7 @@ else lean_object* x_29; lean_object* x_30; lean_dec(x_10); lean_dec(x_1); -x_29 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4; +x_29 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5; lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); @@ -7480,6 +7490,8 @@ l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3 = _init_l_Le lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3); l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4 = _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4); +l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5 = _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5(); +lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5); l_Lean_PrettyPrinter_Formatter_checkKind___lambda__1___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_checkKind___lambda__1___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_checkKind___lambda__1___closed__1); l_Lean_PrettyPrinter_Formatter_checkKind___lambda__1___closed__2 = _init_l_Lean_PrettyPrinter_Formatter_checkKind___lambda__1___closed__2(); diff --git a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c index b9badddb9a..401b5cb957 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c @@ -277,6 +277,7 @@ lean_object* l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parent lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__2___closed__6; @@ -307,7 +308,6 @@ lean_object* l_Lean_Syntax_Traverser_fromSyntax(lean_object*); lean_object* l_Lean_PrettyPrinter_mkCombinatorParenthesizerAttribute___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getHeadInfo___main(lean_object*); -extern lean_object* l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1; lean_object* l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__8___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_pushNone_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9; @@ -469,6 +469,7 @@ lean_object* l_Lean_PrettyPrinter_parenthesize___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Substring_splitOnAux___main___closed__2; +extern lean_object* l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_notFollowedBy_parenthesizer___rarg(lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -3799,7 +3800,7 @@ lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Parser_Extension_12__ParserAttribute_add___closed__1; +x_1 = l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } @@ -3807,6 +3808,15 @@ return x_2; lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__2() { _start: { +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__1; +x_2 = l_ReaderT_Monad___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__3() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); x_2 = l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__5; @@ -3814,7 +3824,7 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__3() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4() { _start: { lean_object* x_1; @@ -3822,37 +3832,37 @@ x_1 = lean_mk_string("parenthesize"); return x_1; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__1; -x_2 = l_PUnit_Inhabited; -x_3 = l_monadInhabited___rarg(x_1, x_2); +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__3; +x_2 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4; +x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__2; +x_2 = l_PUnit_Inhabited; +x_3 = l_monadInhabited___rarg(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7() { +_start: +{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; x_2 = lean_alloc_closure((void*)(l_ReaderT_inhabited___rarg___boxed), 2, 1); lean_closure_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8() { _start: { lean_object* x_1; @@ -3860,7 +3870,7 @@ x_1 = lean_mk_string("Lean.PrettyPrinter.Parenthesizer"); return x_1; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9() { _start: { lean_object* x_1; @@ -3868,19 +3878,19 @@ x_1 = lean_mk_string("maybeParenthesize: visited a syntax tree without precedenc return x_1; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; x_2 = lean_unsigned_to_nat(206u); x_3 = lean_unsigned_to_nat(4u); -x_4 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; +x_4 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); return x_5; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11() { _start: { lean_object* x_1; lean_object* x_2; @@ -3890,7 +3900,7 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12() { _start: { lean_object* x_1; lean_object* x_2; @@ -3949,7 +3959,7 @@ x_30 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_maybeParent lean_closure_set(x_30, 0, x_21); lean_closure_set(x_30, 1, x_11); lean_closure_set(x_30, 2, x_20); -x_31 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4; +x_31 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; x_32 = l_Lean_MonadTracer_trace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_31, x_30, x_5, x_6, x_7, x_8, x_29); x_33 = lean_ctor_get(x_32, 1); lean_inc(x_33); @@ -3985,8 +3995,8 @@ lean_dec(x_1); x_39 = lean_ctor_get(x_36, 1); lean_inc(x_39); lean_dec(x_36); -x_40 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_41 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9; +x_40 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7; +x_41 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; x_42 = lean_panic_fn(x_40, x_41); x_43 = lean_apply_5(x_42, x_5, x_6, x_7, x_8, x_39); return x_43; @@ -4526,7 +4536,7 @@ x_163 = lean_ctor_get(x_159, 2); lean_dec(x_163); x_164 = lean_ctor_get(x_159, 1); lean_dec(x_164); -x_165 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; +x_165 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; lean_ctor_set(x_159, 4, x_25); lean_ctor_set(x_159, 2, x_1); lean_ctor_set(x_159, 1, x_165); @@ -4546,7 +4556,7 @@ x_170 = lean_ctor_get_uint8(x_159, sizeof(void*)*5); lean_inc(x_169); lean_inc(x_168); lean_dec(x_159); -x_171 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; +x_171 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; x_172 = lean_alloc_ctor(0, 5, 1); lean_ctor_set(x_172, 0, x_168); lean_ctor_set(x_172, 1, x_171); @@ -4621,7 +4631,7 @@ if (x_192 == 0) lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; uint8_t x_197; x_193 = lean_ctor_get(x_186, 0); x_194 = lean_ctor_get(x_186, 1); -x_195 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +x_195 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_inc(x_194); lean_ctor_set(x_186, 0, x_195); x_196 = l_Lean_Syntax_setHeadInfo(x_180, x_186); @@ -4697,7 +4707,7 @@ lean_inc(x_222); lean_inc(x_221); lean_inc(x_220); lean_dec(x_186); -x_223 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +x_223 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_inc(x_221); x_224 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_224, 0, x_223); @@ -4806,7 +4816,7 @@ if (x_254 == 0) lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; uint8_t x_259; x_255 = lean_ctor_get(x_248, 0); x_256 = lean_ctor_get(x_248, 1); -x_257 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +x_257 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_inc(x_256); lean_ctor_set(x_248, 0, x_257); x_258 = l_Lean_Syntax_setHeadInfo(x_242, x_248); @@ -4882,7 +4892,7 @@ lean_inc(x_284); lean_inc(x_283); lean_inc(x_282); lean_dec(x_248); -x_285 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +x_285 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_inc(x_283); x_286 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_286, 0, x_285); @@ -5008,7 +5018,7 @@ x_325 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_maybeParen lean_closure_set(x_325, 0, x_315); lean_closure_set(x_325, 1, x_11); lean_closure_set(x_325, 2, x_314); -x_326 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4; +x_326 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; x_327 = l_Lean_MonadTracer_trace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_326, x_325, x_5, x_6, x_7, x_8, x_324); x_328 = lean_ctor_get(x_327, 1); lean_inc(x_328); @@ -5044,8 +5054,8 @@ lean_dec(x_1); x_334 = lean_ctor_get(x_331, 1); lean_inc(x_334); lean_dec(x_331); -x_335 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_336 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9; +x_335 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7; +x_336 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; x_337 = lean_panic_fn(x_335, x_336); x_338 = lean_apply_5(x_337, x_5, x_6, x_7, x_8, x_334); return x_338; @@ -5456,7 +5466,7 @@ if (lean_is_exclusive(x_411)) { lean_dec_ref(x_411); x_416 = lean_box(0); } -x_417 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; +x_417 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; if (lean_is_scalar(x_416)) { x_418 = lean_alloc_ctor(0, 5, 1); } else { @@ -5543,7 +5553,7 @@ if (lean_is_exclusive(x_432)) { lean_dec_ref(x_432); x_441 = lean_box(0); } -x_442 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +x_442 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_inc(x_439); if (lean_is_scalar(x_441)) { x_443 = lean_alloc_ctor(0, 3, 0); @@ -5664,7 +5674,7 @@ if (lean_is_exclusive(x_467)) { lean_dec_ref(x_467); x_476 = lean_box(0); } -x_477 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +x_477 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_inc(x_474); if (lean_is_scalar(x_476)) { x_478 = lean_alloc_ctor(0, 3, 0); @@ -7366,7 +7376,7 @@ lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___close _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; x_2 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -9335,7 +9345,7 @@ lean_object* l___private_Lean_PrettyPrinter_Parenthesizer_1__regTraceClasses(lea _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4; +x_2 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; x_3 = l_Lean_registerTraceClass(x_2, x_1); if (lean_obj_tag(x_3) == 0) { @@ -9609,6 +9619,8 @@ l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10 = _init_l_Lean lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10); l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11 = _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11); +l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12 = _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12); l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__1); l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__2();