diff --git a/stage0/src/Init/Lean/Elab/Frontend.lean b/stage0/src/Init/Lean/Elab/Frontend.lean
index fdc0fa6d15..a3ecc36393 100644
--- a/stage0/src/Init/Lean/Elab/Frontend.lean
+++ b/stage0/src/Init/Lean/Elab/Frontend.lean
@@ -15,7 +15,7 @@ structure Context :=
(commandStateRef : IO.Ref Command.State)
(parserStateRef : IO.Ref Parser.ModuleParserState)
(cmdPosRef : IO.Ref String.Pos)
-(parserCtx : Parser.ParserContextCore)
+(inputCtx : Parser.InputContext)
abbrev FrontendM := ReaderT Context (EIO Empty)
@@ -25,7 +25,7 @@ EIO.catchExceptions x (fun _ => unreachable!)
@[inline] def runCommandElabM (x : Command.CommandElabM Unit) : FrontendM Unit :=
fun ctx => do
cmdPos ← liftIOCore! $ ctx.cmdPosRef.get;
- let cmdCtx : Command.Context := { cmdPos := cmdPos, stateRef := ctx.commandStateRef, fileName := ctx.parserCtx.fileName, fileMap := ctx.parserCtx.fileMap };
+ let cmdCtx : Command.Context := { cmdPos := cmdPos, stateRef := ctx.commandStateRef, fileName := ctx.inputCtx.fileName, fileMap := ctx.inputCtx.fileMap };
EIO.catchExceptions (x cmdCtx) (fun _ => pure ())
def elabCommandAtFrontend (stx : Syntax) : FrontendM Unit :=
@@ -48,12 +48,15 @@ fun ctx => liftIOCore! $ ctx.parserStateRef.set ps
def setMessages (msgs : MessageLog) : FrontendM Unit :=
fun ctx => liftIOCore! $ ctx.commandStateRef.modify $ fun s => { messages := msgs, .. s }
+def getInputContext : FrontendM Parser.InputContext := do
+ctx ← read; pure ctx.inputCtx
+
def processCommand : FrontendM Bool := do
updateCmdPos;
-cs ← getCommandState;
-ps ← getParserState;
-c ← read;
-match Parser.parseCommand cs.env c.parserCtx ps cs.messages with
+cmdState ← getCommandState;
+parserState ← getParserState;
+inputCtx ← getInputContext;
+match Parser.parseCommand cmdState.env inputCtx parserState cmdState.messages with
| (cmd, ps, messages) => do
setParserState ps;
setMessages messages;
@@ -76,18 +79,18 @@ end Frontend
open Frontend
-def IO.processCommands (parserCtx : Parser.ParserContextCore) (parserStateRef : IO.Ref Parser.ModuleParserState) (cmdStateRef : IO.Ref Command.State) : IO Unit := do
+def IO.processCommands (inputCtx : Parser.InputContext) (parserStateRef : IO.Ref Parser.ModuleParserState) (cmdStateRef : IO.Ref Command.State) : IO Unit := do
ps ← parserStateRef.get;
cmdPosRef ← IO.mkRef ps.pos;
EIO.adaptExcept (fun (ex : Empty) => Empty.rec _ ex) $
- processCommands { commandStateRef := cmdStateRef, parserStateRef := parserStateRef, cmdPosRef := cmdPosRef, parserCtx := parserCtx }
+ processCommands { commandStateRef := cmdStateRef, parserStateRef := parserStateRef, cmdPosRef := cmdPosRef, inputCtx := inputCtx }
def process (input : String) (env : Environment) (opts : Options) (fileName : Option String := none) : IO (Environment × MessageLog) := do
let fileName := fileName.getD "";
-let parserCtx := Parser.mkParserContextCore env input fileName;
+let inputCtx := Parser.mkInputContext input fileName;
parserStateRef ← IO.mkRef { Parser.ModuleParserState . };
cmdStateRef ← IO.mkRef $ Command.mkState env {} opts;
-IO.processCommands parserCtx parserStateRef cmdStateRef;
+IO.processCommands inputCtx parserStateRef cmdStateRef;
cmdState ← cmdStateRef.get;
pure (cmdState.env, cmdState.messages)
@@ -98,13 +101,13 @@ pure (env, messages.toList)
def runFrontend (env : Environment) (input : String) (opts : Options := {}) (fileName : Option String := none) : IO (Environment × MessageLog) := do
let fileName := fileName.getD "";
-let parserCtx := Parser.mkParserContextCore env input fileName;
-match Parser.parseHeader env parserCtx with
+let inputCtx := Parser.mkInputContext input fileName;
+match Parser.parseHeader env inputCtx with
| (header, parserState, messages) => do
- (env, messages) ← processHeader header messages parserCtx;
+ (env, messages) ← processHeader header messages inputCtx;
parserStateRef ← IO.mkRef parserState;
cmdStateRef ← IO.mkRef $ Command.mkState env messages opts;
- IO.processCommands parserCtx parserStateRef cmdStateRef;
+ IO.processCommands inputCtx parserStateRef cmdStateRef;
cmdState ← cmdStateRef.get;
pure (cmdState.env, cmdState.messages)
diff --git a/stage0/src/Init/Lean/Elab/Import.lean b/stage0/src/Init/Lean/Elab/Import.lean
index 35ea571892..4d5ac679e0 100644
--- a/stage0/src/Init/Lean/Elab/Import.lean
+++ b/stage0/src/Init/Lean/Elab/Import.lean
@@ -18,23 +18,23 @@ imports ++ (header.getArg 1).getArgs.toList.map (fun stx =>
let id := stx.getIdAt 2;
{ module := normalizeModuleName id, runtimeOnly := runtime })
-def processHeader (header : Syntax) (messages : MessageLog) (ctx : Parser.ParserContextCore) (trustLevel : UInt32 := 0) : IO (Environment × MessageLog) :=
+def processHeader (header : Syntax) (messages : MessageLog) (inputCtx : Parser.InputContext) (trustLevel : UInt32 := 0) : IO (Environment × MessageLog) :=
catch
(do env ← importModules (headerToImports header) trustLevel;
pure (env, messages))
(fun e => do
env ← mkEmptyEnvironment;
let spos := header.getPos.getD 0;
- let pos := ctx.fileMap.toPosition spos;
- pure (env, messages.add { fileName := ctx.fileName, data := toString e, pos := pos }))
+ let pos := inputCtx.fileMap.toPosition spos;
+ pure (env, messages.add { fileName := inputCtx.fileName, data := toString e, pos := pos }))
def parseImports (input : String) (fileName : Option String := none) : IO (List Import × Position × MessageLog) := do
env ← mkEmptyEnvironment;
let fileName := fileName.getD "";
-let ctx := Parser.mkParserContextCore env input fileName;
-match Parser.parseHeader env ctx with
+let inputCtx := Parser.mkInputContext input fileName;
+match Parser.parseHeader env inputCtx with
| (header, parserState, messages) => do
- pure (headerToImports header, ctx.fileMap.toPosition parserState.pos, messages)
+ pure (headerToImports header, inputCtx.fileMap.toPosition parserState.pos, messages)
@[export lean_parse_imports]
def parseImportsExport (input : String) (fileName : Option String) : IO (List Import × Position × List Message) := do
diff --git a/stage0/src/Init/Lean/Elab/Quotation.lean b/stage0/src/Init/Lean/Elab/Quotation.lean
index 2a2a512f87..c6b7064477 100644
--- a/stage0/src/Init/Lean/Elab/Quotation.lean
+++ b/stage0/src/Init/Lean/Elab/Quotation.lean
@@ -412,8 +412,7 @@ private unsafe partial def toPreterm : Syntax → TermElabM Expr
@[export lean_parse_expr]
def oldParseExpr (env : Environment) (input : String) (pos : String.Pos) : Except String (Syntax × String.Pos) := do
-let c := Parser.mkParserContextCore env input "";
-let c := c.toParserContext env;
+let c := Parser.mkParserContext env (Parser.mkInputContext input "");
let s := Parser.mkParserState c.input;
let s := s.setPos pos;
let s := (Parser.termParser Parser.appPrec : Parser.Parser).fn Parser.appPrec c s;
diff --git a/stage0/src/Init/Lean/Elab/Term.lean b/stage0/src/Init/Lean/Elab/Term.lean
index 7d9510e6bb..108376f84e 100644
--- a/stage0/src/Init/Lean/Elab/Term.lean
+++ b/stage0/src/Init/Lean/Elab/Term.lean
@@ -756,15 +756,12 @@ match expectedType? with
| some expectedType =>
condM (isDefEq ref eType expectedType)
(pure e)
- (do -- TODO try `HasCoe`
- e ← instantiateMVars ref e;
- eType ← instantiateMVars ref eType;
- expectedType ← instantiateMVars ref expectedType;
- let msg : MessageData :=
- "type mismatch" ++ indentExpr e
- ++ Format.line ++ "has type" ++ indentExpr eType
- ++ Format.line ++ "but it is expected to have type" ++ indentExpr expectedType;
- throwError ref msg)
+ -- TODO try `HasCoe`
+ (let msg : MessageData :=
+ "type mismatch" ++ indentExpr e
+ ++ Format.line ++ "has type" ++ indentExpr eType
+ ++ Format.line ++ "but it is expected to have type" ++ indentExpr expectedType;
+ throwError ref msg)
def mkInstMVar (ref : Syntax) (type : Expr) : TermElabM Expr := do
mvar ← mkFreshExprMVar ref type MetavarKind.synthetic;
diff --git a/stage0/src/Init/Lean/Parser/Module.lean b/stage0/src/Init/Lean/Parser/Module.lean
index f9dda147bd..f958cc8302 100644
--- a/stage0/src/Init/Lean/Parser/Module.lean
+++ b/stage0/src/Init/Lean/Parser/Module.lean
@@ -34,16 +34,16 @@ private def mkErrorMessage (c : ParserContext) (pos : String.Pos) (errorMsg : St
let pos := c.fileMap.toPosition pos;
{ fileName := c.fileName, pos := pos, data := errorMsg }
-def parseHeader (env : Environment) (c : ParserContextCore) : Syntax × ModuleParserState × MessageLog :=
-let c := c.toParserContext env;
-let c := Module.updateTokens c;
-let s := mkParserState c.input;
-let s := whitespace c s;
-let s := Module.header.fn (0:Nat) c s;
+def parseHeader (env : Environment) (inputCtx : InputContext) : Syntax × ModuleParserState × MessageLog :=
+let ctx := mkParserContext env inputCtx;
+let ctx := Module.updateTokens ctx;
+let s := mkParserState ctx.input;
+let s := whitespace ctx s;
+let s := Module.header.fn (0:Nat) ctx s;
let stx := s.stxStack.back;
match s.errorMsg with
| some errorMsg =>
- let msg := mkErrorMessage c s.pos (toString errorMsg);
+ let msg := mkErrorMessage ctx s.pos (toString errorMsg);
(stx, { pos := s.pos, recovering := true }, { MessageLog . }.add msg)
| none =>
(stx, { pos := s.pos }, {})
@@ -65,12 +65,12 @@ match s.errorMsg with
| some _ => pos + 1
| none => s.pos
-partial def parseCommand (env : Environment) (c : ParserContextCore) : ModuleParserState → MessageLog → Syntax × ModuleParserState × MessageLog
+partial def parseCommand (env : Environment) (inputCtx : InputContext) : ModuleParserState → MessageLog → Syntax × ModuleParserState × MessageLog
| s@{ pos := pos, recovering := recovering }, messages =>
- if c.input.atEnd pos then
+ if inputCtx.input.atEnd pos then
(mkEOI pos, s, messages)
else
- let c := c.toParserContext env;
+ let c := mkParserContext env inputCtx;
let s := { ParserState . cache := initCacheForInput c.input, pos := pos };
let s := whitespace c s;
let s := (commandParser : Parser).fn (0:Nat) c s;
@@ -86,9 +86,9 @@ partial def parseCommand (env : Environment) (c : ParserContextCore) : ModulePar
let messages := messages.add msg;
parseCommand { pos := consumeInput c s.pos, recovering := true } messages
-private partial def testModuleParserAux (env : Environment) (c : ParserContextCore) (displayStx : Bool) : ModuleParserState → MessageLog → IO Bool
+private partial def testModuleParserAux (env : Environment) (inputCtx : InputContext) (displayStx : Bool) : ModuleParserState → MessageLog → IO Bool
| s, messages =>
- match parseCommand env c s messages with
+ match parseCommand env inputCtx s messages with
| (stx, s, messages) =>
if isEOI stx || isExitCommand stx then do
messages.forM $ fun msg => IO.println msg;
@@ -100,14 +100,14 @@ private partial def testModuleParserAux (env : Environment) (c : ParserContextCo
@[export lean_test_module_parser]
def testModuleParser (env : Environment) (input : String) (fileName := "") (displayStx := false) : IO Bool :=
timeit (fileName ++ " parser") $ do
- let ctx := mkParserContextCore env input fileName;
- let (stx, s, messages) := parseHeader env ctx;
+ let inputCtx := mkInputContext input fileName;
+ let (stx, s, messages) := parseHeader env inputCtx;
when displayStx (IO.println stx);
- testModuleParserAux env ctx displayStx s messages
+ testModuleParserAux env inputCtx displayStx s messages
-partial def parseFileAux (env : Environment) (ctx : ParserContextCore) : ModuleParserState → MessageLog → Array Syntax → IO Syntax
+partial def parseFileAux (env : Environment) (inputCtx : InputContext) : ModuleParserState → MessageLog → Array Syntax → IO Syntax
| state, msgs, stxs =>
- match parseCommand env ctx state msgs with
+ match parseCommand env inputCtx state msgs with
| (stx, state, msgs) =>
if isEOI stx then
if msgs.isEmpty then
@@ -122,9 +122,9 @@ partial def parseFileAux (env : Environment) (ctx : ParserContextCore) : ModuleP
def parseFile (env : Environment) (fname : String) : IO Syntax := do
fname ← IO.realPath fname;
contents ← IO.readTextFile fname;
-let ctx := mkParserContextCore env contents fname;
-let (stx, state, messages) := parseHeader env ctx;
-parseFileAux env ctx state messages #[stx]
+let inputCtx := mkInputContext contents fname;
+let (stx, state, messages) := parseHeader env inputCtx;
+parseFileAux env inputCtx state messages #[stx]
end Parser
end Lean
diff --git a/stage0/src/Init/Lean/Parser/Parser.lean b/stage0/src/Init/Lean/Parser/Parser.lean
index f359c070c3..b35b0bd29c 100644
--- a/stage0/src/Init/Lean/Parser/Parser.lean
+++ b/stage0/src/Init/Lean/Parser/Parser.lean
@@ -73,17 +73,20 @@ abbrev SyntaxNodeKindSet := PersistentHashMap SyntaxNodeKind Unit
def SyntaxNodeKindSet.insert (s : SyntaxNodeKindSet) (k : SyntaxNodeKind) : SyntaxNodeKindSet :=
s.insert k ()
-structure ParserContextCore :=
+/-
+ Input string and related data. Recall that the `FileMap` is a helper structure for mapping
+ `String.Pos` in the input string to line/column information. -/
+structure InputContext :=
(input : String)
(fileName : String)
(fileMap : FileMap)
-(tokens : TokenTable)
-instance ParserContextCore.inhabited : Inhabited ParserContextCore :=
-⟨{ input := "", fileName := "", fileMap := arbitrary _, tokens := {} }⟩
+instance InputContext.inhabited : Inhabited InputContext :=
+⟨{ input := "", fileName := "", fileMap := arbitrary _ }⟩
-structure ParserContext extends ParserContextCore :=
+structure ParserContext extends InputContext :=
(env : Environment)
+(tokens : TokenTable)
structure Error :=
(unexpected : String := "")
@@ -1420,23 +1423,24 @@ def getSyntaxNodeKinds (env : Environment) : List SyntaxNodeKind := do
let s := syntaxNodeKindExtension.getState env;
s.2.foldl (fun ks k _ => k::ks) []
-def mkParserContextCore (env : Environment) (input : String) (fileName : String) : ParserContextCore :=
+def getTokenTable (env : Environment) : TokenTable :=
+(tokenTableAttribute.ext.getState env).2
+
+def mkInputContext (input : String) (fileName : String) : InputContext :=
{ input := input,
fileName := fileName,
- fileMap := input.toFileMap,
- tokens := (tokenTableAttribute.ext.getState env).2 }
+ fileMap := input.toFileMap }
-@[inline] def ParserContextCore.toParserContext (env : Environment) (ctx : ParserContextCore) : ParserContext :=
-{ env := env, toParserContextCore := ctx }
-
-def mkParserContext (env : Environment) (input : String) (fileName : String) : ParserContext :=
-(mkParserContextCore env input fileName).toParserContext env
+def mkParserContext (env : Environment) (ctx : InputContext) : ParserContext :=
+{ toInputContext := ctx,
+ env := env,
+ tokens := getTokenTable env }
def mkParserState (input : String) : ParserState :=
{ cache := initCacheForInput input }
def runParser (env : Environment) (tables : ParsingTables) (input : String) (fileName := "") (kind := "") : Except String Syntax :=
-let c := mkParserContext env input fileName;
+let c := mkParserContext env (mkInputContext input fileName);
let s := mkParserState input;
let s := whitespace c s;
let s := prattParser kind tables (0 : Nat) c s;
diff --git a/stage0/src/Init/Lean/Syntax.lean b/stage0/src/Init/Lean/Syntax.lean
index 36cb3a89fa..3686318918 100644
--- a/stage0/src/Init/Lean/Syntax.lean
+++ b/stage0/src/Init/Lean/Syntax.lean
@@ -370,7 +370,7 @@ let atom : Syntax := Syntax.atom info val;
Syntax.node kind #[atom]
def mkStxStrLit (val : String) (info : Option SourceInfo := none) : Syntax :=
-mkStxLit strLitKind val info
+mkStxLit strLitKind (repr val) info
def mkStxNumLit (val : String) (info : Option SourceInfo := none) : Syntax :=
mkStxLit numLitKind val info
@@ -385,34 +385,14 @@ mkStxNumLit (toString val)
namespace Syntax
-def isStrLit? : Syntax → Option String
-| Syntax.node k args =>
- if k == strLitKind && args.size == 1 then
- match args.get! 0 with
- | (Syntax.atom _ val) => some val
- | _ => none
- else
- none
-| _ => none
-
-def isCharLit? : Syntax → Option Char
-| Syntax.node k args =>
- if k == charLitKind && args.size == 1 then
- match args.get! 0 with
- | (Syntax.atom _ val) => some (val.get 1)
- | _ => none
- else
- none
-| _ => none
-
-/- Recall that we don't have special Syntax constructors for storing numeric atoms.
+/- Recall that we don't have special Syntax constructors for storing numeric and string atoms.
The idea is to have an extensible approach where embedded DSLs may have new kind of atoms and/or
different ways of representing them. So, our atoms contain just the parsed string.
The main Lean parser uses the kind `numLitKind` for storing natural numbers that can be encoded
in binary, octal, decimal and hexadecimal format. `isNatLit` implements a "decoder"
for Syntax objects representing these numerals. -/
-private partial def decodeBinLitAux (s : String) : Nat → Nat → Option Nat
+private partial def decodeBinLitAux (s : String) : String.Pos → Nat → Option Nat
| i, val =>
if s.atEnd i then some val
else
@@ -421,7 +401,7 @@ private partial def decodeBinLitAux (s : String) : Nat → Nat → Option Nat
else if c == '1' then decodeBinLitAux (s.next i) (2*val + 1)
else none
-private partial def decodeOctalLitAux (s : String) : Nat → Nat → Option Nat
+private partial def decodeOctalLitAux (s : String) : String.Pos → Nat → Option Nat
| i, val =>
if s.atEnd i then some val
else
@@ -429,17 +409,22 @@ private partial def decodeOctalLitAux (s : String) : Nat → Nat → Option Nat
if '0' ≤ c && c ≤ '7' then decodeOctalLitAux (s.next i) (8*val + c.toNat - '0'.toNat)
else none
-private partial def decodeHexLitAux (s : String) : Nat → Nat → Option Nat
+private def decodeHexDigit (s : String) (i : String.Pos) : Option (Nat × String.Pos) :=
+let c := s.get i;
+let i := s.next i;
+if '0' ≤ c && c ≤ '9' then some (c.toNat - '0'.toNat, i)
+else if 'a' ≤ c && c ≤ 'f' then some (10 + c.toNat - 'a'.toNat, i)
+else if 'A' ≤ c && c ≤ 'F' then some (10 + c.toNat - 'A'.toNat, i)
+else none
+
+private partial def decodeHexLitAux (s : String) : String.Pos → Nat → Option Nat
| i, val =>
if s.atEnd i then some val
- else
- let c := s.get i;
- if '0' ≤ c && c ≤ '9' then decodeHexLitAux (s.next i) (16*val + c.toNat - '0'.toNat)
- else if 'a' ≤ c && c ≤ 'f' then decodeHexLitAux (s.next i) (16*val + 10 + c.toNat - 'a'.toNat)
- else if 'A' ≤ c && c ≤ 'F' then decodeHexLitAux (s.next i) (16*val + 10 + c.toNat - 'A'.toNat)
- else none
+ else match decodeHexDigit s i with
+ | some (d, i) => decodeHexLitAux i (16*val + d)
+ | none => none
-private partial def decodeDecimalLitAux (s : String) : Nat → Nat → Option Nat
+private partial def decodeDecimalLitAux (s : String) : String.Pos → Nat → Option Nat
| i, val =>
if s.atEnd i then some val
else
@@ -490,6 +475,70 @@ match stx.isNatLit? with
| some val => val
| none => 0
+private def decodeQuotedChar (s : String) (i : String.Pos) : Option (Char × String.Pos) :=
+let c := s.get i;
+let i := s.next i;
+if c == '\\' then pure ('\\', i)
+else if c = '\"' then pure ('\"', i)
+else if c = '\'' then pure ('\'', i)
+else if c = 'n' then pure ('\n', i)
+else if c = 't' then pure ('\t', i)
+else if c = 'x' then do
+ (d₁, i) ← decodeHexDigit s i;
+ (d₂, i) ← decodeHexDigit s i;
+ pure (Char.ofNat (16*d₁ + d₂), i)
+else if c = 'u' then do
+ (d₁, i) ← decodeHexDigit s i;
+ (d₂, i) ← decodeHexDigit s i;
+ (d₃, i) ← decodeHexDigit s i;
+ (d₄, i) ← decodeHexDigit s i;
+ pure $ (Char.ofNat (16*(16*(16*d₁ + d₂) + d₃) + d₄), i)
+else
+ none
+
+partial def decodeStrLitAux (s : String) : String.Pos → String → Option String
+| i, acc => do
+ let c := s.get i;
+ let i := s.next i;
+ if c == '\"' then
+ pure acc
+ else if c == '\\' then do
+ (c, i) ← decodeQuotedChar s i;
+ decodeStrLitAux i (acc.push c)
+ else
+ decodeStrLitAux i (acc.push c)
+
+def decodeStrLit (s : String) : Option String :=
+decodeStrLitAux s 1 ""
+
+def isStrLit? : Syntax → Option String
+| Syntax.node k args =>
+ if k == strLitKind && args.size == 1 then
+ match args.get! 0 with
+ | (Syntax.atom _ val) => decodeStrLit val
+ | _ => none
+ else
+ none
+| _ => none
+
+def decodeCharLit (s : String) : Option Char :=
+let c := s.get 1;
+if c == '\\' then do
+ (c, _) ← decodeQuotedChar s 2;
+ pure c
+else
+ pure c
+
+def isCharLit? : Syntax → Option Char
+| Syntax.node k args =>
+ if k == charLitKind && args.size == 1 then
+ match args.get! 0 with
+ | (Syntax.atom _ val) => decodeCharLit val
+ | _ => none
+ else
+ none
+| _ => none
+
end Syntax
/-- Create an identifier using `SourceInfo` from `src` -/
diff --git a/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c b/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c
index 5ff651b88f..7e28cc7396 100644
--- a/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c
+++ b/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c
@@ -234,7 +234,6 @@ extern lean_object* l_Lean_Parser_Term_ne___elambda__1___closed__2;
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLE(lean_object*);
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__3;
lean_object* l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__36;
-extern lean_object* l_Lean_strLitKind;
lean_object* l_Lean_Elab_Term_elabMapConst(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Term_elabSubtype___lambda__1___closed__12;
extern lean_object* l_Lean_Parser_Term_mul___elambda__1___closed__2;
@@ -483,6 +482,7 @@ extern lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__4;
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__1;
lean_object* l_Lean_Elab_Term_elabAnoymousCtor___closed__6;
lean_object* l_Lean_Elab_Term_adaptExpander(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_mkStxStrLit(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Term_elabInfix___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Term_ElabFComp___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_Term_mapConst___elambda__1___closed__1;
@@ -542,7 +542,6 @@ lean_object* l_Lean_Elab_Term_elabseqRight___boxed(lean_object*, lean_object*, l
extern lean_object* l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNe(lean_object*);
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__1;
-lean_object* l_Lean_mkStxLit(lean_object*, lean_object*, lean_object*);
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__2;
lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*);
lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__1;
@@ -4385,7 +4384,7 @@ lean_inc(x_21);
lean_dec(x_17);
if (lean_obj_tag(x_21) == 1)
{
-lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; uint8_t x_33;
+lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32;
lean_dec(x_1);
x_22 = lean_ctor_get(x_16, 1);
lean_inc(x_22);
@@ -4394,355 +4393,354 @@ x_23 = lean_ctor_get(x_21, 1);
lean_inc(x_23);
x_24 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main(x_21);
x_25 = lean_box(0);
-x_26 = l_Lean_strLitKind;
-x_27 = l_Lean_mkStxLit(x_26, x_23, x_25);
-x_28 = l_Lean_mkOptionalNode___closed__1;
-x_29 = lean_array_push(x_28, x_27);
-x_30 = l_Lean_Parser_Term_str___elambda__1___closed__2;
-x_31 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_31, 0, x_30);
-lean_ctor_set(x_31, 1, x_29);
-x_32 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_22);
+x_26 = l_Lean_mkStxStrLit(x_23, x_25);
+x_27 = l_Lean_mkOptionalNode___closed__1;
+x_28 = lean_array_push(x_27, x_26);
+x_29 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_30 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_30, 0, x_29);
+lean_ctor_set(x_30, 1, x_28);
+x_31 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_22);
lean_dec(x_2);
-x_33 = !lean_is_exclusive(x_32);
-if (x_33 == 0)
+x_32 = !lean_is_exclusive(x_31);
+if (x_32 == 0)
{
-lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; 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; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124;
-x_34 = lean_ctor_get(x_32, 0);
-x_35 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__13;
-lean_inc(x_34);
-x_36 = lean_name_mk_numeral(x_35, x_34);
-x_37 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__10;
-x_38 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__15;
-x_39 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_39, 0, x_25);
-lean_ctor_set(x_39, 1, x_37);
-lean_ctor_set(x_39, 2, x_36);
-lean_ctor_set(x_39, 3, x_38);
-x_40 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
-x_41 = lean_array_push(x_40, x_39);
-x_42 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
-x_43 = lean_array_push(x_41, x_42);
-x_44 = l_Lean_Parser_Term_id___elambda__1___closed__2;
-x_45 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_45, 0, x_44);
-lean_ctor_set(x_45, 1, x_43);
-x_46 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__20;
-lean_inc(x_34);
-x_47 = lean_name_mk_numeral(x_46, x_34);
-x_48 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__18;
-x_49 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__22;
-x_50 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_50, 0, x_25);
-lean_ctor_set(x_50, 1, x_48);
-lean_ctor_set(x_50, 2, x_47);
-lean_ctor_set(x_50, 3, x_49);
-x_51 = lean_array_push(x_40, x_50);
-x_52 = lean_array_push(x_51, x_42);
-x_53 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_53, 0, x_44);
-lean_ctor_set(x_53, 1, x_52);
-x_54 = lean_array_push(x_40, x_53);
-x_55 = lean_array_push(x_54, x_31);
-x_56 = l_Lean_Parser_Term_app___elambda__1___closed__2;
-x_57 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_57, 0, x_56);
-lean_ctor_set(x_57, 1, x_55);
-x_58 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__26;
-lean_inc(x_34);
-x_59 = lean_name_mk_numeral(x_58, x_34);
-x_60 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__25;
-x_61 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__29;
-x_62 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_62, 0, x_25);
-lean_ctor_set(x_62, 1, x_60);
-lean_ctor_set(x_62, 2, x_59);
-lean_ctor_set(x_62, 3, x_61);
-x_63 = lean_array_push(x_40, x_62);
-x_64 = lean_array_push(x_63, x_42);
-x_65 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_65, 0, x_44);
-lean_ctor_set(x_65, 1, x_64);
-x_66 = lean_array_push(x_40, x_65);
+lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; 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; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123;
+x_33 = lean_ctor_get(x_31, 0);
+x_34 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__13;
+lean_inc(x_33);
+x_35 = lean_name_mk_numeral(x_34, x_33);
+x_36 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__10;
+x_37 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__15;
+x_38 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_38, 0, x_25);
+lean_ctor_set(x_38, 1, x_36);
+lean_ctor_set(x_38, 2, x_35);
+lean_ctor_set(x_38, 3, x_37);
+x_39 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
+x_40 = lean_array_push(x_39, x_38);
+x_41 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
+x_42 = lean_array_push(x_40, x_41);
+x_43 = l_Lean_Parser_Term_id___elambda__1___closed__2;
+x_44 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_44, 0, x_43);
+lean_ctor_set(x_44, 1, x_42);
+x_45 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__20;
+lean_inc(x_33);
+x_46 = lean_name_mk_numeral(x_45, x_33);
+x_47 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__18;
+x_48 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__22;
+x_49 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_49, 0, x_25);
+lean_ctor_set(x_49, 1, x_47);
+lean_ctor_set(x_49, 2, x_46);
+lean_ctor_set(x_49, 3, x_48);
+x_50 = lean_array_push(x_39, x_49);
+x_51 = lean_array_push(x_50, x_41);
+x_52 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_52, 0, x_43);
+lean_ctor_set(x_52, 1, x_51);
+x_53 = lean_array_push(x_39, x_52);
+x_54 = lean_array_push(x_53, x_30);
+x_55 = l_Lean_Parser_Term_app___elambda__1___closed__2;
+x_56 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_56, 0, x_55);
+lean_ctor_set(x_56, 1, x_54);
+x_57 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__26;
+lean_inc(x_33);
+x_58 = lean_name_mk_numeral(x_57, x_33);
+x_59 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__25;
+x_60 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__29;
+x_61 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_61, 0, x_25);
+lean_ctor_set(x_61, 1, x_59);
+lean_ctor_set(x_61, 2, x_58);
+lean_ctor_set(x_61, 3, x_60);
+x_62 = lean_array_push(x_39, x_61);
+x_63 = lean_array_push(x_62, x_41);
+x_64 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_64, 0, x_43);
+lean_ctor_set(x_64, 1, x_63);
+x_65 = lean_array_push(x_39, x_64);
lean_inc(x_24);
-x_67 = lean_array_push(x_66, x_24);
-x_68 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_68, 0, x_56);
-lean_ctor_set(x_68, 1, x_67);
-x_69 = lean_array_push(x_40, x_68);
-x_70 = lean_array_push(x_69, x_42);
-x_71 = l_Lean_nullKind___closed__2;
-x_72 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_72, 0, x_71);
-lean_ctor_set(x_72, 1, x_70);
-x_73 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
-x_74 = lean_array_push(x_73, x_72);
-x_75 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
-x_76 = lean_array_push(x_74, x_75);
-x_77 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
-x_78 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_78, 0, x_77);
-lean_ctor_set(x_78, 1, x_76);
-x_79 = lean_array_push(x_40, x_57);
-x_80 = lean_array_push(x_79, x_78);
-x_81 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_81, 0, x_56);
-lean_ctor_set(x_81, 1, x_80);
-x_82 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__32;
-lean_inc(x_34);
-x_83 = lean_name_mk_numeral(x_82, x_34);
-x_84 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__31;
-x_85 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__34;
-x_86 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_86, 0, x_25);
-lean_ctor_set(x_86, 1, x_84);
-lean_ctor_set(x_86, 2, x_83);
-lean_ctor_set(x_86, 3, x_85);
-x_87 = lean_array_push(x_40, x_86);
-x_88 = lean_array_push(x_87, x_42);
-x_89 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_89, 0, x_44);
-lean_ctor_set(x_89, 1, x_88);
-x_90 = lean_array_push(x_40, x_81);
-x_91 = lean_array_push(x_90, x_89);
-x_92 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_92, 0, x_56);
-lean_ctor_set(x_92, 1, x_91);
-x_93 = lean_array_push(x_40, x_92);
-x_94 = lean_array_push(x_93, x_42);
-x_95 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_95, 0, x_71);
-lean_ctor_set(x_95, 1, x_94);
-x_96 = lean_array_push(x_73, x_95);
-x_97 = lean_array_push(x_96, x_75);
-x_98 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_98, 0, x_77);
-lean_ctor_set(x_98, 1, x_97);
-x_99 = lean_array_push(x_40, x_45);
-x_100 = lean_array_push(x_99, x_98);
-x_101 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_101, 0, x_56);
-lean_ctor_set(x_101, 1, x_100);
-x_102 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__39;
-x_103 = lean_name_mk_numeral(x_102, x_34);
-x_104 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__37;
-x_105 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__41;
-x_106 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_106, 0, x_25);
-lean_ctor_set(x_106, 1, x_104);
-lean_ctor_set(x_106, 2, x_103);
-lean_ctor_set(x_106, 3, x_105);
-x_107 = lean_array_push(x_40, x_106);
-x_108 = lean_array_push(x_107, x_42);
-x_109 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_109, 0, x_44);
-lean_ctor_set(x_109, 1, x_108);
-x_110 = lean_array_push(x_40, x_109);
-x_111 = lean_array_push(x_110, x_24);
-x_112 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_112, 0, x_56);
-lean_ctor_set(x_112, 1, x_111);
-x_113 = lean_array_push(x_40, x_112);
-x_114 = lean_array_push(x_113, x_15);
-x_115 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_115, 0, x_56);
-lean_ctor_set(x_115, 1, x_114);
-x_116 = lean_array_push(x_40, x_115);
-x_117 = lean_array_push(x_116, x_42);
-x_118 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_118, 0, x_71);
-lean_ctor_set(x_118, 1, x_117);
-x_119 = lean_array_push(x_73, x_118);
-x_120 = lean_array_push(x_119, x_75);
-x_121 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_121, 0, x_77);
-lean_ctor_set(x_121, 1, x_120);
-x_122 = lean_array_push(x_40, x_101);
-x_123 = lean_array_push(x_122, x_121);
-x_124 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_124, 0, x_56);
-lean_ctor_set(x_124, 1, x_123);
-lean_ctor_set(x_32, 0, x_124);
-return x_32;
+x_66 = lean_array_push(x_65, x_24);
+x_67 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_67, 0, x_55);
+lean_ctor_set(x_67, 1, x_66);
+x_68 = lean_array_push(x_39, x_67);
+x_69 = lean_array_push(x_68, x_41);
+x_70 = l_Lean_nullKind___closed__2;
+x_71 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_71, 0, x_70);
+lean_ctor_set(x_71, 1, x_69);
+x_72 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
+x_73 = lean_array_push(x_72, x_71);
+x_74 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
+x_75 = lean_array_push(x_73, x_74);
+x_76 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
+x_77 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_77, 0, x_76);
+lean_ctor_set(x_77, 1, x_75);
+x_78 = lean_array_push(x_39, x_56);
+x_79 = lean_array_push(x_78, x_77);
+x_80 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_80, 0, x_55);
+lean_ctor_set(x_80, 1, x_79);
+x_81 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__32;
+lean_inc(x_33);
+x_82 = lean_name_mk_numeral(x_81, x_33);
+x_83 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__31;
+x_84 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__34;
+x_85 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_85, 0, x_25);
+lean_ctor_set(x_85, 1, x_83);
+lean_ctor_set(x_85, 2, x_82);
+lean_ctor_set(x_85, 3, x_84);
+x_86 = lean_array_push(x_39, x_85);
+x_87 = lean_array_push(x_86, x_41);
+x_88 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_88, 0, x_43);
+lean_ctor_set(x_88, 1, x_87);
+x_89 = lean_array_push(x_39, x_80);
+x_90 = lean_array_push(x_89, x_88);
+x_91 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_91, 0, x_55);
+lean_ctor_set(x_91, 1, x_90);
+x_92 = lean_array_push(x_39, x_91);
+x_93 = lean_array_push(x_92, x_41);
+x_94 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_94, 0, x_70);
+lean_ctor_set(x_94, 1, x_93);
+x_95 = lean_array_push(x_72, x_94);
+x_96 = lean_array_push(x_95, x_74);
+x_97 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_97, 0, x_76);
+lean_ctor_set(x_97, 1, x_96);
+x_98 = lean_array_push(x_39, x_44);
+x_99 = lean_array_push(x_98, x_97);
+x_100 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_100, 0, x_55);
+lean_ctor_set(x_100, 1, x_99);
+x_101 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__39;
+x_102 = lean_name_mk_numeral(x_101, x_33);
+x_103 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__37;
+x_104 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__41;
+x_105 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_105, 0, x_25);
+lean_ctor_set(x_105, 1, x_103);
+lean_ctor_set(x_105, 2, x_102);
+lean_ctor_set(x_105, 3, x_104);
+x_106 = lean_array_push(x_39, x_105);
+x_107 = lean_array_push(x_106, x_41);
+x_108 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_108, 0, x_43);
+lean_ctor_set(x_108, 1, x_107);
+x_109 = lean_array_push(x_39, x_108);
+x_110 = lean_array_push(x_109, x_24);
+x_111 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_111, 0, x_55);
+lean_ctor_set(x_111, 1, x_110);
+x_112 = lean_array_push(x_39, x_111);
+x_113 = lean_array_push(x_112, x_15);
+x_114 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_114, 0, x_55);
+lean_ctor_set(x_114, 1, x_113);
+x_115 = lean_array_push(x_39, x_114);
+x_116 = lean_array_push(x_115, x_41);
+x_117 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_117, 0, x_70);
+lean_ctor_set(x_117, 1, x_116);
+x_118 = lean_array_push(x_72, x_117);
+x_119 = lean_array_push(x_118, x_74);
+x_120 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_120, 0, x_76);
+lean_ctor_set(x_120, 1, x_119);
+x_121 = lean_array_push(x_39, x_100);
+x_122 = lean_array_push(x_121, x_120);
+x_123 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_123, 0, x_55);
+lean_ctor_set(x_123, 1, x_122);
+lean_ctor_set(x_31, 0, x_123);
+return x_31;
}
else
{
-lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; 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; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217;
-x_125 = lean_ctor_get(x_32, 0);
-x_126 = lean_ctor_get(x_32, 1);
-lean_inc(x_126);
+lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; 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; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216;
+x_124 = lean_ctor_get(x_31, 0);
+x_125 = lean_ctor_get(x_31, 1);
lean_inc(x_125);
-lean_dec(x_32);
-x_127 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__13;
-lean_inc(x_125);
-x_128 = lean_name_mk_numeral(x_127, x_125);
-x_129 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__10;
-x_130 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__15;
-x_131 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_131, 0, x_25);
-lean_ctor_set(x_131, 1, x_129);
-lean_ctor_set(x_131, 2, x_128);
-lean_ctor_set(x_131, 3, x_130);
-x_132 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
-x_133 = lean_array_push(x_132, x_131);
-x_134 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
-x_135 = lean_array_push(x_133, x_134);
-x_136 = l_Lean_Parser_Term_id___elambda__1___closed__2;
-x_137 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_137, 0, x_136);
-lean_ctor_set(x_137, 1, x_135);
-x_138 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__20;
-lean_inc(x_125);
-x_139 = lean_name_mk_numeral(x_138, x_125);
-x_140 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__18;
-x_141 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__22;
-x_142 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_142, 0, x_25);
-lean_ctor_set(x_142, 1, x_140);
-lean_ctor_set(x_142, 2, x_139);
-lean_ctor_set(x_142, 3, x_141);
-x_143 = lean_array_push(x_132, x_142);
-x_144 = lean_array_push(x_143, x_134);
-x_145 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_145, 0, x_136);
-lean_ctor_set(x_145, 1, x_144);
-x_146 = lean_array_push(x_132, x_145);
-x_147 = lean_array_push(x_146, x_31);
-x_148 = l_Lean_Parser_Term_app___elambda__1___closed__2;
-x_149 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_149, 0, x_148);
-lean_ctor_set(x_149, 1, x_147);
-x_150 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__26;
-lean_inc(x_125);
-x_151 = lean_name_mk_numeral(x_150, x_125);
-x_152 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__25;
-x_153 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__29;
-x_154 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_154, 0, x_25);
-lean_ctor_set(x_154, 1, x_152);
-lean_ctor_set(x_154, 2, x_151);
-lean_ctor_set(x_154, 3, x_153);
-x_155 = lean_array_push(x_132, x_154);
-x_156 = lean_array_push(x_155, x_134);
-x_157 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_157, 0, x_136);
-lean_ctor_set(x_157, 1, x_156);
-x_158 = lean_array_push(x_132, x_157);
+lean_inc(x_124);
+lean_dec(x_31);
+x_126 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__13;
+lean_inc(x_124);
+x_127 = lean_name_mk_numeral(x_126, x_124);
+x_128 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__10;
+x_129 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__15;
+x_130 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_130, 0, x_25);
+lean_ctor_set(x_130, 1, x_128);
+lean_ctor_set(x_130, 2, x_127);
+lean_ctor_set(x_130, 3, x_129);
+x_131 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
+x_132 = lean_array_push(x_131, x_130);
+x_133 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
+x_134 = lean_array_push(x_132, x_133);
+x_135 = l_Lean_Parser_Term_id___elambda__1___closed__2;
+x_136 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_136, 0, x_135);
+lean_ctor_set(x_136, 1, x_134);
+x_137 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__20;
+lean_inc(x_124);
+x_138 = lean_name_mk_numeral(x_137, x_124);
+x_139 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__18;
+x_140 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__22;
+x_141 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_141, 0, x_25);
+lean_ctor_set(x_141, 1, x_139);
+lean_ctor_set(x_141, 2, x_138);
+lean_ctor_set(x_141, 3, x_140);
+x_142 = lean_array_push(x_131, x_141);
+x_143 = lean_array_push(x_142, x_133);
+x_144 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_144, 0, x_135);
+lean_ctor_set(x_144, 1, x_143);
+x_145 = lean_array_push(x_131, x_144);
+x_146 = lean_array_push(x_145, x_30);
+x_147 = l_Lean_Parser_Term_app___elambda__1___closed__2;
+x_148 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_148, 0, x_147);
+lean_ctor_set(x_148, 1, x_146);
+x_149 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__26;
+lean_inc(x_124);
+x_150 = lean_name_mk_numeral(x_149, x_124);
+x_151 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__25;
+x_152 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__29;
+x_153 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_153, 0, x_25);
+lean_ctor_set(x_153, 1, x_151);
+lean_ctor_set(x_153, 2, x_150);
+lean_ctor_set(x_153, 3, x_152);
+x_154 = lean_array_push(x_131, x_153);
+x_155 = lean_array_push(x_154, x_133);
+x_156 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_156, 0, x_135);
+lean_ctor_set(x_156, 1, x_155);
+x_157 = lean_array_push(x_131, x_156);
lean_inc(x_24);
-x_159 = lean_array_push(x_158, x_24);
-x_160 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_160, 0, x_148);
-lean_ctor_set(x_160, 1, x_159);
-x_161 = lean_array_push(x_132, x_160);
-x_162 = lean_array_push(x_161, x_134);
-x_163 = l_Lean_nullKind___closed__2;
-x_164 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_164, 0, x_163);
-lean_ctor_set(x_164, 1, x_162);
-x_165 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
-x_166 = lean_array_push(x_165, x_164);
-x_167 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
-x_168 = lean_array_push(x_166, x_167);
-x_169 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
-x_170 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_170, 0, x_169);
-lean_ctor_set(x_170, 1, x_168);
-x_171 = lean_array_push(x_132, x_149);
-x_172 = lean_array_push(x_171, x_170);
-x_173 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_173, 0, x_148);
-lean_ctor_set(x_173, 1, x_172);
-x_174 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__32;
-lean_inc(x_125);
-x_175 = lean_name_mk_numeral(x_174, x_125);
-x_176 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__31;
-x_177 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__34;
-x_178 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_178, 0, x_25);
-lean_ctor_set(x_178, 1, x_176);
-lean_ctor_set(x_178, 2, x_175);
-lean_ctor_set(x_178, 3, x_177);
-x_179 = lean_array_push(x_132, x_178);
-x_180 = lean_array_push(x_179, x_134);
-x_181 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_181, 0, x_136);
-lean_ctor_set(x_181, 1, x_180);
-x_182 = lean_array_push(x_132, x_173);
-x_183 = lean_array_push(x_182, x_181);
-x_184 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_184, 0, x_148);
-lean_ctor_set(x_184, 1, x_183);
-x_185 = lean_array_push(x_132, x_184);
-x_186 = lean_array_push(x_185, x_134);
-x_187 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_187, 0, x_163);
-lean_ctor_set(x_187, 1, x_186);
-x_188 = lean_array_push(x_165, x_187);
-x_189 = lean_array_push(x_188, x_167);
-x_190 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_190, 0, x_169);
-lean_ctor_set(x_190, 1, x_189);
-x_191 = lean_array_push(x_132, x_137);
-x_192 = lean_array_push(x_191, x_190);
-x_193 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_193, 0, x_148);
-lean_ctor_set(x_193, 1, x_192);
-x_194 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__39;
-x_195 = lean_name_mk_numeral(x_194, x_125);
-x_196 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__37;
-x_197 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__41;
-x_198 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_198, 0, x_25);
-lean_ctor_set(x_198, 1, x_196);
-lean_ctor_set(x_198, 2, x_195);
-lean_ctor_set(x_198, 3, x_197);
-x_199 = lean_array_push(x_132, x_198);
-x_200 = lean_array_push(x_199, x_134);
-x_201 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_201, 0, x_136);
-lean_ctor_set(x_201, 1, x_200);
-x_202 = lean_array_push(x_132, x_201);
-x_203 = lean_array_push(x_202, x_24);
-x_204 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_204, 0, x_148);
-lean_ctor_set(x_204, 1, x_203);
-x_205 = lean_array_push(x_132, x_204);
-x_206 = lean_array_push(x_205, x_15);
-x_207 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_207, 0, x_148);
-lean_ctor_set(x_207, 1, x_206);
-x_208 = lean_array_push(x_132, x_207);
-x_209 = lean_array_push(x_208, x_134);
-x_210 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_210, 0, x_163);
-lean_ctor_set(x_210, 1, x_209);
-x_211 = lean_array_push(x_165, x_210);
-x_212 = lean_array_push(x_211, x_167);
-x_213 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_213, 0, x_169);
-lean_ctor_set(x_213, 1, x_212);
-x_214 = lean_array_push(x_132, x_193);
-x_215 = lean_array_push(x_214, x_213);
-x_216 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_216, 0, x_148);
-lean_ctor_set(x_216, 1, x_215);
-x_217 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_217, 0, x_216);
-lean_ctor_set(x_217, 1, x_126);
-return x_217;
+x_158 = lean_array_push(x_157, x_24);
+x_159 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_159, 0, x_147);
+lean_ctor_set(x_159, 1, x_158);
+x_160 = lean_array_push(x_131, x_159);
+x_161 = lean_array_push(x_160, x_133);
+x_162 = l_Lean_nullKind___closed__2;
+x_163 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_163, 0, x_162);
+lean_ctor_set(x_163, 1, x_161);
+x_164 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
+x_165 = lean_array_push(x_164, x_163);
+x_166 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
+x_167 = lean_array_push(x_165, x_166);
+x_168 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
+x_169 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_169, 0, x_168);
+lean_ctor_set(x_169, 1, x_167);
+x_170 = lean_array_push(x_131, x_148);
+x_171 = lean_array_push(x_170, x_169);
+x_172 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_172, 0, x_147);
+lean_ctor_set(x_172, 1, x_171);
+x_173 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__32;
+lean_inc(x_124);
+x_174 = lean_name_mk_numeral(x_173, x_124);
+x_175 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__31;
+x_176 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__34;
+x_177 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_177, 0, x_25);
+lean_ctor_set(x_177, 1, x_175);
+lean_ctor_set(x_177, 2, x_174);
+lean_ctor_set(x_177, 3, x_176);
+x_178 = lean_array_push(x_131, x_177);
+x_179 = lean_array_push(x_178, x_133);
+x_180 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_180, 0, x_135);
+lean_ctor_set(x_180, 1, x_179);
+x_181 = lean_array_push(x_131, x_172);
+x_182 = lean_array_push(x_181, x_180);
+x_183 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_183, 0, x_147);
+lean_ctor_set(x_183, 1, x_182);
+x_184 = lean_array_push(x_131, x_183);
+x_185 = lean_array_push(x_184, x_133);
+x_186 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_186, 0, x_162);
+lean_ctor_set(x_186, 1, x_185);
+x_187 = lean_array_push(x_164, x_186);
+x_188 = lean_array_push(x_187, x_166);
+x_189 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_189, 0, x_168);
+lean_ctor_set(x_189, 1, x_188);
+x_190 = lean_array_push(x_131, x_136);
+x_191 = lean_array_push(x_190, x_189);
+x_192 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_192, 0, x_147);
+lean_ctor_set(x_192, 1, x_191);
+x_193 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__39;
+x_194 = lean_name_mk_numeral(x_193, x_124);
+x_195 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__37;
+x_196 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__41;
+x_197 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_197, 0, x_25);
+lean_ctor_set(x_197, 1, x_195);
+lean_ctor_set(x_197, 2, x_194);
+lean_ctor_set(x_197, 3, x_196);
+x_198 = lean_array_push(x_131, x_197);
+x_199 = lean_array_push(x_198, x_133);
+x_200 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_200, 0, x_135);
+lean_ctor_set(x_200, 1, x_199);
+x_201 = lean_array_push(x_131, x_200);
+x_202 = lean_array_push(x_201, x_24);
+x_203 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_203, 0, x_147);
+lean_ctor_set(x_203, 1, x_202);
+x_204 = lean_array_push(x_131, x_203);
+x_205 = lean_array_push(x_204, x_15);
+x_206 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_206, 0, x_147);
+lean_ctor_set(x_206, 1, x_205);
+x_207 = lean_array_push(x_131, x_206);
+x_208 = lean_array_push(x_207, x_133);
+x_209 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_209, 0, x_162);
+lean_ctor_set(x_209, 1, x_208);
+x_210 = lean_array_push(x_164, x_209);
+x_211 = lean_array_push(x_210, x_166);
+x_212 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_212, 0, x_168);
+lean_ctor_set(x_212, 1, x_211);
+x_213 = lean_array_push(x_131, x_192);
+x_214 = lean_array_push(x_213, x_212);
+x_215 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_215, 0, x_147);
+lean_ctor_set(x_215, 1, x_214);
+x_216 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_216, 0, x_215);
+lean_ctor_set(x_216, 1, x_125);
+return x_216;
}
}
else
{
-lean_object* x_218; lean_object* x_219; lean_object* x_220;
+lean_object* x_217; lean_object* x_218; lean_object* x_219;
lean_dec(x_21);
lean_dec(x_15);
-x_218 = lean_ctor_get(x_16, 1);
-lean_inc(x_218);
+x_217 = lean_ctor_get(x_16, 1);
+lean_inc(x_217);
lean_dec(x_16);
-x_219 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__7;
-x_220 = l_Lean_Elab_Term_throwError___rarg(x_1, x_219, x_2, x_218);
-return x_220;
+x_218 = l_Lean_Elab_Term_elabParserMacro___lambda__1___closed__7;
+x_219 = l_Lean_Elab_Term_throwError___rarg(x_1, x_218, x_2, x_217);
+return x_219;
}
}
}
diff --git a/stage0/stdlib/Init/Lean/Elab/Frontend.c b/stage0/stdlib/Init/Lean/Elab/Frontend.c
index e8e4de1dd4..38c42d91bc 100644
--- a/stage0/stdlib/Init/Lean/Elab/Frontend.c
+++ b/stage0/stdlib/Init/Lean/Elab/Frontend.c
@@ -13,7 +13,6 @@
#ifdef __cplusplus
extern "C" {
#endif
-lean_object* l_Lean_Parser_mkParserContextCore(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_getCommandState___closed__1;
lean_object* l_unreachable_x21___rarg(lean_object*);
lean_object* l_Lean_Parser_parseHeader(lean_object*, lean_object*);
@@ -22,10 +21,12 @@ extern lean_object* l_Lean_Parser_ModuleParserState_inhabited___closed__1;
extern lean_object* l_EIO_Monad___closed__1;
lean_object* l_Lean_Elab_IO_processCommands(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_runFrontend(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_Elab_Frontend_processCommandsAux___rarg___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_liftIOCore_x21(lean_object*);
lean_object* lean_io_mk_ref(lean_object*, lean_object*);
lean_object* lean_io_ref_get(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_runCommandElabM___closed__1;
+lean_object* l_Lean_Parser_mkInputContext(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_runCommandElabM(lean_object*, lean_object*, lean_object*);
lean_object* l_PersistentArray_forM___at___private_Init_Lean_Parser_Module_4__testModuleParserAux___main___spec__6(lean_object*, lean_object*, lean_object*);
lean_object* l_PersistentArray_push___rarg(lean_object*, lean_object*);
@@ -34,6 +35,7 @@ lean_object* l_Lean_Elab_Frontend_processCommandsAux___main___rarg(lean_object*,
lean_object* l_Lean_Elab_processHeader(lean_object*, lean_object*, lean_object*, uint32_t, lean_object*);
extern lean_object* l_Lean_Elab_parseImports___closed__1;
lean_object* l_Lean_MessageLog_toList(lean_object*);
+lean_object* l_Lean_Elab_Frontend_getInputContext___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_setParserState___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Command_mkState(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_parseCommand___main(lean_object*, lean_object*, lean_object*, lean_object*);
@@ -51,8 +53,10 @@ lean_object* lean_run_frontend(lean_object*, lean_object*, lean_object*, lean_ob
lean_object* l_Lean_Elab_Frontend_processCommandsAux___main___boxed(lean_object*);
lean_object* l_Lean_Elab_Frontend_processCommandsAux(lean_object*);
lean_object* l_Lean_Elab_Frontend_elabCommandAtFrontend___boxed(lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_Elab_Frontend_processCommand___boxed(lean_object*, lean_object*);
uint8_t l_Lean_Parser_isExitCommand(lean_object*);
extern lean_object* l___private_Init_Lean_Parser_Module_4__testModuleParserAux___main___closed__1;
+lean_object* l_Lean_Elab_Frontend_getInputContext(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_getCommandState(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_getParserState(lean_object*, lean_object*);
lean_object* lean_process_input(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
@@ -71,10 +75,12 @@ uint8_t l_PersistentArray_anyM___at_Lean_MessageLog_hasErrors___spec__1(lean_obj
extern lean_object* l_Nat_Inhabited;
lean_object* l_Lean_Elab_Frontend_getParserState___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Elab_process(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_Elab_Frontend_processCommands___boxed(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_Command_3__setState(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_processCommands(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_getCommandState___boxed(lean_object*, lean_object*);
lean_object* l_monadInhabited___rarg(lean_object*, lean_object*);
+lean_object* l_Lean_Elab_Frontend_processCommandsAux___main___rarg___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Elab_Frontend_liftIOCore_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
@@ -1317,6 +1323,27 @@ lean_dec(x_2);
return x_4;
}
}
+lean_object* l_Lean_Elab_Frontend_getInputContext(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3; lean_object* x_4;
+x_3 = lean_ctor_get(x_1, 3);
+lean_inc(x_3);
+x_4 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_4, 0, x_3);
+lean_ctor_set(x_4, 1, x_2);
+return x_4;
+}
+}
+lean_object* l_Lean_Elab_Frontend_getInputContext___boxed(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3;
+x_3 = l_Lean_Elab_Frontend_getInputContext(x_1, x_2);
+lean_dec(x_1);
+return x_3;
+}
+}
lean_object* l_Lean_Elab_Frontend_processCommand(lean_object* x_1, lean_object* x_2) {
_start:
{
@@ -1340,358 +1367,359 @@ lean_dec(x_5);
x_8 = l_Lean_Elab_Frontend_getParserState(x_1, x_7);
if (lean_obj_tag(x_8) == 0)
{
-lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19;
+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;
x_9 = lean_ctor_get(x_8, 0);
lean_inc(x_9);
x_10 = lean_ctor_get(x_8, 1);
lean_inc(x_10);
lean_dec(x_8);
-x_11 = lean_ctor_get(x_6, 0);
-lean_inc(x_11);
-x_12 = lean_ctor_get(x_1, 3);
+x_11 = l_Lean_Elab_Frontend_getInputContext(x_1, x_10);
+x_12 = lean_ctor_get(x_11, 0);
lean_inc(x_12);
-x_13 = lean_ctor_get(x_6, 1);
+x_13 = lean_ctor_get(x_11, 1);
lean_inc(x_13);
-lean_dec(x_6);
-x_14 = l_Lean_Parser_parseCommand___main(x_11, x_12, x_9, x_13);
-x_15 = lean_ctor_get(x_14, 1);
+lean_dec(x_11);
+x_14 = lean_ctor_get(x_6, 0);
+lean_inc(x_14);
+x_15 = lean_ctor_get(x_6, 1);
lean_inc(x_15);
-x_16 = lean_ctor_get(x_14, 0);
-lean_inc(x_16);
-lean_dec(x_14);
-x_17 = lean_ctor_get(x_15, 0);
+lean_dec(x_6);
+x_16 = l_Lean_Parser_parseCommand___main(x_14, x_12, x_9, x_15);
+x_17 = lean_ctor_get(x_16, 1);
lean_inc(x_17);
-x_18 = lean_ctor_get(x_15, 1);
+x_18 = lean_ctor_get(x_16, 0);
lean_inc(x_18);
-lean_dec(x_15);
-x_19 = l_Lean_Elab_Frontend_setParserState(x_17, x_1, x_10);
-if (lean_obj_tag(x_19) == 0)
-{
-lean_object* x_20; lean_object* x_21;
-x_20 = lean_ctor_get(x_19, 1);
+lean_dec(x_16);
+x_19 = lean_ctor_get(x_17, 0);
+lean_inc(x_19);
+x_20 = lean_ctor_get(x_17, 1);
lean_inc(x_20);
-lean_dec(x_19);
-x_21 = l_Lean_Elab_Frontend_setMessages(x_18, x_1, x_20);
+lean_dec(x_17);
+x_21 = l_Lean_Elab_Frontend_setParserState(x_19, x_1, x_13);
if (lean_obj_tag(x_21) == 0)
{
-uint8_t x_22;
-x_22 = !lean_is_exclusive(x_21);
-if (x_22 == 0)
+lean_object* x_22; lean_object* x_23;
+x_22 = lean_ctor_get(x_21, 1);
+lean_inc(x_22);
+lean_dec(x_21);
+x_23 = l_Lean_Elab_Frontend_setMessages(x_20, x_1, x_22);
+if (lean_obj_tag(x_23) == 0)
{
-lean_object* x_23; lean_object* x_24; uint8_t x_25;
-x_23 = lean_ctor_get(x_21, 1);
-x_24 = lean_ctor_get(x_21, 0);
-lean_dec(x_24);
-lean_inc(x_16);
-x_25 = l_Lean_Parser_isEOI(x_16);
-if (x_25 == 0)
+uint8_t x_24;
+x_24 = !lean_is_exclusive(x_23);
+if (x_24 == 0)
{
-uint8_t x_26;
-lean_inc(x_16);
-x_26 = l_Lean_Parser_isExitCommand(x_16);
-if (x_26 == 0)
-{
-lean_object* x_27;
-lean_free_object(x_21);
-x_27 = l_Lean_Elab_Frontend_elabCommandAtFrontend(x_16, x_1, x_23);
-lean_dec(x_1);
-if (lean_obj_tag(x_27) == 0)
+lean_object* x_25; lean_object* x_26; uint8_t x_27;
+x_25 = lean_ctor_get(x_23, 1);
+x_26 = lean_ctor_get(x_23, 0);
+lean_dec(x_26);
+lean_inc(x_18);
+x_27 = l_Lean_Parser_isEOI(x_18);
+if (x_27 == 0)
{
uint8_t x_28;
-x_28 = !lean_is_exclusive(x_27);
+lean_inc(x_18);
+x_28 = l_Lean_Parser_isExitCommand(x_18);
if (x_28 == 0)
{
-lean_object* x_29; uint8_t x_30; lean_object* x_31;
-x_29 = lean_ctor_get(x_27, 0);
+lean_object* x_29;
+lean_free_object(x_23);
+x_29 = l_Lean_Elab_Frontend_elabCommandAtFrontend(x_18, x_1, x_25);
+if (lean_obj_tag(x_29) == 0)
+{
+uint8_t x_30;
+x_30 = !lean_is_exclusive(x_29);
+if (x_30 == 0)
+{
+lean_object* x_31; uint8_t x_32; lean_object* x_33;
+x_31 = lean_ctor_get(x_29, 0);
+lean_dec(x_31);
+x_32 = 0;
+x_33 = lean_box(x_32);
+lean_ctor_set(x_29, 0, x_33);
+return x_29;
+}
+else
+{
+lean_object* x_34; uint8_t x_35; lean_object* x_36; lean_object* x_37;
+x_34 = lean_ctor_get(x_29, 1);
+lean_inc(x_34);
lean_dec(x_29);
-x_30 = 0;
-x_31 = lean_box(x_30);
-lean_ctor_set(x_27, 0, x_31);
-return x_27;
-}
-else
-{
-lean_object* x_32; uint8_t x_33; lean_object* x_34; lean_object* x_35;
-x_32 = lean_ctor_get(x_27, 1);
-lean_inc(x_32);
-lean_dec(x_27);
-x_33 = 0;
-x_34 = lean_box(x_33);
-x_35 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_35, 0, x_34);
-lean_ctor_set(x_35, 1, x_32);
-return x_35;
+x_35 = 0;
+x_36 = lean_box(x_35);
+x_37 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_37, 0, x_36);
+lean_ctor_set(x_37, 1, x_34);
+return x_37;
}
}
else
{
-uint8_t x_36;
-x_36 = !lean_is_exclusive(x_27);
-if (x_36 == 0)
+uint8_t x_38;
+x_38 = !lean_is_exclusive(x_29);
+if (x_38 == 0)
{
-return x_27;
+return x_29;
}
else
{
-lean_object* x_37; lean_object* x_38; lean_object* x_39;
-x_37 = lean_ctor_get(x_27, 0);
-x_38 = lean_ctor_get(x_27, 1);
-lean_inc(x_38);
-lean_inc(x_37);
-lean_dec(x_27);
-x_39 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_39, 0, x_37);
-lean_ctor_set(x_39, 1, x_38);
-return x_39;
+lean_object* x_39; lean_object* x_40; lean_object* x_41;
+x_39 = lean_ctor_get(x_29, 0);
+x_40 = lean_ctor_get(x_29, 1);
+lean_inc(x_40);
+lean_inc(x_39);
+lean_dec(x_29);
+x_41 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_41, 0, x_39);
+lean_ctor_set(x_41, 1, x_40);
+return x_41;
}
}
}
else
{
-uint8_t x_40; lean_object* x_41;
-lean_dec(x_16);
-lean_dec(x_1);
-x_40 = 1;
-x_41 = lean_box(x_40);
-lean_ctor_set(x_21, 0, x_41);
-return x_21;
-}
-}
-else
-{
uint8_t x_42; lean_object* x_43;
-lean_dec(x_16);
-lean_dec(x_1);
+lean_dec(x_18);
x_42 = 1;
x_43 = lean_box(x_42);
-lean_ctor_set(x_21, 0, x_43);
-return x_21;
+lean_ctor_set(x_23, 0, x_43);
+return x_23;
}
}
else
{
-lean_object* x_44; uint8_t x_45;
-x_44 = lean_ctor_get(x_21, 1);
-lean_inc(x_44);
-lean_dec(x_21);
-lean_inc(x_16);
-x_45 = l_Lean_Parser_isEOI(x_16);
-if (x_45 == 0)
-{
-uint8_t x_46;
-lean_inc(x_16);
-x_46 = l_Lean_Parser_isExitCommand(x_16);
-if (x_46 == 0)
-{
-lean_object* x_47;
-x_47 = l_Lean_Elab_Frontend_elabCommandAtFrontend(x_16, x_1, x_44);
-lean_dec(x_1);
-if (lean_obj_tag(x_47) == 0)
-{
-lean_object* x_48; lean_object* x_49; uint8_t x_50; lean_object* x_51; lean_object* x_52;
-x_48 = lean_ctor_get(x_47, 1);
-lean_inc(x_48);
-if (lean_is_exclusive(x_47)) {
- lean_ctor_release(x_47, 0);
- lean_ctor_release(x_47, 1);
- x_49 = x_47;
-} else {
- lean_dec_ref(x_47);
- x_49 = lean_box(0);
-}
-x_50 = 0;
-x_51 = lean_box(x_50);
-if (lean_is_scalar(x_49)) {
- x_52 = lean_alloc_ctor(0, 2, 0);
-} else {
- x_52 = x_49;
-}
-lean_ctor_set(x_52, 0, x_51);
-lean_ctor_set(x_52, 1, x_48);
-return x_52;
-}
-else
-{
-lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56;
-x_53 = lean_ctor_get(x_47, 0);
-lean_inc(x_53);
-x_54 = lean_ctor_get(x_47, 1);
-lean_inc(x_54);
-if (lean_is_exclusive(x_47)) {
- lean_ctor_release(x_47, 0);
- lean_ctor_release(x_47, 1);
- x_55 = x_47;
-} else {
- lean_dec_ref(x_47);
- x_55 = lean_box(0);
-}
-if (lean_is_scalar(x_55)) {
- x_56 = lean_alloc_ctor(1, 2, 0);
-} else {
- x_56 = x_55;
-}
-lean_ctor_set(x_56, 0, x_53);
-lean_ctor_set(x_56, 1, x_54);
-return x_56;
-}
-}
-else
-{
-uint8_t x_57; lean_object* x_58; lean_object* x_59;
-lean_dec(x_16);
-lean_dec(x_1);
-x_57 = 1;
-x_58 = lean_box(x_57);
-x_59 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_59, 0, x_58);
-lean_ctor_set(x_59, 1, x_44);
-return x_59;
-}
-}
-else
-{
-uint8_t x_60; lean_object* x_61; lean_object* x_62;
-lean_dec(x_16);
-lean_dec(x_1);
-x_60 = 1;
-x_61 = lean_box(x_60);
-x_62 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_62, 0, x_61);
-lean_ctor_set(x_62, 1, x_44);
-return x_62;
-}
-}
-}
-else
-{
-uint8_t x_63;
-lean_dec(x_16);
-lean_dec(x_1);
-x_63 = !lean_is_exclusive(x_21);
-if (x_63 == 0)
-{
-return x_21;
-}
-else
-{
-lean_object* x_64; lean_object* x_65; lean_object* x_66;
-x_64 = lean_ctor_get(x_21, 0);
-x_65 = lean_ctor_get(x_21, 1);
-lean_inc(x_65);
-lean_inc(x_64);
-lean_dec(x_21);
-x_66 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_66, 0, x_64);
-lean_ctor_set(x_66, 1, x_65);
-return x_66;
-}
-}
-}
-else
-{
-uint8_t x_67;
+uint8_t x_44; lean_object* x_45;
lean_dec(x_18);
-lean_dec(x_16);
-lean_dec(x_1);
-x_67 = !lean_is_exclusive(x_19);
-if (x_67 == 0)
-{
-return x_19;
+x_44 = 1;
+x_45 = lean_box(x_44);
+lean_ctor_set(x_23, 0, x_45);
+return x_23;
+}
}
else
{
-lean_object* x_68; lean_object* x_69; lean_object* x_70;
-x_68 = lean_ctor_get(x_19, 0);
-x_69 = lean_ctor_get(x_19, 1);
-lean_inc(x_69);
-lean_inc(x_68);
-lean_dec(x_19);
-x_70 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_70, 0, x_68);
-lean_ctor_set(x_70, 1, x_69);
-return x_70;
+lean_object* x_46; uint8_t x_47;
+x_46 = lean_ctor_get(x_23, 1);
+lean_inc(x_46);
+lean_dec(x_23);
+lean_inc(x_18);
+x_47 = l_Lean_Parser_isEOI(x_18);
+if (x_47 == 0)
+{
+uint8_t x_48;
+lean_inc(x_18);
+x_48 = l_Lean_Parser_isExitCommand(x_18);
+if (x_48 == 0)
+{
+lean_object* x_49;
+x_49 = l_Lean_Elab_Frontend_elabCommandAtFrontend(x_18, x_1, x_46);
+if (lean_obj_tag(x_49) == 0)
+{
+lean_object* x_50; lean_object* x_51; uint8_t x_52; lean_object* x_53; lean_object* x_54;
+x_50 = lean_ctor_get(x_49, 1);
+lean_inc(x_50);
+if (lean_is_exclusive(x_49)) {
+ lean_ctor_release(x_49, 0);
+ lean_ctor_release(x_49, 1);
+ x_51 = x_49;
+} else {
+ lean_dec_ref(x_49);
+ x_51 = lean_box(0);
+}
+x_52 = 0;
+x_53 = lean_box(x_52);
+if (lean_is_scalar(x_51)) {
+ x_54 = lean_alloc_ctor(0, 2, 0);
+} else {
+ x_54 = x_51;
+}
+lean_ctor_set(x_54, 0, x_53);
+lean_ctor_set(x_54, 1, x_50);
+return x_54;
+}
+else
+{
+lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58;
+x_55 = lean_ctor_get(x_49, 0);
+lean_inc(x_55);
+x_56 = lean_ctor_get(x_49, 1);
+lean_inc(x_56);
+if (lean_is_exclusive(x_49)) {
+ lean_ctor_release(x_49, 0);
+ lean_ctor_release(x_49, 1);
+ x_57 = x_49;
+} else {
+ lean_dec_ref(x_49);
+ x_57 = lean_box(0);
+}
+if (lean_is_scalar(x_57)) {
+ x_58 = lean_alloc_ctor(1, 2, 0);
+} else {
+ x_58 = x_57;
+}
+lean_ctor_set(x_58, 0, x_55);
+lean_ctor_set(x_58, 1, x_56);
+return x_58;
+}
+}
+else
+{
+uint8_t x_59; lean_object* x_60; lean_object* x_61;
+lean_dec(x_18);
+x_59 = 1;
+x_60 = lean_box(x_59);
+x_61 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_61, 0, x_60);
+lean_ctor_set(x_61, 1, x_46);
+return x_61;
+}
+}
+else
+{
+uint8_t x_62; lean_object* x_63; lean_object* x_64;
+lean_dec(x_18);
+x_62 = 1;
+x_63 = lean_box(x_62);
+x_64 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_64, 0, x_63);
+lean_ctor_set(x_64, 1, x_46);
+return x_64;
}
}
}
else
{
-uint8_t x_71;
+uint8_t x_65;
+lean_dec(x_18);
+x_65 = !lean_is_exclusive(x_23);
+if (x_65 == 0)
+{
+return x_23;
+}
+else
+{
+lean_object* x_66; lean_object* x_67; lean_object* x_68;
+x_66 = lean_ctor_get(x_23, 0);
+x_67 = lean_ctor_get(x_23, 1);
+lean_inc(x_67);
+lean_inc(x_66);
+lean_dec(x_23);
+x_68 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_68, 0, x_66);
+lean_ctor_set(x_68, 1, x_67);
+return x_68;
+}
+}
+}
+else
+{
+uint8_t x_69;
+lean_dec(x_20);
+lean_dec(x_18);
+x_69 = !lean_is_exclusive(x_21);
+if (x_69 == 0)
+{
+return x_21;
+}
+else
+{
+lean_object* x_70; lean_object* x_71; lean_object* x_72;
+x_70 = lean_ctor_get(x_21, 0);
+x_71 = lean_ctor_get(x_21, 1);
+lean_inc(x_71);
+lean_inc(x_70);
+lean_dec(x_21);
+x_72 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_72, 0, x_70);
+lean_ctor_set(x_72, 1, x_71);
+return x_72;
+}
+}
+}
+else
+{
+uint8_t x_73;
lean_dec(x_6);
-lean_dec(x_1);
-x_71 = !lean_is_exclusive(x_8);
-if (x_71 == 0)
+x_73 = !lean_is_exclusive(x_8);
+if (x_73 == 0)
{
return x_8;
}
else
{
-lean_object* x_72; lean_object* x_73; lean_object* x_74;
-x_72 = lean_ctor_get(x_8, 0);
-x_73 = lean_ctor_get(x_8, 1);
-lean_inc(x_73);
-lean_inc(x_72);
+lean_object* x_74; lean_object* x_75; lean_object* x_76;
+x_74 = lean_ctor_get(x_8, 0);
+x_75 = lean_ctor_get(x_8, 1);
+lean_inc(x_75);
+lean_inc(x_74);
lean_dec(x_8);
-x_74 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_74, 0, x_72);
-lean_ctor_set(x_74, 1, x_73);
-return x_74;
+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;
}
}
}
else
{
-uint8_t x_75;
-lean_dec(x_1);
-x_75 = !lean_is_exclusive(x_5);
-if (x_75 == 0)
+uint8_t x_77;
+x_77 = !lean_is_exclusive(x_5);
+if (x_77 == 0)
{
return x_5;
}
else
{
-lean_object* x_76; lean_object* x_77; lean_object* x_78;
-x_76 = lean_ctor_get(x_5, 0);
-x_77 = lean_ctor_get(x_5, 1);
-lean_inc(x_77);
-lean_inc(x_76);
+lean_object* x_78; lean_object* x_79; lean_object* x_80;
+x_78 = lean_ctor_get(x_5, 0);
+x_79 = lean_ctor_get(x_5, 1);
+lean_inc(x_79);
+lean_inc(x_78);
lean_dec(x_5);
-x_78 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_78, 0, x_76);
-lean_ctor_set(x_78, 1, x_77);
-return x_78;
+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;
}
}
}
else
{
-uint8_t x_79;
-lean_dec(x_1);
-x_79 = !lean_is_exclusive(x_3);
-if (x_79 == 0)
+uint8_t x_81;
+x_81 = !lean_is_exclusive(x_3);
+if (x_81 == 0)
{
return x_3;
}
else
{
-lean_object* x_80; lean_object* x_81; lean_object* x_82;
-x_80 = lean_ctor_get(x_3, 0);
-x_81 = lean_ctor_get(x_3, 1);
-lean_inc(x_81);
-lean_inc(x_80);
+lean_object* x_82; lean_object* x_83; lean_object* x_84;
+x_82 = lean_ctor_get(x_3, 0);
+x_83 = lean_ctor_get(x_3, 1);
+lean_inc(x_83);
+lean_inc(x_82);
lean_dec(x_3);
-x_82 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_82, 0, x_80);
-lean_ctor_set(x_82, 1, x_81);
-return x_82;
+x_84 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_84, 0, x_82);
+lean_ctor_set(x_84, 1, x_83);
+return x_84;
}
}
}
}
+lean_object* l_Lean_Elab_Frontend_processCommand___boxed(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3;
+x_3 = l_Lean_Elab_Frontend_processCommand(x_1, x_2);
+lean_dec(x_1);
+return x_3;
+}
+}
lean_object* l_Lean_Elab_Frontend_processCommandsAux___main___rarg(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
-lean_inc(x_1);
x_3 = l_Lean_Elab_Frontend_processCommand(x_1, x_2);
if (lean_obj_tag(x_3) == 0)
{
@@ -1712,7 +1740,6 @@ goto _start;
else
{
uint8_t x_8;
-lean_dec(x_1);
x_8 = !lean_is_exclusive(x_3);
if (x_8 == 0)
{
@@ -1740,7 +1767,6 @@ return x_13;
else
{
uint8_t x_14;
-lean_dec(x_1);
x_14 = !lean_is_exclusive(x_3);
if (x_14 == 0)
{
@@ -1766,10 +1792,19 @@ lean_object* l_Lean_Elab_Frontend_processCommandsAux___main(lean_object* x_1) {
_start:
{
lean_object* x_2;
-x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Frontend_processCommandsAux___main___rarg), 2, 0);
+x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Frontend_processCommandsAux___main___rarg___boxed), 2, 0);
return x_2;
}
}
+lean_object* l_Lean_Elab_Frontend_processCommandsAux___main___rarg___boxed(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3;
+x_3 = l_Lean_Elab_Frontend_processCommandsAux___main___rarg(x_1, x_2);
+lean_dec(x_1);
+return x_3;
+}
+}
lean_object* l_Lean_Elab_Frontend_processCommandsAux___main___boxed(lean_object* x_1) {
_start:
{
@@ -1791,10 +1826,19 @@ lean_object* l_Lean_Elab_Frontend_processCommandsAux(lean_object* x_1) {
_start:
{
lean_object* x_2;
-x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Frontend_processCommandsAux___rarg), 2, 0);
+x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Frontend_processCommandsAux___rarg___boxed), 2, 0);
return x_2;
}
}
+lean_object* l_Lean_Elab_Frontend_processCommandsAux___rarg___boxed(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3;
+x_3 = l_Lean_Elab_Frontend_processCommandsAux___rarg(x_1, x_2);
+lean_dec(x_1);
+return x_3;
+}
+}
lean_object* l_Lean_Elab_Frontend_processCommandsAux___boxed(lean_object* x_1) {
_start:
{
@@ -1812,6 +1856,15 @@ x_3 = l_Lean_Elab_Frontend_processCommandsAux___main___rarg(x_1, x_2);
return x_3;
}
}
+lean_object* l_Lean_Elab_Frontend_processCommands___boxed(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3;
+x_3 = l_Lean_Elab_Frontend_processCommands(x_1, x_2);
+lean_dec(x_1);
+return x_3;
+}
+}
lean_object* l_Lean_Elab_IO_processCommands(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
@@ -1843,6 +1896,7 @@ lean_ctor_set(x_12, 1, x_2);
lean_ctor_set(x_12, 2, x_10);
lean_ctor_set(x_12, 3, x_1);
x_13 = l_Lean_Elab_Frontend_processCommandsAux___main___rarg(x_12, x_11);
+lean_dec(x_12);
x_14 = !lean_is_exclusive(x_13);
if (x_14 == 0)
{
@@ -1947,7 +2001,7 @@ lean_inc(x_9);
x_10 = lean_ctor_get(x_7, 1);
lean_inc(x_10);
lean_dec(x_7);
-x_11 = l_Lean_Parser_mkParserContextCore(x_2, x_1, x_8);
+x_11 = l_Lean_Parser_mkInputContext(x_1, x_8);
x_12 = l_PersistentArray_empty___closed__3;
x_13 = l_Lean_Elab_Command_mkState(x_2, x_12, x_3);
x_14 = lean_io_mk_ref(x_13, x_10);
@@ -2235,7 +2289,7 @@ goto block_94;
block_94:
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint32_t x_13; lean_object* x_14;
-x_7 = l_Lean_Parser_mkParserContextCore(x_1, x_2, x_6);
+x_7 = l_Lean_Parser_mkInputContext(x_2, x_6);
lean_inc(x_7);
x_8 = l_Lean_Parser_parseHeader(x_1, x_7);
x_9 = lean_ctor_get(x_8, 1);
diff --git a/stage0/stdlib/Init/Lean/Elab/Import.c b/stage0/stdlib/Init/Lean/Elab/Import.c
index 7dff18e7cd..3c484d247a 100644
--- a/stage0/stdlib/Init/Lean/Elab/Import.c
+++ b/stage0/stdlib/Init/Lean/Elab/Import.c
@@ -13,7 +13,6 @@
#ifdef __cplusplus
extern "C" {
#endif
-lean_object* l_Lean_Parser_mkParserContextCore(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_headerToImports___closed__4;
lean_object* l_Lean_Parser_parseHeader(lean_object*, lean_object*);
lean_object* l_List_map___main___at_Lean_Elab_headerToImports___spec__1(lean_object*);
@@ -22,6 +21,7 @@ extern lean_object* l_Lean_stxInh;
lean_object* l_List_append___rarg(lean_object*, lean_object*);
lean_object* l_Lean_Elab_headerToImports___closed__2;
lean_object* l_Lean_Elab_headerToImports(lean_object*);
+lean_object* l_Lean_Parser_mkInputContext(lean_object*, lean_object*);
lean_object* l_PersistentArray_push___rarg(lean_object*, lean_object*);
extern lean_object* l_String_splitAux___main___closed__1;
lean_object* l_Lean_Elab_headerToImports___closed__1;
@@ -490,7 +490,7 @@ lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t
x_7 = lean_ctor_get(x_5, 0);
x_8 = l_Lean_Elab_parseImports___closed__1;
lean_inc(x_1);
-x_9 = l_Lean_Parser_mkParserContextCore(x_7, x_1, x_8);
+x_9 = l_Lean_Parser_mkInputContext(x_1, x_8);
x_10 = l_Lean_Parser_parseHeader(x_7, x_9);
x_11 = !lean_is_exclusive(x_10);
if (x_11 == 0)
@@ -597,7 +597,7 @@ lean_inc(x_39);
lean_dec(x_5);
x_41 = l_Lean_Elab_parseImports___closed__1;
lean_inc(x_1);
-x_42 = l_Lean_Parser_mkParserContextCore(x_39, x_1, x_41);
+x_42 = l_Lean_Parser_mkInputContext(x_1, x_41);
x_43 = l_Lean_Parser_parseHeader(x_39, x_42);
x_44 = lean_ctor_get(x_43, 1);
lean_inc(x_44);
@@ -664,7 +664,7 @@ x_59 = lean_ctor_get(x_2, 0);
lean_inc(x_59);
lean_dec(x_2);
lean_inc(x_1);
-x_60 = l_Lean_Parser_mkParserContextCore(x_58, x_1, x_59);
+x_60 = l_Lean_Parser_mkInputContext(x_1, x_59);
x_61 = l_Lean_Parser_parseHeader(x_58, x_60);
x_62 = !lean_is_exclusive(x_61);
if (x_62 == 0)
@@ -773,7 +773,7 @@ x_92 = lean_ctor_get(x_2, 0);
lean_inc(x_92);
lean_dec(x_2);
lean_inc(x_1);
-x_93 = l_Lean_Parser_mkParserContextCore(x_90, x_1, x_92);
+x_93 = l_Lean_Parser_mkInputContext(x_1, x_92);
x_94 = l_Lean_Parser_parseHeader(x_90, x_93);
x_95 = lean_ctor_get(x_94, 1);
lean_inc(x_95);
diff --git a/stage0/stdlib/Init/Lean/Elab/Quotation.c b/stage0/stdlib/Init/Lean/Elab/Quotation.c
index ccc3c659ac..160ff9571f 100644
--- a/stage0/stdlib/Init/Lean/Elab/Quotation.c
+++ b/stage0/stdlib/Init/Lean/Elab/Quotation.c
@@ -17,7 +17,6 @@ lean_object* l_List_reverse___rarg(lean_object*);
lean_object* l_Lean_Elab_Term_antiquotKind_x3f(lean_object*);
lean_object* l_List_head_x21___at___private_Init_Lean_Elab_Quotation_9__compileStxMatch___main___spec__2___closed__2;
lean_object* l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__3___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
-lean_object* l_Lean_Parser_mkParserContextCore(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Elab_Term_stxQuot_expand___closed__18;
lean_object* l_Lean_Elab_Term_getEnv___rarg(lean_object*);
lean_object* l___private_Init_Lean_Elab_Quotation_3__quoteList___main___rarg___lambda__1___closed__2;
@@ -42,6 +41,7 @@ extern lean_object* l___private_Init_Lean_Compiler_InitAttr_2__isUnitType___clos
lean_object* l_Lean_Elab_Term_stxQuot_expand___closed__7;
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__41;
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__13;
+lean_object* l_Lean_Parser_mkParserContext(lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__8;
lean_object* lean_mk_empty_array_with_capacity(lean_object*);
lean_object* l___private_Init_Lean_Elab_Quotation_14__toPreterm(lean_object*, lean_object*, lean_object*);
@@ -134,6 +134,7 @@ lean_object* l_Lean_Elab_Term_stxQuot_expand(lean_object*, lean_object*, lean_ob
lean_object* l___private_Init_Lean_Elab_Quotation_14__toPreterm___main___closed__4;
lean_object* l___private_Init_Lean_Elab_Quotation_7__getHeadInfo___elambda__2___closed__4;
lean_object* l_Lean_Elab_Term_antiquotKind_x3f___boxed(lean_object*);
+lean_object* l_Lean_Parser_mkInputContext(lean_object*, lean_object*);
lean_object* l_Lean_Parser_ParserAttribute_runParserFn(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
lean_object* lean_array_push(lean_object*, lean_object*);
@@ -257,7 +258,6 @@ lean_object* l___private_Init_Lean_Elab_Quotation_1__quoteName___main___lambda__
lean_object* l_Lean_Elab_Term_getCurrNamespace(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_Quotation_3__quoteList___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__25;
-extern lean_object* l_Lean_strLitKind;
lean_object* l___private_Init_Lean_Elab_Quotation_3__quoteList___main___rarg___lambda__2___closed__3;
lean_object* l___private_Init_Lean_Elab_Quotation_12__letBindRhss___main___closed__7;
lean_object* l_List_mapM___main___at___private_Init_Lean_Elab_Quotation_9__compileStxMatch___main___spec__8___closed__8;
@@ -468,6 +468,7 @@ lean_object* l_List_map___main___at_Lean_Elab_Term_oldExpandMatchSyntax___spec__
extern lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__4;
lean_object* l_Lean_Elab_Term_elabMatchSyntax(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteSyntax(lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_mkStxStrLit(lean_object*, lean_object*);
lean_object* l_Lean_Nat_HasQuote(lean_object*);
extern lean_object* l_Lean_Elab_rootNamespace___closed__1;
lean_object* l___private_Init_Lean_Elab_Quotation_7__getHeadInfo___closed__1;
@@ -637,17 +638,16 @@ return x_1;
lean_object* l_Lean_String_HasQuote(lean_object* x_1) {
_start:
{
-lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8;
+lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_2 = lean_box(0);
-x_3 = l_Lean_strLitKind;
-x_4 = l_Lean_mkStxLit(x_3, x_1, x_2);
-x_5 = l_Lean_FileMap_ofString___closed__1;
-x_6 = lean_array_push(x_5, x_4);
-x_7 = l_Lean_Parser_Term_str___elambda__1___closed__2;
-x_8 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_8, 0, x_7);
-lean_ctor_set(x_8, 1, x_6);
-return x_8;
+x_3 = l_Lean_mkStxStrLit(x_1, x_2);
+x_4 = l_Lean_FileMap_ofString___closed__1;
+x_5 = lean_array_push(x_4, x_3);
+x_6 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_7 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_7, 0, x_6);
+lean_ctor_set(x_7, 1, x_5);
+return x_7;
}
}
lean_object* l_Lean_Nat_HasQuote(lean_object* x_1) {
@@ -856,7 +856,7 @@ return x_3;
lean_object* l___private_Init_Lean_Elab_Quotation_1__quoteName___main___lambda__2(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; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32;
+lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31;
x_6 = lean_box(0);
x_7 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main___lambda__2___closed__5;
x_8 = lean_name_mk_numeral(x_7, x_3);
@@ -882,23 +882,22 @@ x_21 = l_Lean_Parser_Term_app___elambda__1___closed__2;
x_22 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_22, 0, x_21);
lean_ctor_set(x_22, 1, x_20);
-x_23 = l_Lean_strLitKind;
-x_24 = l_Lean_mkStxLit(x_23, x_2, x_6);
-x_25 = l_Lean_FileMap_ofString___closed__1;
-x_26 = lean_array_push(x_25, x_24);
-x_27 = l_Lean_Parser_Term_str___elambda__1___closed__2;
-x_28 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_28, 0, x_27);
-lean_ctor_set(x_28, 1, x_26);
-x_29 = lean_array_push(x_12, x_22);
-x_30 = lean_array_push(x_29, x_28);
-x_31 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_31, 0, x_21);
-lean_ctor_set(x_31, 1, x_30);
-x_32 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_32, 0, x_31);
-lean_ctor_set(x_32, 1, x_5);
-return x_32;
+x_23 = l_Lean_mkStxStrLit(x_2, x_6);
+x_24 = l_Lean_FileMap_ofString___closed__1;
+x_25 = lean_array_push(x_24, x_23);
+x_26 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_27 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_27, 0, x_26);
+lean_ctor_set(x_27, 1, x_25);
+x_28 = lean_array_push(x_12, x_22);
+x_29 = lean_array_push(x_28, x_27);
+x_30 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_30, 0, x_21);
+lean_ctor_set(x_30, 1, x_29);
+x_31 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_31, 0, x_30);
+lean_ctor_set(x_31, 1, x_5);
+return x_31;
}
}
lean_object* _init_l___private_Init_Lean_Elab_Quotation_1__quoteName___main___lambda__3___closed__1() {
@@ -2482,7 +2481,7 @@ return x_8;
lean_object* l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__4___lambda__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; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32;
+lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31;
x_6 = lean_box(0);
x_7 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___rarg___lambda__2___closed__4;
x_8 = lean_name_mk_numeral(x_7, x_3);
@@ -2501,30 +2500,29 @@ x_16 = l_Lean_Parser_Term_id___elambda__1___closed__2;
x_17 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_17, 0, x_16);
lean_ctor_set(x_17, 1, x_15);
-x_18 = l_Lean_strLitKind;
-x_19 = l_Lean_mkStxLit(x_18, x_1, x_6);
-x_20 = l_Lean_FileMap_ofString___closed__1;
-x_21 = lean_array_push(x_20, x_19);
-x_22 = l_Lean_Parser_Term_str___elambda__1___closed__2;
-x_23 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_23, 0, x_22);
-lean_ctor_set(x_23, 1, x_21);
-x_24 = lean_array_push(x_12, x_17);
-x_25 = lean_array_push(x_24, x_23);
-x_26 = l_Lean_Parser_Term_app___elambda__1___closed__2;
-x_27 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_27, 0, x_26);
-lean_ctor_set(x_27, 1, x_25);
-x_28 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__4(x_2);
-x_29 = lean_array_push(x_12, x_27);
-x_30 = lean_array_push(x_29, x_28);
-x_31 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_31, 0, x_26);
-lean_ctor_set(x_31, 1, x_30);
-x_32 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_32, 0, x_31);
-lean_ctor_set(x_32, 1, x_5);
-return x_32;
+x_18 = l_Lean_mkStxStrLit(x_1, x_6);
+x_19 = l_Lean_FileMap_ofString___closed__1;
+x_20 = lean_array_push(x_19, x_18);
+x_21 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_22 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_22, 0, x_21);
+lean_ctor_set(x_22, 1, x_20);
+x_23 = lean_array_push(x_12, x_17);
+x_24 = lean_array_push(x_23, x_22);
+x_25 = l_Lean_Parser_Term_app___elambda__1___closed__2;
+x_26 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_26, 0, x_25);
+lean_ctor_set(x_26, 1, x_24);
+x_27 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__4(x_2);
+x_28 = lean_array_push(x_12, x_26);
+x_29 = lean_array_push(x_28, x_27);
+x_30 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_30, 0, x_25);
+lean_ctor_set(x_30, 1, x_29);
+x_31 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_31, 0, x_30);
+lean_ctor_set(x_31, 1, x_5);
+return x_31;
}
}
lean_object* l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__4(lean_object* x_1) {
@@ -3923,7 +3921,7 @@ lean_dec(x_2);
x_220 = !lean_is_exclusive(x_219);
if (x_220 == 0)
{
-lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253;
+lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252;
x_221 = lean_ctor_get(x_219, 0);
x_222 = lean_box(0);
x_223 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__25;
@@ -3964,691 +3962,685 @@ x_243 = l_Lean_Parser_Term_app___elambda__1___closed__2;
x_244 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_244, 0, x_243);
lean_ctor_set(x_244, 1, x_242);
-x_245 = l_Lean_strLitKind;
-x_246 = l_Lean_mkStxLit(x_245, x_217, x_222);
-x_247 = l_Lean_FileMap_ofString___closed__1;
-x_248 = lean_array_push(x_247, x_246);
-x_249 = l_Lean_Parser_Term_str___elambda__1___closed__2;
-x_250 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_250, 0, x_249);
-lean_ctor_set(x_250, 1, x_248);
-x_251 = lean_array_push(x_228, x_244);
-x_252 = lean_array_push(x_251, x_250);
-x_253 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_253, 0, x_243);
-lean_ctor_set(x_253, 1, x_252);
-lean_ctor_set(x_219, 0, x_253);
+x_245 = l_Lean_mkStxStrLit(x_217, x_222);
+x_246 = l_Lean_FileMap_ofString___closed__1;
+x_247 = lean_array_push(x_246, x_245);
+x_248 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_249 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_249, 0, x_248);
+lean_ctor_set(x_249, 1, x_247);
+x_250 = lean_array_push(x_228, x_244);
+x_251 = lean_array_push(x_250, x_249);
+x_252 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_252, 0, x_243);
+lean_ctor_set(x_252, 1, x_251);
+lean_ctor_set(x_219, 0, x_252);
return x_219;
}
else
{
-lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288;
-x_254 = lean_ctor_get(x_219, 0);
-x_255 = lean_ctor_get(x_219, 1);
-lean_inc(x_255);
+lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286;
+x_253 = lean_ctor_get(x_219, 0);
+x_254 = lean_ctor_get(x_219, 1);
lean_inc(x_254);
+lean_inc(x_253);
lean_dec(x_219);
-x_256 = lean_box(0);
-x_257 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__25;
-lean_inc(x_254);
-x_258 = lean_name_mk_numeral(x_257, x_254);
-x_259 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__23;
-x_260 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__28;
-x_261 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_261, 0, x_256);
-lean_ctor_set(x_261, 1, x_259);
-lean_ctor_set(x_261, 2, x_258);
-lean_ctor_set(x_261, 3, x_260);
-x_262 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
-x_263 = lean_array_push(x_262, x_261);
-x_264 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
-x_265 = lean_array_push(x_263, x_264);
-x_266 = l_Lean_Parser_Term_id___elambda__1___closed__2;
+x_255 = lean_box(0);
+x_256 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__25;
+lean_inc(x_253);
+x_257 = lean_name_mk_numeral(x_256, x_253);
+x_258 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__23;
+x_259 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__28;
+x_260 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_260, 0, x_255);
+lean_ctor_set(x_260, 1, x_258);
+lean_ctor_set(x_260, 2, x_257);
+lean_ctor_set(x_260, 3, x_259);
+x_261 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
+x_262 = lean_array_push(x_261, x_260);
+x_263 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
+x_264 = lean_array_push(x_262, x_263);
+x_265 = l_Lean_Parser_Term_id___elambda__1___closed__2;
lean_ctor_set_tag(x_1, 1);
-lean_ctor_set(x_1, 1, x_265);
-lean_ctor_set(x_1, 0, x_266);
-x_267 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
-x_268 = lean_name_mk_numeral(x_267, x_254);
-x_269 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
-x_270 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
-x_271 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_271, 0, x_256);
-lean_ctor_set(x_271, 1, x_269);
-lean_ctor_set(x_271, 2, x_268);
-lean_ctor_set(x_271, 3, x_270);
-x_272 = lean_array_push(x_262, x_271);
-x_273 = lean_array_push(x_272, x_264);
-x_274 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_274, 0, x_266);
-lean_ctor_set(x_274, 1, x_273);
-x_275 = lean_array_push(x_262, x_1);
-x_276 = lean_array_push(x_275, x_274);
-x_277 = l_Lean_Parser_Term_app___elambda__1___closed__2;
-x_278 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_278, 0, x_277);
-lean_ctor_set(x_278, 1, x_276);
-x_279 = l_Lean_strLitKind;
-x_280 = l_Lean_mkStxLit(x_279, x_217, x_256);
-x_281 = l_Lean_FileMap_ofString___closed__1;
-x_282 = lean_array_push(x_281, x_280);
-x_283 = l_Lean_Parser_Term_str___elambda__1___closed__2;
-x_284 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_284, 0, x_283);
-lean_ctor_set(x_284, 1, x_282);
-x_285 = lean_array_push(x_262, x_278);
-x_286 = lean_array_push(x_285, x_284);
-x_287 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_287, 0, x_277);
-lean_ctor_set(x_287, 1, x_286);
-x_288 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_288, 0, x_287);
-lean_ctor_set(x_288, 1, x_255);
-return x_288;
+lean_ctor_set(x_1, 1, x_264);
+lean_ctor_set(x_1, 0, x_265);
+x_266 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
+x_267 = lean_name_mk_numeral(x_266, x_253);
+x_268 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
+x_269 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
+x_270 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_270, 0, x_255);
+lean_ctor_set(x_270, 1, x_268);
+lean_ctor_set(x_270, 2, x_267);
+lean_ctor_set(x_270, 3, x_269);
+x_271 = lean_array_push(x_261, x_270);
+x_272 = lean_array_push(x_271, x_263);
+x_273 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_273, 0, x_265);
+lean_ctor_set(x_273, 1, x_272);
+x_274 = lean_array_push(x_261, x_1);
+x_275 = lean_array_push(x_274, x_273);
+x_276 = l_Lean_Parser_Term_app___elambda__1___closed__2;
+x_277 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_277, 0, x_276);
+lean_ctor_set(x_277, 1, x_275);
+x_278 = l_Lean_mkStxStrLit(x_217, x_255);
+x_279 = l_Lean_FileMap_ofString___closed__1;
+x_280 = lean_array_push(x_279, x_278);
+x_281 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_282 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_282, 0, x_281);
+lean_ctor_set(x_282, 1, x_280);
+x_283 = lean_array_push(x_261, x_277);
+x_284 = lean_array_push(x_283, x_282);
+x_285 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_285, 0, x_276);
+lean_ctor_set(x_285, 1, x_284);
+x_286 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_286, 0, x_285);
+lean_ctor_set(x_286, 1, x_254);
+return x_286;
}
}
else
{
-lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327;
-x_289 = lean_ctor_get(x_1, 1);
-lean_inc(x_289);
+lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324;
+x_287 = lean_ctor_get(x_1, 1);
+lean_inc(x_287);
lean_dec(x_1);
-x_290 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_3);
+x_288 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_3);
lean_dec(x_2);
-x_291 = lean_ctor_get(x_290, 0);
-lean_inc(x_291);
-x_292 = lean_ctor_get(x_290, 1);
-lean_inc(x_292);
-if (lean_is_exclusive(x_290)) {
- lean_ctor_release(x_290, 0);
- lean_ctor_release(x_290, 1);
- x_293 = x_290;
+x_289 = lean_ctor_get(x_288, 0);
+lean_inc(x_289);
+x_290 = lean_ctor_get(x_288, 1);
+lean_inc(x_290);
+if (lean_is_exclusive(x_288)) {
+ lean_ctor_release(x_288, 0);
+ lean_ctor_release(x_288, 1);
+ x_291 = x_288;
} else {
- lean_dec_ref(x_290);
- x_293 = lean_box(0);
+ lean_dec_ref(x_288);
+ x_291 = lean_box(0);
}
-x_294 = lean_box(0);
-x_295 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__25;
-lean_inc(x_291);
-x_296 = lean_name_mk_numeral(x_295, x_291);
-x_297 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__23;
-x_298 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__28;
-x_299 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_299, 0, x_294);
-lean_ctor_set(x_299, 1, x_297);
-lean_ctor_set(x_299, 2, x_296);
-lean_ctor_set(x_299, 3, x_298);
-x_300 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
-x_301 = lean_array_push(x_300, x_299);
-x_302 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
-x_303 = lean_array_push(x_301, x_302);
-x_304 = l_Lean_Parser_Term_id___elambda__1___closed__2;
-x_305 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_305, 0, x_304);
-lean_ctor_set(x_305, 1, x_303);
-x_306 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
-x_307 = lean_name_mk_numeral(x_306, x_291);
-x_308 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
-x_309 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
-x_310 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_310, 0, x_294);
-lean_ctor_set(x_310, 1, x_308);
-lean_ctor_set(x_310, 2, x_307);
-lean_ctor_set(x_310, 3, x_309);
-x_311 = lean_array_push(x_300, x_310);
-x_312 = lean_array_push(x_311, x_302);
-x_313 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_313, 0, x_304);
-lean_ctor_set(x_313, 1, x_312);
-x_314 = lean_array_push(x_300, x_305);
-x_315 = lean_array_push(x_314, x_313);
-x_316 = l_Lean_Parser_Term_app___elambda__1___closed__2;
-x_317 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_317, 0, x_316);
-lean_ctor_set(x_317, 1, x_315);
-x_318 = l_Lean_strLitKind;
-x_319 = l_Lean_mkStxLit(x_318, x_289, x_294);
-x_320 = l_Lean_FileMap_ofString___closed__1;
-x_321 = lean_array_push(x_320, x_319);
-x_322 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_292 = lean_box(0);
+x_293 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__25;
+lean_inc(x_289);
+x_294 = lean_name_mk_numeral(x_293, x_289);
+x_295 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__23;
+x_296 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__28;
+x_297 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_297, 0, x_292);
+lean_ctor_set(x_297, 1, x_295);
+lean_ctor_set(x_297, 2, x_294);
+lean_ctor_set(x_297, 3, x_296);
+x_298 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
+x_299 = lean_array_push(x_298, x_297);
+x_300 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
+x_301 = lean_array_push(x_299, x_300);
+x_302 = l_Lean_Parser_Term_id___elambda__1___closed__2;
+x_303 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_303, 0, x_302);
+lean_ctor_set(x_303, 1, x_301);
+x_304 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
+x_305 = lean_name_mk_numeral(x_304, x_289);
+x_306 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
+x_307 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
+x_308 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_308, 0, x_292);
+lean_ctor_set(x_308, 1, x_306);
+lean_ctor_set(x_308, 2, x_305);
+lean_ctor_set(x_308, 3, x_307);
+x_309 = lean_array_push(x_298, x_308);
+x_310 = lean_array_push(x_309, x_300);
+x_311 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_311, 0, x_302);
+lean_ctor_set(x_311, 1, x_310);
+x_312 = lean_array_push(x_298, x_303);
+x_313 = lean_array_push(x_312, x_311);
+x_314 = l_Lean_Parser_Term_app___elambda__1___closed__2;
+x_315 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_315, 0, x_314);
+lean_ctor_set(x_315, 1, x_313);
+x_316 = l_Lean_mkStxStrLit(x_287, x_292);
+x_317 = l_Lean_FileMap_ofString___closed__1;
+x_318 = lean_array_push(x_317, x_316);
+x_319 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_320 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_320, 0, x_319);
+lean_ctor_set(x_320, 1, x_318);
+x_321 = lean_array_push(x_298, x_315);
+x_322 = lean_array_push(x_321, x_320);
x_323 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_323, 0, x_322);
-lean_ctor_set(x_323, 1, x_321);
-x_324 = lean_array_push(x_300, x_317);
-x_325 = lean_array_push(x_324, x_323);
-x_326 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_326, 0, x_316);
-lean_ctor_set(x_326, 1, x_325);
-if (lean_is_scalar(x_293)) {
- x_327 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_323, 0, x_314);
+lean_ctor_set(x_323, 1, x_322);
+if (lean_is_scalar(x_291)) {
+ x_324 = lean_alloc_ctor(0, 2, 0);
} else {
- x_327 = x_293;
+ x_324 = x_291;
}
-lean_ctor_set(x_327, 0, x_326);
-lean_ctor_set(x_327, 1, x_292);
-return x_327;
+lean_ctor_set(x_324, 0, x_323);
+lean_ctor_set(x_324, 1, x_290);
+return x_324;
}
}
default:
{
-uint8_t x_328;
-x_328 = !lean_is_exclusive(x_1);
-if (x_328 == 0)
+uint8_t x_325;
+x_325 = !lean_is_exclusive(x_1);
+if (x_325 == 0)
{
-lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; uint8_t x_376;
-x_329 = lean_ctor_get(x_1, 1);
-x_330 = lean_ctor_get(x_1, 2);
-x_331 = lean_ctor_get(x_1, 3);
-x_332 = lean_ctor_get(x_1, 0);
-lean_dec(x_332);
-x_333 = l_Lean_Elab_Term_getEnv___rarg(x_3);
+lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; uint8_t x_373;
+x_326 = lean_ctor_get(x_1, 1);
+x_327 = lean_ctor_get(x_1, 2);
+x_328 = lean_ctor_get(x_1, 3);
+x_329 = lean_ctor_get(x_1, 0);
+lean_dec(x_329);
+x_330 = l_Lean_Elab_Term_getEnv___rarg(x_3);
+x_331 = lean_ctor_get(x_330, 0);
+lean_inc(x_331);
+x_332 = lean_ctor_get(x_330, 1);
+lean_inc(x_332);
+lean_dec(x_330);
+x_333 = l_Lean_Elab_Term_getCurrNamespace(x_2, x_332);
x_334 = lean_ctor_get(x_333, 0);
lean_inc(x_334);
x_335 = lean_ctor_get(x_333, 1);
lean_inc(x_335);
lean_dec(x_333);
-x_336 = l_Lean_Elab_Term_getCurrNamespace(x_2, x_335);
+x_336 = l_Lean_Elab_Term_getOpenDecls(x_2, x_335);
x_337 = lean_ctor_get(x_336, 0);
lean_inc(x_337);
x_338 = lean_ctor_get(x_336, 1);
lean_inc(x_338);
lean_dec(x_336);
-x_339 = l_Lean_Elab_Term_getOpenDecls(x_2, x_338);
-x_340 = lean_ctor_get(x_339, 0);
-lean_inc(x_340);
-x_341 = lean_ctor_get(x_339, 1);
-lean_inc(x_341);
-lean_dec(x_339);
-lean_inc(x_330);
-x_342 = l_Lean_Elab_resolveGlobalName(x_334, x_337, x_340, x_330);
-lean_dec(x_337);
-x_343 = l_List_append___rarg(x_342, x_331);
-x_344 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main(x_330);
-x_345 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_341);
-x_346 = lean_ctor_get(x_345, 0);
-lean_inc(x_346);
-x_347 = lean_ctor_get(x_345, 1);
-lean_inc(x_347);
-lean_dec(x_345);
+lean_inc(x_327);
+x_339 = l_Lean_Elab_resolveGlobalName(x_331, x_334, x_337, x_327);
+lean_dec(x_334);
+x_340 = l_List_append___rarg(x_339, x_328);
+x_341 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main(x_327);
+x_342 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_338);
+x_343 = lean_ctor_get(x_342, 0);
+lean_inc(x_343);
+x_344 = lean_ctor_get(x_342, 1);
+lean_inc(x_344);
+lean_dec(x_342);
+x_345 = lean_box(0);
+x_346 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__40;
+lean_inc(x_343);
+x_347 = lean_name_mk_numeral(x_346, x_343);
x_348 = lean_box(0);
-x_349 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__40;
-lean_inc(x_346);
-x_350 = lean_name_mk_numeral(x_349, x_346);
-x_351 = lean_box(0);
-x_352 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__39;
-x_353 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
-lean_ctor_set(x_1, 3, x_353);
-lean_ctor_set(x_1, 2, x_350);
-lean_ctor_set(x_1, 1, x_352);
-lean_ctor_set(x_1, 0, x_348);
-x_354 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
-x_355 = lean_array_push(x_354, x_1);
-x_356 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
-x_357 = lean_array_push(x_355, x_356);
-x_358 = l_Lean_Parser_Term_id___elambda__1___closed__2;
-x_359 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_359, 0, x_358);
-lean_ctor_set(x_359, 1, x_357);
-x_360 = lean_array_push(x_354, x_359);
-x_361 = lean_array_push(x_360, x_344);
-x_362 = l_Lean_Parser_Term_app___elambda__1___closed__2;
-x_363 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_363, 0, x_362);
-lean_ctor_set(x_363, 1, x_361);
-x_364 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__47;
-x_365 = lean_name_mk_numeral(x_364, x_346);
-x_366 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__46;
-x_367 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_367, 0, x_348);
+x_349 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__39;
+x_350 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
+lean_ctor_set(x_1, 3, x_350);
+lean_ctor_set(x_1, 2, x_347);
+lean_ctor_set(x_1, 1, x_349);
+lean_ctor_set(x_1, 0, x_345);
+x_351 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
+x_352 = lean_array_push(x_351, x_1);
+x_353 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
+x_354 = lean_array_push(x_352, x_353);
+x_355 = l_Lean_Parser_Term_id___elambda__1___closed__2;
+x_356 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_356, 0, x_355);
+lean_ctor_set(x_356, 1, x_354);
+x_357 = lean_array_push(x_351, x_356);
+x_358 = lean_array_push(x_357, x_341);
+x_359 = l_Lean_Parser_Term_app___elambda__1___closed__2;
+x_360 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_360, 0, x_359);
+lean_ctor_set(x_360, 1, x_358);
+x_361 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__47;
+x_362 = lean_name_mk_numeral(x_361, x_343);
+x_363 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__46;
+x_364 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_364, 0, x_345);
+lean_ctor_set(x_364, 1, x_363);
+lean_ctor_set(x_364, 2, x_362);
+lean_ctor_set(x_364, 3, x_348);
+x_365 = lean_array_push(x_351, x_364);
+x_366 = lean_array_push(x_365, x_353);
+x_367 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_367, 0, x_355);
lean_ctor_set(x_367, 1, x_366);
-lean_ctor_set(x_367, 2, x_365);
-lean_ctor_set(x_367, 3, x_351);
-x_368 = lean_array_push(x_354, x_367);
-x_369 = lean_array_push(x_368, x_356);
+x_368 = lean_array_push(x_351, x_360);
+x_369 = lean_array_push(x_368, x_367);
x_370 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_370, 0, x_358);
+lean_ctor_set(x_370, 0, x_359);
lean_ctor_set(x_370, 1, x_369);
-x_371 = lean_array_push(x_354, x_363);
-x_372 = lean_array_push(x_371, x_370);
-x_373 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_373, 0, x_362);
-lean_ctor_set(x_373, 1, x_372);
-x_374 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__3(x_343);
-x_375 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_347);
+x_371 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__3(x_340);
+x_372 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_344);
lean_dec(x_2);
-x_376 = !lean_is_exclusive(x_375);
-if (x_376 == 0)
+x_373 = !lean_is_exclusive(x_372);
+if (x_373 == 0)
{
-lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436;
-x_377 = lean_ctor_get(x_375, 0);
-x_378 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__51;
-lean_inc(x_377);
-x_379 = lean_name_mk_numeral(x_378, x_377);
-x_380 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__50;
-x_381 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__54;
-x_382 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_382, 0, x_348);
-lean_ctor_set(x_382, 1, x_380);
-lean_ctor_set(x_382, 2, x_379);
-lean_ctor_set(x_382, 3, x_381);
-x_383 = lean_array_push(x_354, x_382);
-x_384 = lean_array_push(x_383, x_356);
-x_385 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_385, 0, x_358);
-lean_ctor_set(x_385, 1, x_384);
-x_386 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
-lean_inc(x_377);
-x_387 = lean_name_mk_numeral(x_386, x_377);
-x_388 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
-x_389 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
-x_390 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_390, 0, x_348);
-lean_ctor_set(x_390, 1, x_388);
-lean_ctor_set(x_390, 2, x_387);
-lean_ctor_set(x_390, 3, x_389);
-x_391 = lean_array_push(x_354, x_390);
-x_392 = lean_array_push(x_391, x_356);
+lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432;
+x_374 = lean_ctor_get(x_372, 0);
+x_375 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__51;
+lean_inc(x_374);
+x_376 = lean_name_mk_numeral(x_375, x_374);
+x_377 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__50;
+x_378 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__54;
+x_379 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_379, 0, x_345);
+lean_ctor_set(x_379, 1, x_377);
+lean_ctor_set(x_379, 2, x_376);
+lean_ctor_set(x_379, 3, x_378);
+x_380 = lean_array_push(x_351, x_379);
+x_381 = lean_array_push(x_380, x_353);
+x_382 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_382, 0, x_355);
+lean_ctor_set(x_382, 1, x_381);
+x_383 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
+lean_inc(x_374);
+x_384 = lean_name_mk_numeral(x_383, x_374);
+x_385 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
+x_386 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
+x_387 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_387, 0, x_345);
+lean_ctor_set(x_387, 1, x_385);
+lean_ctor_set(x_387, 2, x_384);
+lean_ctor_set(x_387, 3, x_386);
+x_388 = lean_array_push(x_351, x_387);
+x_389 = lean_array_push(x_388, x_353);
+x_390 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_390, 0, x_355);
+lean_ctor_set(x_390, 1, x_389);
+x_391 = lean_array_push(x_351, x_382);
+x_392 = lean_array_push(x_391, x_390);
x_393 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_393, 0, x_358);
+lean_ctor_set(x_393, 0, x_359);
lean_ctor_set(x_393, 1, x_392);
-x_394 = lean_array_push(x_354, x_385);
-x_395 = lean_array_push(x_394, x_393);
-x_396 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_396, 0, x_362);
-lean_ctor_set(x_396, 1, x_395);
-x_397 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__60;
-x_398 = lean_name_mk_numeral(x_397, x_377);
-x_399 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__58;
-x_400 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__62;
-x_401 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_401, 0, x_348);
-lean_ctor_set(x_401, 1, x_399);
-lean_ctor_set(x_401, 2, x_398);
-lean_ctor_set(x_401, 3, x_400);
-x_402 = lean_array_push(x_354, x_401);
-x_403 = lean_array_push(x_402, x_356);
-x_404 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_404, 0, x_358);
-lean_ctor_set(x_404, 1, x_403);
-x_405 = lean_array_push(x_354, x_404);
-x_406 = lean_array_push(x_354, x_396);
-x_407 = lean_ctor_get(x_329, 0);
-lean_inc(x_407);
-x_408 = lean_ctor_get(x_329, 1);
-lean_inc(x_408);
-x_409 = lean_ctor_get(x_329, 2);
-lean_inc(x_409);
-lean_dec(x_329);
-x_410 = lean_string_utf8_extract(x_407, x_408, x_409);
-lean_dec(x_409);
-lean_dec(x_408);
-lean_dec(x_407);
-x_411 = l_Lean_strLitKind;
-x_412 = l_Lean_mkStxLit(x_411, x_410, x_348);
-x_413 = l_Lean_FileMap_ofString___closed__1;
-x_414 = lean_array_push(x_413, x_412);
-x_415 = l_Lean_Parser_Term_str___elambda__1___closed__2;
-x_416 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_416, 0, x_415);
-lean_ctor_set(x_416, 1, x_414);
-x_417 = lean_array_push(x_405, x_416);
+x_394 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__60;
+x_395 = lean_name_mk_numeral(x_394, x_374);
+x_396 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__58;
+x_397 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__62;
+x_398 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_398, 0, x_345);
+lean_ctor_set(x_398, 1, x_396);
+lean_ctor_set(x_398, 2, x_395);
+lean_ctor_set(x_398, 3, x_397);
+x_399 = lean_array_push(x_351, x_398);
+x_400 = lean_array_push(x_399, x_353);
+x_401 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_401, 0, x_355);
+lean_ctor_set(x_401, 1, x_400);
+x_402 = lean_array_push(x_351, x_401);
+x_403 = lean_array_push(x_351, x_393);
+x_404 = lean_ctor_get(x_326, 0);
+lean_inc(x_404);
+x_405 = lean_ctor_get(x_326, 1);
+lean_inc(x_405);
+x_406 = lean_ctor_get(x_326, 2);
+lean_inc(x_406);
+lean_dec(x_326);
+x_407 = lean_string_utf8_extract(x_404, x_405, x_406);
+lean_dec(x_406);
+lean_dec(x_405);
+lean_dec(x_404);
+x_408 = l_Lean_mkStxStrLit(x_407, x_345);
+x_409 = l_Lean_FileMap_ofString___closed__1;
+x_410 = lean_array_push(x_409, x_408);
+x_411 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_412 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_412, 0, x_411);
+lean_ctor_set(x_412, 1, x_410);
+x_413 = lean_array_push(x_402, x_412);
+x_414 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_414, 0, x_359);
+lean_ctor_set(x_414, 1, x_413);
+x_415 = lean_array_push(x_351, x_414);
+x_416 = lean_array_push(x_415, x_353);
+x_417 = l_Lean_nullKind___closed__2;
x_418 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_418, 0, x_362);
-lean_ctor_set(x_418, 1, x_417);
-x_419 = lean_array_push(x_354, x_418);
-x_420 = lean_array_push(x_419, x_356);
-x_421 = l_Lean_nullKind___closed__2;
-x_422 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_422, 0, x_421);
-lean_ctor_set(x_422, 1, x_420);
-x_423 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
-x_424 = lean_array_push(x_423, x_422);
-x_425 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
-x_426 = lean_array_push(x_424, x_425);
-x_427 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
-x_428 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_428, 0, x_427);
-lean_ctor_set(x_428, 1, x_426);
-x_429 = lean_array_push(x_406, x_428);
-x_430 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_430, 0, x_362);
-lean_ctor_set(x_430, 1, x_429);
-x_431 = lean_array_push(x_354, x_430);
-x_432 = lean_array_push(x_431, x_373);
-x_433 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_433, 0, x_362);
-lean_ctor_set(x_433, 1, x_432);
-x_434 = lean_array_push(x_354, x_433);
-x_435 = lean_array_push(x_434, x_374);
-x_436 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_436, 0, x_362);
-lean_ctor_set(x_436, 1, x_435);
-lean_ctor_set(x_375, 0, x_436);
-return x_375;
+lean_ctor_set(x_418, 0, x_417);
+lean_ctor_set(x_418, 1, x_416);
+x_419 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
+x_420 = lean_array_push(x_419, x_418);
+x_421 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
+x_422 = lean_array_push(x_420, x_421);
+x_423 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
+x_424 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_424, 0, x_423);
+lean_ctor_set(x_424, 1, x_422);
+x_425 = lean_array_push(x_403, x_424);
+x_426 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_426, 0, x_359);
+lean_ctor_set(x_426, 1, x_425);
+x_427 = lean_array_push(x_351, x_426);
+x_428 = lean_array_push(x_427, x_370);
+x_429 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_429, 0, x_359);
+lean_ctor_set(x_429, 1, x_428);
+x_430 = lean_array_push(x_351, x_429);
+x_431 = lean_array_push(x_430, x_371);
+x_432 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_432, 0, x_359);
+lean_ctor_set(x_432, 1, x_431);
+lean_ctor_set(x_372, 0, x_432);
+return x_372;
}
else
{
-lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; lean_object* x_452; lean_object* x_453; lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; lean_object* x_476; lean_object* x_477; lean_object* x_478; lean_object* x_479; lean_object* x_480; lean_object* x_481; lean_object* x_482; lean_object* x_483; lean_object* x_484; lean_object* x_485; lean_object* x_486; lean_object* x_487; lean_object* x_488; lean_object* x_489; lean_object* x_490; lean_object* x_491; lean_object* x_492; lean_object* x_493; lean_object* x_494; lean_object* x_495; lean_object* x_496; lean_object* x_497; lean_object* x_498;
-x_437 = lean_ctor_get(x_375, 0);
-x_438 = lean_ctor_get(x_375, 1);
-lean_inc(x_438);
-lean_inc(x_437);
-lean_dec(x_375);
-x_439 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__51;
-lean_inc(x_437);
-x_440 = lean_name_mk_numeral(x_439, x_437);
-x_441 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__50;
-x_442 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__54;
-x_443 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_443, 0, x_348);
-lean_ctor_set(x_443, 1, x_441);
-lean_ctor_set(x_443, 2, x_440);
-lean_ctor_set(x_443, 3, x_442);
-x_444 = lean_array_push(x_354, x_443);
-x_445 = lean_array_push(x_444, x_356);
-x_446 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_446, 0, x_358);
-lean_ctor_set(x_446, 1, x_445);
-x_447 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
-lean_inc(x_437);
-x_448 = lean_name_mk_numeral(x_447, x_437);
-x_449 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
-x_450 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
-x_451 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_451, 0, x_348);
-lean_ctor_set(x_451, 1, x_449);
-lean_ctor_set(x_451, 2, x_448);
-lean_ctor_set(x_451, 3, x_450);
-x_452 = lean_array_push(x_354, x_451);
-x_453 = lean_array_push(x_452, x_356);
-x_454 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_454, 0, x_358);
-lean_ctor_set(x_454, 1, x_453);
-x_455 = lean_array_push(x_354, x_446);
-x_456 = lean_array_push(x_455, x_454);
-x_457 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_457, 0, x_362);
-lean_ctor_set(x_457, 1, x_456);
-x_458 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__60;
-x_459 = lean_name_mk_numeral(x_458, x_437);
-x_460 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__58;
-x_461 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__62;
-x_462 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_462, 0, x_348);
-lean_ctor_set(x_462, 1, x_460);
-lean_ctor_set(x_462, 2, x_459);
-lean_ctor_set(x_462, 3, x_461);
-x_463 = lean_array_push(x_354, x_462);
-x_464 = lean_array_push(x_463, x_356);
-x_465 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_465, 0, x_358);
-lean_ctor_set(x_465, 1, x_464);
-x_466 = lean_array_push(x_354, x_465);
-x_467 = lean_array_push(x_354, x_457);
-x_468 = lean_ctor_get(x_329, 0);
-lean_inc(x_468);
-x_469 = lean_ctor_get(x_329, 1);
-lean_inc(x_469);
-x_470 = lean_ctor_get(x_329, 2);
-lean_inc(x_470);
-lean_dec(x_329);
-x_471 = lean_string_utf8_extract(x_468, x_469, x_470);
-lean_dec(x_470);
-lean_dec(x_469);
-lean_dec(x_468);
-x_472 = l_Lean_strLitKind;
-x_473 = l_Lean_mkStxLit(x_472, x_471, x_348);
-x_474 = l_Lean_FileMap_ofString___closed__1;
-x_475 = lean_array_push(x_474, x_473);
-x_476 = l_Lean_Parser_Term_str___elambda__1___closed__2;
-x_477 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_477, 0, x_476);
-lean_ctor_set(x_477, 1, x_475);
-x_478 = lean_array_push(x_466, x_477);
-x_479 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_479, 0, x_362);
-lean_ctor_set(x_479, 1, x_478);
-x_480 = lean_array_push(x_354, x_479);
-x_481 = lean_array_push(x_480, x_356);
-x_482 = l_Lean_nullKind___closed__2;
-x_483 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_483, 0, x_482);
-lean_ctor_set(x_483, 1, x_481);
-x_484 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
-x_485 = lean_array_push(x_484, x_483);
-x_486 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
-x_487 = lean_array_push(x_485, x_486);
-x_488 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
+lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; lean_object* x_452; lean_object* x_453; lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; lean_object* x_476; lean_object* x_477; lean_object* x_478; lean_object* x_479; lean_object* x_480; lean_object* x_481; lean_object* x_482; lean_object* x_483; lean_object* x_484; lean_object* x_485; lean_object* x_486; lean_object* x_487; lean_object* x_488; lean_object* x_489; lean_object* x_490; lean_object* x_491; lean_object* x_492; lean_object* x_493;
+x_433 = lean_ctor_get(x_372, 0);
+x_434 = lean_ctor_get(x_372, 1);
+lean_inc(x_434);
+lean_inc(x_433);
+lean_dec(x_372);
+x_435 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__51;
+lean_inc(x_433);
+x_436 = lean_name_mk_numeral(x_435, x_433);
+x_437 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__50;
+x_438 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__54;
+x_439 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_439, 0, x_345);
+lean_ctor_set(x_439, 1, x_437);
+lean_ctor_set(x_439, 2, x_436);
+lean_ctor_set(x_439, 3, x_438);
+x_440 = lean_array_push(x_351, x_439);
+x_441 = lean_array_push(x_440, x_353);
+x_442 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_442, 0, x_355);
+lean_ctor_set(x_442, 1, x_441);
+x_443 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
+lean_inc(x_433);
+x_444 = lean_name_mk_numeral(x_443, x_433);
+x_445 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
+x_446 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
+x_447 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_447, 0, x_345);
+lean_ctor_set(x_447, 1, x_445);
+lean_ctor_set(x_447, 2, x_444);
+lean_ctor_set(x_447, 3, x_446);
+x_448 = lean_array_push(x_351, x_447);
+x_449 = lean_array_push(x_448, x_353);
+x_450 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_450, 0, x_355);
+lean_ctor_set(x_450, 1, x_449);
+x_451 = lean_array_push(x_351, x_442);
+x_452 = lean_array_push(x_451, x_450);
+x_453 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_453, 0, x_359);
+lean_ctor_set(x_453, 1, x_452);
+x_454 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__60;
+x_455 = lean_name_mk_numeral(x_454, x_433);
+x_456 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__58;
+x_457 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__62;
+x_458 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_458, 0, x_345);
+lean_ctor_set(x_458, 1, x_456);
+lean_ctor_set(x_458, 2, x_455);
+lean_ctor_set(x_458, 3, x_457);
+x_459 = lean_array_push(x_351, x_458);
+x_460 = lean_array_push(x_459, x_353);
+x_461 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_461, 0, x_355);
+lean_ctor_set(x_461, 1, x_460);
+x_462 = lean_array_push(x_351, x_461);
+x_463 = lean_array_push(x_351, x_453);
+x_464 = lean_ctor_get(x_326, 0);
+lean_inc(x_464);
+x_465 = lean_ctor_get(x_326, 1);
+lean_inc(x_465);
+x_466 = lean_ctor_get(x_326, 2);
+lean_inc(x_466);
+lean_dec(x_326);
+x_467 = lean_string_utf8_extract(x_464, x_465, x_466);
+lean_dec(x_466);
+lean_dec(x_465);
+lean_dec(x_464);
+x_468 = l_Lean_mkStxStrLit(x_467, x_345);
+x_469 = l_Lean_FileMap_ofString___closed__1;
+x_470 = lean_array_push(x_469, x_468);
+x_471 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_472 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_472, 0, x_471);
+lean_ctor_set(x_472, 1, x_470);
+x_473 = lean_array_push(x_462, x_472);
+x_474 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_474, 0, x_359);
+lean_ctor_set(x_474, 1, x_473);
+x_475 = lean_array_push(x_351, x_474);
+x_476 = lean_array_push(x_475, x_353);
+x_477 = l_Lean_nullKind___closed__2;
+x_478 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_478, 0, x_477);
+lean_ctor_set(x_478, 1, x_476);
+x_479 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
+x_480 = lean_array_push(x_479, x_478);
+x_481 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
+x_482 = lean_array_push(x_480, x_481);
+x_483 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
+x_484 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_484, 0, x_483);
+lean_ctor_set(x_484, 1, x_482);
+x_485 = lean_array_push(x_463, x_484);
+x_486 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_486, 0, x_359);
+lean_ctor_set(x_486, 1, x_485);
+x_487 = lean_array_push(x_351, x_486);
+x_488 = lean_array_push(x_487, x_370);
x_489 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_489, 0, x_488);
-lean_ctor_set(x_489, 1, x_487);
-x_490 = lean_array_push(x_467, x_489);
-x_491 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_491, 0, x_362);
-lean_ctor_set(x_491, 1, x_490);
-x_492 = lean_array_push(x_354, x_491);
-x_493 = lean_array_push(x_492, x_373);
-x_494 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_494, 0, x_362);
-lean_ctor_set(x_494, 1, x_493);
-x_495 = lean_array_push(x_354, x_494);
-x_496 = lean_array_push(x_495, x_374);
-x_497 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_497, 0, x_362);
-lean_ctor_set(x_497, 1, x_496);
-x_498 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_498, 0, x_497);
-lean_ctor_set(x_498, 1, x_438);
-return x_498;
+lean_ctor_set(x_489, 0, x_359);
+lean_ctor_set(x_489, 1, x_488);
+x_490 = lean_array_push(x_351, x_489);
+x_491 = lean_array_push(x_490, x_371);
+x_492 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_492, 0, x_359);
+lean_ctor_set(x_492, 1, x_491);
+x_493 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_493, 0, x_492);
+lean_ctor_set(x_493, 1, x_434);
+return x_493;
}
}
else
{
-lean_object* x_499; lean_object* x_500; lean_object* x_501; lean_object* x_502; lean_object* x_503; lean_object* x_504; lean_object* x_505; lean_object* x_506; lean_object* x_507; lean_object* x_508; lean_object* x_509; lean_object* x_510; lean_object* x_511; lean_object* x_512; lean_object* x_513; lean_object* x_514; lean_object* x_515; lean_object* x_516; lean_object* x_517; lean_object* x_518; lean_object* x_519; lean_object* x_520; lean_object* x_521; lean_object* x_522; lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; lean_object* x_527; lean_object* x_528; lean_object* x_529; lean_object* x_530; lean_object* x_531; lean_object* x_532; lean_object* x_533; lean_object* x_534; lean_object* x_535; lean_object* x_536; lean_object* x_537; lean_object* x_538; lean_object* x_539; lean_object* x_540; lean_object* x_541; lean_object* x_542; lean_object* x_543; lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; lean_object* x_548; lean_object* x_549; lean_object* x_550; lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; lean_object* x_555; lean_object* x_556; lean_object* x_557; lean_object* x_558; lean_object* x_559; lean_object* x_560; lean_object* x_561; lean_object* x_562; lean_object* x_563; lean_object* x_564; lean_object* x_565; lean_object* x_566; lean_object* x_567; lean_object* x_568; lean_object* x_569; lean_object* x_570; lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; lean_object* x_575; lean_object* x_576; lean_object* x_577; lean_object* x_578; lean_object* x_579; lean_object* x_580; lean_object* x_581; lean_object* x_582; lean_object* x_583; lean_object* x_584; lean_object* x_585; lean_object* x_586; lean_object* x_587; lean_object* x_588; lean_object* x_589; lean_object* x_590; lean_object* x_591; lean_object* x_592; lean_object* x_593; lean_object* x_594; lean_object* x_595; lean_object* x_596; lean_object* x_597; lean_object* x_598; lean_object* x_599; lean_object* x_600; lean_object* x_601; lean_object* x_602; lean_object* x_603; lean_object* x_604; lean_object* x_605; lean_object* x_606; lean_object* x_607; lean_object* x_608;
-x_499 = lean_ctor_get(x_1, 1);
-x_500 = lean_ctor_get(x_1, 2);
-x_501 = lean_ctor_get(x_1, 3);
-lean_inc(x_501);
-lean_inc(x_500);
-lean_inc(x_499);
+lean_object* x_494; lean_object* x_495; lean_object* x_496; lean_object* x_497; lean_object* x_498; lean_object* x_499; lean_object* x_500; lean_object* x_501; lean_object* x_502; lean_object* x_503; lean_object* x_504; lean_object* x_505; lean_object* x_506; lean_object* x_507; lean_object* x_508; lean_object* x_509; lean_object* x_510; lean_object* x_511; lean_object* x_512; lean_object* x_513; lean_object* x_514; lean_object* x_515; lean_object* x_516; lean_object* x_517; lean_object* x_518; lean_object* x_519; lean_object* x_520; lean_object* x_521; lean_object* x_522; lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; lean_object* x_527; lean_object* x_528; lean_object* x_529; lean_object* x_530; lean_object* x_531; lean_object* x_532; lean_object* x_533; lean_object* x_534; lean_object* x_535; lean_object* x_536; lean_object* x_537; lean_object* x_538; lean_object* x_539; lean_object* x_540; lean_object* x_541; lean_object* x_542; lean_object* x_543; lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; lean_object* x_548; lean_object* x_549; lean_object* x_550; lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; lean_object* x_555; lean_object* x_556; lean_object* x_557; lean_object* x_558; lean_object* x_559; lean_object* x_560; lean_object* x_561; lean_object* x_562; lean_object* x_563; lean_object* x_564; lean_object* x_565; lean_object* x_566; lean_object* x_567; lean_object* x_568; lean_object* x_569; lean_object* x_570; lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; lean_object* x_575; lean_object* x_576; lean_object* x_577; lean_object* x_578; lean_object* x_579; lean_object* x_580; lean_object* x_581; lean_object* x_582; lean_object* x_583; lean_object* x_584; lean_object* x_585; lean_object* x_586; lean_object* x_587; lean_object* x_588; lean_object* x_589; lean_object* x_590; lean_object* x_591; lean_object* x_592; lean_object* x_593; lean_object* x_594; lean_object* x_595; lean_object* x_596; lean_object* x_597; lean_object* x_598; lean_object* x_599; lean_object* x_600; lean_object* x_601; lean_object* x_602;
+x_494 = lean_ctor_get(x_1, 1);
+x_495 = lean_ctor_get(x_1, 2);
+x_496 = lean_ctor_get(x_1, 3);
+lean_inc(x_496);
+lean_inc(x_495);
+lean_inc(x_494);
lean_dec(x_1);
-x_502 = l_Lean_Elab_Term_getEnv___rarg(x_3);
-x_503 = lean_ctor_get(x_502, 0);
-lean_inc(x_503);
-x_504 = lean_ctor_get(x_502, 1);
+x_497 = l_Lean_Elab_Term_getEnv___rarg(x_3);
+x_498 = lean_ctor_get(x_497, 0);
+lean_inc(x_498);
+x_499 = lean_ctor_get(x_497, 1);
+lean_inc(x_499);
+lean_dec(x_497);
+x_500 = l_Lean_Elab_Term_getCurrNamespace(x_2, x_499);
+x_501 = lean_ctor_get(x_500, 0);
+lean_inc(x_501);
+x_502 = lean_ctor_get(x_500, 1);
+lean_inc(x_502);
+lean_dec(x_500);
+x_503 = l_Lean_Elab_Term_getOpenDecls(x_2, x_502);
+x_504 = lean_ctor_get(x_503, 0);
lean_inc(x_504);
-lean_dec(x_502);
-x_505 = l_Lean_Elab_Term_getCurrNamespace(x_2, x_504);
-x_506 = lean_ctor_get(x_505, 0);
-lean_inc(x_506);
-x_507 = lean_ctor_get(x_505, 1);
-lean_inc(x_507);
-lean_dec(x_505);
-x_508 = l_Lean_Elab_Term_getOpenDecls(x_2, x_507);
-x_509 = lean_ctor_get(x_508, 0);
-lean_inc(x_509);
-x_510 = lean_ctor_get(x_508, 1);
+x_505 = lean_ctor_get(x_503, 1);
+lean_inc(x_505);
+lean_dec(x_503);
+lean_inc(x_495);
+x_506 = l_Lean_Elab_resolveGlobalName(x_498, x_501, x_504, x_495);
+lean_dec(x_501);
+x_507 = l_List_append___rarg(x_506, x_496);
+x_508 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main(x_495);
+x_509 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_505);
+x_510 = lean_ctor_get(x_509, 0);
lean_inc(x_510);
-lean_dec(x_508);
-lean_inc(x_500);
-x_511 = l_Lean_Elab_resolveGlobalName(x_503, x_506, x_509, x_500);
-lean_dec(x_506);
-x_512 = l_List_append___rarg(x_511, x_501);
-x_513 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main(x_500);
-x_514 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_510);
-x_515 = lean_ctor_get(x_514, 0);
-lean_inc(x_515);
-x_516 = lean_ctor_get(x_514, 1);
-lean_inc(x_516);
-lean_dec(x_514);
-x_517 = lean_box(0);
-x_518 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__40;
-lean_inc(x_515);
-x_519 = lean_name_mk_numeral(x_518, x_515);
-x_520 = lean_box(0);
-x_521 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__39;
-x_522 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
-x_523 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_523, 0, x_517);
-lean_ctor_set(x_523, 1, x_521);
-lean_ctor_set(x_523, 2, x_519);
-lean_ctor_set(x_523, 3, x_522);
-x_524 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
-x_525 = lean_array_push(x_524, x_523);
-x_526 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
-x_527 = lean_array_push(x_525, x_526);
-x_528 = l_Lean_Parser_Term_id___elambda__1___closed__2;
-x_529 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_529, 0, x_528);
-lean_ctor_set(x_529, 1, x_527);
-x_530 = lean_array_push(x_524, x_529);
-x_531 = lean_array_push(x_530, x_513);
-x_532 = l_Lean_Parser_Term_app___elambda__1___closed__2;
-x_533 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_533, 0, x_532);
-lean_ctor_set(x_533, 1, x_531);
-x_534 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__47;
-x_535 = lean_name_mk_numeral(x_534, x_515);
-x_536 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__46;
-x_537 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_537, 0, x_517);
-lean_ctor_set(x_537, 1, x_536);
-lean_ctor_set(x_537, 2, x_535);
-lean_ctor_set(x_537, 3, x_520);
-x_538 = lean_array_push(x_524, x_537);
-x_539 = lean_array_push(x_538, x_526);
-x_540 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_540, 0, x_528);
-lean_ctor_set(x_540, 1, x_539);
-x_541 = lean_array_push(x_524, x_533);
-x_542 = lean_array_push(x_541, x_540);
-x_543 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_543, 0, x_532);
-lean_ctor_set(x_543, 1, x_542);
-x_544 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__3(x_512);
-x_545 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_516);
+x_511 = lean_ctor_get(x_509, 1);
+lean_inc(x_511);
+lean_dec(x_509);
+x_512 = lean_box(0);
+x_513 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__40;
+lean_inc(x_510);
+x_514 = lean_name_mk_numeral(x_513, x_510);
+x_515 = lean_box(0);
+x_516 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__39;
+x_517 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__43;
+x_518 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_518, 0, x_512);
+lean_ctor_set(x_518, 1, x_516);
+lean_ctor_set(x_518, 2, x_514);
+lean_ctor_set(x_518, 3, x_517);
+x_519 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1;
+x_520 = lean_array_push(x_519, x_518);
+x_521 = l___private_Init_Lean_Elab_Term_8__expandCDot___closed__5;
+x_522 = lean_array_push(x_520, x_521);
+x_523 = l_Lean_Parser_Term_id___elambda__1___closed__2;
+x_524 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_524, 0, x_523);
+lean_ctor_set(x_524, 1, x_522);
+x_525 = lean_array_push(x_519, x_524);
+x_526 = lean_array_push(x_525, x_508);
+x_527 = l_Lean_Parser_Term_app___elambda__1___closed__2;
+x_528 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_528, 0, x_527);
+lean_ctor_set(x_528, 1, x_526);
+x_529 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__47;
+x_530 = lean_name_mk_numeral(x_529, x_510);
+x_531 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__46;
+x_532 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_532, 0, x_512);
+lean_ctor_set(x_532, 1, x_531);
+lean_ctor_set(x_532, 2, x_530);
+lean_ctor_set(x_532, 3, x_515);
+x_533 = lean_array_push(x_519, x_532);
+x_534 = lean_array_push(x_533, x_521);
+x_535 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_535, 0, x_523);
+lean_ctor_set(x_535, 1, x_534);
+x_536 = lean_array_push(x_519, x_528);
+x_537 = lean_array_push(x_536, x_535);
+x_538 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_538, 0, x_527);
+lean_ctor_set(x_538, 1, x_537);
+x_539 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___spec__3(x_507);
+x_540 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_511);
lean_dec(x_2);
-x_546 = lean_ctor_get(x_545, 0);
-lean_inc(x_546);
-x_547 = lean_ctor_get(x_545, 1);
-lean_inc(x_547);
-if (lean_is_exclusive(x_545)) {
- lean_ctor_release(x_545, 0);
- lean_ctor_release(x_545, 1);
- x_548 = x_545;
+x_541 = lean_ctor_get(x_540, 0);
+lean_inc(x_541);
+x_542 = lean_ctor_get(x_540, 1);
+lean_inc(x_542);
+if (lean_is_exclusive(x_540)) {
+ lean_ctor_release(x_540, 0);
+ lean_ctor_release(x_540, 1);
+ x_543 = x_540;
} else {
- lean_dec_ref(x_545);
- x_548 = lean_box(0);
+ lean_dec_ref(x_540);
+ x_543 = lean_box(0);
}
-x_549 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__51;
-lean_inc(x_546);
-x_550 = lean_name_mk_numeral(x_549, x_546);
-x_551 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__50;
-x_552 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__54;
-x_553 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_553, 0, x_517);
-lean_ctor_set(x_553, 1, x_551);
-lean_ctor_set(x_553, 2, x_550);
-lean_ctor_set(x_553, 3, x_552);
-x_554 = lean_array_push(x_524, x_553);
-x_555 = lean_array_push(x_554, x_526);
-x_556 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_556, 0, x_528);
-lean_ctor_set(x_556, 1, x_555);
-x_557 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
-lean_inc(x_546);
-x_558 = lean_name_mk_numeral(x_557, x_546);
-x_559 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
-x_560 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
-x_561 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_561, 0, x_517);
-lean_ctor_set(x_561, 1, x_559);
-lean_ctor_set(x_561, 2, x_558);
-lean_ctor_set(x_561, 3, x_560);
-x_562 = lean_array_push(x_524, x_561);
-x_563 = lean_array_push(x_562, x_526);
-x_564 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_564, 0, x_528);
-lean_ctor_set(x_564, 1, x_563);
-x_565 = lean_array_push(x_524, x_556);
-x_566 = lean_array_push(x_565, x_564);
-x_567 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_567, 0, x_532);
-lean_ctor_set(x_567, 1, x_566);
-x_568 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__60;
-x_569 = lean_name_mk_numeral(x_568, x_546);
-x_570 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__58;
-x_571 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__62;
-x_572 = lean_alloc_ctor(3, 4, 0);
-lean_ctor_set(x_572, 0, x_517);
-lean_ctor_set(x_572, 1, x_570);
-lean_ctor_set(x_572, 2, x_569);
-lean_ctor_set(x_572, 3, x_571);
-x_573 = lean_array_push(x_524, x_572);
-x_574 = lean_array_push(x_573, x_526);
-x_575 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_575, 0, x_528);
-lean_ctor_set(x_575, 1, x_574);
-x_576 = lean_array_push(x_524, x_575);
-x_577 = lean_array_push(x_524, x_567);
-x_578 = lean_ctor_get(x_499, 0);
-lean_inc(x_578);
-x_579 = lean_ctor_get(x_499, 1);
-lean_inc(x_579);
-x_580 = lean_ctor_get(x_499, 2);
-lean_inc(x_580);
-lean_dec(x_499);
-x_581 = lean_string_utf8_extract(x_578, x_579, x_580);
-lean_dec(x_580);
-lean_dec(x_579);
-lean_dec(x_578);
-x_582 = l_Lean_strLitKind;
-x_583 = l_Lean_mkStxLit(x_582, x_581, x_517);
-x_584 = l_Lean_FileMap_ofString___closed__1;
-x_585 = lean_array_push(x_584, x_583);
-x_586 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_544 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__51;
+lean_inc(x_541);
+x_545 = lean_name_mk_numeral(x_544, x_541);
+x_546 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__50;
+x_547 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__54;
+x_548 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_548, 0, x_512);
+lean_ctor_set(x_548, 1, x_546);
+lean_ctor_set(x_548, 2, x_545);
+lean_ctor_set(x_548, 3, x_547);
+x_549 = lean_array_push(x_519, x_548);
+x_550 = lean_array_push(x_549, x_521);
+x_551 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_551, 0, x_523);
+lean_ctor_set(x_551, 1, x_550);
+x_552 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__31;
+lean_inc(x_541);
+x_553 = lean_name_mk_numeral(x_552, x_541);
+x_554 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__30;
+x_555 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__36;
+x_556 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_556, 0, x_512);
+lean_ctor_set(x_556, 1, x_554);
+lean_ctor_set(x_556, 2, x_553);
+lean_ctor_set(x_556, 3, x_555);
+x_557 = lean_array_push(x_519, x_556);
+x_558 = lean_array_push(x_557, x_521);
+x_559 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_559, 0, x_523);
+lean_ctor_set(x_559, 1, x_558);
+x_560 = lean_array_push(x_519, x_551);
+x_561 = lean_array_push(x_560, x_559);
+x_562 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_562, 0, x_527);
+lean_ctor_set(x_562, 1, x_561);
+x_563 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__60;
+x_564 = lean_name_mk_numeral(x_563, x_541);
+x_565 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__58;
+x_566 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__62;
+x_567 = lean_alloc_ctor(3, 4, 0);
+lean_ctor_set(x_567, 0, x_512);
+lean_ctor_set(x_567, 1, x_565);
+lean_ctor_set(x_567, 2, x_564);
+lean_ctor_set(x_567, 3, x_566);
+x_568 = lean_array_push(x_519, x_567);
+x_569 = lean_array_push(x_568, x_521);
+x_570 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_570, 0, x_523);
+lean_ctor_set(x_570, 1, x_569);
+x_571 = lean_array_push(x_519, x_570);
+x_572 = lean_array_push(x_519, x_562);
+x_573 = lean_ctor_get(x_494, 0);
+lean_inc(x_573);
+x_574 = lean_ctor_get(x_494, 1);
+lean_inc(x_574);
+x_575 = lean_ctor_get(x_494, 2);
+lean_inc(x_575);
+lean_dec(x_494);
+x_576 = lean_string_utf8_extract(x_573, x_574, x_575);
+lean_dec(x_575);
+lean_dec(x_574);
+lean_dec(x_573);
+x_577 = l_Lean_mkStxStrLit(x_576, x_512);
+x_578 = l_Lean_FileMap_ofString___closed__1;
+x_579 = lean_array_push(x_578, x_577);
+x_580 = l_Lean_Parser_Term_str___elambda__1___closed__2;
+x_581 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_581, 0, x_580);
+lean_ctor_set(x_581, 1, x_579);
+x_582 = lean_array_push(x_571, x_581);
+x_583 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_583, 0, x_527);
+lean_ctor_set(x_583, 1, x_582);
+x_584 = lean_array_push(x_519, x_583);
+x_585 = lean_array_push(x_584, x_521);
+x_586 = l_Lean_nullKind___closed__2;
x_587 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_587, 0, x_586);
lean_ctor_set(x_587, 1, x_585);
-x_588 = lean_array_push(x_576, x_587);
-x_589 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_589, 0, x_532);
-lean_ctor_set(x_589, 1, x_588);
-x_590 = lean_array_push(x_524, x_589);
-x_591 = lean_array_push(x_590, x_526);
-x_592 = l_Lean_nullKind___closed__2;
+x_588 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
+x_589 = lean_array_push(x_588, x_587);
+x_590 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
+x_591 = lean_array_push(x_589, x_590);
+x_592 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
x_593 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_593, 0, x_592);
lean_ctor_set(x_593, 1, x_591);
-x_594 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__64;
-x_595 = lean_array_push(x_594, x_593);
-x_596 = l___private_Init_Lean_Elab_Quotation_5__quoteSyntax___main___closed__63;
-x_597 = lean_array_push(x_595, x_596);
-x_598 = l_Lean_Parser_Term_paren___elambda__1___closed__1;
-x_599 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_599, 0, x_598);
-lean_ctor_set(x_599, 1, x_597);
-x_600 = lean_array_push(x_577, x_599);
+x_594 = lean_array_push(x_572, x_593);
+x_595 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_595, 0, x_527);
+lean_ctor_set(x_595, 1, x_594);
+x_596 = lean_array_push(x_519, x_595);
+x_597 = lean_array_push(x_596, x_538);
+x_598 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_598, 0, x_527);
+lean_ctor_set(x_598, 1, x_597);
+x_599 = lean_array_push(x_519, x_598);
+x_600 = lean_array_push(x_599, x_539);
x_601 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_601, 0, x_532);
+lean_ctor_set(x_601, 0, x_527);
lean_ctor_set(x_601, 1, x_600);
-x_602 = lean_array_push(x_524, x_601);
-x_603 = lean_array_push(x_602, x_543);
-x_604 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_604, 0, x_532);
-lean_ctor_set(x_604, 1, x_603);
-x_605 = lean_array_push(x_524, x_604);
-x_606 = lean_array_push(x_605, x_544);
-x_607 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_607, 0, x_532);
-lean_ctor_set(x_607, 1, x_606);
-if (lean_is_scalar(x_548)) {
- x_608 = lean_alloc_ctor(0, 2, 0);
+if (lean_is_scalar(x_543)) {
+ x_602 = lean_alloc_ctor(0, 2, 0);
} else {
- x_608 = x_548;
+ x_602 = x_543;
}
-lean_ctor_set(x_608, 0, x_607);
-lean_ctor_set(x_608, 1, x_547);
-return x_608;
+lean_ctor_set(x_602, 0, x_601);
+lean_ctor_set(x_602, 1, x_542);
+return x_602;
}
}
}
@@ -24838,10 +24830,8 @@ _start:
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
x_4 = l_Lean_Elab_Term_oldParseExpr___closed__1;
lean_inc(x_2);
-x_5 = l_Lean_Parser_mkParserContextCore(x_1, x_2, x_4);
-x_6 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_6, 0, x_5);
-lean_ctor_set(x_6, 1, x_1);
+x_5 = l_Lean_Parser_mkInputContext(x_2, x_4);
+x_6 = l_Lean_Parser_mkParserContext(x_1, x_5);
x_7 = l_Lean_Parser_mkParserState(x_2);
lean_dec(x_2);
x_8 = l_Lean_Parser_ParserState_setPos(x_7, x_3);
diff --git a/stage0/stdlib/Init/Lean/Elab/Term.c b/stage0/stdlib/Init/Lean/Elab/Term.c
index f2b1737d64..8d7272f4f4 100644
--- a/stage0/stdlib/Init/Lean/Elab/Term.c
+++ b/stage0/stdlib/Init/Lean/Elab/Term.c
@@ -19537,122 +19537,101 @@ x_11 = lean_unbox(x_10);
lean_dec(x_10);
if (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; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39;
+lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30;
x_12 = lean_ctor_get(x_9, 1);
lean_inc(x_12);
lean_dec(x_9);
-lean_inc(x_5);
-x_13 = l_Lean_Elab_Term_instantiateMVars(x_1, x_4, x_5, x_12);
-x_14 = lean_ctor_get(x_13, 0);
-lean_inc(x_14);
-x_15 = lean_ctor_get(x_13, 1);
-lean_inc(x_15);
-lean_dec(x_13);
-lean_inc(x_5);
-x_16 = l_Lean_Elab_Term_instantiateMVars(x_1, x_3, x_5, x_15);
-x_17 = lean_ctor_get(x_16, 0);
-lean_inc(x_17);
-x_18 = lean_ctor_get(x_16, 1);
-lean_inc(x_18);
-lean_dec(x_16);
-lean_inc(x_5);
-x_19 = l_Lean_Elab_Term_instantiateMVars(x_1, x_8, x_5, x_18);
-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_alloc_ctor(2, 1, 0);
-lean_ctor_set(x_22, 0, x_14);
-x_23 = l_Lean_indentExpr(x_22);
-x_24 = l_Lean_Elab_Term_ensureHasType___closed__3;
-x_25 = lean_alloc_ctor(8, 2, 0);
-lean_ctor_set(x_25, 0, x_24);
-lean_ctor_set(x_25, 1, x_23);
-x_26 = l_Lean_MessageData_ofList___closed__3;
-x_27 = lean_alloc_ctor(8, 2, 0);
-lean_ctor_set(x_27, 0, x_25);
-lean_ctor_set(x_27, 1, x_26);
-x_28 = l_Lean_Meta_Exception_mkAppTypeMismatchMessage___closed__8;
+x_13 = lean_alloc_ctor(2, 1, 0);
+lean_ctor_set(x_13, 0, x_4);
+x_14 = l_Lean_indentExpr(x_13);
+x_15 = l_Lean_Elab_Term_ensureHasType___closed__3;
+x_16 = lean_alloc_ctor(8, 2, 0);
+lean_ctor_set(x_16, 0, x_15);
+lean_ctor_set(x_16, 1, x_14);
+x_17 = l_Lean_MessageData_ofList___closed__3;
+x_18 = lean_alloc_ctor(8, 2, 0);
+lean_ctor_set(x_18, 0, x_16);
+lean_ctor_set(x_18, 1, x_17);
+x_19 = l_Lean_Meta_Exception_mkAppTypeMismatchMessage___closed__8;
+x_20 = lean_alloc_ctor(8, 2, 0);
+lean_ctor_set(x_20, 0, x_18);
+lean_ctor_set(x_20, 1, x_19);
+x_21 = lean_alloc_ctor(2, 1, 0);
+lean_ctor_set(x_21, 0, x_3);
+x_22 = l_Lean_indentExpr(x_21);
+x_23 = lean_alloc_ctor(8, 2, 0);
+lean_ctor_set(x_23, 0, x_20);
+lean_ctor_set(x_23, 1, x_22);
+x_24 = lean_alloc_ctor(8, 2, 0);
+lean_ctor_set(x_24, 0, x_23);
+lean_ctor_set(x_24, 1, x_17);
+x_25 = l_Lean_KernelException_toMessageData___closed__12;
+x_26 = lean_alloc_ctor(8, 2, 0);
+lean_ctor_set(x_26, 0, x_24);
+lean_ctor_set(x_26, 1, x_25);
+x_27 = lean_alloc_ctor(2, 1, 0);
+lean_ctor_set(x_27, 0, x_8);
+x_28 = l_Lean_indentExpr(x_27);
x_29 = lean_alloc_ctor(8, 2, 0);
-lean_ctor_set(x_29, 0, x_27);
+lean_ctor_set(x_29, 0, x_26);
lean_ctor_set(x_29, 1, x_28);
-x_30 = lean_alloc_ctor(2, 1, 0);
-lean_ctor_set(x_30, 0, x_17);
-x_31 = l_Lean_indentExpr(x_30);
-x_32 = lean_alloc_ctor(8, 2, 0);
-lean_ctor_set(x_32, 0, x_29);
-lean_ctor_set(x_32, 1, x_31);
-x_33 = lean_alloc_ctor(8, 2, 0);
-lean_ctor_set(x_33, 0, x_32);
-lean_ctor_set(x_33, 1, x_26);
-x_34 = l_Lean_KernelException_toMessageData___closed__12;
-x_35 = lean_alloc_ctor(8, 2, 0);
-lean_ctor_set(x_35, 0, x_33);
-lean_ctor_set(x_35, 1, x_34);
-x_36 = lean_alloc_ctor(2, 1, 0);
-lean_ctor_set(x_36, 0, x_20);
-x_37 = l_Lean_indentExpr(x_36);
-x_38 = lean_alloc_ctor(8, 2, 0);
-lean_ctor_set(x_38, 0, x_35);
-lean_ctor_set(x_38, 1, x_37);
-x_39 = l_Lean_Elab_Term_throwError___rarg(x_1, x_38, x_5, x_21);
-return x_39;
+x_30 = l_Lean_Elab_Term_throwError___rarg(x_1, x_29, x_5, x_12);
+return x_30;
}
else
{
-uint8_t x_40;
+uint8_t x_31;
lean_dec(x_8);
lean_dec(x_5);
lean_dec(x_3);
lean_dec(x_1);
-x_40 = !lean_is_exclusive(x_9);
-if (x_40 == 0)
+x_31 = !lean_is_exclusive(x_9);
+if (x_31 == 0)
{
-lean_object* x_41;
-x_41 = lean_ctor_get(x_9, 0);
-lean_dec(x_41);
+lean_object* x_32;
+x_32 = lean_ctor_get(x_9, 0);
+lean_dec(x_32);
lean_ctor_set(x_9, 0, x_4);
return x_9;
}
else
{
-lean_object* x_42; lean_object* x_43;
-x_42 = lean_ctor_get(x_9, 1);
-lean_inc(x_42);
+lean_object* x_33; lean_object* x_34;
+x_33 = lean_ctor_get(x_9, 1);
+lean_inc(x_33);
lean_dec(x_9);
-x_43 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_43, 0, x_4);
-lean_ctor_set(x_43, 1, x_42);
-return x_43;
+x_34 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_34, 0, x_4);
+lean_ctor_set(x_34, 1, x_33);
+return x_34;
}
}
}
else
{
-uint8_t x_44;
+uint8_t x_35;
lean_dec(x_8);
lean_dec(x_5);
lean_dec(x_4);
lean_dec(x_3);
lean_dec(x_1);
-x_44 = !lean_is_exclusive(x_9);
-if (x_44 == 0)
+x_35 = !lean_is_exclusive(x_9);
+if (x_35 == 0)
{
return x_9;
}
else
{
-lean_object* x_45; lean_object* x_46; lean_object* x_47;
-x_45 = lean_ctor_get(x_9, 0);
-x_46 = lean_ctor_get(x_9, 1);
-lean_inc(x_46);
-lean_inc(x_45);
+lean_object* x_36; lean_object* x_37; lean_object* x_38;
+x_36 = lean_ctor_get(x_9, 0);
+x_37 = lean_ctor_get(x_9, 1);
+lean_inc(x_37);
+lean_inc(x_36);
lean_dec(x_9);
-x_47 = lean_alloc_ctor(1, 2, 0);
-lean_ctor_set(x_47, 0, x_45);
-lean_ctor_set(x_47, 1, x_46);
-return x_47;
+x_38 = lean_alloc_ctor(1, 2, 0);
+lean_ctor_set(x_38, 0, x_36);
+lean_ctor_set(x_38, 1, x_37);
+return x_38;
}
}
}
diff --git a/stage0/stdlib/Init/Lean/Meta/Offset.c b/stage0/stdlib/Init/Lean/Meta/Offset.c
index f7e099c782..66b3e5baea 100644
--- a/stage0/stdlib/Init/Lean/Meta/Offset.c
+++ b/stage0/stdlib/Init/Lean/Meta/Offset.c
@@ -13,6 +13,7 @@
#ifdef __cplusplus
extern "C" {
#endif
+extern lean_object* l___private_Init_Lean_Syntax_10__decodeNatLitVal___closed__1;
lean_object* l_Lean_Meta_isExprDefEqAux(lean_object*, lean_object*, lean_object*, lean_object*);
uint8_t lean_name_eq(lean_object*, lean_object*);
lean_object* l_Lean_Meta_evalNat___main___closed__10;
@@ -53,7 +54,6 @@ lean_object* l_Lean_mkNatLit(lean_object*);
lean_object* l___private_Init_Lean_Meta_Offset_2__isOffset(lean_object*);
lean_object* l_Lean_mkAppB(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_mkConst(lean_object*, lean_object*);
-extern lean_object* l___private_Init_Lean_Syntax_9__decodeNatLitVal___closed__1;
uint8_t lean_string_dec_eq(lean_object*, lean_object*);
uint8_t lean_nat_dec_lt(lean_object*, lean_object*);
lean_object* _init_l_Lean_Meta_evalNat___main___closed__1() {
@@ -227,7 +227,7 @@ return x_12;
else
{
lean_object* x_13;
-x_13 = l___private_Init_Lean_Syntax_9__decodeNatLitVal___closed__1;
+x_13 = l___private_Init_Lean_Syntax_10__decodeNatLitVal___closed__1;
return x_13;
}
}
diff --git a/stage0/stdlib/Init/Lean/Parser/Module.c b/stage0/stdlib/Init/Lean/Parser/Module.c
index 4ca5356361..36a6c5c72d 100644
--- a/stage0/stdlib/Init/Lean/Parser/Module.c
+++ b/stage0/stdlib/Init/Lean/Parser/Module.c
@@ -13,12 +13,12 @@
#ifdef __cplusplus
extern "C" {
#endif
-lean_object* l_Lean_Parser_mkParserContextCore(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Module_import___elambda__1___closed__5;
extern lean_object* l_Lean_Parser_manyAux___main___closed__1;
lean_object* l_IO_print___at___private_Init_Lean_Parser_Module_4__testModuleParserAux___main___spec__4(lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1;
lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*);
+lean_object* l_Lean_Parser_mkParserContext(lean_object*, lean_object*);
lean_object* l_Lean_Parser_Module_import___closed__8;
lean_object* lean_io_timeit(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_Module_import___closed__4;
@@ -42,6 +42,7 @@ lean_object* l_Lean_Parser_Module_prelude___elambda__1___closed__2;
lean_object* l_Lean_Parser_Module_import;
lean_object* l_Lean_Parser_Module_import___elambda__1___closed__2;
lean_object* l_Lean_Parser_Module_header___closed__4;
+lean_object* l_Lean_Parser_mkInputContext(lean_object*, lean_object*);
lean_object* l_Lean_Parser_ParserAttribute_runParserFn(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Array_forMAux___main___at___private_Init_Lean_Parser_Module_4__testModuleParserAux___main___spec__10___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* lean_array_push(lean_object*, lean_object*);
@@ -1410,151 +1411,68 @@ uint8_t x_2;
x_2 = !lean_is_exclusive(x_1);
if (x_2 == 0)
{
-lean_object* x_3; uint8_t x_4;
-x_3 = lean_ctor_get(x_1, 0);
-x_4 = !lean_is_exclusive(x_3);
-if (x_4 == 0)
+lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6;
+x_3 = lean_ctor_get(x_1, 2);
+x_4 = l_Lean_Parser_Module_header;
+x_5 = lean_ctor_get(x_4, 0);
+lean_inc(x_5);
+x_6 = l_Lean_Parser_addParserTokens(x_3, x_5);
+if (lean_obj_tag(x_6) == 0)
{
-lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8;
-x_5 = lean_ctor_get(x_3, 3);
-x_6 = l_Lean_Parser_Module_header;
-x_7 = lean_ctor_get(x_6, 0);
-lean_inc(x_7);
-x_8 = l_Lean_Parser_addParserTokens(x_5, x_7);
-if (lean_obj_tag(x_8) == 0)
-{
-lean_object* x_9; lean_object* x_10;
-lean_dec(x_8);
-x_9 = l___private_Init_Lean_Parser_Parser_11__addTokenTableEntry___closed__1;
-x_10 = l_unreachable_x21___rarg(x_9);
-lean_ctor_set(x_3, 3, x_10);
+lean_object* x_7; lean_object* x_8;
+lean_dec(x_6);
+x_7 = l___private_Init_Lean_Parser_Parser_11__addTokenTableEntry___closed__1;
+x_8 = l_unreachable_x21___rarg(x_7);
+lean_ctor_set(x_1, 2, x_8);
return x_1;
}
else
{
-lean_object* x_11;
-x_11 = lean_ctor_get(x_8, 0);
-lean_inc(x_11);
-lean_dec(x_8);
-lean_ctor_set(x_3, 3, x_11);
+lean_object* x_9;
+x_9 = lean_ctor_get(x_6, 0);
+lean_inc(x_9);
+lean_dec(x_6);
+lean_ctor_set(x_1, 2, x_9);
return x_1;
}
}
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_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_1, 0);
+x_11 = lean_ctor_get(x_1, 1);
+x_12 = lean_ctor_get(x_1, 2);
lean_inc(x_12);
-lean_dec(x_3);
-x_16 = l_Lean_Parser_Module_header;
-x_17 = lean_ctor_get(x_16, 0);
-lean_inc(x_17);
-x_18 = l_Lean_Parser_addParserTokens(x_15, x_17);
-if (lean_obj_tag(x_18) == 0)
-{
-lean_object* x_19; lean_object* x_20; lean_object* x_21;
-lean_dec(x_18);
-x_19 = l___private_Init_Lean_Parser_Parser_11__addTokenTableEntry___closed__1;
-x_20 = l_unreachable_x21___rarg(x_19);
-x_21 = lean_alloc_ctor(0, 4, 0);
-lean_ctor_set(x_21, 0, x_12);
-lean_ctor_set(x_21, 1, x_13);
-lean_ctor_set(x_21, 2, x_14);
-lean_ctor_set(x_21, 3, x_20);
-lean_ctor_set(x_1, 0, x_21);
-return x_1;
-}
-else
-{
-lean_object* x_22; lean_object* x_23;
-x_22 = lean_ctor_get(x_18, 0);
-lean_inc(x_22);
-lean_dec(x_18);
-x_23 = lean_alloc_ctor(0, 4, 0);
-lean_ctor_set(x_23, 0, x_12);
-lean_ctor_set(x_23, 1, x_13);
-lean_ctor_set(x_23, 2, x_14);
-lean_ctor_set(x_23, 3, x_22);
-lean_ctor_set(x_1, 0, x_23);
-return x_1;
-}
-}
-}
-else
-{
-lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33;
-x_24 = lean_ctor_get(x_1, 0);
-x_25 = lean_ctor_get(x_1, 1);
-lean_inc(x_25);
-lean_inc(x_24);
+lean_inc(x_11);
+lean_inc(x_10);
lean_dec(x_1);
-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 = l_Lean_Parser_Module_header;
-x_32 = lean_ctor_get(x_31, 0);
-lean_inc(x_32);
-x_33 = l_Lean_Parser_addParserTokens(x_29, x_32);
-if (lean_obj_tag(x_33) == 0)
+x_13 = l_Lean_Parser_Module_header;
+x_14 = lean_ctor_get(x_13, 0);
+lean_inc(x_14);
+x_15 = l_Lean_Parser_addParserTokens(x_12, x_14);
+if (lean_obj_tag(x_15) == 0)
{
-lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37;
-lean_dec(x_33);
-x_34 = l___private_Init_Lean_Parser_Parser_11__addTokenTableEntry___closed__1;
-x_35 = l_unreachable_x21___rarg(x_34);
-if (lean_is_scalar(x_30)) {
- x_36 = lean_alloc_ctor(0, 4, 0);
-} else {
- x_36 = x_30;
-}
-lean_ctor_set(x_36, 0, x_26);
-lean_ctor_set(x_36, 1, x_27);
-lean_ctor_set(x_36, 2, x_28);
-lean_ctor_set(x_36, 3, x_35);
-x_37 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_37, 0, x_36);
-lean_ctor_set(x_37, 1, x_25);
-return x_37;
+lean_object* x_16; lean_object* x_17; lean_object* x_18;
+lean_dec(x_15);
+x_16 = l___private_Init_Lean_Parser_Parser_11__addTokenTableEntry___closed__1;
+x_17 = l_unreachable_x21___rarg(x_16);
+x_18 = lean_alloc_ctor(0, 3, 0);
+lean_ctor_set(x_18, 0, x_10);
+lean_ctor_set(x_18, 1, x_11);
+lean_ctor_set(x_18, 2, x_17);
+return x_18;
}
else
{
-lean_object* x_38; lean_object* x_39; lean_object* x_40;
-x_38 = lean_ctor_get(x_33, 0);
-lean_inc(x_38);
-lean_dec(x_33);
-if (lean_is_scalar(x_30)) {
- x_39 = lean_alloc_ctor(0, 4, 0);
-} else {
- x_39 = x_30;
-}
-lean_ctor_set(x_39, 0, x_26);
-lean_ctor_set(x_39, 1, x_27);
-lean_ctor_set(x_39, 2, x_28);
-lean_ctor_set(x_39, 3, x_38);
-x_40 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_40, 0, x_39);
-lean_ctor_set(x_40, 1, x_25);
-return x_40;
+lean_object* x_19; lean_object* x_20;
+x_19 = lean_ctor_get(x_15, 0);
+lean_inc(x_19);
+lean_dec(x_15);
+x_20 = lean_alloc_ctor(0, 3, 0);
+lean_ctor_set(x_20, 0, x_10);
+lean_ctor_set(x_20, 1, x_11);
+lean_ctor_set(x_20, 2, x_19);
+return x_20;
}
}
}
@@ -1619,9 +1537,7 @@ lean_object* l_Lean_Parser_parseHeader(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13;
-x_3 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_3, 0, x_2);
-lean_ctor_set(x_3, 1, x_1);
+x_3 = l_Lean_Parser_mkParserContext(x_1, x_2);
x_4 = l_Lean_Parser_Module_updateTokens(x_3);
x_5 = lean_ctor_get(x_4, 0);
lean_inc(x_5);
@@ -1828,11 +1744,9 @@ if (x_9 == 0)
lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20;
x_10 = lean_ctor_get(x_3, 0);
lean_dec(x_10);
-lean_inc(x_1);
lean_inc(x_2);
-x_11 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_11, 0, x_2);
-lean_ctor_set(x_11, 1, x_1);
+lean_inc(x_1);
+x_11 = l_Lean_Parser_mkParserContext(x_1, x_2);
x_12 = l_Lean_Parser_initCacheForInput(x_7);
lean_dec(x_7);
x_13 = lean_box(0);
@@ -1913,11 +1827,9 @@ else
{
lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48;
lean_dec(x_3);
-lean_inc(x_1);
lean_inc(x_2);
-x_39 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_39, 0, x_2);
-lean_ctor_set(x_39, 1, x_1);
+lean_inc(x_1);
+x_39 = l_Lean_Parser_mkParserContext(x_1, x_2);
x_40 = l_Lean_Parser_initCacheForInput(x_7);
lean_dec(x_7);
x_41 = lean_box(0);
@@ -2776,7 +2688,7 @@ lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_obj
x_6 = l_Lean_Parser_testModuleParser___closed__1;
lean_inc(x_3);
x_7 = lean_string_append(x_3, x_6);
-x_8 = l_Lean_Parser_mkParserContextCore(x_1, x_2, x_3);
+x_8 = l_Lean_Parser_mkInputContext(x_2, x_3);
lean_inc(x_8);
lean_inc(x_1);
x_9 = l_Lean_Parser_parseHeader(x_1, x_8);
@@ -3000,7 +2912,7 @@ lean_inc(x_8);
x_9 = lean_ctor_get(x_7, 1);
lean_inc(x_9);
lean_dec(x_7);
-x_10 = l_Lean_Parser_mkParserContextCore(x_1, x_8, x_5);
+x_10 = l_Lean_Parser_mkInputContext(x_8, x_5);
lean_inc(x_10);
lean_inc(x_1);
x_11 = l_Lean_Parser_parseHeader(x_1, x_10);
diff --git a/stage0/stdlib/Init/Lean/Parser/Parser.c b/stage0/stdlib/Init/Lean/Parser/Parser.c
index f3220c55d0..2d706248b3 100644
--- a/stage0/stdlib/Init/Lean/Parser/Parser.c
+++ b/stage0/stdlib/Init/Lean/Parser/Parser.c
@@ -23,7 +23,6 @@ lean_object* l_Lean_Parser_charLit___boxed(lean_object*);
lean_object* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1(lean_object*);
lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__2;
lean_object* l_Lean_Parser_builtinTokenTable;
-lean_object* l_Lean_Parser_mkParserContextCore(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_finishCommentBlock(lean_object*, lean_object*, lean_object*);
lean_object* lean_string_push(lean_object*, uint32_t);
extern lean_object* l_Lean_Name_toString___closed__1;
@@ -63,12 +62,13 @@ extern lean_object* l___private_Init_Lean_Environment_8__persistentEnvExtensions
lean_object* l_Lean_Parser_ParserState_mkError(lean_object*, lean_object*);
lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_Parser_mkSyntaxNodeKindExtension___spec__1___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_octalNumberFn___spec__3(lean_object*, lean_object*);
-lean_object* l_Lean_Parser_mkParserContext(lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_Parser_mkParserContext(lean_object*, lean_object*);
lean_object* l_Lean_Parser_hashAndthen___boxed(lean_object*);
lean_object* l_Lean_Parser_declareBuiltinParser___closed__8;
lean_object* l_Lean_Parser_optional___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_TokenConfig_toStr___closed__1;
lean_object* l_Lean_Parser_manyFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_Parser_InputContext_inhabited___closed__1;
lean_object* lean_mk_empty_array_with_capacity(lean_object*);
lean_object* l_Lean_Parser_sepByInfo(lean_object*, lean_object*);
lean_object* l_Lean_Parser_registerBuiltinParserAttribute___lambda__1___closed__5;
@@ -142,6 +142,7 @@ lean_object* l___private_Init_Lean_Parser_Parser_18__noImmediateColon___elambda_
lean_object* l_Lean_Parser_Trie_matchPrefix___rarg(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_octalNumberFn___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_ParserState_stackSize___boxed(lean_object*);
+lean_object* l_Lean_Parser_getTokenTable___boxed(lean_object*);
lean_object* l_Lean_Parser_octalNumberFn(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_satisfyFn___at_Lean_Parser_identFnAux___main___spec__4___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_hexNumberFn(lean_object*, lean_object*, lean_object*);
@@ -163,6 +164,7 @@ lean_object* l_PersistentHashMap_foldlM___at___private_Init_Lean_Parser_Parser_1
lean_object* l_Lean_Parser_optionalFn___boxed(lean_object*);
lean_object* l_Array_iterateMAux___main___at_Lean_Parser_mkSyntaxNodeKindExtension___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
extern lean_object* l_Lean_stxInh;
+lean_object* l_Lean_Parser_InputContext_inhabited;
lean_object* l_HashMapImp_find_x3f___at_Lean_Parser_compileParserDescr___main___spec__1(lean_object*, lean_object*);
lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_10__mkImportedTokenTable___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_18__noImmediateColon___elambda__1___rarg___closed__1;
@@ -229,6 +231,7 @@ lean_object* l_Lean_Parser_symbolOrIdentInfo(lean_object*);
lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Parser_Parser_14__addImportedParsers___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_try___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_mkAntiquot___closed__4;
+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_ParserAttribute_runParserFn(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_addBuiltinParser(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*);
@@ -323,7 +326,6 @@ lean_object* l_Lean_Parser_quotedSymbolFn___rarg___closed__5;
lean_object* l_Lean_Parser_optional(uint8_t, lean_object*);
extern lean_object* l_Lean_AttributeImpl_inhabited___closed__4;
lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1(lean_object*);
-lean_object* l_Lean_Parser_mkParserContextCore___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_numLit___boxed(lean_object*);
lean_object* l_Lean_Parser_identFn___boxed(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_18__noImmediateColon___boxed(lean_object*);
@@ -410,7 +412,6 @@ lean_object* l_Lean_Parser_Parser_inhabited(uint8_t);
lean_object* l___private_Init_Lean_Parser_Parser_7__mkResult(lean_object*, lean_object*);
lean_object* l_AssocList_find___main___at_Lean_Parser_compileParserDescr___main___spec__2___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Parser_dollarSymbol___elambda__1___boxed(lean_object*, lean_object*);
-lean_object* l_Lean_Parser_ParserContextCore_inhabited;
lean_object* l_Lean_Parser_takeUntilFn___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Parser_registerParserAttribute___spec__5(lean_object*, lean_object*);
lean_object* l_Lean_Parser_TokenTableAttribute_inhabited___closed__5;
@@ -503,7 +504,6 @@ extern lean_object* l_Lean_strLitKind___closed__1;
lean_object* l_Lean_Parser_symbolOrIdentInfo___elambda__2(lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_8__mergePrecendences___closed__3;
lean_object* l_Lean_Parser_mkParserOfConstant___closed__1;
-lean_object* l_Lean_Parser_ParserContextCore_toParserContext(lean_object*, lean_object*);
lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux(uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Parser_Parser_14__addImportedParsers___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
@@ -669,6 +669,7 @@ lean_object* l_Lean_Parser_mkTokenTableAttribute___closed__1;
lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_rawCh(uint8_t, uint32_t, uint8_t);
lean_object* l_mkHashMapImp___rarg(lean_object*);
+lean_object* l_Lean_Parser_getTokenTable(lean_object*);
lean_object* l_Lean_Parser_many1Indent___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_sepByInfo___elambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_symbolOrIdentInfo___elambda__2___boxed(lean_object*);
@@ -1146,7 +1147,6 @@ lean_object* l_Lean_Parser_sepBy___boxed(lean_object*, lean_object*, lean_object
lean_object* l_Lean_Parser_trailingLoop___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Parser_quotedSymbol___boxed(lean_object*);
lean_object* l_Lean_Parser_symbolOrIdent(uint8_t, lean_object*);
-lean_object* l_Lean_Parser_ParserContextCore_inhabited___closed__1;
lean_object* l_Lean_Parser_ParserState_mergeErrors(lean_object*, lean_object*, lean_object*);
uint8_t l_Lean_isIdRest(uint32_t);
lean_object* l_Lean_Parser_numberFnAux___boxed(lean_object*, lean_object*);
@@ -1976,26 +1976,24 @@ x_8 = l_PersistentHashMap_insertAux___main___at_Lean_Parser_SyntaxNodeKindSet_in
return x_8;
}
}
-lean_object* _init_l_Lean_Parser_ParserContextCore_inhabited___closed__1() {
+lean_object* _init_l_Lean_Parser_InputContext_inhabited___closed__1() {
_start:
{
-lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
+lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_String_splitAux___main___closed__1;
x_2 = l_Lean_FileMap_Inhabited___closed__1;
-x_3 = l_Lean_Parser_Trie_HasEmptyc___closed__1;
-x_4 = lean_alloc_ctor(0, 4, 0);
-lean_ctor_set(x_4, 0, x_1);
-lean_ctor_set(x_4, 1, x_1);
-lean_ctor_set(x_4, 2, x_2);
-lean_ctor_set(x_4, 3, x_3);
-return x_4;
+x_3 = lean_alloc_ctor(0, 3, 0);
+lean_ctor_set(x_3, 0, x_1);
+lean_ctor_set(x_3, 1, x_1);
+lean_ctor_set(x_3, 2, x_2);
+return x_3;
}
}
-lean_object* _init_l_Lean_Parser_ParserContextCore_inhabited() {
+lean_object* _init_l_Lean_Parser_InputContext_inhabited() {
_start:
{
lean_object* x_1;
-x_1 = l_Lean_Parser_ParserContextCore_inhabited___closed__1;
+x_1 = l_Lean_Parser_InputContext_inhabited___closed__1;
return x_1;
}
}
@@ -8925,6 +8923,7 @@ x_3 = lean_ctor_get(x_1, 0);
lean_inc(x_3);
x_4 = lean_ctor_get(x_3, 0);
lean_inc(x_4);
+lean_dec(x_3);
x_5 = lean_ctor_get(x_2, 1);
lean_inc(x_5);
x_6 = lean_string_utf8_get(x_4, x_5);
@@ -8942,9 +8941,8 @@ x_11 = l_Char_isDigit(x_6);
if (x_11 == 0)
{
lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16;
-x_12 = lean_ctor_get(x_3, 3);
+x_12 = lean_ctor_get(x_1, 2);
lean_inc(x_12);
-lean_dec(x_3);
lean_inc(x_5);
x_13 = l_Lean_Parser_Trie_matchPrefix___rarg(x_4, x_12, x_5);
lean_dec(x_4);
@@ -8961,7 +8959,6 @@ else
lean_object* x_17;
lean_dec(x_5);
lean_dec(x_4);
-lean_dec(x_3);
x_17 = l_Lean_Parser_numberFnAux(x_1, x_2);
lean_dec(x_1);
return x_17;
@@ -8970,7 +8967,6 @@ return x_17;
else
{
lean_object* x_18; lean_object* x_19;
-lean_dec(x_3);
x_18 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5);
lean_dec(x_4);
x_19 = l_Lean_Parser_charLitFnAux(x_5, x_1, x_18);
@@ -8981,7 +8977,6 @@ return x_19;
else
{
lean_object* x_20; lean_object* x_21;
-lean_dec(x_3);
x_20 = l_Lean_Parser_ParserState_next(x_2, x_4, x_5);
lean_dec(x_4);
x_21 = l_Lean_Parser_strLitFnAux___main(x_5, x_1, x_20);
@@ -23392,105 +23387,102 @@ return x_54;
}
case 2:
{
-lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; uint8_t x_61;
+lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60;
x_55 = lean_ctor_get(x_4, 0);
lean_inc(x_55);
lean_dec(x_4);
x_56 = lean_ctor_get(x_12, 1);
lean_inc(x_56);
lean_dec(x_12);
-x_57 = lean_ctor_get(x_2, 0);
+x_57 = lean_ctor_get(x_2, 2);
lean_inc(x_57);
lean_dec(x_2);
-x_58 = lean_ctor_get(x_57, 3);
-lean_inc(x_58);
-lean_dec(x_57);
-x_59 = lean_unsigned_to_nat(0u);
-x_60 = l_Lean_Parser_Trie_matchPrefix___rarg(x_56, x_58, x_59);
+x_58 = lean_unsigned_to_nat(0u);
+x_59 = l_Lean_Parser_Trie_matchPrefix___rarg(x_56, x_57, x_58);
lean_dec(x_56);
-x_61 = !lean_is_exclusive(x_60);
-if (x_61 == 0)
+x_60 = !lean_is_exclusive(x_59);
+if (x_60 == 0)
{
-lean_object* x_62; lean_object* x_63;
-x_62 = lean_ctor_get(x_60, 1);
-x_63 = lean_ctor_get(x_60, 0);
-lean_dec(x_63);
-if (lean_obj_tag(x_62) == 0)
+lean_object* x_61; lean_object* x_62;
+x_61 = lean_ctor_get(x_59, 1);
+x_62 = lean_ctor_get(x_59, 0);
+lean_dec(x_62);
+if (lean_obj_tag(x_61) == 0)
{
-lean_ctor_set(x_60, 1, x_59);
-lean_ctor_set(x_60, 0, x_55);
-return x_60;
+lean_ctor_set(x_59, 1, x_58);
+lean_ctor_set(x_59, 0, x_55);
+return x_59;
}
else
{
-lean_object* x_64; lean_object* x_65;
-x_64 = lean_ctor_get(x_62, 0);
+lean_object* x_63; lean_object* x_64;
+x_63 = lean_ctor_get(x_61, 0);
+lean_inc(x_63);
+lean_dec(x_61);
+x_64 = lean_ctor_get(x_63, 1);
lean_inc(x_64);
-lean_dec(x_62);
-x_65 = lean_ctor_get(x_64, 1);
+if (lean_obj_tag(x_64) == 0)
+{
+lean_object* x_65;
+x_65 = lean_ctor_get(x_63, 2);
lean_inc(x_65);
+lean_dec(x_63);
if (lean_obj_tag(x_65) == 0)
{
-lean_object* x_66;
-x_66 = lean_ctor_get(x_64, 2);
-lean_inc(x_66);
-lean_dec(x_64);
-if (lean_obj_tag(x_66) == 0)
+lean_ctor_set(x_59, 1, x_58);
+lean_ctor_set(x_59, 0, x_55);
+return x_59;
+}
+else
{
-lean_ctor_set(x_60, 1, x_59);
-lean_ctor_set(x_60, 0, x_55);
-return x_60;
+lean_object* x_66;
+x_66 = lean_ctor_get(x_65, 0);
+lean_inc(x_66);
+lean_dec(x_65);
+lean_ctor_set(x_59, 1, x_66);
+lean_ctor_set(x_59, 0, x_55);
+return x_59;
+}
}
else
{
lean_object* x_67;
-x_67 = lean_ctor_get(x_66, 0);
+x_67 = lean_ctor_get(x_63, 2);
lean_inc(x_67);
-lean_dec(x_66);
-lean_ctor_set(x_60, 1, x_67);
-lean_ctor_set(x_60, 0, x_55);
-return x_60;
-}
-}
-else
+lean_dec(x_63);
+if (lean_obj_tag(x_67) == 0)
{
lean_object* x_68;
-x_68 = lean_ctor_get(x_64, 2);
+x_68 = lean_ctor_get(x_64, 0);
lean_inc(x_68);
lean_dec(x_64);
-if (lean_obj_tag(x_68) == 0)
+lean_ctor_set(x_59, 1, x_68);
+lean_ctor_set(x_59, 0, x_55);
+return x_59;
+}
+else
{
-lean_object* x_69;
-x_69 = lean_ctor_get(x_65, 0);
+lean_object* x_69; lean_object* x_70; uint8_t x_71;
+x_69 = lean_ctor_get(x_64, 0);
lean_inc(x_69);
-lean_dec(x_65);
-lean_ctor_set(x_60, 1, x_69);
-lean_ctor_set(x_60, 0, x_55);
-return x_60;
-}
-else
-{
-lean_object* x_70; lean_object* x_71; uint8_t x_72;
-x_70 = lean_ctor_get(x_65, 0);
+lean_dec(x_64);
+x_70 = lean_ctor_get(x_67, 0);
lean_inc(x_70);
-lean_dec(x_65);
-x_71 = lean_ctor_get(x_68, 0);
-lean_inc(x_71);
-lean_dec(x_68);
-x_72 = l_Lean_Parser_checkTailNoWs(x_1);
-if (x_72 == 0)
-{
-lean_dec(x_71);
-lean_ctor_set(x_60, 1, x_70);
-lean_ctor_set(x_60, 0, x_55);
-return x_60;
-}
-else
+lean_dec(x_67);
+x_71 = l_Lean_Parser_checkTailNoWs(x_1);
+if (x_71 == 0)
{
lean_dec(x_70);
-lean_ctor_set(x_60, 1, x_71);
-lean_ctor_set(x_60, 0, x_55);
-return x_60;
+lean_ctor_set(x_59, 1, x_69);
+lean_ctor_set(x_59, 0, x_55);
+return x_59;
+}
+else
+{
+lean_dec(x_69);
+lean_ctor_set(x_59, 1, x_70);
+lean_ctor_set(x_59, 0, x_55);
+return x_59;
}
}
}
@@ -23498,97 +23490,97 @@ return x_60;
}
else
{
+lean_object* x_72;
+x_72 = lean_ctor_get(x_59, 1);
+lean_inc(x_72);
+lean_dec(x_59);
+if (lean_obj_tag(x_72) == 0)
+{
lean_object* x_73;
-x_73 = lean_ctor_get(x_60, 1);
-lean_inc(x_73);
-lean_dec(x_60);
-if (lean_obj_tag(x_73) == 0)
-{
-lean_object* x_74;
-x_74 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_74, 0, x_55);
-lean_ctor_set(x_74, 1, x_59);
-return x_74;
+x_73 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_73, 0, x_55);
+lean_ctor_set(x_73, 1, x_58);
+return x_73;
}
else
{
-lean_object* x_75; lean_object* x_76;
-x_75 = lean_ctor_get(x_73, 0);
+lean_object* x_74; lean_object* x_75;
+x_74 = lean_ctor_get(x_72, 0);
+lean_inc(x_74);
+lean_dec(x_72);
+x_75 = lean_ctor_get(x_74, 1);
lean_inc(x_75);
-lean_dec(x_73);
-x_76 = lean_ctor_get(x_75, 1);
+if (lean_obj_tag(x_75) == 0)
+{
+lean_object* x_76;
+x_76 = lean_ctor_get(x_74, 2);
lean_inc(x_76);
+lean_dec(x_74);
if (lean_obj_tag(x_76) == 0)
{
lean_object* x_77;
-x_77 = lean_ctor_get(x_75, 2);
-lean_inc(x_77);
-lean_dec(x_75);
-if (lean_obj_tag(x_77) == 0)
-{
-lean_object* x_78;
-x_78 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_78, 0, x_55);
-lean_ctor_set(x_78, 1, x_59);
-return x_78;
+x_77 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_77, 0, x_55);
+lean_ctor_set(x_77, 1, x_58);
+return x_77;
}
else
{
-lean_object* x_79; lean_object* x_80;
-x_79 = lean_ctor_get(x_77, 0);
-lean_inc(x_79);
-lean_dec(x_77);
-x_80 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_80, 0, x_55);
-lean_ctor_set(x_80, 1, x_79);
-return x_80;
+lean_object* x_78; lean_object* x_79;
+x_78 = lean_ctor_get(x_76, 0);
+lean_inc(x_78);
+lean_dec(x_76);
+x_79 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_79, 0, x_55);
+lean_ctor_set(x_79, 1, x_78);
+return x_79;
}
}
else
{
-lean_object* x_81;
-x_81 = lean_ctor_get(x_75, 2);
+lean_object* x_80;
+x_80 = lean_ctor_get(x_74, 2);
+lean_inc(x_80);
+lean_dec(x_74);
+if (lean_obj_tag(x_80) == 0)
+{
+lean_object* x_81; lean_object* x_82;
+x_81 = lean_ctor_get(x_75, 0);
lean_inc(x_81);
lean_dec(x_75);
-if (lean_obj_tag(x_81) == 0)
-{
-lean_object* x_82; lean_object* x_83;
-x_82 = lean_ctor_get(x_76, 0);
-lean_inc(x_82);
-lean_dec(x_76);
-x_83 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_83, 0, x_55);
-lean_ctor_set(x_83, 1, x_82);
-return x_83;
+x_82 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_82, 0, x_55);
+lean_ctor_set(x_82, 1, x_81);
+return x_82;
}
else
{
-lean_object* x_84; lean_object* x_85; uint8_t x_86;
-x_84 = lean_ctor_get(x_76, 0);
+lean_object* x_83; lean_object* x_84; uint8_t x_85;
+x_83 = lean_ctor_get(x_75, 0);
+lean_inc(x_83);
+lean_dec(x_75);
+x_84 = lean_ctor_get(x_80, 0);
lean_inc(x_84);
-lean_dec(x_76);
-x_85 = lean_ctor_get(x_81, 0);
-lean_inc(x_85);
-lean_dec(x_81);
-x_86 = l_Lean_Parser_checkTailNoWs(x_1);
-if (x_86 == 0)
+lean_dec(x_80);
+x_85 = l_Lean_Parser_checkTailNoWs(x_1);
+if (x_85 == 0)
+{
+lean_object* x_86;
+lean_dec(x_84);
+x_86 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_86, 0, x_55);
+lean_ctor_set(x_86, 1, x_83);
+return x_86;
+}
+else
{
lean_object* x_87;
-lean_dec(x_85);
+lean_dec(x_83);
x_87 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_87, 0, x_55);
lean_ctor_set(x_87, 1, x_84);
return x_87;
}
-else
-{
-lean_object* x_88;
-lean_dec(x_84);
-x_88 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_88, 0, x_55);
-lean_ctor_set(x_88, 1, x_85);
-return x_88;
-}
}
}
}
@@ -23596,30 +23588,30 @@ return x_88;
}
default:
{
-uint8_t x_89;
+uint8_t x_88;
lean_dec(x_12);
lean_dec(x_2);
-x_89 = !lean_is_exclusive(x_4);
-if (x_89 == 0)
+x_88 = !lean_is_exclusive(x_4);
+if (x_88 == 0)
{
-lean_object* x_90; lean_object* x_91;
-x_90 = lean_ctor_get(x_4, 1);
-lean_dec(x_90);
-x_91 = l_Lean_Parser_appPrec;
-lean_ctor_set(x_4, 1, x_91);
+lean_object* x_89; lean_object* x_90;
+x_89 = lean_ctor_get(x_4, 1);
+lean_dec(x_89);
+x_90 = l_Lean_Parser_appPrec;
+lean_ctor_set(x_4, 1, x_90);
return x_4;
}
else
{
-lean_object* x_92; lean_object* x_93; lean_object* x_94;
-x_92 = lean_ctor_get(x_4, 0);
-lean_inc(x_92);
+lean_object* x_91; lean_object* x_92; lean_object* x_93;
+x_91 = lean_ctor_get(x_4, 0);
+lean_inc(x_91);
lean_dec(x_4);
-x_93 = l_Lean_Parser_appPrec;
-x_94 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_94, 0, x_92);
-lean_ctor_set(x_94, 1, x_93);
-return x_94;
+x_92 = l_Lean_Parser_appPrec;
+x_93 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_93, 0, x_91);
+lean_ctor_set(x_93, 1, x_92);
+return x_93;
}
}
}
@@ -27770,56 +27762,53 @@ lean_dec(x_1);
return x_2;
}
}
-lean_object* l_Lean_Parser_mkParserContextCore(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l_Lean_Parser_getTokenTable(lean_object* x_1) {
_start:
{
-lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9;
-lean_inc(x_2);
-x_4 = l_Lean_FileMap_ofString(x_2);
-x_5 = l_Lean_Parser_tokenTableAttribute;
-x_6 = lean_ctor_get(x_5, 1);
-lean_inc(x_6);
-x_7 = l_Lean_PersistentEnvExtension_getState___rarg(x_6, x_1);
-lean_dec(x_6);
-x_8 = lean_ctor_get(x_7, 1);
-lean_inc(x_8);
-lean_dec(x_7);
-x_9 = lean_alloc_ctor(0, 4, 0);
-lean_ctor_set(x_9, 0, x_2);
-lean_ctor_set(x_9, 1, x_3);
-lean_ctor_set(x_9, 2, x_4);
-lean_ctor_set(x_9, 3, x_8);
-return x_9;
+lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5;
+x_2 = l_Lean_Parser_tokenTableAttribute;
+x_3 = lean_ctor_get(x_2, 1);
+lean_inc(x_3);
+x_4 = l_Lean_PersistentEnvExtension_getState___rarg(x_3, x_1);
+lean_dec(x_3);
+x_5 = lean_ctor_get(x_4, 1);
+lean_inc(x_5);
+lean_dec(x_4);
+return x_5;
}
}
-lean_object* l_Lean_Parser_mkParserContextCore___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l_Lean_Parser_getTokenTable___boxed(lean_object* x_1) {
_start:
{
-lean_object* x_4;
-x_4 = l_Lean_Parser_mkParserContextCore(x_1, x_2, x_3);
+lean_object* x_2;
+x_2 = l_Lean_Parser_getTokenTable(x_1);
lean_dec(x_1);
+return x_2;
+}
+}
+lean_object* l_Lean_Parser_mkInputContext(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3; lean_object* x_4;
+lean_inc(x_1);
+x_3 = l_Lean_FileMap_ofString(x_1);
+x_4 = lean_alloc_ctor(0, 3, 0);
+lean_ctor_set(x_4, 0, x_1);
+lean_ctor_set(x_4, 1, x_2);
+lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
-lean_object* l_Lean_Parser_ParserContextCore_toParserContext(lean_object* x_1, lean_object* x_2) {
+lean_object* l_Lean_Parser_mkParserContext(lean_object* x_1, lean_object* x_2) {
_start:
{
-lean_object* x_3;
-x_3 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_3, 0, x_2);
-lean_ctor_set(x_3, 1, x_1);
-return x_3;
-}
-}
-lean_object* l_Lean_Parser_mkParserContext(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
-_start:
-{
-lean_object* x_4; lean_object* x_5;
-x_4 = l_Lean_Parser_mkParserContextCore(x_1, x_2, x_3);
-x_5 = lean_alloc_ctor(0, 2, 0);
-lean_ctor_set(x_5, 0, x_4);
-lean_ctor_set(x_5, 1, x_1);
-return x_5;
+lean_object* x_3; lean_object* x_4;
+x_3 = l_Lean_Parser_getTokenTable(x_1);
+x_4 = lean_alloc_ctor(0, 3, 0);
+lean_ctor_set(x_4, 0, x_2);
+lean_ctor_set(x_4, 1, x_1);
+lean_ctor_set(x_4, 2, x_3);
+return x_4;
}
}
lean_object* l_Lean_Parser_mkParserState(lean_object* x_1) {
@@ -27850,38 +27839,39 @@ return x_2;
lean_object* l_Lean_Parser_runParser(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; lean_object* x_11;
+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_inc(x_3);
-x_6 = l_Lean_Parser_mkParserContext(x_1, x_3, x_4);
-x_7 = l_Lean_Parser_mkParserState(x_3);
+x_6 = l_Lean_Parser_mkInputContext(x_3, x_4);
+x_7 = l_Lean_Parser_mkParserContext(x_1, x_6);
+x_8 = l_Lean_Parser_mkParserState(x_3);
lean_dec(x_3);
-x_8 = l_Lean_Parser_whitespace___main(x_6, x_7);
-x_9 = lean_unsigned_to_nat(0u);
-lean_inc(x_6);
-x_10 = l_Lean_Parser_prattParser(x_5, x_2, x_9, x_6, x_8);
-x_11 = lean_ctor_get(x_10, 3);
-lean_inc(x_11);
-if (lean_obj_tag(x_11) == 0)
-{
-lean_object* x_12; lean_object* x_13; lean_object* x_14;
-lean_dec(x_6);
-x_12 = lean_ctor_get(x_10, 0);
+x_9 = l_Lean_Parser_whitespace___main(x_7, x_8);
+x_10 = lean_unsigned_to_nat(0u);
+lean_inc(x_7);
+x_11 = l_Lean_Parser_prattParser(x_5, x_2, x_10, x_7, x_9);
+x_12 = lean_ctor_get(x_11, 3);
lean_inc(x_12);
-lean_dec(x_10);
-x_13 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_12);
-lean_dec(x_12);
-x_14 = lean_alloc_ctor(1, 1, 0);
-lean_ctor_set(x_14, 0, x_13);
-return x_14;
+if (lean_obj_tag(x_12) == 0)
+{
+lean_object* x_13; lean_object* x_14; lean_object* x_15;
+lean_dec(x_7);
+x_13 = lean_ctor_get(x_11, 0);
+lean_inc(x_13);
+lean_dec(x_11);
+x_14 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_13);
+lean_dec(x_13);
+x_15 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_15, 0, x_14);
+return x_15;
}
else
{
-lean_object* x_15; lean_object* x_16;
-lean_dec(x_11);
-x_15 = l_Lean_Parser_ParserState_toErrorMsg(x_6, x_10);
-x_16 = lean_alloc_ctor(0, 1, 0);
-lean_ctor_set(x_16, 0, x_15);
-return x_16;
+lean_object* x_16; lean_object* x_17;
+lean_dec(x_12);
+x_16 = l_Lean_Parser_ParserState_toErrorMsg(x_7, x_11);
+x_17 = lean_alloc_ctor(0, 1, 0);
+lean_ctor_set(x_17, 0, x_16);
+return x_17;
}
}
}
@@ -38341,10 +38331,10 @@ l_Lean_Parser_TokenConfig_HasToString___closed__1 = _init_l_Lean_Parser_TokenCon
lean_mark_persistent(l_Lean_Parser_TokenConfig_HasToString___closed__1);
l_Lean_Parser_TokenConfig_HasToString = _init_l_Lean_Parser_TokenConfig_HasToString();
lean_mark_persistent(l_Lean_Parser_TokenConfig_HasToString);
-l_Lean_Parser_ParserContextCore_inhabited___closed__1 = _init_l_Lean_Parser_ParserContextCore_inhabited___closed__1();
-lean_mark_persistent(l_Lean_Parser_ParserContextCore_inhabited___closed__1);
-l_Lean_Parser_ParserContextCore_inhabited = _init_l_Lean_Parser_ParserContextCore_inhabited();
-lean_mark_persistent(l_Lean_Parser_ParserContextCore_inhabited);
+l_Lean_Parser_InputContext_inhabited___closed__1 = _init_l_Lean_Parser_InputContext_inhabited___closed__1();
+lean_mark_persistent(l_Lean_Parser_InputContext_inhabited___closed__1);
+l_Lean_Parser_InputContext_inhabited = _init_l_Lean_Parser_InputContext_inhabited();
+lean_mark_persistent(l_Lean_Parser_InputContext_inhabited);
l_Lean_Parser_Error_Inhabited___closed__1 = _init_l_Lean_Parser_Error_Inhabited___closed__1();
lean_mark_persistent(l_Lean_Parser_Error_Inhabited___closed__1);
l_Lean_Parser_Error_Inhabited = _init_l_Lean_Parser_Error_Inhabited();
diff --git a/stage0/stdlib/Init/Lean/Syntax.c b/stage0/stdlib/Init/Lean/Syntax.c
index 46cb806e69..e930e5e3ef 100644
--- a/stage0/stdlib/Init/Lean/Syntax.c
+++ b/stage0/stdlib/Init/Lean/Syntax.c
@@ -15,6 +15,7 @@ extern "C" {
#endif
lean_object* l_Lean_Syntax_reprint___main___closed__1;
lean_object* l_Lean_Syntax_formatStxAux___boxed(lean_object*, lean_object*, lean_object*);
+lean_object* lean_string_push(lean_object*, uint32_t);
lean_object* l_Lean_Syntax_reprint___main___boxed(lean_object*);
lean_object* l_Lean_Syntax_isIdOrAtom_x3f___boxed(lean_object*);
lean_object* lean_array_set(lean_object*, lean_object*, lean_object*);
@@ -27,8 +28,10 @@ lean_object* l_Lean_Syntax_setTailInfoAux(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Syntax_6__decodeOctalLitAux(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_isNatLitAux(lean_object*, lean_object*);
lean_object* l_Array_findMAux___main___at_Lean_Syntax_getHeadInfo___main___spec__1___boxed(lean_object*, lean_object*);
+lean_object* l___private_Init_Lean_Syntax_10__decodeNatLitVal___closed__1;
lean_object* lean_mk_empty_array_with_capacity(lean_object*);
lean_object* l_Lean_Syntax_reprint___boxed(lean_object*);
+lean_object* l___private_Init_Lean_Syntax_10__decodeNatLitVal___boxed(lean_object*);
lean_object* l_List_map___main___at_Lean_Syntax_formatStxAux___main___spec__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_nullKind;
lean_object* l_Lean_Syntax_modifyArg(lean_object*, lean_object*, lean_object*);
@@ -51,6 +54,7 @@ lean_object* l_Lean_SyntaxNode_withArgs(lean_object*);
lean_object* l___private_Init_Lean_Syntax_5__decodeBinLitAux___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_fieldIdxKind___closed__1;
lean_object* l_Lean_Syntax_mreplace___main___boxed(lean_object*);
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar(lean_object*, lean_object*);
uint8_t l_Char_isDigit(uint32_t);
lean_object* l_Lean_charLitKind___closed__2;
uint8_t lean_name_eq(lean_object*, lean_object*);
@@ -58,7 +62,6 @@ lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Syntax_4__reprintLeaf___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_reprint___main(lean_object*);
lean_object* l_Lean_Syntax_mrewriteBottomUp___main___rarg(lean_object*, lean_object*, lean_object*);
-lean_object* l___private_Init_Lean_Syntax_7__decodeHexLitAux___main___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_mrewriteBottomUp(lean_object*);
lean_object* l_Lean_Syntax_ifNodeKind(lean_object*);
lean_object* lean_array_push(lean_object*, lean_object*);
@@ -72,23 +75,24 @@ lean_object* l_Lean_Syntax_setTailInfo(lean_object*, lean_object*);
lean_object* lean_string_utf8_extract(lean_object*, lean_object*, lean_object*);
extern lean_object* l_String_splitAux___main___closed__1;
lean_object* l_Lean_SyntaxNode_getArg___boxed(lean_object*, lean_object*);
+lean_object* l___private_Init_Lean_Syntax_8__decodeHexLitAux(lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Syntax_6__decodeOctalLitAux___main___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getNumArgs___boxed(lean_object*);
-lean_object* l___private_Init_Lean_Syntax_7__decodeHexLitAux(lean_object*, lean_object*, lean_object*);
lean_object* lean_string_utf8_byte_size(lean_object*);
lean_object* l_Lean_Syntax_getHeadInfo___main___boxed(lean_object*);
lean_object* l___private_Init_Lean_Syntax_3__updateLast___main___at_Lean_Syntax_setTailInfoAux___main___spec__1(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_mkAtom(lean_object*);
lean_object* l_Lean_mkIdentFrom___boxed(lean_object*, lean_object*);
+lean_object* l_Lean_Syntax_decodeStrLitAux___main___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_mreplace___main(lean_object*);
lean_object* l_Lean_Syntax_Lean_HasFormat(lean_object*);
-lean_object* l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___main(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_mreplace___rarg(lean_object*, lean_object*, lean_object*);
lean_object* lean_nat_add(lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Syntax_3__updateLast___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_mrewriteBottomUp___main___boxed(lean_object*);
lean_object* l_Lean_Syntax_modifyArg___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_formatStxAux___main___closed__1;
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed(lean_object*, lean_object*);
extern lean_object* l_Lean_Format_sbracket___closed__2;
lean_object* l_Lean_SyntaxNode_getKind(lean_object*);
lean_object* l_Lean_SyntaxNode_getArgs(lean_object*);
@@ -96,15 +100,20 @@ lean_object* l_Lean_Syntax_rewriteBottomUp(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getKind___closed__2;
lean_object* l___private_Init_Lean_Syntax_5__decodeBinLitAux___main(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getKind___closed__1;
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__3;
lean_object* l_Lean_Syntax_formatStxAux___main___closed__8;
lean_object* lean_string_utf8_next(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_ifNode(lean_object*);
+lean_object* l___private_Init_Lean_Syntax_8__decodeHexLitAux___main___boxed(lean_object*, lean_object*, lean_object*);
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__4;
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__1;
lean_object* lean_mk_syntax_ident(lean_object*);
lean_object* l_Lean_Syntax_formatStxAux___main___closed__4;
lean_object* l_Array_findRevMAux___main___at_Lean_Syntax_getTailInfo___main___spec__1___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_mkStxNumLit(lean_object*, lean_object*);
lean_object* l_Lean_SyntaxNode_getIdAt(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getKind___closed__4;
+lean_object* l___private_Init_Lean_Syntax_7__decodeHexDigit___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_isCharLit_x3f(lean_object*);
lean_object* lean_array_fget(lean_object*, lean_object*);
lean_object* l_Lean_SyntaxNode_getKind___boxed(lean_object*);
@@ -113,7 +122,6 @@ lean_object* l_Lean_Syntax_formatStxAux___main___closed__2;
uint8_t lean_nat_dec_eq(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_updateTrailing(lean_object*, lean_object*);
lean_object* l_Lean_numLitKind;
-lean_object* l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_choiceKind___closed__1;
lean_object* l_Lean_Syntax_mreplace___main___rarg(lean_object*, lean_object*, lean_object*);
lean_object* lean_nat_sub(lean_object*, lean_object*);
@@ -130,6 +138,7 @@ lean_object* l_List_map___main___at_Lean_Syntax_formatStxAux___main___spec__5___
lean_object* l_Lean_numLitKind___closed__1;
lean_object* l_Lean_unreachIsNodeMissing(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getIdAt___boxed(lean_object*, lean_object*);
+lean_object* l_Lean_Syntax_decodeCharLit___boxed(lean_object*);
lean_object* l_Lean_Syntax_formatStx___boxed(lean_object*, lean_object*);
lean_object* l_Lean_strLitKind___closed__1;
lean_object* l_Lean_Syntax_isNatLitAux___boxed(lean_object*, lean_object*);
@@ -146,6 +155,7 @@ lean_object* l_Lean_Syntax_setArgs(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_mreplace___main___rarg___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Nat_repr(lean_object*);
lean_object* l_Lean_Syntax_formatStxAux___main___closed__9;
+lean_object* l___private_Init_Lean_Syntax_7__decodeHexDigit(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getId(lean_object*);
lean_object* lean_name_mk_string(lean_object*, lean_object*);
lean_object* l_Lean_choiceKind;
@@ -158,10 +168,11 @@ lean_object* l_Array_umapMAux___main___at_Lean_Syntax_rewriteBottomUp___spec__2(
lean_object* l_Lean_numLitKind___closed__2;
lean_object* l_Lean_Syntax_isMissing___boxed(lean_object*);
uint32_t lean_string_utf8_get(lean_object*, lean_object*);
+lean_object* l___private_Init_Lean_Syntax_8__decodeHexLitAux___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_mreplace(lean_object*);
lean_object* l___private_Init_Lean_Syntax_3__updateLast___main(lean_object*);
+lean_object* l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___main___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_mkOptionalNode(lean_object*);
-lean_object* l___private_Init_Lean_Syntax_7__decodeHexLitAux___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_SyntaxNode_modifyArgs(lean_object*, lean_object*);
lean_object* l_Lean_SyntaxNode_getArgs___boxed(lean_object*);
lean_object* l_List_map___main___at_Lean_Syntax_formatStxAux___main___spec__4(lean_object*, lean_object*, lean_object*);
@@ -170,13 +181,16 @@ lean_object* l_Lean_SourceInfo_appendToLeading(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_isCharLit_x3f___boxed(lean_object*);
lean_object* l_Lean_Syntax_getTailInfo___main___boxed(lean_object*);
lean_object* l_Lean_Syntax_formatStxAux___main___closed__12;
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__2;
lean_object* l_Lean_nullKind___closed__1;
lean_object* l_Lean_Syntax_ifNode___rarg(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_asNode___boxed(lean_object*);
+lean_object* l_Lean_Syntax_decodeStrLit___boxed(lean_object*);
lean_object* l_Lean_Syntax_mreplace___main___at_Lean_Syntax_updateLeading___spec__1(lean_object*, lean_object*);
lean_object* l_Lean_Name_replacePrefix___main(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_formatStxAux___main___closed__11;
lean_object* l_Lean_SyntaxNode_getNumArgs___boxed(lean_object*);
+lean_object* l_Lean_Syntax_decodeCharLit(lean_object*);
lean_object* l_Lean_Syntax_mrewriteBottomUp___main___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_updateTrailing___main(lean_object*, lean_object*);
uint8_t l_Lean_Syntax_isAtom(lean_object*);
@@ -203,11 +217,11 @@ uint8_t l_UInt32_decEq(uint32_t, uint32_t);
extern lean_object* l_Lean_Format_paren___closed__1;
lean_object* l_List_map___main___at_Lean_Syntax_formatStxAux___main___spec__3(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getNumArgs(lean_object*);
-lean_object* l___private_Init_Lean_Syntax_7__decodeHexLitAux___main(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_mrewriteBottomUp___boxed(lean_object*);
lean_object* l_Lean_Syntax_formatStxAux___main___closed__13;
lean_object* l_Lean_Syntax_setArg(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_SourceInfo_updateTrailing(lean_object*, lean_object*);
+lean_object* l___private_Init_Lean_Syntax_8__decodeHexLitAux___main(lean_object*, lean_object*, lean_object*);
lean_object* l___private_Init_Lean_Syntax_2__updateLeadingAux(lean_object*, lean_object*);
lean_object* l_String_quote(lean_object*);
lean_object* l_Lean_Syntax_asNode___closed__1;
@@ -228,6 +242,8 @@ lean_object* lean_format_group(lean_object*);
lean_object* l_Lean_mkStxStrLit(lean_object*, lean_object*);
lean_object* lean_nat_mul(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getPos(lean_object*);
+lean_object* l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___main(lean_object*, lean_object*, lean_object*);
+lean_object* l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___boxed(lean_object*, lean_object*, lean_object*);
lean_object* lean_mk_syntax_num_lit(lean_object*);
lean_object* l_Array_iterateMAux___main___at_Lean_Syntax_reprint___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Array_umapMAux___main___at_Lean_Syntax_updateLeading___spec__2(lean_object*, lean_object*, lean_object*);
@@ -241,18 +257,19 @@ lean_object* l_Lean_Syntax_HasToString___lambda__1(lean_object*);
lean_object* l_Array_toList___rarg(lean_object*);
lean_object* l_Lean_Syntax_mrewriteBottomUp___main___at_Lean_Syntax_rewriteBottomUp___spec__1(lean_object*, lean_object*);
lean_object* l_List_map___main___at_Lean_Syntax_formatStxAux___main___spec__5(lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_Syntax_decodeStrLit(lean_object*);
uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*);
lean_object* lean_mk_syntax_list(lean_object*);
-lean_object* l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___main___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getTailInfo___boxed(lean_object*);
-lean_object* l___private_Init_Lean_Syntax_9__decodeNatLitVal(lean_object*);
+lean_object* l___private_Init_Lean_Syntax_10__decodeNatLitVal(lean_object*);
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__5;
lean_object* l_Lean_Syntax_mreplace___main___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* lean_string_length(lean_object*);
lean_object* l_Lean_Syntax_mreplace___boxed(lean_object*);
lean_object* l_Lean_Syntax_getKind___closed__3;
-lean_object* l___private_Init_Lean_Syntax_8__decodeDecimalLitAux(lean_object*, lean_object*, lean_object*);
lean_object* lean_mk_syntax_str_lit(lean_object*);
lean_object* l_Lean_mkStxLit(lean_object*, lean_object*, lean_object*);
+lean_object* l___private_Init_Lean_Syntax_9__decodeDecimalLitAux(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_toNat(lean_object*);
extern lean_object* l_Lean_Format_paren___closed__3;
@@ -262,19 +279,20 @@ lean_object* l_Lean_Syntax_formatStxAux___main(lean_object*, lean_object*, lean_
lean_object* l_Lean_unreachIsNodeIdent(lean_object*, lean_object*, lean_object*, lean_object*, 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*);
+lean_object* l_Lean_Syntax_decodeStrLitAux___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_mkAtomFrom___boxed(lean_object*, lean_object*);
lean_object* l_List_map___main___at_Lean_Syntax_formatStxAux___main___spec__1___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_mrewriteBottomUp___main___rarg___lambda__2(lean_object*, lean_object*, lean_object*);
uint8_t l_UInt32_decLe(uint32_t, uint32_t);
lean_object* l_Lean_Syntax_ifNodeKind___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
+lean_object* l_Lean_Syntax_decodeStrLitAux(lean_object*, lean_object*, lean_object*);
uint8_t lean_string_utf8_at_end(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_modifyArgs(lean_object*, lean_object*);
lean_object* l_Lean_mkNode(lean_object*, lean_object*);
-lean_object* l___private_Init_Lean_Syntax_9__decodeNatLitVal___boxed(lean_object*);
lean_object* lean_uint32_to_nat(uint32_t);
lean_object* l_Lean_Syntax_getTailInfo___main(lean_object*);
-lean_object* l___private_Init_Lean_Syntax_9__decodeNatLitVal___closed__1;
+lean_object* l_Lean_Syntax_decodeStrLitAux___main(lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_SyntaxNode_getArg(lean_object*, lean_object*);
lean_object* l_Lean_Format_joinSep___main___at_Lean_Syntax_formatStxAux___main___spec__2___boxed(lean_object*, lean_object*);
lean_object* l_Lean_Syntax_isFieldIdx_x3f___boxed(lean_object*);
@@ -285,6 +303,7 @@ lean_object* l___private_Init_Lean_Syntax_6__decodeOctalLitAux___main(lean_objec
lean_object* l_Lean_Syntax_mreplace___main___rarg___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Syntax_isIdent___boxed(lean_object*);
uint8_t lean_string_dec_eq(lean_object*, lean_object*);
+uint32_t l_Char_ofNat(lean_object*);
uint8_t lean_nat_dec_lt(lean_object*, lean_object*);
uint8_t l_Lean_Syntax_isIdent(lean_object*);
lean_object* l_Lean_SourceInfo_updateTrailing(lean_object* x_1, lean_object* x_2) {
@@ -4655,10 +4674,11 @@ return x_7;
lean_object* l_Lean_mkStxStrLit(lean_object* x_1, lean_object* x_2) {
_start:
{
-lean_object* x_3; lean_object* x_4;
-x_3 = l_Lean_strLitKind;
-x_4 = l_Lean_mkStxLit(x_3, x_1, x_2);
-return x_4;
+lean_object* x_3; lean_object* x_4; lean_object* x_5;
+x_3 = l_String_quote(x_1);
+x_4 = l_Lean_strLitKind;
+x_5 = l_Lean_mkStxLit(x_4, x_3, x_2);
+return x_5;
}
}
lean_object* l_Lean_mkStxNumLit(lean_object* x_1, lean_object* x_2) {
@@ -4673,11 +4693,10 @@ return x_4;
lean_object* lean_mk_syntax_str_lit(lean_object* x_1) {
_start:
{
-lean_object* x_2; lean_object* x_3; lean_object* x_4;
+lean_object* x_2; lean_object* x_3;
x_2 = lean_box(0);
-x_3 = l_Lean_strLitKind;
-x_4 = l_Lean_mkStxLit(x_3, x_1, x_2);
-return x_4;
+x_3 = l_Lean_mkStxStrLit(x_1, x_2);
+return x_3;
}
}
lean_object* lean_mk_syntax_num_lit(lean_object* x_1) {
@@ -4691,153 +4710,6 @@ x_5 = l_Lean_mkStxLit(x_4, x_2, x_3);
return x_5;
}
}
-lean_object* l_Lean_Syntax_isStrLit_x3f(lean_object* x_1) {
-_start:
-{
-if (lean_obj_tag(x_1) == 1)
-{
-lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5;
-x_2 = lean_ctor_get(x_1, 0);
-x_3 = lean_ctor_get(x_1, 1);
-x_4 = l_Lean_strLitKind;
-x_5 = lean_name_eq(x_2, x_4);
-if (x_5 == 0)
-{
-lean_object* x_6;
-x_6 = lean_box(0);
-return x_6;
-}
-else
-{
-lean_object* x_7; lean_object* x_8; uint8_t x_9;
-x_7 = lean_array_get_size(x_3);
-x_8 = lean_unsigned_to_nat(1u);
-x_9 = lean_nat_dec_eq(x_7, x_8);
-lean_dec(x_7);
-if (x_9 == 0)
-{
-lean_object* x_10;
-x_10 = lean_box(0);
-return x_10;
-}
-else
-{
-lean_object* x_11; lean_object* x_12; lean_object* x_13;
-x_11 = l_Lean_stxInh;
-x_12 = lean_unsigned_to_nat(0u);
-x_13 = lean_array_get(x_11, x_3, x_12);
-if (lean_obj_tag(x_13) == 2)
-{
-lean_object* x_14; lean_object* x_15;
-x_14 = lean_ctor_get(x_13, 1);
-lean_inc(x_14);
-lean_dec(x_13);
-x_15 = lean_alloc_ctor(1, 1, 0);
-lean_ctor_set(x_15, 0, x_14);
-return x_15;
-}
-else
-{
-lean_object* x_16;
-lean_dec(x_13);
-x_16 = lean_box(0);
-return x_16;
-}
-}
-}
-}
-else
-{
-lean_object* x_17;
-x_17 = lean_box(0);
-return x_17;
-}
-}
-}
-lean_object* l_Lean_Syntax_isStrLit_x3f___boxed(lean_object* x_1) {
-_start:
-{
-lean_object* x_2;
-x_2 = l_Lean_Syntax_isStrLit_x3f(x_1);
-lean_dec(x_1);
-return x_2;
-}
-}
-lean_object* l_Lean_Syntax_isCharLit_x3f(lean_object* x_1) {
-_start:
-{
-if (lean_obj_tag(x_1) == 1)
-{
-lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5;
-x_2 = lean_ctor_get(x_1, 0);
-x_3 = lean_ctor_get(x_1, 1);
-x_4 = l_Lean_charLitKind;
-x_5 = lean_name_eq(x_2, x_4);
-if (x_5 == 0)
-{
-lean_object* x_6;
-x_6 = lean_box(0);
-return x_6;
-}
-else
-{
-lean_object* x_7; lean_object* x_8; uint8_t x_9;
-x_7 = lean_array_get_size(x_3);
-x_8 = lean_unsigned_to_nat(1u);
-x_9 = lean_nat_dec_eq(x_7, x_8);
-lean_dec(x_7);
-if (x_9 == 0)
-{
-lean_object* x_10;
-x_10 = lean_box(0);
-return x_10;
-}
-else
-{
-lean_object* x_11; lean_object* x_12; lean_object* x_13;
-x_11 = l_Lean_stxInh;
-x_12 = lean_unsigned_to_nat(0u);
-x_13 = lean_array_get(x_11, x_3, x_12);
-if (lean_obj_tag(x_13) == 2)
-{
-lean_object* x_14; uint32_t x_15; lean_object* x_16; lean_object* x_17;
-x_14 = lean_ctor_get(x_13, 1);
-lean_inc(x_14);
-lean_dec(x_13);
-x_15 = lean_string_utf8_get(x_14, x_8);
-lean_dec(x_14);
-x_16 = lean_box_uint32(x_15);
-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_dec(x_13);
-x_18 = lean_box(0);
-return x_18;
-}
-}
-}
-}
-else
-{
-lean_object* x_19;
-x_19 = lean_box(0);
-return x_19;
-}
-}
-}
-lean_object* l_Lean_Syntax_isCharLit_x3f___boxed(lean_object* x_1) {
-_start:
-{
-lean_object* x_2;
-x_2 = l_Lean_Syntax_isCharLit_x3f(x_1);
-lean_dec(x_1);
-return x_2;
-}
-}
lean_object* l___private_Init_Lean_Syntax_5__decodeBinLitAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
@@ -5016,229 +4888,252 @@ lean_dec(x_1);
return x_4;
}
}
-lean_object* l___private_Init_Lean_Syntax_7__decodeHexLitAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l___private_Init_Lean_Syntax_7__decodeHexDigit(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+uint32_t x_3; lean_object* x_4; lean_object* x_5; uint32_t x_44; uint8_t x_45;
+x_3 = lean_string_utf8_get(x_1, x_2);
+x_4 = lean_string_utf8_next(x_1, x_2);
+x_44 = 48;
+x_45 = x_44 <= x_3;
+if (x_45 == 0)
+{
+lean_object* x_46;
+x_46 = lean_box(0);
+x_5 = x_46;
+goto block_43;
+}
+else
+{
+uint32_t x_47; uint8_t x_48;
+x_47 = 57;
+x_48 = x_3 <= x_47;
+if (x_48 == 0)
+{
+lean_object* x_49;
+x_49 = lean_box(0);
+x_5 = x_49;
+goto block_43;
+}
+else
+{
+lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54;
+x_50 = lean_uint32_to_nat(x_3);
+x_51 = lean_unsigned_to_nat(48u);
+x_52 = lean_nat_sub(x_50, x_51);
+lean_dec(x_50);
+x_53 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_53, 0, x_52);
+lean_ctor_set(x_53, 1, x_4);
+x_54 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_54, 0, x_53);
+return x_54;
+}
+}
+block_43:
+{
+uint32_t x_6; uint8_t x_7;
+lean_dec(x_5);
+x_6 = 97;
+x_7 = x_6 <= x_3;
+if (x_7 == 0)
+{
+uint32_t x_8; uint8_t x_9;
+x_8 = 65;
+x_9 = x_8 <= x_3;
+if (x_9 == 0)
+{
+lean_object* x_10;
+lean_dec(x_4);
+x_10 = lean_box(0);
+return x_10;
+}
+else
+{
+uint32_t x_11; uint8_t x_12;
+x_11 = 70;
+x_12 = x_3 <= x_11;
+if (x_12 == 0)
+{
+lean_object* x_13;
+lean_dec(x_4);
+x_13 = lean_box(0);
+return x_13;
+}
+else
+{
+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;
+x_14 = lean_uint32_to_nat(x_3);
+x_15 = lean_unsigned_to_nat(10u);
+x_16 = lean_nat_add(x_15, x_14);
+lean_dec(x_14);
+x_17 = lean_unsigned_to_nat(65u);
+x_18 = lean_nat_sub(x_16, x_17);
+lean_dec(x_16);
+x_19 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_19, 0, x_18);
+lean_ctor_set(x_19, 1, x_4);
+x_20 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_20, 0, x_19);
+return x_20;
+}
+}
+}
+else
+{
+uint32_t x_21; uint8_t x_22;
+x_21 = 102;
+x_22 = x_3 <= x_21;
+if (x_22 == 0)
+{
+uint32_t x_23; uint8_t x_24;
+x_23 = 65;
+x_24 = x_23 <= x_3;
+if (x_24 == 0)
+{
+lean_object* x_25;
+lean_dec(x_4);
+x_25 = lean_box(0);
+return x_25;
+}
+else
+{
+uint32_t x_26; uint8_t x_27;
+x_26 = 70;
+x_27 = x_3 <= x_26;
+if (x_27 == 0)
+{
+lean_object* x_28;
+lean_dec(x_4);
+x_28 = lean_box(0);
+return x_28;
+}
+else
+{
+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_29 = lean_uint32_to_nat(x_3);
+x_30 = lean_unsigned_to_nat(10u);
+x_31 = lean_nat_add(x_30, x_29);
+lean_dec(x_29);
+x_32 = lean_unsigned_to_nat(65u);
+x_33 = lean_nat_sub(x_31, x_32);
+lean_dec(x_31);
+x_34 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_34, 0, x_33);
+lean_ctor_set(x_34, 1, x_4);
+x_35 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_35, 0, x_34);
+return x_35;
+}
+}
+}
+else
+{
+lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42;
+x_36 = lean_uint32_to_nat(x_3);
+x_37 = lean_unsigned_to_nat(10u);
+x_38 = lean_nat_add(x_37, x_36);
+lean_dec(x_36);
+x_39 = lean_unsigned_to_nat(97u);
+x_40 = lean_nat_sub(x_38, x_39);
+lean_dec(x_38);
+x_41 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_41, 0, x_40);
+lean_ctor_set(x_41, 1, x_4);
+x_42 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_42, 0, x_41);
+return x_42;
+}
+}
+}
+}
+}
+lean_object* l___private_Init_Lean_Syntax_7__decodeHexDigit___boxed(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3;
+x_3 = l___private_Init_Lean_Syntax_7__decodeHexDigit(x_1, x_2);
+lean_dec(x_2);
+lean_dec(x_1);
+return x_3;
+}
+}
+lean_object* l___private_Init_Lean_Syntax_8__decodeHexLitAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
uint8_t x_4;
x_4 = lean_string_utf8_at_end(x_1, x_2);
if (x_4 == 0)
{
-uint32_t x_5; lean_object* x_6; uint32_t x_54; uint8_t x_55;
-x_5 = lean_string_utf8_get(x_1, x_2);
-x_54 = 48;
-x_55 = x_54 <= x_5;
-if (x_55 == 0)
-{
-lean_object* x_56;
-x_56 = lean_box(0);
-x_6 = x_56;
-goto block_53;
-}
-else
-{
-uint32_t x_57; uint8_t x_58;
-x_57 = 57;
-x_58 = x_5 <= x_57;
-if (x_58 == 0)
-{
-lean_object* x_59;
-x_59 = lean_box(0);
-x_6 = x_59;
-goto block_53;
-}
-else
-{
-lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66;
-x_60 = lean_string_utf8_next(x_1, x_2);
+lean_object* x_5;
+x_5 = l___private_Init_Lean_Syntax_7__decodeHexDigit(x_1, x_2);
lean_dec(x_2);
-x_61 = lean_unsigned_to_nat(16u);
-x_62 = lean_nat_mul(x_61, x_3);
+if (lean_obj_tag(x_5) == 0)
+{
+lean_object* x_6;
lean_dec(x_3);
-x_63 = lean_uint32_to_nat(x_5);
-x_64 = lean_nat_add(x_62, x_63);
-lean_dec(x_63);
-lean_dec(x_62);
-x_65 = lean_unsigned_to_nat(48u);
-x_66 = lean_nat_sub(x_64, x_65);
-lean_dec(x_64);
-x_2 = x_60;
-x_3 = x_66;
+x_6 = lean_box(0);
+return x_6;
+}
+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_5, 0);
+lean_inc(x_7);
+lean_dec(x_5);
+x_8 = lean_ctor_get(x_7, 0);
+lean_inc(x_8);
+x_9 = lean_ctor_get(x_7, 1);
+lean_inc(x_9);
+lean_dec(x_7);
+x_10 = lean_unsigned_to_nat(16u);
+x_11 = lean_nat_mul(x_10, x_3);
+lean_dec(x_3);
+x_12 = lean_nat_add(x_11, x_8);
+lean_dec(x_8);
+lean_dec(x_11);
+x_2 = x_9;
+x_3 = x_12;
goto _start;
}
}
-block_53:
-{
-uint32_t x_7; uint8_t x_8;
-lean_dec(x_6);
-x_7 = 97;
-x_8 = x_7 <= x_5;
-if (x_8 == 0)
-{
-uint32_t x_9; uint8_t x_10;
-x_9 = 65;
-x_10 = x_9 <= x_5;
-if (x_10 == 0)
-{
-lean_object* x_11;
-lean_dec(x_3);
-lean_dec(x_2);
-x_11 = lean_box(0);
-return x_11;
-}
else
{
-uint32_t x_12; uint8_t x_13;
-x_12 = 70;
-x_13 = x_5 <= x_12;
-if (x_13 == 0)
-{
lean_object* x_14;
-lean_dec(x_3);
lean_dec(x_2);
-x_14 = lean_box(0);
+x_14 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_14, 0, x_3);
return x_14;
}
-else
-{
-lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23;
-x_15 = lean_string_utf8_next(x_1, x_2);
-lean_dec(x_2);
-x_16 = lean_unsigned_to_nat(16u);
-x_17 = lean_nat_mul(x_16, x_3);
-lean_dec(x_3);
-x_18 = lean_unsigned_to_nat(10u);
-x_19 = lean_nat_add(x_17, x_18);
-lean_dec(x_17);
-x_20 = lean_uint32_to_nat(x_5);
-x_21 = lean_nat_add(x_19, x_20);
-lean_dec(x_20);
-lean_dec(x_19);
-x_22 = lean_unsigned_to_nat(65u);
-x_23 = lean_nat_sub(x_21, x_22);
-lean_dec(x_21);
-x_2 = x_15;
-x_3 = x_23;
-goto _start;
}
}
-}
-else
-{
-uint32_t x_25; uint8_t x_26;
-x_25 = 102;
-x_26 = x_5 <= x_25;
-if (x_26 == 0)
-{
-uint32_t x_27; uint8_t x_28;
-x_27 = 65;
-x_28 = x_27 <= x_5;
-if (x_28 == 0)
-{
-lean_object* x_29;
-lean_dec(x_3);
-lean_dec(x_2);
-x_29 = lean_box(0);
-return x_29;
-}
-else
-{
-uint32_t x_30; uint8_t x_31;
-x_30 = 70;
-x_31 = x_5 <= x_30;
-if (x_31 == 0)
-{
-lean_object* x_32;
-lean_dec(x_3);
-lean_dec(x_2);
-x_32 = lean_box(0);
-return x_32;
-}
-else
-{
-lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41;
-x_33 = lean_string_utf8_next(x_1, x_2);
-lean_dec(x_2);
-x_34 = lean_unsigned_to_nat(16u);
-x_35 = lean_nat_mul(x_34, x_3);
-lean_dec(x_3);
-x_36 = lean_unsigned_to_nat(10u);
-x_37 = lean_nat_add(x_35, x_36);
-lean_dec(x_35);
-x_38 = lean_uint32_to_nat(x_5);
-x_39 = lean_nat_add(x_37, x_38);
-lean_dec(x_38);
-lean_dec(x_37);
-x_40 = lean_unsigned_to_nat(65u);
-x_41 = lean_nat_sub(x_39, x_40);
-lean_dec(x_39);
-x_2 = x_33;
-x_3 = x_41;
-goto _start;
-}
-}
-}
-else
-{
-lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51;
-x_43 = lean_string_utf8_next(x_1, x_2);
-lean_dec(x_2);
-x_44 = lean_unsigned_to_nat(16u);
-x_45 = lean_nat_mul(x_44, x_3);
-lean_dec(x_3);
-x_46 = lean_unsigned_to_nat(10u);
-x_47 = lean_nat_add(x_45, x_46);
-lean_dec(x_45);
-x_48 = lean_uint32_to_nat(x_5);
-x_49 = lean_nat_add(x_47, x_48);
-lean_dec(x_48);
-lean_dec(x_47);
-x_50 = lean_unsigned_to_nat(97u);
-x_51 = lean_nat_sub(x_49, x_50);
-lean_dec(x_49);
-x_2 = x_43;
-x_3 = x_51;
-goto _start;
-}
-}
-}
-}
-else
-{
-lean_object* x_68;
-lean_dec(x_2);
-x_68 = lean_alloc_ctor(1, 1, 0);
-lean_ctor_set(x_68, 0, x_3);
-return x_68;
-}
-}
-}
-lean_object* l___private_Init_Lean_Syntax_7__decodeHexLitAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l___private_Init_Lean_Syntax_8__decodeHexLitAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4;
-x_4 = l___private_Init_Lean_Syntax_7__decodeHexLitAux___main(x_1, x_2, x_3);
+x_4 = l___private_Init_Lean_Syntax_8__decodeHexLitAux___main(x_1, x_2, x_3);
lean_dec(x_1);
return x_4;
}
}
-lean_object* l___private_Init_Lean_Syntax_7__decodeHexLitAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l___private_Init_Lean_Syntax_8__decodeHexLitAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4;
-x_4 = l___private_Init_Lean_Syntax_7__decodeHexLitAux___main(x_1, x_2, x_3);
+x_4 = l___private_Init_Lean_Syntax_8__decodeHexLitAux___main(x_1, x_2, x_3);
return x_4;
}
}
-lean_object* l___private_Init_Lean_Syntax_7__decodeHexLitAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l___private_Init_Lean_Syntax_8__decodeHexLitAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4;
-x_4 = l___private_Init_Lean_Syntax_7__decodeHexLitAux(x_1, x_2, x_3);
+x_4 = l___private_Init_Lean_Syntax_8__decodeHexLitAux(x_1, x_2, x_3);
lean_dec(x_1);
return x_4;
}
}
-lean_object* l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
uint8_t x_4;
@@ -5301,33 +5196,33 @@ return x_20;
}
}
}
-lean_object* l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4;
-x_4 = l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___main(x_1, x_2, x_3);
+x_4 = l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___main(x_1, x_2, x_3);
lean_dec(x_1);
return x_4;
}
}
-lean_object* l___private_Init_Lean_Syntax_8__decodeDecimalLitAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l___private_Init_Lean_Syntax_9__decodeDecimalLitAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4;
-x_4 = l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___main(x_1, x_2, x_3);
+x_4 = l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___main(x_1, x_2, x_3);
return x_4;
}
}
-lean_object* l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+lean_object* l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4;
-x_4 = l___private_Init_Lean_Syntax_8__decodeDecimalLitAux(x_1, x_2, x_3);
+x_4 = l___private_Init_Lean_Syntax_9__decodeDecimalLitAux(x_1, x_2, x_3);
lean_dec(x_1);
return x_4;
}
}
-lean_object* _init_l___private_Init_Lean_Syntax_9__decodeNatLitVal___closed__1() {
+lean_object* _init_l___private_Init_Lean_Syntax_10__decodeNatLitVal___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2;
@@ -5337,7 +5232,7 @@ lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
-lean_object* l___private_Init_Lean_Syntax_9__decodeNatLitVal(lean_object* x_1) {
+lean_object* l___private_Init_Lean_Syntax_10__decodeNatLitVal(lean_object* x_1) {
_start:
{
lean_object* x_2; lean_object* x_3; uint8_t x_4;
@@ -5364,7 +5259,7 @@ return x_9;
else
{
lean_object* x_10;
-x_10 = l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___main(x_1, x_3, x_3);
+x_10 = l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___main(x_1, x_3, x_3);
return x_10;
}
}
@@ -5434,7 +5329,7 @@ return x_27;
else
{
lean_object* x_28;
-x_28 = l___private_Init_Lean_Syntax_8__decodeDecimalLitAux___main(x_1, x_3, x_3);
+x_28 = l___private_Init_Lean_Syntax_9__decodeDecimalLitAux___main(x_1, x_3, x_3);
return x_28;
}
}
@@ -5475,7 +5370,7 @@ else
{
lean_object* x_41; lean_object* x_42;
x_41 = lean_unsigned_to_nat(2u);
-x_42 = l___private_Init_Lean_Syntax_7__decodeHexLitAux___main(x_1, x_41, x_3);
+x_42 = l___private_Init_Lean_Syntax_8__decodeHexLitAux___main(x_1, x_41, x_3);
return x_42;
}
}
@@ -5483,14 +5378,14 @@ else
{
lean_object* x_43; lean_object* x_44;
x_43 = lean_unsigned_to_nat(2u);
-x_44 = l___private_Init_Lean_Syntax_7__decodeHexLitAux___main(x_1, x_43, x_3);
+x_44 = l___private_Init_Lean_Syntax_8__decodeHexLitAux___main(x_1, x_43, x_3);
return x_44;
}
}
else
{
lean_object* x_45;
-x_45 = l___private_Init_Lean_Syntax_9__decodeNatLitVal___closed__1;
+x_45 = l___private_Init_Lean_Syntax_10__decodeNatLitVal___closed__1;
return x_45;
}
}
@@ -5504,11 +5399,11 @@ return x_46;
}
}
}
-lean_object* l___private_Init_Lean_Syntax_9__decodeNatLitVal___boxed(lean_object* x_1) {
+lean_object* l___private_Init_Lean_Syntax_10__decodeNatLitVal___boxed(lean_object* x_1) {
_start:
{
lean_object* x_2;
-x_2 = l___private_Init_Lean_Syntax_9__decodeNatLitVal(x_1);
+x_2 = l___private_Init_Lean_Syntax_10__decodeNatLitVal(x_1);
lean_dec(x_1);
return x_2;
}
@@ -5553,7 +5448,7 @@ lean_object* x_14; lean_object* x_15;
x_14 = lean_ctor_get(x_13, 1);
lean_inc(x_14);
lean_dec(x_13);
-x_15 = l___private_Init_Lean_Syntax_9__decodeNatLitVal(x_14);
+x_15 = l___private_Init_Lean_Syntax_10__decodeNatLitVal(x_14);
lean_dec(x_14);
return x_15;
}
@@ -5695,6 +5590,807 @@ lean_dec(x_1);
return x_2;
}
}
+lean_object* _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__1() {
+_start:
+{
+uint32_t x_1; lean_object* x_2;
+x_1 = 9;
+x_2 = lean_box_uint32(x_1);
+return x_2;
+}
+}
+lean_object* _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__2() {
+_start:
+{
+uint32_t x_1; lean_object* x_2;
+x_1 = 10;
+x_2 = lean_box_uint32(x_1);
+return x_2;
+}
+}
+lean_object* _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__3() {
+_start:
+{
+uint32_t x_1; lean_object* x_2;
+x_1 = 39;
+x_2 = lean_box_uint32(x_1);
+return x_2;
+}
+}
+lean_object* _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__4() {
+_start:
+{
+uint32_t x_1; lean_object* x_2;
+x_1 = 34;
+x_2 = lean_box_uint32(x_1);
+return x_2;
+}
+}
+lean_object* _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__5() {
+_start:
+{
+uint32_t x_1; lean_object* x_2;
+x_1 = 92;
+x_2 = lean_box_uint32(x_1);
+return x_2;
+}
+}
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+uint32_t x_3; lean_object* x_4; uint32_t x_5; uint8_t x_6;
+x_3 = lean_string_utf8_get(x_1, x_2);
+x_4 = lean_string_utf8_next(x_1, x_2);
+x_5 = 92;
+x_6 = x_3 == x_5;
+if (x_6 == 0)
+{
+uint32_t x_7; uint8_t x_8;
+x_7 = 34;
+x_8 = x_3 == x_7;
+if (x_8 == 0)
+{
+uint32_t x_9; uint8_t x_10;
+x_9 = 39;
+x_10 = x_3 == x_9;
+if (x_10 == 0)
+{
+uint32_t x_11; uint8_t x_12;
+x_11 = 110;
+x_12 = x_3 == x_11;
+if (x_12 == 0)
+{
+uint32_t x_13; uint8_t x_14;
+x_13 = 116;
+x_14 = x_3 == x_13;
+if (x_14 == 0)
+{
+uint32_t x_15; uint8_t x_16;
+x_15 = 120;
+x_16 = x_3 == x_15;
+if (x_16 == 0)
+{
+uint32_t x_17; uint8_t x_18;
+x_17 = 117;
+x_18 = x_3 == x_17;
+if (x_18 == 0)
+{
+lean_object* x_19;
+lean_dec(x_4);
+x_19 = lean_box(0);
+return x_19;
+}
+else
+{
+lean_object* x_20;
+x_20 = l___private_Init_Lean_Syntax_7__decodeHexDigit(x_1, x_4);
+lean_dec(x_4);
+if (lean_obj_tag(x_20) == 0)
+{
+lean_object* x_21;
+x_21 = lean_box(0);
+return x_21;
+}
+else
+{
+lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25;
+x_22 = lean_ctor_get(x_20, 0);
+lean_inc(x_22);
+lean_dec(x_20);
+x_23 = lean_ctor_get(x_22, 0);
+lean_inc(x_23);
+x_24 = lean_ctor_get(x_22, 1);
+lean_inc(x_24);
+lean_dec(x_22);
+x_25 = l___private_Init_Lean_Syntax_7__decodeHexDigit(x_1, x_24);
+lean_dec(x_24);
+if (lean_obj_tag(x_25) == 0)
+{
+lean_object* x_26;
+lean_dec(x_23);
+x_26 = lean_box(0);
+return x_26;
+}
+else
+{
+lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30;
+x_27 = lean_ctor_get(x_25, 0);
+lean_inc(x_27);
+lean_dec(x_25);
+x_28 = lean_ctor_get(x_27, 0);
+lean_inc(x_28);
+x_29 = lean_ctor_get(x_27, 1);
+lean_inc(x_29);
+lean_dec(x_27);
+x_30 = l___private_Init_Lean_Syntax_7__decodeHexDigit(x_1, x_29);
+lean_dec(x_29);
+if (lean_obj_tag(x_30) == 0)
+{
+lean_object* x_31;
+lean_dec(x_28);
+lean_dec(x_23);
+x_31 = lean_box(0);
+return x_31;
+}
+else
+{
+lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35;
+x_32 = lean_ctor_get(x_30, 0);
+lean_inc(x_32);
+lean_dec(x_30);
+x_33 = lean_ctor_get(x_32, 0);
+lean_inc(x_33);
+x_34 = lean_ctor_get(x_32, 1);
+lean_inc(x_34);
+lean_dec(x_32);
+x_35 = l___private_Init_Lean_Syntax_7__decodeHexDigit(x_1, x_34);
+lean_dec(x_34);
+if (lean_obj_tag(x_35) == 0)
+{
+lean_object* x_36;
+lean_dec(x_33);
+lean_dec(x_28);
+lean_dec(x_23);
+x_36 = lean_box(0);
+return x_36;
+}
+else
+{
+uint8_t x_37;
+x_37 = !lean_is_exclusive(x_35);
+if (x_37 == 0)
+{
+lean_object* x_38; uint8_t x_39;
+x_38 = lean_ctor_get(x_35, 0);
+x_39 = !lean_is_exclusive(x_38);
+if (x_39 == 0)
+{
+lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint32_t x_48; lean_object* x_49;
+x_40 = lean_ctor_get(x_38, 0);
+x_41 = lean_unsigned_to_nat(16u);
+x_42 = lean_nat_mul(x_41, x_23);
+lean_dec(x_23);
+x_43 = lean_nat_add(x_42, x_28);
+lean_dec(x_28);
+lean_dec(x_42);
+x_44 = lean_nat_mul(x_41, x_43);
+lean_dec(x_43);
+x_45 = lean_nat_add(x_44, x_33);
+lean_dec(x_33);
+lean_dec(x_44);
+x_46 = lean_nat_mul(x_41, x_45);
+lean_dec(x_45);
+x_47 = lean_nat_add(x_46, x_40);
+lean_dec(x_40);
+lean_dec(x_46);
+x_48 = l_Char_ofNat(x_47);
+lean_dec(x_47);
+x_49 = lean_box_uint32(x_48);
+lean_ctor_set(x_38, 0, x_49);
+return x_35;
+}
+else
+{
+lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; uint32_t x_59; lean_object* x_60; lean_object* x_61;
+x_50 = lean_ctor_get(x_38, 0);
+x_51 = lean_ctor_get(x_38, 1);
+lean_inc(x_51);
+lean_inc(x_50);
+lean_dec(x_38);
+x_52 = lean_unsigned_to_nat(16u);
+x_53 = lean_nat_mul(x_52, x_23);
+lean_dec(x_23);
+x_54 = lean_nat_add(x_53, x_28);
+lean_dec(x_28);
+lean_dec(x_53);
+x_55 = lean_nat_mul(x_52, x_54);
+lean_dec(x_54);
+x_56 = lean_nat_add(x_55, x_33);
+lean_dec(x_33);
+lean_dec(x_55);
+x_57 = lean_nat_mul(x_52, x_56);
+lean_dec(x_56);
+x_58 = lean_nat_add(x_57, x_50);
+lean_dec(x_50);
+lean_dec(x_57);
+x_59 = l_Char_ofNat(x_58);
+lean_dec(x_58);
+x_60 = lean_box_uint32(x_59);
+x_61 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_61, 0, x_60);
+lean_ctor_set(x_61, 1, x_51);
+lean_ctor_set(x_35, 0, x_61);
+return x_35;
+}
+}
+else
+{
+lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; uint32_t x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76;
+x_62 = lean_ctor_get(x_35, 0);
+lean_inc(x_62);
+lean_dec(x_35);
+x_63 = lean_ctor_get(x_62, 0);
+lean_inc(x_63);
+x_64 = lean_ctor_get(x_62, 1);
+lean_inc(x_64);
+if (lean_is_exclusive(x_62)) {
+ lean_ctor_release(x_62, 0);
+ lean_ctor_release(x_62, 1);
+ x_65 = x_62;
+} else {
+ lean_dec_ref(x_62);
+ x_65 = lean_box(0);
+}
+x_66 = lean_unsigned_to_nat(16u);
+x_67 = lean_nat_mul(x_66, x_23);
+lean_dec(x_23);
+x_68 = lean_nat_add(x_67, x_28);
+lean_dec(x_28);
+lean_dec(x_67);
+x_69 = lean_nat_mul(x_66, x_68);
+lean_dec(x_68);
+x_70 = lean_nat_add(x_69, x_33);
+lean_dec(x_33);
+lean_dec(x_69);
+x_71 = lean_nat_mul(x_66, x_70);
+lean_dec(x_70);
+x_72 = lean_nat_add(x_71, x_63);
+lean_dec(x_63);
+lean_dec(x_71);
+x_73 = l_Char_ofNat(x_72);
+lean_dec(x_72);
+x_74 = lean_box_uint32(x_73);
+if (lean_is_scalar(x_65)) {
+ x_75 = lean_alloc_ctor(0, 2, 0);
+} else {
+ x_75 = x_65;
+}
+lean_ctor_set(x_75, 0, x_74);
+lean_ctor_set(x_75, 1, x_64);
+x_76 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_76, 0, x_75);
+return x_76;
+}
+}
+}
+}
+}
+}
+}
+else
+{
+lean_object* x_77;
+x_77 = l___private_Init_Lean_Syntax_7__decodeHexDigit(x_1, x_4);
+lean_dec(x_4);
+if (lean_obj_tag(x_77) == 0)
+{
+lean_object* x_78;
+x_78 = lean_box(0);
+return x_78;
+}
+else
+{
+lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82;
+x_79 = lean_ctor_get(x_77, 0);
+lean_inc(x_79);
+lean_dec(x_77);
+x_80 = lean_ctor_get(x_79, 0);
+lean_inc(x_80);
+x_81 = lean_ctor_get(x_79, 1);
+lean_inc(x_81);
+lean_dec(x_79);
+x_82 = l___private_Init_Lean_Syntax_7__decodeHexDigit(x_1, x_81);
+lean_dec(x_81);
+if (lean_obj_tag(x_82) == 0)
+{
+lean_object* x_83;
+lean_dec(x_80);
+x_83 = lean_box(0);
+return x_83;
+}
+else
+{
+uint8_t x_84;
+x_84 = !lean_is_exclusive(x_82);
+if (x_84 == 0)
+{
+lean_object* x_85; uint8_t x_86;
+x_85 = lean_ctor_get(x_82, 0);
+x_86 = !lean_is_exclusive(x_85);
+if (x_86 == 0)
+{
+lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; uint32_t x_91; lean_object* x_92;
+x_87 = lean_ctor_get(x_85, 0);
+x_88 = lean_unsigned_to_nat(16u);
+x_89 = lean_nat_mul(x_88, x_80);
+lean_dec(x_80);
+x_90 = lean_nat_add(x_89, x_87);
+lean_dec(x_87);
+lean_dec(x_89);
+x_91 = l_Char_ofNat(x_90);
+lean_dec(x_90);
+x_92 = lean_box_uint32(x_91);
+lean_ctor_set(x_85, 0, x_92);
+return x_82;
+}
+else
+{
+lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; uint32_t x_98; lean_object* x_99; lean_object* x_100;
+x_93 = lean_ctor_get(x_85, 0);
+x_94 = lean_ctor_get(x_85, 1);
+lean_inc(x_94);
+lean_inc(x_93);
+lean_dec(x_85);
+x_95 = lean_unsigned_to_nat(16u);
+x_96 = lean_nat_mul(x_95, x_80);
+lean_dec(x_80);
+x_97 = lean_nat_add(x_96, x_93);
+lean_dec(x_93);
+lean_dec(x_96);
+x_98 = l_Char_ofNat(x_97);
+lean_dec(x_97);
+x_99 = lean_box_uint32(x_98);
+x_100 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_100, 0, x_99);
+lean_ctor_set(x_100, 1, x_94);
+lean_ctor_set(x_82, 0, x_100);
+return x_82;
+}
+}
+else
+{
+lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint32_t x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111;
+x_101 = lean_ctor_get(x_82, 0);
+lean_inc(x_101);
+lean_dec(x_82);
+x_102 = lean_ctor_get(x_101, 0);
+lean_inc(x_102);
+x_103 = lean_ctor_get(x_101, 1);
+lean_inc(x_103);
+if (lean_is_exclusive(x_101)) {
+ lean_ctor_release(x_101, 0);
+ lean_ctor_release(x_101, 1);
+ x_104 = x_101;
+} else {
+ lean_dec_ref(x_101);
+ x_104 = lean_box(0);
+}
+x_105 = lean_unsigned_to_nat(16u);
+x_106 = lean_nat_mul(x_105, x_80);
+lean_dec(x_80);
+x_107 = lean_nat_add(x_106, x_102);
+lean_dec(x_102);
+lean_dec(x_106);
+x_108 = l_Char_ofNat(x_107);
+lean_dec(x_107);
+x_109 = lean_box_uint32(x_108);
+if (lean_is_scalar(x_104)) {
+ x_110 = lean_alloc_ctor(0, 2, 0);
+} else {
+ x_110 = x_104;
+}
+lean_ctor_set(x_110, 0, x_109);
+lean_ctor_set(x_110, 1, x_103);
+x_111 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_111, 0, x_110);
+return x_111;
+}
+}
+}
+}
+}
+else
+{
+lean_object* x_112; lean_object* x_113; lean_object* x_114;
+x_112 = l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__1;
+x_113 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_113, 0, x_112);
+lean_ctor_set(x_113, 1, x_4);
+x_114 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_114, 0, x_113);
+return x_114;
+}
+}
+else
+{
+lean_object* x_115; lean_object* x_116; lean_object* x_117;
+x_115 = l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__2;
+x_116 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_116, 0, x_115);
+lean_ctor_set(x_116, 1, x_4);
+x_117 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_117, 0, x_116);
+return x_117;
+}
+}
+else
+{
+lean_object* x_118; lean_object* x_119; lean_object* x_120;
+x_118 = l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__3;
+x_119 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_119, 0, x_118);
+lean_ctor_set(x_119, 1, x_4);
+x_120 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_120, 0, x_119);
+return x_120;
+}
+}
+else
+{
+lean_object* x_121; lean_object* x_122; lean_object* x_123;
+x_121 = l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__4;
+x_122 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_122, 0, x_121);
+lean_ctor_set(x_122, 1, x_4);
+x_123 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_123, 0, x_122);
+return x_123;
+}
+}
+else
+{
+lean_object* x_124; lean_object* x_125; lean_object* x_126;
+x_124 = l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__5;
+x_125 = lean_alloc_ctor(0, 2, 0);
+lean_ctor_set(x_125, 0, x_124);
+lean_ctor_set(x_125, 1, x_4);
+x_126 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_126, 0, x_125);
+return x_126;
+}
+}
+}
+lean_object* l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed(lean_object* x_1, lean_object* x_2) {
+_start:
+{
+lean_object* x_3;
+x_3 = l___private_Init_Lean_Syntax_11__decodeQuotedChar(x_1, x_2);
+lean_dec(x_2);
+lean_dec(x_1);
+return x_3;
+}
+}
+lean_object* l_Lean_Syntax_decodeStrLitAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+_start:
+{
+uint32_t x_4; lean_object* x_5; uint32_t x_6; uint8_t x_7;
+x_4 = lean_string_utf8_get(x_1, x_2);
+x_5 = lean_string_utf8_next(x_1, x_2);
+lean_dec(x_2);
+x_6 = 34;
+x_7 = x_4 == x_6;
+if (x_7 == 0)
+{
+uint32_t x_8; uint8_t x_9;
+x_8 = 92;
+x_9 = x_4 == x_8;
+if (x_9 == 0)
+{
+lean_object* x_10;
+x_10 = lean_string_push(x_3, x_4);
+x_2 = x_5;
+x_3 = x_10;
+goto _start;
+}
+else
+{
+lean_object* x_12;
+x_12 = l___private_Init_Lean_Syntax_11__decodeQuotedChar(x_1, x_5);
+lean_dec(x_5);
+if (lean_obj_tag(x_12) == 0)
+{
+lean_object* x_13;
+lean_dec(x_3);
+x_13 = lean_box(0);
+return x_13;
+}
+else
+{
+lean_object* x_14; lean_object* x_15; lean_object* x_16; uint32_t x_17; lean_object* x_18;
+x_14 = lean_ctor_get(x_12, 0);
+lean_inc(x_14);
+lean_dec(x_12);
+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_17 = lean_unbox_uint32(x_15);
+lean_dec(x_15);
+x_18 = lean_string_push(x_3, x_17);
+x_2 = x_16;
+x_3 = x_18;
+goto _start;
+}
+}
+}
+else
+{
+lean_object* x_20;
+lean_dec(x_5);
+x_20 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_20, 0, x_3);
+return x_20;
+}
+}
+}
+lean_object* l_Lean_Syntax_decodeStrLitAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+_start:
+{
+lean_object* x_4;
+x_4 = l_Lean_Syntax_decodeStrLitAux___main(x_1, x_2, x_3);
+lean_dec(x_1);
+return x_4;
+}
+}
+lean_object* l_Lean_Syntax_decodeStrLitAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+_start:
+{
+lean_object* x_4;
+x_4 = l_Lean_Syntax_decodeStrLitAux___main(x_1, x_2, x_3);
+return x_4;
+}
+}
+lean_object* l_Lean_Syntax_decodeStrLitAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
+_start:
+{
+lean_object* x_4;
+x_4 = l_Lean_Syntax_decodeStrLitAux(x_1, x_2, x_3);
+lean_dec(x_1);
+return x_4;
+}
+}
+lean_object* l_Lean_Syntax_decodeStrLit(lean_object* x_1) {
+_start:
+{
+lean_object* x_2; lean_object* x_3; lean_object* x_4;
+x_2 = lean_unsigned_to_nat(1u);
+x_3 = l_String_splitAux___main___closed__1;
+x_4 = l_Lean_Syntax_decodeStrLitAux___main(x_1, x_2, x_3);
+return x_4;
+}
+}
+lean_object* l_Lean_Syntax_decodeStrLit___boxed(lean_object* x_1) {
+_start:
+{
+lean_object* x_2;
+x_2 = l_Lean_Syntax_decodeStrLit(x_1);
+lean_dec(x_1);
+return x_2;
+}
+}
+lean_object* l_Lean_Syntax_isStrLit_x3f(lean_object* x_1) {
+_start:
+{
+if (lean_obj_tag(x_1) == 1)
+{
+lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5;
+x_2 = lean_ctor_get(x_1, 0);
+x_3 = lean_ctor_get(x_1, 1);
+x_4 = l_Lean_strLitKind;
+x_5 = lean_name_eq(x_2, x_4);
+if (x_5 == 0)
+{
+lean_object* x_6;
+x_6 = lean_box(0);
+return x_6;
+}
+else
+{
+lean_object* x_7; lean_object* x_8; uint8_t x_9;
+x_7 = lean_array_get_size(x_3);
+x_8 = lean_unsigned_to_nat(1u);
+x_9 = lean_nat_dec_eq(x_7, x_8);
+lean_dec(x_7);
+if (x_9 == 0)
+{
+lean_object* x_10;
+x_10 = lean_box(0);
+return x_10;
+}
+else
+{
+lean_object* x_11; lean_object* x_12; lean_object* x_13;
+x_11 = l_Lean_stxInh;
+x_12 = lean_unsigned_to_nat(0u);
+x_13 = lean_array_get(x_11, x_3, x_12);
+if (lean_obj_tag(x_13) == 2)
+{
+lean_object* x_14; lean_object* x_15; lean_object* x_16;
+x_14 = lean_ctor_get(x_13, 1);
+lean_inc(x_14);
+lean_dec(x_13);
+x_15 = l_String_splitAux___main___closed__1;
+x_16 = l_Lean_Syntax_decodeStrLitAux___main(x_14, x_8, x_15);
+lean_dec(x_14);
+return x_16;
+}
+else
+{
+lean_object* x_17;
+lean_dec(x_13);
+x_17 = lean_box(0);
+return x_17;
+}
+}
+}
+}
+else
+{
+lean_object* x_18;
+x_18 = lean_box(0);
+return x_18;
+}
+}
+}
+lean_object* l_Lean_Syntax_isStrLit_x3f___boxed(lean_object* x_1) {
+_start:
+{
+lean_object* x_2;
+x_2 = l_Lean_Syntax_isStrLit_x3f(x_1);
+lean_dec(x_1);
+return x_2;
+}
+}
+lean_object* l_Lean_Syntax_decodeCharLit(lean_object* x_1) {
+_start:
+{
+lean_object* x_2; uint32_t x_3; uint32_t x_4; uint8_t x_5;
+x_2 = lean_unsigned_to_nat(1u);
+x_3 = lean_string_utf8_get(x_1, x_2);
+x_4 = 92;
+x_5 = x_3 == x_4;
+if (x_5 == 0)
+{
+lean_object* x_6; lean_object* x_7;
+x_6 = lean_box_uint32(x_3);
+x_7 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_7, 0, x_6);
+return x_7;
+}
+else
+{
+lean_object* x_8; lean_object* x_9;
+x_8 = lean_unsigned_to_nat(2u);
+x_9 = l___private_Init_Lean_Syntax_11__decodeQuotedChar(x_1, x_8);
+if (lean_obj_tag(x_9) == 0)
+{
+lean_object* x_10;
+x_10 = lean_box(0);
+return x_10;
+}
+else
+{
+uint8_t x_11;
+x_11 = !lean_is_exclusive(x_9);
+if (x_11 == 0)
+{
+lean_object* x_12; lean_object* x_13;
+x_12 = lean_ctor_get(x_9, 0);
+x_13 = lean_ctor_get(x_12, 0);
+lean_inc(x_13);
+lean_dec(x_12);
+lean_ctor_set(x_9, 0, x_13);
+return x_9;
+}
+else
+{
+lean_object* x_14; lean_object* x_15; lean_object* x_16;
+x_14 = lean_ctor_get(x_9, 0);
+lean_inc(x_14);
+lean_dec(x_9);
+x_15 = lean_ctor_get(x_14, 0);
+lean_inc(x_15);
+lean_dec(x_14);
+x_16 = lean_alloc_ctor(1, 1, 0);
+lean_ctor_set(x_16, 0, x_15);
+return x_16;
+}
+}
+}
+}
+}
+lean_object* l_Lean_Syntax_decodeCharLit___boxed(lean_object* x_1) {
+_start:
+{
+lean_object* x_2;
+x_2 = l_Lean_Syntax_decodeCharLit(x_1);
+lean_dec(x_1);
+return x_2;
+}
+}
+lean_object* l_Lean_Syntax_isCharLit_x3f(lean_object* x_1) {
+_start:
+{
+if (lean_obj_tag(x_1) == 1)
+{
+lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5;
+x_2 = lean_ctor_get(x_1, 0);
+x_3 = lean_ctor_get(x_1, 1);
+x_4 = l_Lean_charLitKind;
+x_5 = lean_name_eq(x_2, x_4);
+if (x_5 == 0)
+{
+lean_object* x_6;
+x_6 = lean_box(0);
+return x_6;
+}
+else
+{
+lean_object* x_7; lean_object* x_8; uint8_t x_9;
+x_7 = lean_array_get_size(x_3);
+x_8 = lean_unsigned_to_nat(1u);
+x_9 = lean_nat_dec_eq(x_7, x_8);
+lean_dec(x_7);
+if (x_9 == 0)
+{
+lean_object* x_10;
+x_10 = lean_box(0);
+return x_10;
+}
+else
+{
+lean_object* x_11; lean_object* x_12; lean_object* x_13;
+x_11 = l_Lean_stxInh;
+x_12 = lean_unsigned_to_nat(0u);
+x_13 = lean_array_get(x_11, x_3, x_12);
+if (lean_obj_tag(x_13) == 2)
+{
+lean_object* x_14; lean_object* x_15;
+x_14 = lean_ctor_get(x_13, 1);
+lean_inc(x_14);
+lean_dec(x_13);
+x_15 = l_Lean_Syntax_decodeCharLit(x_14);
+lean_dec(x_14);
+return x_15;
+}
+else
+{
+lean_object* x_16;
+lean_dec(x_13);
+x_16 = lean_box(0);
+return x_16;
+}
+}
+}
+}
+else
+{
+lean_object* x_17;
+x_17 = lean_box(0);
+return x_17;
+}
+}
+}
+lean_object* l_Lean_Syntax_isCharLit_x3f___boxed(lean_object* x_1) {
+_start:
+{
+lean_object* x_2;
+x_2 = l_Lean_Syntax_isCharLit_x3f(x_1);
+lean_dec(x_1);
+return x_2;
+}
+}
lean_object* l_Lean_mkIdentFrom(lean_object* x_1, lean_object* x_2) {
_start:
{
@@ -5852,8 +6548,18 @@ l_Lean_Syntax_HasToString = _init_l_Lean_Syntax_HasToString();
lean_mark_persistent(l_Lean_Syntax_HasToString);
l_Lean_mkOptionalNode___closed__1 = _init_l_Lean_mkOptionalNode___closed__1();
lean_mark_persistent(l_Lean_mkOptionalNode___closed__1);
-l___private_Init_Lean_Syntax_9__decodeNatLitVal___closed__1 = _init_l___private_Init_Lean_Syntax_9__decodeNatLitVal___closed__1();
-lean_mark_persistent(l___private_Init_Lean_Syntax_9__decodeNatLitVal___closed__1);
+l___private_Init_Lean_Syntax_10__decodeNatLitVal___closed__1 = _init_l___private_Init_Lean_Syntax_10__decodeNatLitVal___closed__1();
+lean_mark_persistent(l___private_Init_Lean_Syntax_10__decodeNatLitVal___closed__1);
+l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__1 = _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__1();
+lean_mark_persistent(l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__1);
+l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__2 = _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__2();
+lean_mark_persistent(l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__2);
+l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__3 = _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__3();
+lean_mark_persistent(l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__3);
+l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__4 = _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__4();
+lean_mark_persistent(l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__4);
+l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__5 = _init_l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__5();
+lean_mark_persistent(l___private_Init_Lean_Syntax_11__decodeQuotedChar___boxed__const__5);
return lean_mk_io_result(lean_box(0));
}
#ifdef __cplusplus