diff --git a/stage0/src/Init/Lean/Elab/Command.lean b/stage0/src/Init/Lean/Elab/Command.lean index 8640925132..7d14ca8781 100644 --- a/stage0/src/Init/Lean/Elab/Command.lean +++ b/stage0/src/Init/Lean/Elab/Command.lean @@ -175,14 +175,14 @@ ctx ← read; s ← get; when (ctx.currRecDepth == s.maxRecDepth) $ throwError ref maxRecDepthErrorMessage; adaptReader (fun (ctx : Context) => { currRecDepth := ctx.currRecDepth + 1, .. ctx }) x -private def elabCommandUsing (stx : Syntax) : List CommandElab → CommandElabM Unit +private def elabCommandUsing (s : State) (stx : Syntax) : List CommandElab → CommandElabM Unit | [] => do let refFmt := stx.prettyPrint; throwError stx ("unexpected syntax" ++ MessageData.nest 2 (Format.line ++ refFmt)) | (elabFn::elabFns) => catch (elabFn stx) (fun ex => match ex with | Exception.error _ => throw ex - | Exception.unsupportedSyntax => elabCommandUsing elabFns) + | Exception.unsupportedSyntax => do set s; elabCommandUsing elabFns) /- Elaborate `x` with `stx` on the macro stack -/ @[inline] def withMacroExpansion {α} (stx : Syntax) (x : CommandElabM α) : CommandElabM α := @@ -190,25 +190,24 @@ adaptReader (fun (ctx : Context) => { macroStack := stx :: ctx.macroStack, .. ct partial def elabCommand : Syntax → CommandElabM Unit | stx => withIncRecDepth stx $ withFreshMacroScope $ match stx with - | Syntax.node _ _ => do - trace `Elab.step stx $ fun _ => stx; - s ← get; - let table := (commandElabAttribute.ext.getState s.env).table; - let k := stx.getKind; - match table.find? k with - | some elabFns => elabCommandUsing stx elabFns - | none => do - scp ← getCurrMacroScope; - env ← getEnv; - match expandMacro env stx scp with - | some stx' => withMacroExpansion stx $ - if stx'.getKind == nullKind then - -- list of commands => elaborate in order - -- The parser will only ever return a single command at a time, but syntax quotations can return multiple ones - stx'.getArgs.forM elabCommand - else - elabCommand stx' - | none => throwError stx ("command '" ++ toString k ++ "' has not been implemented") + | Syntax.node k args => + if k == nullKind then + -- list of commands => elaborate in order + -- The parser will only ever return a single command at a time, but syntax quotations can return multiple ones + args.forM elabCommand + else do + trace `Elab.step stx $ fun _ => stx; + s ← get; + let table := (commandElabAttribute.ext.getState s.env).table; + let k := stx.getKind; + match table.find? k with + | some elabFns => elabCommandUsing s stx elabFns + | none => do + scp ← getCurrMacroScope; + env ← getEnv; + match expandMacro env stx scp with + | some stx' => withMacroExpansion stx $ elabCommand stx' + | none => throwError stx ("command '" ++ toString k ++ "' has not been implemented") | _ => throwError stx "unexpected command" /-- Adapt a syntax transformation to a regular, command-producing elaborator. -/ diff --git a/stage0/src/Init/Lean/Elab/Quotation.lean b/stage0/src/Init/Lean/Elab/Quotation.lean index 369ccc5a5c..e9d418a931 100644 --- a/stage0/src/Init/Lean/Elab/Quotation.lean +++ b/stage0/src/Init/Lean/Elab/Quotation.lean @@ -108,10 +108,7 @@ private partial def quoteSyntax : Syntax → TermElabM Syntax let preresolved := resolveGlobalName env currNamespace openDecls val ++ preresolved; let val := quote val; -- `scp` is bound in stxQuot.expand - val ← `(addMacroScope $val scp); - let args := quote preresolved; - -- TODO: simplify quotations when we're no longer limited by name resolution in the old frontend - `(Syntax.ident none (String.toSubstring $(quote (toString rawVal))) $val $args) + `(Syntax.ident none (String.toSubstring $(quote (toString rawVal))) (addMacroScope $val scp) $(quote preresolved)) -- if antiquotation, insert contents as-is, else recurse | stx@(Syntax.node k args) => if isAntiquot stx then diff --git a/stage0/src/Init/Lean/Elab/Syntax.lean b/stage0/src/Init/Lean/Elab/Syntax.lean index 3c8ed6a90d..ea1323875c 100644 --- a/stage0/src/Init/Lean/Elab/Syntax.lean +++ b/stage0/src/Init/Lean/Elab/Syntax.lean @@ -182,7 +182,61 @@ adaptExpander $ fun stx => match_syntax stx with /- We just ignore Lean3 notation declaration commands. -/ @[builtinCommandElab «mixfix»] def elabMixfix : CommandElab := fun _ => pure () @[builtinCommandElab «reserve»] def elabReserve : CommandElab := fun _ => pure () -@[builtinCommandElab «notation»] def elabNotation : CommandElab := fun _ => pure () + +-- wrap all occurrences of the given `ident` nodes in antiquotations +private partial def antiquote (vars : Array Syntax) : Syntax → Syntax +| stx => match_syntax stx with +| `($id:ident) => if (vars.findIdx? (fun var => var.getId == id.getId)).isSome then Syntax.node `antiquot #[mkAtom "$", Unhygienic.run `($id:ident), mkNullNode, mkNullNode] else stx +| _ => match stx with + | Syntax.node k args => Syntax.node k (args.map antiquote) + | stx => stx + +/- Convert `notation` command lhs item into a `syntax` command item -/ +def expandNotationItemIntoSyntaxItem (stx : Syntax) : CommandElabM Syntax := +let k := stx.getKind; +if k == `Lean.Parser.Command.identPrec then + pure $ Syntax.node `Lean.Parser.Syntax.cat #[mkIdentFrom stx `term, stx.getArg 1] +else if k == `Lean.Parser.Command.quotedSymbolPrec then + match (stx.getArg 0).getArg 1 with + | Syntax.atom info val => pure $ Syntax.node `Lean.Parser.Syntax.atom #[mkStxStrLit val info, stx.getArg 1] + | _ => throwUnsupportedSyntax +else if k == `Lean.Parser.Command.strLitPrec then + pure $ Syntax.node `Lean.Parser.Syntax.atom stx.getArgs +else + throwUnsupportedSyntax + +/- Convert `notation` command lhs item a pattern element -/ +def expandNotationItemIntoPattern (stx : Syntax) : CommandElabM Syntax := +let k := stx.getKind; +if k == `Lean.Parser.Command.identPrec then + let item := stx.getArg 0; + pure $ mkNode `antiquot #[mkAtom "$", Term.mkTermIdFromIdent item, mkNullNode, mkNullNode] +else if k == `Lean.Parser.Command.quotedSymbolPrec then + pure $ (stx.getArg 0).getArg 1 +else if k == `Lean.Parser.Command.strLitPrec then + match (stx.getArg 0).isStrLit? with + | some str => pure $ mkAtomFrom stx str + | none => throwUnsupportedSyntax +else + throwUnsupportedSyntax + +@[builtinCommandElab «notation»] def elabNotation : CommandElab := +adaptExpander $ fun stx => match_syntax stx with +| `(notation $items* := $rhs) => do + -- build parser + syntaxParts ← items.mapM expandNotationItemIntoSyntaxItem; + let cat := mkIdentFrom stx `term; + -- build macro + let vars := items.filter $ fun item => item.getKind == `Lean.Parser.Command.identPrec; + let vars := vars.map $ fun var => var.getArg 0; + let rhs := antiquote vars rhs; + patArgs ← items.mapM expandNotationItemIntoPattern; + scp ← getCurrMacroScope; + -- manually create hygienic kind name + let kind := addMacroScope `myParser scp; + let pat := Syntax.node kind patArgs; + `(syntax [$(mkIdentFrom stx kind)] $syntaxParts* : $cat macro | `($pat) => `($rhs)) +| _ => throwUnsupportedSyntax end Command end Elab diff --git a/stage0/src/Init/Lean/Elab/Tactic.lean b/stage0/src/Init/Lean/Elab/Tactic.lean index c38a7d243f..3601100e91 100644 --- a/stage0/src/Init/Lean/Elab/Tactic.lean +++ b/stage0/src/Init/Lean/Elab/Tactic.lean @@ -5,6 +5,7 @@ Authors: Leonardo de Moura, Sebastian Ullrich -/ prelude import Init.Lean.Elab.Term +import Init.Lean.Elab.Tactic.Basic namespace Lean namespace Elab diff --git a/stage0/src/Init/Lean/Elab/Tactic/Basic.lean b/stage0/src/Init/Lean/Elab/Tactic/Basic.lean new file mode 100644 index 0000000000..19b3a1bb13 --- /dev/null +++ b/stage0/src/Init/Lean/Elab/Tactic/Basic.lean @@ -0,0 +1,149 @@ +/- +Copyright (c) 2020 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura, Sebastian Ullrich +-/ +prelude +import Init.Lean.Elab.Util +import Init.Lean.Elab.Term + +namespace Lean +namespace Elab +namespace Tactic + +structure Context extends toTermCtx : Term.Context := +(main : Expr) + +structure State extends toTermState : Term.State := +(goals : List Expr) + +instance State.inhabited : Inhabited State := ⟨{ goals := [], toTermState := arbitrary _ }⟩ + +abbrev Exception := Elab.Exception + +abbrev TacticElabM := ReaderT Context (EStateM Exception State) + +abbrev TacticElab := Syntax → TacticElabM Unit + +def liftTermElabM {α} (x : TermElabM α) : TacticElabM α := +fun ctx s => match x ctx.toTermCtx s.toTermState with + | EStateM.Result.ok a newS => EStateM.Result.ok a { toTermState := newS, .. s } + | EStateM.Result.error (Term.Exception.ex ex) newS => EStateM.Result.error ex { toTermState := newS, .. s } + | EStateM.Result.error Term.Exception.postpone _ => unreachable! + +def getEnv : TacticElabM Environment := do s ← get; pure s.env +def getMCtx : TacticElabM MetavarContext := do s ← get; pure s.mctx +def getLCtx : TacticElabM LocalContext := do ctx ← read; pure ctx.lctx +def getLocalInsts : TacticElabM LocalInstances := do ctx ← read; pure ctx.localInstances +def getOptions : TacticElabM Options := do ctx ← read; pure ctx.config.opts + +def addContext (msg : MessageData) : TacticElabM MessageData := liftTermElabM $ Term.addContext msg + +instance monadLog : MonadLog TacticElabM := +{ getCmdPos := do ctx ← read; pure ctx.cmdPos, + getFileMap := do ctx ← read; pure ctx.fileMap, + getFileName := do ctx ← read; pure ctx.fileName, + addContext := addContext, + logMessage := fun msg => modify $ fun s => { messages := s.messages.add msg, .. s } } + +def throwError {α} (ref : Syntax) (msgData : MessageData) : TacticElabM α := liftTermElabM $ Term.throwError ref msgData +def throwUnsupportedSyntax {α} : TacticElabM α := liftTermElabM $ Term.throwUnsupportedSyntax + +@[inline] def withIncRecDepth {α} (ref : Syntax) (x : TacticElabM α) : TacticElabM α := do +ctx ← read; +when (ctx.currRecDepth == ctx.maxRecDepth) $ throwError ref maxRecDepthErrorMessage; +adaptReader (fun (ctx : Context) => { currRecDepth := ctx.currRecDepth + 1, .. ctx }) x + +protected def getCurrMacroScope : TacticElabM MacroScope := do ctx ← read; pure ctx.currMacroScope + +@[inline] protected def withFreshMacroScope {α} (x : TacticElabM α) : TacticElabM α := do +fresh ← modifyGet (fun st => (st.nextMacroScope, { st with nextMacroScope := st.nextMacroScope + 1 })); +adaptReader (fun (ctx : Context) => { ctx with currMacroScope := fresh }) x + +instance monadQuotation : MonadQuotation TacticElabM := { + getCurrMacroScope := Tactic.getCurrMacroScope, + withFreshMacroScope := @Tactic.withFreshMacroScope +} + +abbrev TacticElabTable := ElabFnTable TacticElab +def mkBuiltinTacticElabTable : IO (IO.Ref TacticElabTable) := IO.mkRef {} +@[init mkBuiltinTacticElabTable] constant builtinTacticElabTable : IO.Ref TacticElabTable := arbitrary _ + +def addBuiltinTacticElab (k : SyntaxNodeKind) (declName : Name) (elab : TacticElab) : IO Unit := do +m ← builtinTacticElabTable.get; +when (m.contains k) $ + throw (IO.userError ("invalid builtin tactic elaborator, elaborator for '" ++ toString k ++ "' has already been defined")); +builtinTacticElabTable.modify $ fun m => m.insert k elab + +def declareBuiltinTacticElab (env : Environment) (kind : SyntaxNodeKind) (declName : Name) : IO Environment := +let name := `_regBuiltinTacticElab ++ declName; +let type := mkApp (mkConst `IO) (mkConst `Unit); +let val := mkAppN (mkConst `Lean.Elab.Tactic.addBuiltinTacticElab) #[toExpr kind, toExpr declName, mkConst declName]; +let decl := Declaration.defnDecl { name := name, lparams := [], type := type, value := val, hints := ReducibilityHints.opaque, isUnsafe := false }; +match env.addAndCompile {} decl with +-- TODO: pretty print error +| Except.error _ => throw (IO.userError ("failed to emit registration code for builtin tactic elaborator '" ++ toString declName ++ "'")) +| Except.ok env => IO.ofExcept (setInitAttr env name) + +@[init] def registerBuiltinTacticElabAttr : IO Unit := +registerBuiltinAttribute { + name := `builtinTacticElab, + descr := "Builtin tactic elaborator", + add := fun env declName arg persistent => do { + unless persistent $ throw (IO.userError ("invalid attribute 'builtinTacticElab', must be persistent")); + kind ← IO.ofExcept $ syntaxNodeKindOfAttrParam env `Lean.Parser.Tactic arg; + match env.find? declName with + | none => throw $ IO.userError "unknown declaration" + | some decl => + match decl.type with + | Expr.const `Lean.Elab.Tactic.TacticElab _ _ => declareBuiltinTacticElab env kind declName + | _ => throw (IO.userError ("unexpected tactic elaborator type at '" ++ toString declName ++ "' `TacticElab` expected")) + }, + applicationTime := AttributeApplicationTime.afterCompilation +} + +abbrev TacticElabAttribute := ElabAttribute TacticElab +def mkTacticElabAttribute : IO TacticElabAttribute := +mkElabAttribute TacticElab `tacticElab `Lean.Parser.Tactic `Lean.Elab.Tactic.TacticElab "tactic" builtinTacticElabTable +@[init mkTacticElabAttribute] constant tacticElabAttribute : TacticElabAttribute := arbitrary _ + +def logTrace (cls : Name) (ref : Syntax) (msg : MessageData) : TacticElabM Unit := liftTermElabM $ Term.logTrace cls ref msg +@[inline] def trace (cls : Name) (ref : Syntax) (msg : Unit → MessageData) : TacticElabM Unit := liftTermElabM $ Term.trace cls ref msg +@[inline] def traceAtCmdPos (cls : Name) (msg : Unit → MessageData) : TacticElabM Unit := liftTermElabM $ Term.traceAtCmdPos cls msg +def dbgTrace {α} [HasToString α] (a : α) : TacticElabM Unit :=_root_.dbgTrace (toString a) $ fun _ => pure () + +private def elabTacticUsing (s : State) (stx : Syntax) : List TacticElab → TacticElabM Unit +| [] => do + let refFmt := stx.prettyPrint; + throwError stx ("unexpected syntax" ++ MessageData.nest 2 (Format.line ++ refFmt)) +| (elabFn::elabFns) => catch (elabFn stx) + (fun ex => match ex with + | Exception.error _ => throw ex + | Exception.unsupportedSyntax => do set s; elabTacticUsing elabFns) + +/- Elaborate `x` with `stx` on the macro stack -/ +@[inline] def withMacroExpansion {α} (stx : Syntax) (x : TacticElabM α) : TacticElabM α := +adaptReader (fun (ctx : Context) => { macroStack := stx :: ctx.macroStack, .. ctx }) x + +partial def elabTactic : Syntax → TacticElabM Unit +| stx => withIncRecDepth stx $ withFreshMacroScope $ match stx with + | Syntax.node k args => do + trace `Elab.step stx $ fun _ => stx; + s ← get; + let table := (tacticElabAttribute.ext.getState s.env).table; + let k := stx.getKind; + match table.find? k with + | some elabFns => elabTacticUsing s stx elabFns + | none => do + scp ← getCurrMacroScope; + env ← getEnv; + match expandMacro env stx scp with + | some stx' => withMacroExpansion stx $ elabTactic stx' + | none => throwError stx ("tactic '" ++ toString k ++ "' has not been implemented") + | _ => throwError stx "unexpected command" + + +end Tactic + +end Elab +end Lean diff --git a/stage0/src/Init/Lean/Elab/Term.lean b/stage0/src/Init/Lean/Elab/Term.lean index 963f87d8c5..b9794f2312 100644 --- a/stage0/src/Init/Lean/Elab/Term.lean +++ b/stage0/src/Init/Lean/Elab/Term.lean @@ -113,7 +113,7 @@ def addContext (msg : MessageData) : TermElabM MessageData := do env ← getEnv; mctx ← getMCtx; lctx ← getLCtx; opts ← getOptions; pure (MessageData.withContext { env := env, mctx := mctx, lctx := lctx, opts := opts } msg) -instance TermElabM.MonadLog : MonadLog TermElabM := +instance monadLog : MonadLog TermElabM := { getCmdPos := do ctx ← read; pure ctx.cmdPos, getFileMap := do ctx ← read; pure ctx.fileMap, getFileName := do ctx ← read; pure ctx.fileName, @@ -146,7 +146,7 @@ pure ctx.currMacroScope fresh ← modifyGet (fun st => (st.nextMacroScope, { st with nextMacroScope := st.nextMacroScope + 1 })); adaptReader (fun (ctx : Context) => { ctx with currMacroScope := fresh }) x -instance TermElabM.MonadQuotation : MonadQuotation TermElabM := { +instance monadQuotation : MonadQuotation TermElabM := { getCurrMacroScope := Term.getCurrMacroScope, withFreshMacroScope := @Term.withFreshMacroScope } @@ -469,7 +469,7 @@ private def elabTermUsing (s : State) (stx : Syntax) (expectedType? : Option Exp | (elabFn::elabFns) => catch (elabFn stx expectedType?) (fun ex => match ex with | Exception.ex (Elab.Exception.error errMsg) => if errToSorry then exceptionToSorry stx errMsg expectedType? else throw ex - | Exception.ex Elab.Exception.unsupportedSyntax => elabTermUsing elabFns + | Exception.ex Elab.Exception.unsupportedSyntax => do set s; elabTermUsing elabFns | Exception.postpone => if catchExPostpone then do /- If `elab` threw `Exception.postpone`, we reset any state modifications. diff --git a/stage0/src/Init/Lean/Parser/Syntax.lean b/stage0/src/Init/Lean/Parser/Syntax.lean index 2b696bd064..171e79e03a 100644 --- a/stage0/src/Init/Lean/Parser/Syntax.lean +++ b/stage0/src/Init/Lean/Parser/Syntax.lean @@ -19,7 +19,7 @@ categoryParser `syntax rbp namespace Syntax def maxPrec := parser! nonReservedSymbol "max" true def precedenceLit : Parser := numLit <|> maxPrec -def «precedence» := parser! " : " >> precedenceLit +def «precedence» := parser! ":" >> precedenceLit @[builtinSyntaxParser] def paren := parser! "(" >> many1 syntaxParser >> ")" @[builtinSyntaxParser] def cat := parser! ident >> optional (try «precedence») @[builtinSyntaxParser] def atom := parser! strLit >> optional (try «precedence») diff --git a/stage0/src/Init/Lean/Parser/Tactic.lean b/stage0/src/Init/Lean/Parser/Tactic.lean index 73e309d5ff..43fb5f349e 100644 --- a/stage0/src/Init/Lean/Parser/Tactic.lean +++ b/stage0/src/Init/Lean/Parser/Tactic.lean @@ -19,24 +19,22 @@ registerBuiltinDynamicParserAttribute `tacticParser `tactic @[inline] def tacticParser {k : ParserKind} (rbp : Nat := 0) : Parser k := categoryParser `tactic rbp -def tacticSeq {k : ParserKind} : Parser k := -sepBy1 tacticParser "; " true - namespace Tactic +def seq := parser! sepBy1 tacticParser "; " true @[builtinTacticParser] def «intro» := parser! nonReservedSymbol "intro " >> optional ident @[builtinTacticParser] def «intros» := parser! nonReservedSymbol "intros " >> many ident @[builtinTacticParser] def «assumption» := parser! nonReservedSymbol "assumption" @[builtinTacticParser] def «apply» := parser! nonReservedSymbol "apply " >> termParser -@[builtinTacticParser] def nestedTacticBlock := parser! "begin " >> tacticSeq >> "end" -@[builtinTacticParser] def nestedTacticBlockCurly := parser! "{" >> tacticSeq >> "}" +@[builtinTacticParser] def nestedTacticBlock := parser! "begin " >> seq >> "end" +@[builtinTacticParser] def nestedTacticBlockCurly := parser! "{" >> seq >> "}" @[builtinTacticParser] def orelse := tparser! pushLeading >> " <|> " >> tacticParser 1 end Tactic namespace Term -@[builtinTermParser] def tacticBlock := parser! symbol "begin " appPrec >> tacticSeq >> "end" +@[builtinTermParser] def tacticBlock := parser! symbol "begin " appPrec >> Tactic.seq >> "end" end Term diff --git a/stage0/stdlib/CMakeLists.txt b/stage0/stdlib/CMakeLists.txt index a461c4ccba..46402f20f2 100644 --- a/stage0/stdlib/CMakeLists.txt +++ b/stage0/stdlib/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT Init/./Coe.c Init/./Control.c Init/./Control/Alternative.c Init/./Control/Applicative.c Init/./Control/Conditional.c Init/./Control/EState.c Init/./Control/Except.c Init/./Control/Functor.c Init/./Control/Id.c Init/./Control/Lift.c Init/./Control/Monad.c Init/./Control/MonadFail.c Init/./Control/Option.c Init/./Control/Reader.c Init/./Control/State.c Init/./Core.c Init/./Data.c Init/./Data/Array.c Init/./Data/Array/Basic.c Init/./Data/Array/BinSearch.c Init/./Data/Array/QSort.c Init/./Data/AssocList.c Init/./Data/Basic.c Init/./Data/BinomialHeap.c Init/./Data/BinomialHeap/Basic.c Init/./Data/ByteArray.c Init/./Data/ByteArray/Basic.c Init/./Data/Char.c Init/./Data/Char/Basic.c Init/./Data/DList.c Init/./Data/Fin.c Init/./Data/Fin/Basic.c Init/./Data/HashMap.c Init/./Data/HashMap/Basic.c Init/./Data/HashSet.c Init/./Data/Hashable.c Init/./Data/Int.c Init/./Data/Int/Basic.c Init/./Data/List.c Init/./Data/List/Basic.c Init/./Data/List/BasicAux.c Init/./Data/List/Control.c Init/./Data/List/Instances.c Init/./Data/Nat.c Init/./Data/Nat/Basic.c Init/./Data/Nat/Bitwise.c Init/./Data/Nat/Control.c Init/./Data/Nat/Div.c Init/./Data/Option.c Init/./Data/Option/Basic.c Init/./Data/Option/BasicAux.c Init/./Data/Option/Instances.c Init/./Data/PersistentArray.c Init/./Data/PersistentArray/Basic.c Init/./Data/PersistentHashMap.c Init/./Data/PersistentHashMap/Basic.c Init/./Data/PersistentHashSet.c Init/./Data/Queue.c Init/./Data/Queue/Basic.c Init/./Data/RBMap.c Init/./Data/RBMap/Basic.c Init/./Data/RBMap/BasicAux.c Init/./Data/RBTree.c Init/./Data/RBTree/Basic.c Init/./Data/Random.c Init/./Data/Repr.c Init/./Data/Stack.c Init/./Data/Stack/Basic.c Init/./Data/String.c Init/./Data/String/Basic.c Init/./Data/ToString.c Init/./Data/UInt.c Init/./Default.c Init/./Fix.c Init/./Lean.c Init/./Lean/Attributes.c Init/./Lean/AuxRecursor.c Init/./Lean/Class.c Init/./Lean/Compiler.c Init/./Lean/Compiler/ClosedTermCache.c Init/./Lean/Compiler/ConstFolding.c Init/./Lean/Compiler/ExportAttr.c Init/./Lean/Compiler/ExternAttr.c Init/./Lean/Compiler/IR.c Init/./Lean/Compiler/IR/Basic.c Init/./Lean/Compiler/IR/Borrow.c Init/./Lean/Compiler/IR/Boxing.c Init/./Lean/Compiler/IR/Checker.c Init/./Lean/Compiler/IR/CompilerM.c Init/./Lean/Compiler/IR/CtorLayout.c Init/./Lean/Compiler/IR/ElimDeadBranches.c Init/./Lean/Compiler/IR/ElimDeadVars.c Init/./Lean/Compiler/IR/EmitC.c Init/./Lean/Compiler/IR/EmitUtil.c Init/./Lean/Compiler/IR/ExpandResetReuse.c Init/./Lean/Compiler/IR/Format.c Init/./Lean/Compiler/IR/FreeVars.c Init/./Lean/Compiler/IR/LiveVars.c Init/./Lean/Compiler/IR/NormIds.c Init/./Lean/Compiler/IR/PushProj.c Init/./Lean/Compiler/IR/RC.c Init/./Lean/Compiler/IR/ResetReuse.c Init/./Lean/Compiler/IR/SimpCase.c Init/./Lean/Compiler/IR/UnboxResult.c Init/./Lean/Compiler/ImplementedByAttr.c Init/./Lean/Compiler/InitAttr.c Init/./Lean/Compiler/InlineAttrs.c Init/./Lean/Compiler/NameMangling.c Init/./Lean/Compiler/NeverExtractAttr.c Init/./Lean/Compiler/Specialize.c Init/./Lean/Compiler/Util.c Init/./Lean/Data/Format.c Init/./Lean/Data/KVMap.c Init/./Lean/Data/LBool.c Init/./Lean/Data/LOption.c Init/./Lean/Data/Name.c Init/./Lean/Data/NameGenerator.c Init/./Lean/Data/Occurrences.c Init/./Lean/Data/Options.c Init/./Lean/Data/Position.c Init/./Lean/Data/SMap.c Init/./Lean/Data/Trie.c Init/./Lean/Declaration.c Init/./Lean/Elab.c Init/./Lean/Elab/Alias.c Init/./Lean/Elab/BuiltinNotation.c Init/./Lean/Elab/Command.c Init/./Lean/Elab/DeclModifiers.c Init/./Lean/Elab/Declaration.c Init/./Lean/Elab/Definition.c Init/./Lean/Elab/ElabStrategyAttrs.c Init/./Lean/Elab/Exception.c Init/./Lean/Elab/Frontend.c Init/./Lean/Elab/Import.c Init/./Lean/Elab/Level.c Init/./Lean/Elab/Log.c Init/./Lean/Elab/Quotation.c Init/./Lean/Elab/ResolveName.c Init/./Lean/Elab/Syntax.c Init/./Lean/Elab/Tactic.c Init/./Lean/Elab/Term.c Init/./Lean/Elab/TermApp.c Init/./Lean/Elab/TermBinders.c Init/./Lean/Elab/Util.c Init/./Lean/Environment.c Init/./Lean/EqnCompiler.c Init/./Lean/EqnCompiler/MatchPattern.c Init/./Lean/Eval.c Init/./Lean/Expr.c Init/./Lean/HeadIndex.c Init/./Lean/Hygiene.c Init/./Lean/Level.c Init/./Lean/Linter.c Init/./Lean/LocalContext.c Init/./Lean/Message.c Init/./Lean/Meta.c Init/./Lean/Meta/AbstractMVars.c Init/./Lean/Meta/AppBuilder.c Init/./Lean/Meta/Basic.c Init/./Lean/Meta/Check.c Init/./Lean/Meta/DiscrTree.c Init/./Lean/Meta/DiscrTreeTypes.c Init/./Lean/Meta/Exception.c Init/./Lean/Meta/ExprDefEq.c Init/./Lean/Meta/FunInfo.c Init/./Lean/Meta/InferType.c Init/./Lean/Meta/Instances.c Init/./Lean/Meta/KAbstract.c Init/./Lean/Meta/LevelDefEq.c Init/./Lean/Meta/Message.c Init/./Lean/Meta/Offset.c Init/./Lean/Meta/Reduce.c Init/./Lean/Meta/SynthInstance.c Init/./Lean/Meta/Tactic.c Init/./Lean/Meta/Tactic/Assumption.c Init/./Lean/Meta/Tactic/Intro.c Init/./Lean/Meta/Tactic/Util.c Init/./Lean/Meta/WHNF.c Init/./Lean/MetavarContext.c Init/./Lean/Modifiers.c Init/./Lean/Parser.c Init/./Lean/Parser/Command.c Init/./Lean/Parser/Identifier.c Init/./Lean/Parser/Level.c Init/./Lean/Parser/Module.c Init/./Lean/Parser/Parser.c Init/./Lean/Parser/Syntax.c Init/./Lean/Parser/Tactic.c Init/./Lean/Parser/Term.c Init/./Lean/Parser/Transform.c Init/./Lean/ProjFns.c Init/./Lean/ReducibilityAttrs.c Init/./Lean/Runtime.c Init/./Lean/Scopes.c Init/./Lean/Structure.c Init/./Lean/Syntax.c Init/./Lean/ToExpr.c Init/./Lean/Util/CollectFVars.c Init/./Lean/Util/CollectLevelParams.c Init/./Lean/Util/MonadCache.c Init/./Lean/Util/Path.c Init/./Lean/Util/Profile.c Init/./Lean/Util/RecDepth.c Init/./Lean/Util/Sorry.c Init/./Lean/Util/Trace.c Init/./Lean/Util/WHNF.c Init/./LeanInit.c Init/./System.c Init/./System/FilePath.c Init/./System/IO.c Init/./System/IOError.c Init/./System/Platform.c Init/./Util.c Init/./WF.c) +add_library (stage0 OBJECT Init/./Coe.c Init/./Control.c Init/./Control/Alternative.c Init/./Control/Applicative.c Init/./Control/Conditional.c Init/./Control/EState.c Init/./Control/Except.c Init/./Control/Functor.c Init/./Control/Id.c Init/./Control/Lift.c Init/./Control/Monad.c Init/./Control/MonadFail.c Init/./Control/Option.c Init/./Control/Reader.c Init/./Control/State.c Init/./Core.c Init/./Data.c Init/./Data/Array.c Init/./Data/Array/Basic.c Init/./Data/Array/BinSearch.c Init/./Data/Array/QSort.c Init/./Data/AssocList.c Init/./Data/Basic.c Init/./Data/BinomialHeap.c Init/./Data/BinomialHeap/Basic.c Init/./Data/ByteArray.c Init/./Data/ByteArray/Basic.c Init/./Data/Char.c Init/./Data/Char/Basic.c Init/./Data/DList.c Init/./Data/Fin.c Init/./Data/Fin/Basic.c Init/./Data/HashMap.c Init/./Data/HashMap/Basic.c Init/./Data/HashSet.c Init/./Data/Hashable.c Init/./Data/Int.c Init/./Data/Int/Basic.c Init/./Data/List.c Init/./Data/List/Basic.c Init/./Data/List/BasicAux.c Init/./Data/List/Control.c Init/./Data/List/Instances.c Init/./Data/Nat.c Init/./Data/Nat/Basic.c Init/./Data/Nat/Bitwise.c Init/./Data/Nat/Control.c Init/./Data/Nat/Div.c Init/./Data/Option.c Init/./Data/Option/Basic.c Init/./Data/Option/BasicAux.c Init/./Data/Option/Instances.c Init/./Data/PersistentArray.c Init/./Data/PersistentArray/Basic.c Init/./Data/PersistentHashMap.c Init/./Data/PersistentHashMap/Basic.c Init/./Data/PersistentHashSet.c Init/./Data/Queue.c Init/./Data/Queue/Basic.c Init/./Data/RBMap.c Init/./Data/RBMap/Basic.c Init/./Data/RBMap/BasicAux.c Init/./Data/RBTree.c Init/./Data/RBTree/Basic.c Init/./Data/Random.c Init/./Data/Repr.c Init/./Data/Stack.c Init/./Data/Stack/Basic.c Init/./Data/String.c Init/./Data/String/Basic.c Init/./Data/ToString.c Init/./Data/UInt.c Init/./Default.c Init/./Fix.c Init/./Lean.c Init/./Lean/Attributes.c Init/./Lean/AuxRecursor.c Init/./Lean/Class.c Init/./Lean/Compiler.c Init/./Lean/Compiler/ClosedTermCache.c Init/./Lean/Compiler/ConstFolding.c Init/./Lean/Compiler/ExportAttr.c Init/./Lean/Compiler/ExternAttr.c Init/./Lean/Compiler/IR.c Init/./Lean/Compiler/IR/Basic.c Init/./Lean/Compiler/IR/Borrow.c Init/./Lean/Compiler/IR/Boxing.c Init/./Lean/Compiler/IR/Checker.c Init/./Lean/Compiler/IR/CompilerM.c Init/./Lean/Compiler/IR/CtorLayout.c Init/./Lean/Compiler/IR/ElimDeadBranches.c Init/./Lean/Compiler/IR/ElimDeadVars.c Init/./Lean/Compiler/IR/EmitC.c Init/./Lean/Compiler/IR/EmitUtil.c Init/./Lean/Compiler/IR/ExpandResetReuse.c Init/./Lean/Compiler/IR/Format.c Init/./Lean/Compiler/IR/FreeVars.c Init/./Lean/Compiler/IR/LiveVars.c Init/./Lean/Compiler/IR/NormIds.c Init/./Lean/Compiler/IR/PushProj.c Init/./Lean/Compiler/IR/RC.c Init/./Lean/Compiler/IR/ResetReuse.c Init/./Lean/Compiler/IR/SimpCase.c Init/./Lean/Compiler/IR/UnboxResult.c Init/./Lean/Compiler/ImplementedByAttr.c Init/./Lean/Compiler/InitAttr.c Init/./Lean/Compiler/InlineAttrs.c Init/./Lean/Compiler/NameMangling.c Init/./Lean/Compiler/NeverExtractAttr.c Init/./Lean/Compiler/Specialize.c Init/./Lean/Compiler/Util.c Init/./Lean/Data/Format.c Init/./Lean/Data/KVMap.c Init/./Lean/Data/LBool.c Init/./Lean/Data/LOption.c Init/./Lean/Data/Name.c Init/./Lean/Data/NameGenerator.c Init/./Lean/Data/Occurrences.c Init/./Lean/Data/Options.c Init/./Lean/Data/Position.c Init/./Lean/Data/SMap.c Init/./Lean/Data/Trie.c Init/./Lean/Declaration.c Init/./Lean/Elab.c Init/./Lean/Elab/Alias.c Init/./Lean/Elab/BuiltinNotation.c Init/./Lean/Elab/Command.c Init/./Lean/Elab/DeclModifiers.c Init/./Lean/Elab/Declaration.c Init/./Lean/Elab/Definition.c Init/./Lean/Elab/ElabStrategyAttrs.c Init/./Lean/Elab/Exception.c Init/./Lean/Elab/Frontend.c Init/./Lean/Elab/Import.c Init/./Lean/Elab/Level.c Init/./Lean/Elab/Log.c Init/./Lean/Elab/Quotation.c Init/./Lean/Elab/ResolveName.c Init/./Lean/Elab/Syntax.c Init/./Lean/Elab/Tactic.c Init/./Lean/Elab/Tactic/Basic.c Init/./Lean/Elab/Term.c Init/./Lean/Elab/TermApp.c Init/./Lean/Elab/TermBinders.c Init/./Lean/Elab/Util.c Init/./Lean/Environment.c Init/./Lean/EqnCompiler.c Init/./Lean/EqnCompiler/MatchPattern.c Init/./Lean/Eval.c Init/./Lean/Expr.c Init/./Lean/HeadIndex.c Init/./Lean/Hygiene.c Init/./Lean/Level.c Init/./Lean/Linter.c Init/./Lean/LocalContext.c Init/./Lean/Message.c Init/./Lean/Meta.c Init/./Lean/Meta/AbstractMVars.c Init/./Lean/Meta/AppBuilder.c Init/./Lean/Meta/Basic.c Init/./Lean/Meta/Check.c Init/./Lean/Meta/DiscrTree.c Init/./Lean/Meta/DiscrTreeTypes.c Init/./Lean/Meta/Exception.c Init/./Lean/Meta/ExprDefEq.c Init/./Lean/Meta/FunInfo.c Init/./Lean/Meta/InferType.c Init/./Lean/Meta/Instances.c Init/./Lean/Meta/KAbstract.c Init/./Lean/Meta/LevelDefEq.c Init/./Lean/Meta/Message.c Init/./Lean/Meta/Offset.c Init/./Lean/Meta/Reduce.c Init/./Lean/Meta/SynthInstance.c Init/./Lean/Meta/Tactic.c Init/./Lean/Meta/Tactic/Assumption.c Init/./Lean/Meta/Tactic/Intro.c Init/./Lean/Meta/Tactic/Util.c Init/./Lean/Meta/WHNF.c Init/./Lean/MetavarContext.c Init/./Lean/Modifiers.c Init/./Lean/Parser.c Init/./Lean/Parser/Command.c Init/./Lean/Parser/Identifier.c Init/./Lean/Parser/Level.c Init/./Lean/Parser/Module.c Init/./Lean/Parser/Parser.c Init/./Lean/Parser/Syntax.c Init/./Lean/Parser/Tactic.c Init/./Lean/Parser/Term.c Init/./Lean/Parser/Transform.c Init/./Lean/ProjFns.c Init/./Lean/ReducibilityAttrs.c Init/./Lean/Runtime.c Init/./Lean/Scopes.c Init/./Lean/Structure.c Init/./Lean/Syntax.c Init/./Lean/ToExpr.c Init/./Lean/Util/CollectFVars.c Init/./Lean/Util/CollectLevelParams.c Init/./Lean/Util/MonadCache.c Init/./Lean/Util/Path.c Init/./Lean/Util/Profile.c Init/./Lean/Util/RecDepth.c Init/./Lean/Util/Sorry.c Init/./Lean/Util/Trace.c Init/./Lean/Util/WHNF.c Init/./LeanInit.c Init/./System.c Init/./System/FilePath.c Init/./System/IO.c Init/./System/IOError.c Init/./System/Platform.c Init/./Util.c Init/./WF.c) diff --git a/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c b/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c index 94e53abaa3..7912ab9507 100644 --- a/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c +++ b/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c @@ -259,6 +259,7 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__2; lean_object* l_Lean_Elab_Term_elabDiv___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabDollar___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabLE___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; lean_object* l_Lean_Elab_Term_elabOrElse(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabCons(lean_object*); lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); @@ -444,8 +445,8 @@ lean_object* l_Lean_Syntax_getArgs(lean_object*); lean_object* l_Lean_Elab_Term_elabLE___closed__4; lean_object* l_Lean_Elab_Term_elabOrM___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabIff___closed__1; +extern lean_object* l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__3; -extern lean_object* l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; extern lean_object* l_Lean_Parser_Term_paren___elambda__1___closed__1; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDollarProj___closed__3; lean_object* l_Lean_Elab_Term_elabSubtype___closed__1; @@ -510,7 +511,6 @@ lean_object* l_Lean_Elab_Term_elabAnoymousCtor(lean_object*, lean_object*, lean_ lean_object* l_Lean_Elab_Term_elabAndThen___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv(lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__3; -extern lean_object* l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__3; lean_object* l_Lean_Elab_Term_elabMapConst___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -1391,9 +1391,9 @@ x_117 = lean_array_push(x_116, x_98); x_118 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_118, 0, x_69); lean_ctor_set(x_118, 1, x_117); -x_119 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_119 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_120 = lean_array_push(x_119, x_118); -x_121 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_121 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_122 = lean_array_push(x_120, x_121); x_123 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_124 = lean_alloc_ctor(1, 2, 0); @@ -1477,9 +1477,9 @@ x_167 = lean_array_push(x_166, x_148); x_168 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_168, 0, x_69); lean_ctor_set(x_168, 1, x_167); -x_169 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_169 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_170 = lean_array_push(x_169, x_168); -x_171 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_171 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_172 = lean_array_push(x_170, x_171); x_173 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_174 = lean_alloc_ctor(1, 2, 0); @@ -1829,9 +1829,9 @@ x_36 = l_Lean_nullKind___closed__2; x_37 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_37, 0, x_36); lean_ctor_set(x_37, 1, x_35); -x_38 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_38 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_39 = lean_array_push(x_38, x_37); -x_40 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_40 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_41 = lean_array_push(x_39, x_40); x_42 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_43 = lean_alloc_ctor(1, 2, 0); @@ -1902,9 +1902,9 @@ x_80 = l_Lean_nullKind___closed__2; x_81 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_81, 0, x_80); lean_ctor_set(x_81, 1, x_79); -x_82 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_82 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_83 = lean_array_push(x_82, x_81); -x_84 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_84 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_85 = lean_array_push(x_83, x_84); x_86 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_87 = lean_alloc_ctor(1, 2, 0); @@ -2062,9 +2062,9 @@ x_149 = lean_array_push(x_142, x_148); x_150 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_150, 0, x_108); lean_ctor_set(x_150, 1, x_149); -x_151 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_151 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_152 = lean_array_push(x_151, x_150); -x_153 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_153 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_154 = lean_array_push(x_152, x_153); x_155 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_156 = lean_alloc_ctor(1, 2, 0); @@ -2143,9 +2143,9 @@ x_197 = lean_array_push(x_190, x_196); x_198 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_198, 0, x_108); lean_ctor_set(x_198, 1, x_197); -x_199 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_199 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_200 = lean_array_push(x_199, x_198); -x_201 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_201 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_202 = lean_array_push(x_200, x_201); x_203 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_204 = lean_alloc_ctor(1, 2, 0); @@ -2845,9 +2845,9 @@ x_29 = lean_array_push(x_21, x_28); x_30 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_30, 0, x_27); lean_ctor_set(x_30, 1, x_29); -x_31 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_31 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_32 = lean_array_push(x_31, x_30); -x_33 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_33 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_34 = lean_array_push(x_32, x_33); x_35 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_36 = lean_alloc_ctor(1, 2, 0); @@ -2910,9 +2910,9 @@ x_67 = lean_array_push(x_59, x_66); x_68 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_68, 0, x_65); lean_ctor_set(x_68, 1, x_67); -x_69 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_69 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_70 = lean_array_push(x_69, x_68); -x_71 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_71 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_72 = lean_array_push(x_70, x_71); x_73 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_74 = lean_alloc_ctor(1, 2, 0); @@ -3176,9 +3176,9 @@ x_37 = lean_array_push(x_29, x_36); x_38 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_38, 0, x_35); lean_ctor_set(x_38, 1, x_37); -x_39 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_39 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_40 = lean_array_push(x_39, x_38); -x_41 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_41 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_42 = lean_array_push(x_40, x_41); x_43 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_44 = lean_alloc_ctor(1, 2, 0); @@ -3240,9 +3240,9 @@ x_75 = lean_array_push(x_67, x_74); x_76 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_76, 0, x_73); lean_ctor_set(x_76, 1, x_75); -x_77 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_77 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_78 = lean_array_push(x_77, x_76); -x_79 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_79 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_80 = lean_array_push(x_78, x_79); x_81 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_82 = lean_alloc_ctor(1, 2, 0); @@ -3347,9 +3347,9 @@ x_129 = lean_array_push(x_121, x_128); x_130 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_130, 0, x_127); lean_ctor_set(x_130, 1, x_129); -x_131 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_131 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_132 = lean_array_push(x_131, x_130); -x_133 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_133 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_134 = lean_array_push(x_132, x_133); x_135 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_136 = lean_alloc_ctor(1, 2, 0); @@ -3411,9 +3411,9 @@ x_167 = lean_array_push(x_159, x_166); x_168 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_168, 0, x_165); lean_ctor_set(x_168, 1, x_167); -x_169 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_169 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_170 = lean_array_push(x_169, x_168); -x_171 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_171 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_172 = lean_array_push(x_170, x_171); x_173 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_174 = lean_alloc_ctor(1, 2, 0); @@ -3559,9 +3559,9 @@ x_236 = lean_array_push(x_229, x_235); x_237 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_237, 0, x_204); lean_ctor_set(x_237, 1, x_236); -x_238 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_238 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_239 = lean_array_push(x_238, x_237); -x_240 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_240 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_241 = lean_array_push(x_239, x_240); x_242 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_243 = lean_alloc_ctor(1, 2, 0); @@ -3622,9 +3622,9 @@ x_273 = lean_array_push(x_266, x_272); x_274 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_274, 0, x_204); lean_ctor_set(x_274, 1, x_273); -x_275 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_275 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_276 = lean_array_push(x_275, x_274); -x_277 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_277 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_278 = lean_array_push(x_276, x_277); x_279 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_280 = lean_alloc_ctor(1, 2, 0); @@ -3729,9 +3729,9 @@ x_327 = lean_array_push(x_320, x_326); x_328 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_328, 0, x_204); lean_ctor_set(x_328, 1, x_327); -x_329 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_329 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_330 = lean_array_push(x_329, x_328); -x_331 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_331 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_332 = lean_array_push(x_330, x_331); x_333 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_334 = lean_alloc_ctor(1, 2, 0); @@ -3792,9 +3792,9 @@ x_364 = lean_array_push(x_357, x_363); x_365 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_365, 0, x_204); lean_ctor_set(x_365, 1, x_364); -x_366 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_366 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_367 = lean_array_push(x_366, x_365); -x_368 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_368 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_369 = lean_array_push(x_367, x_368); x_370 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_371 = lean_alloc_ctor(1, 2, 0); @@ -4643,9 +4643,9 @@ x_86 = l_Lean_nullKind___closed__2; x_87 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_87, 0, x_86); lean_ctor_set(x_87, 1, x_85); -x_88 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_88 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_89 = lean_array_push(x_88, x_87); -x_90 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_90 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_91 = lean_array_push(x_89, x_90); x_92 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_93 = lean_alloc_ctor(1, 2, 0); @@ -4732,9 +4732,9 @@ x_134 = l_Lean_nullKind___closed__2; x_135 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_135, 0, x_134); lean_ctor_set(x_135, 1, x_133); -x_136 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_136 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_137 = lean_array_push(x_136, x_135); -x_138 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_138 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_139 = lean_array_push(x_137, x_138); x_140 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_141 = lean_alloc_ctor(1, 2, 0); @@ -4827,9 +4827,9 @@ x_185 = l_Lean_nullKind___closed__2; x_186 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_186, 0, x_185); lean_ctor_set(x_186, 1, x_184); -x_187 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_187 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_188 = lean_array_push(x_187, x_186); -x_189 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_189 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_190 = lean_array_push(x_188, x_189); x_191 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_192 = lean_alloc_ctor(1, 2, 0); @@ -4931,9 +4931,9 @@ x_242 = l_Lean_nullKind___closed__2; x_243 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_243, 0, x_242); lean_ctor_set(x_243, 1, x_241); -x_244 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_244 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_245 = lean_array_push(x_244, x_243); -x_246 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_246 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_247 = lean_array_push(x_245, x_246); x_248 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_249 = lean_alloc_ctor(1, 2, 0); diff --git a/stage0/stdlib/Init/Lean/Elab/Command.c b/stage0/stdlib/Init/Lean/Elab/Command.c index e6e30effe9..1782b19742 100644 --- a/stage0/stdlib/Init/Lean/Elab/Command.c +++ b/stage0/stdlib/Init/Lean/Elab/Command.c @@ -16,7 +16,7 @@ extern "C" { lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__1(lean_object*, lean_object*, lean_object*); uint8_t l_AssocList_contains___main___at_Lean_Elab_Command_addBuiltinCommandElab___spec__3(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabVariable(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Name_toString___closed__1; lean_object* l_Array_forMAux___main___at_Lean_Elab_Command_elabCommand___main___spec__7(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_registerBuiltinCommandElabAttr___closed__4; @@ -118,7 +118,7 @@ lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Command_elabOpenSi lean_object* l_Lean_Elab_Command_declareBuiltinCommandElab___closed__5; lean_object* l___private_Init_Lean_Elab_Command_11__addScopes___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_State_inhabited___closed__4; -lean_object* l___private_Init_Lean_Elab_Command_5__elabCommandUsing(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Elab_Command_5__elabCommandUsing(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_modifyScope___at_Lean_Elab_Command_elabVariables___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabCheck(lean_object*, lean_object*, lean_object*); @@ -4352,101 +4352,140 @@ lean_dec(x_1); return x_5; } } -lean_object* l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -if (lean_obj_tag(x_2) == 0) +if (lean_obj_tag(x_3) == 0) { -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -lean_inc(x_1); -x_5 = l_Lean_Syntax_prettyPrint(x_1); -x_6 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_6, 0, x_5); -x_7 = l_Lean_MessageData_ofList___closed__3; -x_8 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_6); -x_9 = lean_unsigned_to_nat(2u); -x_10 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_8); -x_11 = l___private_Init_Lean_Elab_Term_9__elabTermUsing___main___closed__3; -x_12 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_12, 0, x_11); -lean_ctor_set(x_12, 1, x_10); -x_13 = l_Lean_Elab_Command_throwError___rarg(x_1, x_12, x_3, x_4); +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_dec(x_1); -return x_13; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_2, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_2, 1); -lean_inc(x_15); +lean_inc(x_2); +x_6 = l_Lean_Syntax_prettyPrint(x_2); +x_7 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_7, 0, x_6); +x_8 = l_Lean_MessageData_ofList___closed__3; +x_9 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_7); +x_10 = lean_unsigned_to_nat(2u); +x_11 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +x_12 = l___private_Init_Lean_Elab_Term_9__elabTermUsing___main___closed__3; +x_13 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_11); +x_14 = l_Lean_Elab_Command_throwError___rarg(x_2, x_13, x_4, x_5); lean_dec(x_2); -lean_inc(x_3); -lean_inc(x_1); -x_16 = lean_apply_3(x_14, x_1, x_3, x_4); -if (lean_obj_tag(x_16) == 0) -{ -lean_dec(x_15); -lean_dec(x_3); -lean_dec(x_1); -return x_16; +return x_14; } else { -lean_object* x_17; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_3, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_3, 1); +lean_inc(x_16); +lean_dec(x_3); +lean_inc(x_4); +lean_inc(x_2); +x_17 = lean_apply_3(x_15, x_2, x_4, x_5); if (lean_obj_tag(x_17) == 0) { -uint8_t x_18; -lean_dec(x_15); -lean_dec(x_3); +lean_dec(x_16); +lean_dec(x_4); +lean_dec(x_2); lean_dec(x_1); -x_18 = !lean_is_exclusive(x_16); -if (x_18 == 0) -{ -lean_object* x_19; -x_19 = lean_ctor_get(x_16, 0); -lean_dec(x_19); -return x_16; +return x_17; } else { -lean_object* x_20; lean_object* x_21; -x_20 = lean_ctor_get(x_16, 1); -lean_inc(x_20); +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +uint8_t x_19; lean_dec(x_16); -x_21 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_21, 0, x_17); -lean_ctor_set(x_21, 1, x_20); -return x_21; +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_19 = !lean_is_exclusive(x_17); +if (x_19 == 0) +{ +lean_object* x_20; +x_20 = lean_ctor_get(x_17, 0); +lean_dec(x_20); +return x_17; +} +else +{ +lean_object* x_21; lean_object* x_22; +x_21 = lean_ctor_get(x_17, 1); +lean_inc(x_21); +lean_dec(x_17); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_18); +lean_ctor_set(x_22, 1, x_21); +return x_22; } } else { -lean_object* x_22; -x_22 = lean_ctor_get(x_16, 1); -lean_inc(x_22); -lean_dec(x_16); -x_2 = x_15; -x_4 = x_22; +lean_object* x_23; lean_object* x_24; +x_23 = lean_ctor_get(x_17, 1); +lean_inc(x_23); +lean_dec(x_17); +lean_inc(x_4); +lean_inc(x_1); +x_24 = l___private_Init_Lean_Elab_Command_3__setState(x_1, x_4, x_23); +if (lean_obj_tag(x_24) == 0) +{ +lean_object* x_25; +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +lean_dec(x_24); +x_3 = x_16; +x_5 = x_25; goto _start; } +else +{ +uint8_t x_27; +lean_dec(x_16); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_27 = !lean_is_exclusive(x_24); +if (x_27 == 0) +{ +return x_24; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_24, 0); +x_29 = lean_ctor_get(x_24, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_24); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; } } } } -lean_object* l___private_Init_Lean_Elab_Command_5__elabCommandUsing(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +} +} +} +lean_object* l___private_Init_Lean_Elab_Command_5__elabCommandUsing(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_5; -x_5 = l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(x_1, x_2, x_3, x_4); -return x_5; +lean_object* x_6; +x_6 = l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(x_1, x_2, x_3, x_4, x_5); +return x_6; } } lean_object* l_Lean_Elab_Command_withMacroExpansion___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { @@ -4939,7 +4978,7 @@ lean_ctor_set(x_27, 3, x_31); x_32 = l___private_Init_Lean_Elab_Command_3__setState(x_27, x_2, x_28); if (lean_obj_tag(x_32) == 0) { -lean_object* x_33; lean_object* x_34; +lean_object* x_33; lean_object* x_34; lean_object* x_35; x_33 = lean_ctor_get(x_32, 1); lean_inc(x_33); lean_dec(x_32); @@ -4960,41 +4999,85 @@ lean_ctor_set(x_34, 5, x_12); lean_ctor_set(x_34, 6, x_30); if (lean_obj_tag(x_1) == 1) { -lean_object* x_35; lean_object* x_85; +lean_object* x_77; lean_object* x_78; lean_object* x_79; uint8_t x_80; +x_77 = lean_ctor_get(x_1, 0); +lean_inc(x_77); +x_78 = lean_ctor_get(x_1, 1); +lean_inc(x_78); +x_79 = l_Lean_nullKind; +x_80 = lean_name_eq(x_77, x_79); +lean_dec(x_77); +if (x_80 == 0) +{ +lean_object* x_81; +lean_dec(x_78); lean_inc(x_34); -x_85 = l_Lean_Elab_Command_getOptions(x_34, x_33); -if (lean_obj_tag(x_85) == 0) +x_81 = l_Lean_Elab_Command_getOptions(x_34, x_33); +if (lean_obj_tag(x_81) == 0) { -lean_object* x_86; lean_object* x_87; lean_object* x_88; uint8_t x_89; -x_86 = lean_ctor_get(x_85, 0); -lean_inc(x_86); -x_87 = lean_ctor_get(x_85, 1); -lean_inc(x_87); -lean_dec(x_85); -x_88 = l_Lean_Elab_Command_elabCommand___main___closed__7; -x_89 = l_Lean_checkTraceOption(x_86, x_88); -lean_dec(x_86); -if (x_89 == 0) +lean_object* x_82; lean_object* x_83; lean_object* x_84; uint8_t x_85; +x_82 = lean_ctor_get(x_81, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_81, 1); +lean_inc(x_83); +lean_dec(x_81); +x_84 = l_Lean_Elab_Command_elabCommand___main___closed__7; +x_85 = l_Lean_checkTraceOption(x_82, x_84); +lean_dec(x_82); +if (x_85 == 0) { -x_35 = x_87; -goto block_84; +x_35 = x_83; +goto block_76; } else { -lean_object* x_90; lean_object* x_91; +lean_object* x_86; lean_object* x_87; lean_inc(x_1); -x_90 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_90, 0, x_1); +x_86 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_86, 0, x_1); lean_inc(x_34); -x_91 = l_Lean_Elab_Command_logTrace(x_88, x_1, x_90, x_34, x_87); -if (lean_obj_tag(x_91) == 0) +x_87 = l_Lean_Elab_Command_logTrace(x_84, x_1, x_86, x_34, x_83); +if (lean_obj_tag(x_87) == 0) { -lean_object* x_92; -x_92 = lean_ctor_get(x_91, 1); -lean_inc(x_92); -lean_dec(x_91); -x_35 = x_92; -goto block_84; +lean_object* x_88; +x_88 = lean_ctor_get(x_87, 1); +lean_inc(x_88); +lean_dec(x_87); +x_35 = x_88; +goto block_76; +} +else +{ +uint8_t x_89; +lean_dec(x_34); +lean_dec(x_30); +lean_dec(x_25); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_89 = !lean_is_exclusive(x_87); +if (x_89 == 0) +{ +return x_87; +} +else +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_90 = lean_ctor_get(x_87, 0); +x_91 = lean_ctor_get(x_87, 1); +lean_inc(x_91); +lean_inc(x_90); +lean_dec(x_87); +x_92 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_92, 0, x_90); +lean_ctor_set(x_92, 1, x_91); +return x_92; +} +} +} } else { @@ -5008,19 +5091,19 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_93 = !lean_is_exclusive(x_91); +x_93 = !lean_is_exclusive(x_81); if (x_93 == 0) { -return x_91; +return x_81; } else { lean_object* x_94; lean_object* x_95; lean_object* x_96; -x_94 = lean_ctor_get(x_91, 0); -x_95 = lean_ctor_get(x_91, 1); +x_94 = lean_ctor_get(x_81, 0); +x_95 = lean_ctor_get(x_81, 1); lean_inc(x_95); lean_inc(x_94); -lean_dec(x_91); +lean_dec(x_81); x_96 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_96, 0, x_94); lean_ctor_set(x_96, 1, x_95); @@ -5028,11 +5111,9 @@ return x_96; } } } -} else { -uint8_t x_97; -lean_dec(x_34); +lean_object* x_97; lean_object* x_98; lean_dec(x_30); lean_dec(x_25); lean_dec(x_12); @@ -5041,26 +5122,28 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_97 = !lean_is_exclusive(x_85); -if (x_97 == 0) -{ -return x_85; +x_97 = lean_unsigned_to_nat(0u); +x_98 = l_Array_forMAux___main___at_Lean_Elab_Command_elabCommand___main___spec__7(x_78, x_97, x_34, x_33); +lean_dec(x_78); +return x_98; +} } else { -lean_object* x_98; lean_object* x_99; lean_object* x_100; -x_98 = lean_ctor_get(x_85, 0); -x_99 = lean_ctor_get(x_85, 1); -lean_inc(x_99); -lean_inc(x_98); -lean_dec(x_85); -x_100 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_100, 0, x_98); -lean_ctor_set(x_100, 1, x_99); +lean_object* x_99; lean_object* x_100; +lean_dec(x_30); +lean_dec(x_25); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_99 = l_Lean_Elab_Command_elabCommand___main___closed__3; +x_100 = l_Lean_Elab_Command_throwError___rarg(x_1, x_99, x_34, x_33); +lean_dec(x_1); return x_100; } -} -block_84: +block_76: { lean_object* x_36; lean_inc(x_34); @@ -5078,7 +5161,6 @@ x_40 = lean_ctor_get(x_39, 1); lean_inc(x_40); x_41 = lean_ctor_get(x_37, 0); lean_inc(x_41); -lean_dec(x_37); x_42 = l_Lean_PersistentEnvExtension_getState___rarg(x_40, x_41); lean_dec(x_41); lean_dec(x_40); @@ -5091,6 +5173,7 @@ x_45 = l_Lean_SMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__1( if (lean_obj_tag(x_45) == 0) { lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +lean_dec(x_37); x_46 = l_Lean_Elab_Command_getCurrMacroScope(x_34, x_38); x_47 = lean_ctor_get(x_46, 0); lean_inc(x_47); @@ -5140,62 +5223,32 @@ return x_61; } else { -lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_dec(x_44); lean_dec(x_34); x_62 = lean_ctor_get(x_52, 0); lean_inc(x_62); lean_dec(x_52); -lean_inc(x_62); -x_63 = l_Lean_Syntax_getKind(x_62); -x_64 = l_Lean_nullKind; -x_65 = lean_name_eq(x_63, x_64); -lean_dec(x_63); -if (x_65 == 0) -{ -lean_object* x_66; lean_object* x_67; -x_66 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_66, 0, x_1); -lean_ctor_set(x_66, 1, x_12); -x_67 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_67, 0, x_7); -lean_ctor_set(x_67, 1, x_8); -lean_ctor_set(x_67, 2, x_9); -lean_ctor_set(x_67, 3, x_25); -lean_ctor_set(x_67, 4, x_11); -lean_ctor_set(x_67, 5, x_66); -lean_ctor_set(x_67, 6, x_30); +x_63 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_63, 0, x_1); +lean_ctor_set(x_63, 1, x_12); +x_64 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_64, 0, x_7); +lean_ctor_set(x_64, 1, x_8); +lean_ctor_set(x_64, 2, x_9); +lean_ctor_set(x_64, 3, x_25); +lean_ctor_set(x_64, 4, x_11); +lean_ctor_set(x_64, 5, x_63); +lean_ctor_set(x_64, 6, x_30); x_1 = x_62; -x_2 = x_67; +x_2 = x_64; x_3 = x_51; goto _start; } -else -{ -lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_69 = l_Lean_Syntax_getArgs(x_62); -lean_dec(x_62); -x_70 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_70, 0, x_1); -lean_ctor_set(x_70, 1, x_12); -x_71 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_71, 0, x_7); -lean_ctor_set(x_71, 1, x_8); -lean_ctor_set(x_71, 2, x_9); -lean_ctor_set(x_71, 3, x_25); -lean_ctor_set(x_71, 4, x_11); -lean_ctor_set(x_71, 5, x_70); -lean_ctor_set(x_71, 6, x_30); -x_72 = lean_unsigned_to_nat(0u); -x_73 = l_Array_forMAux___main___at_Lean_Elab_Command_elabCommand___main___spec__7(x_69, x_72, x_71, x_51); -lean_dec(x_69); -return x_73; -} -} } else { -uint8_t x_74; +uint8_t x_66; lean_dec(x_47); lean_dec(x_44); lean_dec(x_34); @@ -5207,29 +5260,29 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_74 = !lean_is_exclusive(x_49); -if (x_74 == 0) +x_66 = !lean_is_exclusive(x_49); +if (x_66 == 0) { return x_49; } else { -lean_object* x_75; lean_object* x_76; lean_object* x_77; -x_75 = lean_ctor_get(x_49, 0); -x_76 = lean_ctor_get(x_49, 1); -lean_inc(x_76); -lean_inc(x_75); +lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_67 = lean_ctor_get(x_49, 0); +x_68 = lean_ctor_get(x_49, 1); +lean_inc(x_68); +lean_inc(x_67); lean_dec(x_49); -x_77 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_77, 0, x_75); -lean_ctor_set(x_77, 1, x_76); -return x_77; +x_69 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_69, 0, x_67); +lean_ctor_set(x_69, 1, x_68); +return x_69; } } } else { -lean_object* x_78; lean_object* x_79; +lean_object* x_70; lean_object* x_71; lean_dec(x_44); lean_dec(x_30); lean_dec(x_25); @@ -5238,16 +5291,16 @@ lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); -x_78 = lean_ctor_get(x_45, 0); -lean_inc(x_78); +x_70 = lean_ctor_get(x_45, 0); +lean_inc(x_70); lean_dec(x_45); -x_79 = l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(x_1, x_78, x_34, x_38); -return x_79; +x_71 = l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(x_37, x_1, x_70, x_34, x_38); +return x_71; } } else { -uint8_t x_80; +uint8_t x_72; lean_dec(x_34); lean_dec(x_30); lean_dec(x_25); @@ -5257,46 +5310,30 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_80 = !lean_is_exclusive(x_36); -if (x_80 == 0) +x_72 = !lean_is_exclusive(x_36); +if (x_72 == 0) { return x_36; } else { -lean_object* x_81; lean_object* x_82; lean_object* x_83; -x_81 = lean_ctor_get(x_36, 0); -x_82 = lean_ctor_get(x_36, 1); -lean_inc(x_82); -lean_inc(x_81); +lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_73 = lean_ctor_get(x_36, 0); +x_74 = lean_ctor_get(x_36, 1); +lean_inc(x_74); +lean_inc(x_73); lean_dec(x_36); -x_83 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_83, 0, x_81); -lean_ctor_set(x_83, 1, x_82); -return x_83; +x_75 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_75, 0, x_73); +lean_ctor_set(x_75, 1, x_74); +return x_75; } } } } else { -lean_object* x_101; lean_object* x_102; -lean_dec(x_30); -lean_dec(x_25); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_101 = l_Lean_Elab_Command_elabCommand___main___closed__3; -x_102 = l_Lean_Elab_Command_throwError___rarg(x_1, x_101, x_34, x_33); -lean_dec(x_1); -return x_102; -} -} -else -{ -uint8_t x_103; +uint8_t x_101; lean_dec(x_30); lean_dec(x_25); lean_dec(x_12); @@ -5305,112 +5342,123 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_103 = !lean_is_exclusive(x_32); -if (x_103 == 0) +x_101 = !lean_is_exclusive(x_32); +if (x_101 == 0) { return x_32; } else { -lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_104 = lean_ctor_get(x_32, 0); -x_105 = lean_ctor_get(x_32, 1); -lean_inc(x_105); -lean_inc(x_104); +lean_object* x_102; lean_object* x_103; lean_object* x_104; +x_102 = lean_ctor_get(x_32, 0); +x_103 = lean_ctor_get(x_32, 1); +lean_inc(x_103); +lean_inc(x_102); lean_dec(x_32); -x_106 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_106, 0, x_104); -lean_ctor_set(x_106, 1, x_105); -return x_106; +x_104 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_104, 0, x_102); +lean_ctor_set(x_104, 1, x_103); +return x_104; } } } else { -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; -x_107 = lean_ctor_get(x_27, 0); -x_108 = lean_ctor_get(x_27, 1); -x_109 = lean_ctor_get(x_27, 2); -x_110 = lean_ctor_get(x_27, 3); -x_111 = lean_ctor_get(x_27, 4); -lean_inc(x_111); -lean_inc(x_110); +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; +x_105 = lean_ctor_get(x_27, 0); +x_106 = lean_ctor_get(x_27, 1); +x_107 = lean_ctor_get(x_27, 2); +x_108 = lean_ctor_get(x_27, 3); +x_109 = lean_ctor_get(x_27, 4); lean_inc(x_109); lean_inc(x_108); lean_inc(x_107); +lean_inc(x_106); +lean_inc(x_105); lean_dec(x_27); -x_112 = lean_nat_add(x_110, x_24); -x_113 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_113, 0, x_107); -lean_ctor_set(x_113, 1, x_108); -lean_ctor_set(x_113, 2, x_109); -lean_ctor_set(x_113, 3, x_112); -lean_ctor_set(x_113, 4, x_111); -x_114 = l___private_Init_Lean_Elab_Command_3__setState(x_113, x_2, x_28); -if (lean_obj_tag(x_114) == 0) +x_110 = lean_nat_add(x_108, x_24); +x_111 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_111, 0, x_105); +lean_ctor_set(x_111, 1, x_106); +lean_ctor_set(x_111, 2, x_107); +lean_ctor_set(x_111, 3, x_110); +lean_ctor_set(x_111, 4, x_109); +x_112 = l___private_Init_Lean_Elab_Command_3__setState(x_111, x_2, x_28); +if (lean_obj_tag(x_112) == 0) { -lean_object* x_115; lean_object* x_116; -x_115 = lean_ctor_get(x_114, 1); -lean_inc(x_115); -lean_dec(x_114); -lean_inc(x_110); +lean_object* x_113; lean_object* x_114; lean_object* x_115; +x_113 = lean_ctor_get(x_112, 1); +lean_inc(x_113); +lean_dec(x_112); +lean_inc(x_108); lean_inc(x_12); lean_inc(x_11); lean_inc(x_25); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_116 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_116, 0, x_7); -lean_ctor_set(x_116, 1, x_8); -lean_ctor_set(x_116, 2, x_9); -lean_ctor_set(x_116, 3, x_25); -lean_ctor_set(x_116, 4, x_11); -lean_ctor_set(x_116, 5, x_12); -lean_ctor_set(x_116, 6, x_110); +x_114 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_114, 0, x_7); +lean_ctor_set(x_114, 1, x_8); +lean_ctor_set(x_114, 2, x_9); +lean_ctor_set(x_114, 3, x_25); +lean_ctor_set(x_114, 4, x_11); +lean_ctor_set(x_114, 5, x_12); +lean_ctor_set(x_114, 6, x_108); if (lean_obj_tag(x_1) == 1) { -lean_object* x_117; lean_object* x_167; -lean_inc(x_116); -x_167 = l_Lean_Elab_Command_getOptions(x_116, x_115); +lean_object* x_157; lean_object* x_158; lean_object* x_159; uint8_t x_160; +x_157 = lean_ctor_get(x_1, 0); +lean_inc(x_157); +x_158 = lean_ctor_get(x_1, 1); +lean_inc(x_158); +x_159 = l_Lean_nullKind; +x_160 = lean_name_eq(x_157, x_159); +lean_dec(x_157); +if (x_160 == 0) +{ +lean_object* x_161; +lean_dec(x_158); +lean_inc(x_114); +x_161 = l_Lean_Elab_Command_getOptions(x_114, x_113); +if (lean_obj_tag(x_161) == 0) +{ +lean_object* x_162; lean_object* x_163; lean_object* x_164; uint8_t x_165; +x_162 = lean_ctor_get(x_161, 0); +lean_inc(x_162); +x_163 = lean_ctor_get(x_161, 1); +lean_inc(x_163); +lean_dec(x_161); +x_164 = l_Lean_Elab_Command_elabCommand___main___closed__7; +x_165 = l_Lean_checkTraceOption(x_162, x_164); +lean_dec(x_162); +if (x_165 == 0) +{ +x_115 = x_163; +goto block_156; +} +else +{ +lean_object* x_166; lean_object* x_167; +lean_inc(x_1); +x_166 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_166, 0, x_1); +lean_inc(x_114); +x_167 = l_Lean_Elab_Command_logTrace(x_164, x_1, x_166, x_114, x_163); if (lean_obj_tag(x_167) == 0) { -lean_object* x_168; lean_object* x_169; lean_object* x_170; uint8_t x_171; -x_168 = lean_ctor_get(x_167, 0); +lean_object* x_168; +x_168 = lean_ctor_get(x_167, 1); lean_inc(x_168); -x_169 = lean_ctor_get(x_167, 1); -lean_inc(x_169); lean_dec(x_167); -x_170 = l_Lean_Elab_Command_elabCommand___main___closed__7; -x_171 = l_Lean_checkTraceOption(x_168, x_170); -lean_dec(x_168); -if (x_171 == 0) -{ -x_117 = x_169; -goto block_166; +x_115 = x_168; +goto block_156; } else { -lean_object* x_172; lean_object* x_173; -lean_inc(x_1); -x_172 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_172, 0, x_1); -lean_inc(x_116); -x_173 = l_Lean_Elab_Command_logTrace(x_170, x_1, x_172, x_116, x_169); -if (lean_obj_tag(x_173) == 0) -{ -lean_object* x_174; -x_174 = lean_ctor_get(x_173, 1); -lean_inc(x_174); -lean_dec(x_173); -x_117 = x_174; -goto block_166; -} -else -{ -lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; -lean_dec(x_116); -lean_dec(x_110); +lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; +lean_dec(x_114); +lean_dec(x_108); lean_dec(x_25); lean_dec(x_12); lean_dec(x_11); @@ -5418,202 +5466,291 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_175 = lean_ctor_get(x_173, 0); -lean_inc(x_175); -x_176 = lean_ctor_get(x_173, 1); -lean_inc(x_176); -if (lean_is_exclusive(x_173)) { - lean_ctor_release(x_173, 0); - lean_ctor_release(x_173, 1); - x_177 = x_173; -} else { - lean_dec_ref(x_173); - x_177 = lean_box(0); -} -if (lean_is_scalar(x_177)) { - x_178 = lean_alloc_ctor(1, 2, 0); -} else { - x_178 = x_177; -} -lean_ctor_set(x_178, 0, x_175); -lean_ctor_set(x_178, 1, x_176); -return x_178; -} -} -} -else -{ -lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; -lean_dec(x_116); -lean_dec(x_110); -lean_dec(x_25); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_1); -x_179 = lean_ctor_get(x_167, 0); -lean_inc(x_179); -x_180 = lean_ctor_get(x_167, 1); -lean_inc(x_180); +x_169 = lean_ctor_get(x_167, 0); +lean_inc(x_169); +x_170 = lean_ctor_get(x_167, 1); +lean_inc(x_170); if (lean_is_exclusive(x_167)) { lean_ctor_release(x_167, 0); lean_ctor_release(x_167, 1); - x_181 = x_167; + x_171 = x_167; } else { lean_dec_ref(x_167); - x_181 = lean_box(0); + x_171 = lean_box(0); } -if (lean_is_scalar(x_181)) { - x_182 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_171)) { + x_172 = lean_alloc_ctor(1, 2, 0); } else { - x_182 = x_181; + x_172 = x_171; } -lean_ctor_set(x_182, 0, x_179); -lean_ctor_set(x_182, 1, x_180); -return x_182; +lean_ctor_set(x_172, 0, x_169); +lean_ctor_set(x_172, 1, x_170); +return x_172; } -block_166: +} +} +else { -lean_object* x_118; -lean_inc(x_116); -x_118 = l___private_Init_Lean_Elab_Command_2__getState(x_116, x_117); -if (lean_obj_tag(x_118) == 0) -{ -lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_119 = lean_ctor_get(x_118, 0); -lean_inc(x_119); -x_120 = lean_ctor_get(x_118, 1); -lean_inc(x_120); -lean_dec(x_118); -x_121 = l_Lean_Elab_Command_commandElabAttribute; -x_122 = lean_ctor_get(x_121, 1); -lean_inc(x_122); -x_123 = lean_ctor_get(x_119, 0); -lean_inc(x_123); -lean_dec(x_119); -x_124 = l_Lean_PersistentEnvExtension_getState___rarg(x_122, x_123); -lean_dec(x_123); -lean_dec(x_122); -x_125 = lean_ctor_get(x_124, 1); -lean_inc(x_125); -lean_dec(x_124); -lean_inc(x_1); -x_126 = l_Lean_Syntax_getKind(x_1); -x_127 = l_Lean_SMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__1(x_125, x_126); -if (lean_obj_tag(x_127) == 0) -{ -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; -x_128 = l_Lean_Elab_Command_getCurrMacroScope(x_116, x_120); -x_129 = lean_ctor_get(x_128, 0); -lean_inc(x_129); -x_130 = lean_ctor_get(x_128, 1); -lean_inc(x_130); -lean_dec(x_128); -lean_inc(x_116); -x_131 = l_Lean_Elab_Command_getEnv(x_116, x_130); -if (lean_obj_tag(x_131) == 0) -{ -lean_object* x_132; lean_object* x_133; lean_object* x_134; -x_132 = lean_ctor_get(x_131, 0); -lean_inc(x_132); -x_133 = lean_ctor_get(x_131, 1); -lean_inc(x_133); -lean_dec(x_131); -lean_inc(x_1); -x_134 = l_Lean_Elab_expandMacro(x_132, x_1, x_129); -lean_dec(x_132); -if (lean_obj_tag(x_134) == 0) -{ -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_dec(x_110); +lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; +lean_dec(x_114); +lean_dec(x_108); lean_dec(x_25); lean_dec(x_12); lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); -x_135 = l_Lean_Name_toString___closed__1; -x_136 = l_Lean_Name_toStringWithSep___main(x_135, x_126); -x_137 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_137, 0, x_136); -x_138 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_138, 0, x_137); -x_139 = l_Lean_Elab_Command_elabCommand___main___closed__6; -x_140 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_140, 0, x_139); -lean_ctor_set(x_140, 1, x_138); -x_141 = l_Lean_Elab_Term_elabTermAux___main___closed__6; -x_142 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_142, 0, x_140); -lean_ctor_set(x_142, 1, x_141); -x_143 = l_Lean_Elab_Command_throwError___rarg(x_1, x_142, x_116, x_133); lean_dec(x_1); -return x_143; +x_173 = lean_ctor_get(x_161, 0); +lean_inc(x_173); +x_174 = lean_ctor_get(x_161, 1); +lean_inc(x_174); +if (lean_is_exclusive(x_161)) { + lean_ctor_release(x_161, 0); + lean_ctor_release(x_161, 1); + x_175 = x_161; +} else { + lean_dec_ref(x_161); + x_175 = lean_box(0); +} +if (lean_is_scalar(x_175)) { + x_176 = lean_alloc_ctor(1, 2, 0); +} else { + x_176 = x_175; +} +lean_ctor_set(x_176, 0, x_173); +lean_ctor_set(x_176, 1, x_174); +return x_176; +} } else { -lean_object* x_144; lean_object* x_145; lean_object* x_146; uint8_t x_147; -lean_dec(x_126); -lean_dec(x_116); -x_144 = lean_ctor_get(x_134, 0); -lean_inc(x_144); -lean_dec(x_134); -lean_inc(x_144); -x_145 = l_Lean_Syntax_getKind(x_144); -x_146 = l_Lean_nullKind; -x_147 = lean_name_eq(x_145, x_146); -lean_dec(x_145); -if (x_147 == 0) +lean_object* x_177; lean_object* x_178; +lean_dec(x_108); +lean_dec(x_25); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_177 = lean_unsigned_to_nat(0u); +x_178 = l_Array_forMAux___main___at_Lean_Elab_Command_elabCommand___main___spec__7(x_158, x_177, x_114, x_113); +lean_dec(x_158); +return x_178; +} +} +else { -lean_object* x_148; lean_object* x_149; -x_148 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_148, 0, x_1); -lean_ctor_set(x_148, 1, x_12); -x_149 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_149, 0, x_7); -lean_ctor_set(x_149, 1, x_8); -lean_ctor_set(x_149, 2, x_9); -lean_ctor_set(x_149, 3, x_25); -lean_ctor_set(x_149, 4, x_11); -lean_ctor_set(x_149, 5, x_148); -lean_ctor_set(x_149, 6, x_110); -x_1 = x_144; -x_2 = x_149; -x_3 = x_133; +lean_object* x_179; lean_object* x_180; +lean_dec(x_108); +lean_dec(x_25); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_179 = l_Lean_Elab_Command_elabCommand___main___closed__3; +x_180 = l_Lean_Elab_Command_throwError___rarg(x_1, x_179, x_114, x_113); +lean_dec(x_1); +return x_180; +} +block_156: +{ +lean_object* x_116; +lean_inc(x_114); +x_116 = l___private_Init_Lean_Elab_Command_2__getState(x_114, x_115); +if (lean_obj_tag(x_116) == 0) +{ +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; lean_object* x_125; +x_117 = lean_ctor_get(x_116, 0); +lean_inc(x_117); +x_118 = lean_ctor_get(x_116, 1); +lean_inc(x_118); +lean_dec(x_116); +x_119 = l_Lean_Elab_Command_commandElabAttribute; +x_120 = lean_ctor_get(x_119, 1); +lean_inc(x_120); +x_121 = lean_ctor_get(x_117, 0); +lean_inc(x_121); +x_122 = l_Lean_PersistentEnvExtension_getState___rarg(x_120, x_121); +lean_dec(x_121); +lean_dec(x_120); +x_123 = lean_ctor_get(x_122, 1); +lean_inc(x_123); +lean_dec(x_122); +lean_inc(x_1); +x_124 = l_Lean_Syntax_getKind(x_1); +x_125 = l_Lean_SMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__1(x_123, x_124); +if (lean_obj_tag(x_125) == 0) +{ +lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; +lean_dec(x_117); +x_126 = l_Lean_Elab_Command_getCurrMacroScope(x_114, x_118); +x_127 = lean_ctor_get(x_126, 0); +lean_inc(x_127); +x_128 = lean_ctor_get(x_126, 1); +lean_inc(x_128); +lean_dec(x_126); +lean_inc(x_114); +x_129 = l_Lean_Elab_Command_getEnv(x_114, x_128); +if (lean_obj_tag(x_129) == 0) +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_130 = lean_ctor_get(x_129, 0); +lean_inc(x_130); +x_131 = lean_ctor_get(x_129, 1); +lean_inc(x_131); +lean_dec(x_129); +lean_inc(x_1); +x_132 = l_Lean_Elab_expandMacro(x_130, x_1, x_127); +lean_dec(x_130); +if (lean_obj_tag(x_132) == 0) +{ +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_dec(x_108); +lean_dec(x_25); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_133 = l_Lean_Name_toString___closed__1; +x_134 = l_Lean_Name_toStringWithSep___main(x_133, x_124); +x_135 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_135, 0, x_134); +x_136 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_136, 0, x_135); +x_137 = l_Lean_Elab_Command_elabCommand___main___closed__6; +x_138 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_138, 0, x_137); +lean_ctor_set(x_138, 1, x_136); +x_139 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_140 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_140, 0, x_138); +lean_ctor_set(x_140, 1, x_139); +x_141 = l_Lean_Elab_Command_throwError___rarg(x_1, x_140, x_114, x_131); +lean_dec(x_1); +return x_141; +} +else +{ +lean_object* x_142; lean_object* x_143; lean_object* x_144; +lean_dec(x_124); +lean_dec(x_114); +x_142 = lean_ctor_get(x_132, 0); +lean_inc(x_142); +lean_dec(x_132); +x_143 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_143, 0, x_1); +lean_ctor_set(x_143, 1, x_12); +x_144 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_144, 0, x_7); +lean_ctor_set(x_144, 1, x_8); +lean_ctor_set(x_144, 2, x_9); +lean_ctor_set(x_144, 3, x_25); +lean_ctor_set(x_144, 4, x_11); +lean_ctor_set(x_144, 5, x_143); +lean_ctor_set(x_144, 6, x_108); +x_1 = x_142; +x_2 = x_144; +x_3 = x_131; goto _start; } +} else { -lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; -x_151 = l_Lean_Syntax_getArgs(x_144); -lean_dec(x_144); -x_152 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_152, 0, x_1); -lean_ctor_set(x_152, 1, x_12); -x_153 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_153, 0, x_7); -lean_ctor_set(x_153, 1, x_8); -lean_ctor_set(x_153, 2, x_9); -lean_ctor_set(x_153, 3, x_25); -lean_ctor_set(x_153, 4, x_11); -lean_ctor_set(x_153, 5, x_152); -lean_ctor_set(x_153, 6, x_110); -x_154 = lean_unsigned_to_nat(0u); -x_155 = l_Array_forMAux___main___at_Lean_Elab_Command_elabCommand___main___spec__7(x_151, x_154, x_153, x_133); -lean_dec(x_151); +lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; +lean_dec(x_127); +lean_dec(x_124); +lean_dec(x_114); +lean_dec(x_108); +lean_dec(x_25); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_146 = lean_ctor_get(x_129, 0); +lean_inc(x_146); +x_147 = lean_ctor_get(x_129, 1); +lean_inc(x_147); +if (lean_is_exclusive(x_129)) { + lean_ctor_release(x_129, 0); + lean_ctor_release(x_129, 1); + x_148 = x_129; +} else { + lean_dec_ref(x_129); + x_148 = lean_box(0); +} +if (lean_is_scalar(x_148)) { + x_149 = lean_alloc_ctor(1, 2, 0); +} else { + x_149 = x_148; +} +lean_ctor_set(x_149, 0, x_146); +lean_ctor_set(x_149, 1, x_147); +return x_149; +} +} +else +{ +lean_object* x_150; lean_object* x_151; +lean_dec(x_124); +lean_dec(x_108); +lean_dec(x_25); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_150 = lean_ctor_get(x_125, 0); +lean_inc(x_150); +lean_dec(x_125); +x_151 = l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(x_117, x_1, x_150, x_114, x_118); +return x_151; +} +} +else +{ +lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; +lean_dec(x_114); +lean_dec(x_108); +lean_dec(x_25); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_152 = lean_ctor_get(x_116, 0); +lean_inc(x_152); +x_153 = lean_ctor_get(x_116, 1); +lean_inc(x_153); +if (lean_is_exclusive(x_116)) { + lean_ctor_release(x_116, 0); + lean_ctor_release(x_116, 1); + x_154 = x_116; +} else { + lean_dec_ref(x_116); + x_154 = lean_box(0); +} +if (lean_is_scalar(x_154)) { + x_155 = lean_alloc_ctor(1, 2, 0); +} else { + x_155 = x_154; +} +lean_ctor_set(x_155, 0, x_152); +lean_ctor_set(x_155, 1, x_153); return x_155; } } } else { -lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; -lean_dec(x_129); -lean_dec(x_126); -lean_dec(x_116); -lean_dec(x_110); +lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; +lean_dec(x_108); lean_dec(x_25); lean_dec(x_12); lean_dec(x_11); @@ -5621,101 +5758,33 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_156 = lean_ctor_get(x_131, 0); -lean_inc(x_156); -x_157 = lean_ctor_get(x_131, 1); -lean_inc(x_157); -if (lean_is_exclusive(x_131)) { - lean_ctor_release(x_131, 0); - lean_ctor_release(x_131, 1); - x_158 = x_131; +x_181 = lean_ctor_get(x_112, 0); +lean_inc(x_181); +x_182 = lean_ctor_get(x_112, 1); +lean_inc(x_182); +if (lean_is_exclusive(x_112)) { + lean_ctor_release(x_112, 0); + lean_ctor_release(x_112, 1); + x_183 = x_112; } else { - lean_dec_ref(x_131); - x_158 = lean_box(0); + lean_dec_ref(x_112); + x_183 = lean_box(0); } -if (lean_is_scalar(x_158)) { - x_159 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_183)) { + x_184 = lean_alloc_ctor(1, 2, 0); } else { - x_159 = x_158; + x_184 = x_183; } -lean_ctor_set(x_159, 0, x_156); -lean_ctor_set(x_159, 1, x_157); -return x_159; -} -} -else -{ -lean_object* x_160; lean_object* x_161; -lean_dec(x_126); -lean_dec(x_110); -lean_dec(x_25); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_160 = lean_ctor_get(x_127, 0); -lean_inc(x_160); -lean_dec(x_127); -x_161 = l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(x_1, x_160, x_116, x_120); -return x_161; -} -} -else -{ -lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; -lean_dec(x_116); -lean_dec(x_110); -lean_dec(x_25); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_1); -x_162 = lean_ctor_get(x_118, 0); -lean_inc(x_162); -x_163 = lean_ctor_get(x_118, 1); -lean_inc(x_163); -if (lean_is_exclusive(x_118)) { - lean_ctor_release(x_118, 0); - lean_ctor_release(x_118, 1); - x_164 = x_118; -} else { - lean_dec_ref(x_118); - x_164 = lean_box(0); -} -if (lean_is_scalar(x_164)) { - x_165 = lean_alloc_ctor(1, 2, 0); -} else { - x_165 = x_164; -} -lean_ctor_set(x_165, 0, x_162); -lean_ctor_set(x_165, 1, x_163); -return x_165; -} -} -} -else -{ -lean_object* x_183; lean_object* x_184; -lean_dec(x_110); -lean_dec(x_25); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_183 = l_Lean_Elab_Command_elabCommand___main___closed__3; -x_184 = l_Lean_Elab_Command_throwError___rarg(x_1, x_183, x_116, x_115); -lean_dec(x_1); +lean_ctor_set(x_184, 0, x_181); +lean_ctor_set(x_184, 1, x_182); return x_184; } } +} else { -lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; -lean_dec(x_110); +uint8_t x_185; +lean_dec(x_2); lean_dec(x_25); lean_dec(x_12); lean_dec(x_11); @@ -5723,240 +5792,474 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_185 = lean_ctor_get(x_114, 0); -lean_inc(x_185); -x_186 = lean_ctor_get(x_114, 1); +x_185 = !lean_is_exclusive(x_26); +if (x_185 == 0) +{ +return x_26; +} +else +{ +lean_object* x_186; lean_object* x_187; lean_object* x_188; +x_186 = lean_ctor_get(x_26, 0); +x_187 = lean_ctor_get(x_26, 1); +lean_inc(x_187); lean_inc(x_186); -if (lean_is_exclusive(x_114)) { - lean_ctor_release(x_114, 0); - lean_ctor_release(x_114, 1); - x_187 = x_114; -} else { - lean_dec_ref(x_114); - x_187 = lean_box(0); -} -if (lean_is_scalar(x_187)) { - x_188 = lean_alloc_ctor(1, 2, 0); -} else { - x_188 = x_187; -} -lean_ctor_set(x_188, 0, x_185); -lean_ctor_set(x_188, 1, x_186); +lean_dec(x_26); +x_188 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_188, 0, x_186); +lean_ctor_set(x_188, 1, x_187); return x_188; } } } else { -uint8_t x_189; +lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_dec(x_2); -lean_dec(x_25); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_1); -x_189 = !lean_is_exclusive(x_26); -if (x_189 == 0) -{ -return x_26; -} -else -{ -lean_object* x_190; lean_object* x_191; lean_object* x_192; -x_190 = lean_ctor_get(x_26, 0); -x_191 = lean_ctor_get(x_26, 1); -lean_inc(x_191); -lean_inc(x_190); -lean_dec(x_26); -x_192 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_192, 0, x_190); -lean_ctor_set(x_192, 1, x_191); -return x_192; -} -} -} -else -{ -lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; -lean_dec(x_2); -x_193 = lean_unsigned_to_nat(1u); -x_194 = lean_nat_add(x_10, x_193); +x_189 = lean_unsigned_to_nat(1u); +x_190 = lean_nat_add(x_10, x_189); lean_dec(x_10); lean_inc(x_12); lean_inc(x_11); -lean_inc(x_194); +lean_inc(x_190); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_195 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_195, 0, x_7); -lean_ctor_set(x_195, 1, x_8); -lean_ctor_set(x_195, 2, x_9); -lean_ctor_set(x_195, 3, x_194); -lean_ctor_set(x_195, 4, x_11); -lean_ctor_set(x_195, 5, x_12); -lean_ctor_set(x_195, 6, x_13); +x_191 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_191, 0, x_7); +lean_ctor_set(x_191, 1, x_8); +lean_ctor_set(x_191, 2, x_9); +lean_ctor_set(x_191, 3, x_190); +lean_ctor_set(x_191, 4, x_11); +lean_ctor_set(x_191, 5, x_12); +lean_ctor_set(x_191, 6, x_13); +lean_inc(x_191); +x_192 = l___private_Init_Lean_Elab_Command_2__getState(x_191, x_6); +if (lean_obj_tag(x_192) == 0) +{ +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; +x_193 = lean_ctor_get(x_192, 0); +lean_inc(x_193); +x_194 = lean_ctor_get(x_192, 1); +lean_inc(x_194); +lean_dec(x_192); +x_195 = lean_ctor_get(x_193, 0); lean_inc(x_195); -x_196 = l___private_Init_Lean_Elab_Command_2__getState(x_195, x_6); -if (lean_obj_tag(x_196) == 0) -{ -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; -x_197 = lean_ctor_get(x_196, 0); +x_196 = lean_ctor_get(x_193, 1); +lean_inc(x_196); +x_197 = lean_ctor_get(x_193, 2); lean_inc(x_197); -x_198 = lean_ctor_get(x_196, 1); +x_198 = lean_ctor_get(x_193, 3); lean_inc(x_198); -lean_dec(x_196); -x_199 = lean_ctor_get(x_197, 0); +x_199 = lean_ctor_get(x_193, 4); lean_inc(x_199); -x_200 = lean_ctor_get(x_197, 1); -lean_inc(x_200); -x_201 = lean_ctor_get(x_197, 2); -lean_inc(x_201); -x_202 = lean_ctor_get(x_197, 3); -lean_inc(x_202); -x_203 = lean_ctor_get(x_197, 4); -lean_inc(x_203); -if (lean_is_exclusive(x_197)) { - lean_ctor_release(x_197, 0); - lean_ctor_release(x_197, 1); - lean_ctor_release(x_197, 2); - lean_ctor_release(x_197, 3); - lean_ctor_release(x_197, 4); - x_204 = x_197; +if (lean_is_exclusive(x_193)) { + lean_ctor_release(x_193, 0); + lean_ctor_release(x_193, 1); + lean_ctor_release(x_193, 2); + lean_ctor_release(x_193, 3); + lean_ctor_release(x_193, 4); + x_200 = x_193; } else { - lean_dec_ref(x_197); - x_204 = lean_box(0); + lean_dec_ref(x_193); + x_200 = lean_box(0); } -x_205 = lean_nat_add(x_202, x_193); -if (lean_is_scalar(x_204)) { - x_206 = lean_alloc_ctor(0, 5, 0); +x_201 = lean_nat_add(x_198, x_189); +if (lean_is_scalar(x_200)) { + x_202 = lean_alloc_ctor(0, 5, 0); } else { - x_206 = x_204; + x_202 = x_200; } -lean_ctor_set(x_206, 0, x_199); -lean_ctor_set(x_206, 1, x_200); -lean_ctor_set(x_206, 2, x_201); -lean_ctor_set(x_206, 3, x_205); -lean_ctor_set(x_206, 4, x_203); -x_207 = l___private_Init_Lean_Elab_Command_3__setState(x_206, x_195, x_198); -if (lean_obj_tag(x_207) == 0) +lean_ctor_set(x_202, 0, x_195); +lean_ctor_set(x_202, 1, x_196); +lean_ctor_set(x_202, 2, x_197); +lean_ctor_set(x_202, 3, x_201); +lean_ctor_set(x_202, 4, x_199); +x_203 = l___private_Init_Lean_Elab_Command_3__setState(x_202, x_191, x_194); +if (lean_obj_tag(x_203) == 0) { -lean_object* x_208; lean_object* x_209; -x_208 = lean_ctor_get(x_207, 1); -lean_inc(x_208); -lean_dec(x_207); -lean_inc(x_202); +lean_object* x_204; lean_object* x_205; lean_object* x_206; +x_204 = lean_ctor_get(x_203, 1); +lean_inc(x_204); +lean_dec(x_203); +lean_inc(x_198); lean_inc(x_12); lean_inc(x_11); -lean_inc(x_194); +lean_inc(x_190); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_209 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_209, 0, x_7); -lean_ctor_set(x_209, 1, x_8); -lean_ctor_set(x_209, 2, x_9); -lean_ctor_set(x_209, 3, x_194); -lean_ctor_set(x_209, 4, x_11); -lean_ctor_set(x_209, 5, x_12); -lean_ctor_set(x_209, 6, x_202); +x_205 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_205, 0, x_7); +lean_ctor_set(x_205, 1, x_8); +lean_ctor_set(x_205, 2, x_9); +lean_ctor_set(x_205, 3, x_190); +lean_ctor_set(x_205, 4, x_11); +lean_ctor_set(x_205, 5, x_12); +lean_ctor_set(x_205, 6, x_198); if (lean_obj_tag(x_1) == 1) { -lean_object* x_210; lean_object* x_260; -lean_inc(x_209); -x_260 = l_Lean_Elab_Command_getOptions(x_209, x_208); -if (lean_obj_tag(x_260) == 0) +lean_object* x_248; lean_object* x_249; lean_object* x_250; uint8_t x_251; +x_248 = lean_ctor_get(x_1, 0); +lean_inc(x_248); +x_249 = lean_ctor_get(x_1, 1); +lean_inc(x_249); +x_250 = l_Lean_nullKind; +x_251 = lean_name_eq(x_248, x_250); +lean_dec(x_248); +if (x_251 == 0) { -lean_object* x_261; lean_object* x_262; lean_object* x_263; uint8_t x_264; -x_261 = lean_ctor_get(x_260, 0); -lean_inc(x_261); -x_262 = lean_ctor_get(x_260, 1); -lean_inc(x_262); -lean_dec(x_260); -x_263 = l_Lean_Elab_Command_elabCommand___main___closed__7; -x_264 = l_Lean_checkTraceOption(x_261, x_263); -lean_dec(x_261); -if (x_264 == 0) +lean_object* x_252; +lean_dec(x_249); +lean_inc(x_205); +x_252 = l_Lean_Elab_Command_getOptions(x_205, x_204); +if (lean_obj_tag(x_252) == 0) { -x_210 = x_262; -goto block_259; +lean_object* x_253; lean_object* x_254; lean_object* x_255; uint8_t x_256; +x_253 = lean_ctor_get(x_252, 0); +lean_inc(x_253); +x_254 = lean_ctor_get(x_252, 1); +lean_inc(x_254); +lean_dec(x_252); +x_255 = l_Lean_Elab_Command_elabCommand___main___closed__7; +x_256 = l_Lean_checkTraceOption(x_253, x_255); +lean_dec(x_253); +if (x_256 == 0) +{ +x_206 = x_254; +goto block_247; } else { -lean_object* x_265; lean_object* x_266; +lean_object* x_257; lean_object* x_258; lean_inc(x_1); -x_265 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_265, 0, x_1); -lean_inc(x_209); -x_266 = l_Lean_Elab_Command_logTrace(x_263, x_1, x_265, x_209, x_262); -if (lean_obj_tag(x_266) == 0) +x_257 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_257, 0, x_1); +lean_inc(x_205); +x_258 = l_Lean_Elab_Command_logTrace(x_255, x_1, x_257, x_205, x_254); +if (lean_obj_tag(x_258) == 0) { -lean_object* x_267; -x_267 = lean_ctor_get(x_266, 1); -lean_inc(x_267); -lean_dec(x_266); -x_210 = x_267; -goto block_259; +lean_object* x_259; +x_259 = lean_ctor_get(x_258, 1); +lean_inc(x_259); +lean_dec(x_258); +x_206 = x_259; +goto block_247; } else { -lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; -lean_dec(x_209); -lean_dec(x_202); -lean_dec(x_194); +lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; +lean_dec(x_205); +lean_dec(x_198); +lean_dec(x_190); lean_dec(x_12); lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_268 = lean_ctor_get(x_266, 0); -lean_inc(x_268); -x_269 = lean_ctor_get(x_266, 1); -lean_inc(x_269); -if (lean_is_exclusive(x_266)) { - lean_ctor_release(x_266, 0); - lean_ctor_release(x_266, 1); - x_270 = x_266; +x_260 = lean_ctor_get(x_258, 0); +lean_inc(x_260); +x_261 = lean_ctor_get(x_258, 1); +lean_inc(x_261); +if (lean_is_exclusive(x_258)) { + lean_ctor_release(x_258, 0); + lean_ctor_release(x_258, 1); + x_262 = x_258; } else { - lean_dec_ref(x_266); - x_270 = lean_box(0); + lean_dec_ref(x_258); + x_262 = lean_box(0); } -if (lean_is_scalar(x_270)) { - x_271 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_262)) { + x_263 = lean_alloc_ctor(1, 2, 0); } else { - x_271 = x_270; + x_263 = x_262; } -lean_ctor_set(x_271, 0, x_268); -lean_ctor_set(x_271, 1, x_269); +lean_ctor_set(x_263, 0, x_260); +lean_ctor_set(x_263, 1, x_261); +return x_263; +} +} +} +else +{ +lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; +lean_dec(x_205); +lean_dec(x_198); +lean_dec(x_190); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_264 = lean_ctor_get(x_252, 0); +lean_inc(x_264); +x_265 = lean_ctor_get(x_252, 1); +lean_inc(x_265); +if (lean_is_exclusive(x_252)) { + lean_ctor_release(x_252, 0); + lean_ctor_release(x_252, 1); + x_266 = x_252; +} else { + lean_dec_ref(x_252); + x_266 = lean_box(0); +} +if (lean_is_scalar(x_266)) { + x_267 = lean_alloc_ctor(1, 2, 0); +} else { + x_267 = x_266; +} +lean_ctor_set(x_267, 0, x_264); +lean_ctor_set(x_267, 1, x_265); +return x_267; +} +} +else +{ +lean_object* x_268; lean_object* x_269; +lean_dec(x_198); +lean_dec(x_190); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_268 = lean_unsigned_to_nat(0u); +x_269 = l_Array_forMAux___main___at_Lean_Elab_Command_elabCommand___main___spec__7(x_249, x_268, x_205, x_204); +lean_dec(x_249); +return x_269; +} +} +else +{ +lean_object* x_270; lean_object* x_271; +lean_dec(x_198); +lean_dec(x_190); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_270 = l_Lean_Elab_Command_elabCommand___main___closed__3; +x_271 = l_Lean_Elab_Command_throwError___rarg(x_1, x_270, x_205, x_204); +lean_dec(x_1); return x_271; } +block_247: +{ +lean_object* x_207; +lean_inc(x_205); +x_207 = l___private_Init_Lean_Elab_Command_2__getState(x_205, x_206); +if (lean_obj_tag(x_207) == 0) +{ +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_208 = lean_ctor_get(x_207, 0); +lean_inc(x_208); +x_209 = lean_ctor_get(x_207, 1); +lean_inc(x_209); +lean_dec(x_207); +x_210 = l_Lean_Elab_Command_commandElabAttribute; +x_211 = lean_ctor_get(x_210, 1); +lean_inc(x_211); +x_212 = lean_ctor_get(x_208, 0); +lean_inc(x_212); +x_213 = l_Lean_PersistentEnvExtension_getState___rarg(x_211, x_212); +lean_dec(x_212); +lean_dec(x_211); +x_214 = lean_ctor_get(x_213, 1); +lean_inc(x_214); +lean_dec(x_213); +lean_inc(x_1); +x_215 = l_Lean_Syntax_getKind(x_1); +x_216 = l_Lean_SMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__1(x_214, x_215); +if (lean_obj_tag(x_216) == 0) +{ +lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; +lean_dec(x_208); +x_217 = l_Lean_Elab_Command_getCurrMacroScope(x_205, x_209); +x_218 = lean_ctor_get(x_217, 0); +lean_inc(x_218); +x_219 = lean_ctor_get(x_217, 1); +lean_inc(x_219); +lean_dec(x_217); +lean_inc(x_205); +x_220 = l_Lean_Elab_Command_getEnv(x_205, x_219); +if (lean_obj_tag(x_220) == 0) +{ +lean_object* x_221; lean_object* x_222; lean_object* x_223; +x_221 = lean_ctor_get(x_220, 0); +lean_inc(x_221); +x_222 = lean_ctor_get(x_220, 1); +lean_inc(x_222); +lean_dec(x_220); +lean_inc(x_1); +x_223 = l_Lean_Elab_expandMacro(x_221, x_1, x_218); +lean_dec(x_221); +if (lean_obj_tag(x_223) == 0) +{ +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_dec(x_198); +lean_dec(x_190); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_224 = l_Lean_Name_toString___closed__1; +x_225 = l_Lean_Name_toStringWithSep___main(x_224, x_215); +x_226 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_226, 0, x_225); +x_227 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_227, 0, x_226); +x_228 = l_Lean_Elab_Command_elabCommand___main___closed__6; +x_229 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_229, 0, x_228); +lean_ctor_set(x_229, 1, x_227); +x_230 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_231 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_231, 0, x_229); +lean_ctor_set(x_231, 1, x_230); +x_232 = l_Lean_Elab_Command_throwError___rarg(x_1, x_231, x_205, x_222); +lean_dec(x_1); +return x_232; +} +else +{ +lean_object* x_233; lean_object* x_234; lean_object* x_235; +lean_dec(x_215); +lean_dec(x_205); +x_233 = lean_ctor_get(x_223, 0); +lean_inc(x_233); +lean_dec(x_223); +x_234 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_234, 0, x_1); +lean_ctor_set(x_234, 1, x_12); +x_235 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_235, 0, x_7); +lean_ctor_set(x_235, 1, x_8); +lean_ctor_set(x_235, 2, x_9); +lean_ctor_set(x_235, 3, x_190); +lean_ctor_set(x_235, 4, x_11); +lean_ctor_set(x_235, 5, x_234); +lean_ctor_set(x_235, 6, x_198); +x_1 = x_233; +x_2 = x_235; +x_3 = x_222; +goto _start; +} +} +else +{ +lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; +lean_dec(x_218); +lean_dec(x_215); +lean_dec(x_205); +lean_dec(x_198); +lean_dec(x_190); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_237 = lean_ctor_get(x_220, 0); +lean_inc(x_237); +x_238 = lean_ctor_get(x_220, 1); +lean_inc(x_238); +if (lean_is_exclusive(x_220)) { + lean_ctor_release(x_220, 0); + lean_ctor_release(x_220, 1); + x_239 = x_220; +} else { + lean_dec_ref(x_220); + x_239 = lean_box(0); +} +if (lean_is_scalar(x_239)) { + x_240 = lean_alloc_ctor(1, 2, 0); +} else { + x_240 = x_239; +} +lean_ctor_set(x_240, 0, x_237); +lean_ctor_set(x_240, 1, x_238); +return x_240; +} +} +else +{ +lean_object* x_241; lean_object* x_242; +lean_dec(x_215); +lean_dec(x_198); +lean_dec(x_190); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_241 = lean_ctor_get(x_216, 0); +lean_inc(x_241); +lean_dec(x_216); +x_242 = l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(x_208, x_1, x_241, x_205, x_209); +return x_242; +} +} +else +{ +lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; +lean_dec(x_205); +lean_dec(x_198); +lean_dec(x_190); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_243 = lean_ctor_get(x_207, 0); +lean_inc(x_243); +x_244 = lean_ctor_get(x_207, 1); +lean_inc(x_244); +if (lean_is_exclusive(x_207)) { + lean_ctor_release(x_207, 0); + lean_ctor_release(x_207, 1); + x_245 = x_207; +} else { + lean_dec_ref(x_207); + x_245 = lean_box(0); +} +if (lean_is_scalar(x_245)) { + x_246 = lean_alloc_ctor(1, 2, 0); +} else { + x_246 = x_245; +} +lean_ctor_set(x_246, 0, x_243); +lean_ctor_set(x_246, 1, x_244); +return x_246; +} } } else { lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; -lean_dec(x_209); -lean_dec(x_202); -lean_dec(x_194); +lean_dec(x_198); +lean_dec(x_190); lean_dec(x_12); lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_272 = lean_ctor_get(x_260, 0); +x_272 = lean_ctor_get(x_203, 0); lean_inc(x_272); -x_273 = lean_ctor_get(x_260, 1); +x_273 = lean_ctor_get(x_203, 1); lean_inc(x_273); -if (lean_is_exclusive(x_260)) { - lean_ctor_release(x_260, 0); - lean_ctor_release(x_260, 1); - x_274 = x_260; +if (lean_is_exclusive(x_203)) { + lean_ctor_release(x_203, 0); + lean_ctor_release(x_203, 1); + x_274 = x_203; } else { - lean_dec_ref(x_260); + lean_dec_ref(x_203); x_274 = lean_box(0); } if (lean_is_scalar(x_274)) { @@ -5968,314 +6271,44 @@ lean_ctor_set(x_275, 0, x_272); lean_ctor_set(x_275, 1, x_273); return x_275; } -block_259: -{ -lean_object* x_211; -lean_inc(x_209); -x_211 = l___private_Init_Lean_Elab_Command_2__getState(x_209, x_210); -if (lean_obj_tag(x_211) == 0) -{ -lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; -x_212 = lean_ctor_get(x_211, 0); -lean_inc(x_212); -x_213 = lean_ctor_get(x_211, 1); -lean_inc(x_213); -lean_dec(x_211); -x_214 = l_Lean_Elab_Command_commandElabAttribute; -x_215 = lean_ctor_get(x_214, 1); -lean_inc(x_215); -x_216 = lean_ctor_get(x_212, 0); -lean_inc(x_216); -lean_dec(x_212); -x_217 = l_Lean_PersistentEnvExtension_getState___rarg(x_215, x_216); -lean_dec(x_216); -lean_dec(x_215); -x_218 = lean_ctor_get(x_217, 1); -lean_inc(x_218); -lean_dec(x_217); -lean_inc(x_1); -x_219 = l_Lean_Syntax_getKind(x_1); -x_220 = l_Lean_SMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__1(x_218, x_219); -if (lean_obj_tag(x_220) == 0) -{ -lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; -x_221 = l_Lean_Elab_Command_getCurrMacroScope(x_209, x_213); -x_222 = lean_ctor_get(x_221, 0); -lean_inc(x_222); -x_223 = lean_ctor_get(x_221, 1); -lean_inc(x_223); -lean_dec(x_221); -lean_inc(x_209); -x_224 = l_Lean_Elab_Command_getEnv(x_209, x_223); -if (lean_obj_tag(x_224) == 0) -{ -lean_object* x_225; lean_object* x_226; lean_object* x_227; -x_225 = lean_ctor_get(x_224, 0); -lean_inc(x_225); -x_226 = lean_ctor_get(x_224, 1); -lean_inc(x_226); -lean_dec(x_224); -lean_inc(x_1); -x_227 = l_Lean_Elab_expandMacro(x_225, x_1, x_222); -lean_dec(x_225); -if (lean_obj_tag(x_227) == 0) -{ -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_dec(x_202); -lean_dec(x_194); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_228 = l_Lean_Name_toString___closed__1; -x_229 = l_Lean_Name_toStringWithSep___main(x_228, x_219); -x_230 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_230, 0, x_229); -x_231 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_231, 0, x_230); -x_232 = l_Lean_Elab_Command_elabCommand___main___closed__6; -x_233 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_233, 0, x_232); -lean_ctor_set(x_233, 1, x_231); -x_234 = l_Lean_Elab_Term_elabTermAux___main___closed__6; -x_235 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_235, 0, x_233); -lean_ctor_set(x_235, 1, x_234); -x_236 = l_Lean_Elab_Command_throwError___rarg(x_1, x_235, x_209, x_226); -lean_dec(x_1); -return x_236; } else { -lean_object* x_237; lean_object* x_238; lean_object* x_239; uint8_t x_240; -lean_dec(x_219); -lean_dec(x_209); -x_237 = lean_ctor_get(x_227, 0); -lean_inc(x_237); -lean_dec(x_227); -lean_inc(x_237); -x_238 = l_Lean_Syntax_getKind(x_237); -x_239 = l_Lean_nullKind; -x_240 = lean_name_eq(x_238, x_239); -lean_dec(x_238); -if (x_240 == 0) -{ -lean_object* x_241; lean_object* x_242; -x_241 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_241, 0, x_1); -lean_ctor_set(x_241, 1, x_12); -x_242 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_242, 0, x_7); -lean_ctor_set(x_242, 1, x_8); -lean_ctor_set(x_242, 2, x_9); -lean_ctor_set(x_242, 3, x_194); -lean_ctor_set(x_242, 4, x_11); -lean_ctor_set(x_242, 5, x_241); -lean_ctor_set(x_242, 6, x_202); -x_1 = x_237; -x_2 = x_242; -x_3 = x_226; -goto _start; -} -else -{ -lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; -x_244 = l_Lean_Syntax_getArgs(x_237); -lean_dec(x_237); -x_245 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_245, 0, x_1); -lean_ctor_set(x_245, 1, x_12); -x_246 = lean_alloc_ctor(0, 7, 0); -lean_ctor_set(x_246, 0, x_7); -lean_ctor_set(x_246, 1, x_8); -lean_ctor_set(x_246, 2, x_9); -lean_ctor_set(x_246, 3, x_194); -lean_ctor_set(x_246, 4, x_11); -lean_ctor_set(x_246, 5, x_245); -lean_ctor_set(x_246, 6, x_202); -x_247 = lean_unsigned_to_nat(0u); -x_248 = l_Array_forMAux___main___at_Lean_Elab_Command_elabCommand___main___spec__7(x_244, x_247, x_246, x_226); -lean_dec(x_244); -return x_248; -} -} -} -else -{ -lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; -lean_dec(x_222); -lean_dec(x_219); -lean_dec(x_209); -lean_dec(x_202); -lean_dec(x_194); +lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; +lean_dec(x_191); +lean_dec(x_190); lean_dec(x_12); lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_1); -x_249 = lean_ctor_get(x_224, 0); -lean_inc(x_249); -x_250 = lean_ctor_get(x_224, 1); -lean_inc(x_250); -if (lean_is_exclusive(x_224)) { - lean_ctor_release(x_224, 0); - lean_ctor_release(x_224, 1); - x_251 = x_224; +x_276 = lean_ctor_get(x_192, 0); +lean_inc(x_276); +x_277 = lean_ctor_get(x_192, 1); +lean_inc(x_277); +if (lean_is_exclusive(x_192)) { + lean_ctor_release(x_192, 0); + lean_ctor_release(x_192, 1); + x_278 = x_192; } else { - lean_dec_ref(x_224); - x_251 = lean_box(0); + lean_dec_ref(x_192); + x_278 = lean_box(0); } -if (lean_is_scalar(x_251)) { - x_252 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_278)) { + x_279 = lean_alloc_ctor(1, 2, 0); } else { - x_252 = x_251; + x_279 = x_278; } -lean_ctor_set(x_252, 0, x_249); -lean_ctor_set(x_252, 1, x_250); -return x_252; -} -} -else -{ -lean_object* x_253; lean_object* x_254; -lean_dec(x_219); -lean_dec(x_202); -lean_dec(x_194); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_253 = lean_ctor_get(x_220, 0); -lean_inc(x_253); -lean_dec(x_220); -x_254 = l___private_Init_Lean_Elab_Command_5__elabCommandUsing___main(x_1, x_253, x_209, x_213); -return x_254; -} -} -else -{ -lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; -lean_dec(x_209); -lean_dec(x_202); -lean_dec(x_194); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_1); -x_255 = lean_ctor_get(x_211, 0); -lean_inc(x_255); -x_256 = lean_ctor_get(x_211, 1); -lean_inc(x_256); -if (lean_is_exclusive(x_211)) { - lean_ctor_release(x_211, 0); - lean_ctor_release(x_211, 1); - x_257 = x_211; -} else { - lean_dec_ref(x_211); - x_257 = lean_box(0); -} -if (lean_is_scalar(x_257)) { - x_258 = lean_alloc_ctor(1, 2, 0); -} else { - x_258 = x_257; -} -lean_ctor_set(x_258, 0, x_255); -lean_ctor_set(x_258, 1, x_256); -return x_258; +lean_ctor_set(x_279, 0, x_276); +lean_ctor_set(x_279, 1, x_277); +return x_279; } } } else { -lean_object* x_276; lean_object* x_277; -lean_dec(x_202); -lean_dec(x_194); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_276 = l_Lean_Elab_Command_elabCommand___main___closed__3; -x_277 = l_Lean_Elab_Command_throwError___rarg(x_1, x_276, x_209, x_208); -lean_dec(x_1); -return x_277; -} -} -else -{ -lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; -lean_dec(x_202); -lean_dec(x_194); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_1); -x_278 = lean_ctor_get(x_207, 0); -lean_inc(x_278); -x_279 = lean_ctor_get(x_207, 1); -lean_inc(x_279); -if (lean_is_exclusive(x_207)) { - lean_ctor_release(x_207, 0); - lean_ctor_release(x_207, 1); - x_280 = x_207; -} else { - lean_dec_ref(x_207); - x_280 = lean_box(0); -} -if (lean_is_scalar(x_280)) { - x_281 = lean_alloc_ctor(1, 2, 0); -} else { - x_281 = x_280; -} -lean_ctor_set(x_281, 0, x_278); -lean_ctor_set(x_281, 1, x_279); -return x_281; -} -} -else -{ -lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; -lean_dec(x_195); -lean_dec(x_194); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_1); -x_282 = lean_ctor_get(x_196, 0); -lean_inc(x_282); -x_283 = lean_ctor_get(x_196, 1); -lean_inc(x_283); -if (lean_is_exclusive(x_196)) { - lean_ctor_release(x_196, 0); - lean_ctor_release(x_196, 1); - x_284 = x_196; -} else { - lean_dec_ref(x_196); - x_284 = lean_box(0); -} -if (lean_is_scalar(x_284)) { - x_285 = lean_alloc_ctor(1, 2, 0); -} else { - x_285 = x_284; -} -lean_ctor_set(x_285, 0, x_282); -lean_ctor_set(x_285, 1, x_283); -return x_285; -} -} -} -else -{ -lean_object* x_286; lean_object* x_287; uint8_t x_288; +lean_object* x_280; lean_object* x_281; uint8_t x_282; lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -6283,51 +6316,51 @@ lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); -x_286 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; -x_287 = l_Lean_Elab_Command_throwError___rarg(x_1, x_286, x_2, x_6); +x_280 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_281 = l_Lean_Elab_Command_throwError___rarg(x_1, x_280, x_2, x_6); lean_dec(x_1); -x_288 = !lean_is_exclusive(x_287); -if (x_288 == 0) +x_282 = !lean_is_exclusive(x_281); +if (x_282 == 0) { -return x_287; +return x_281; } else { -lean_object* x_289; lean_object* x_290; lean_object* x_291; -x_289 = lean_ctor_get(x_287, 0); -x_290 = lean_ctor_get(x_287, 1); -lean_inc(x_290); -lean_inc(x_289); -lean_dec(x_287); -x_291 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_291, 0, x_289); -lean_ctor_set(x_291, 1, x_290); -return x_291; +lean_object* x_283; lean_object* x_284; lean_object* x_285; +x_283 = lean_ctor_get(x_281, 0); +x_284 = lean_ctor_get(x_281, 1); +lean_inc(x_284); +lean_inc(x_283); +lean_dec(x_281); +x_285 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_285, 0, x_283); +lean_ctor_set(x_285, 1, x_284); +return x_285; } } } else { -uint8_t x_292; +uint8_t x_286; lean_dec(x_2); lean_dec(x_1); -x_292 = !lean_is_exclusive(x_4); -if (x_292 == 0) +x_286 = !lean_is_exclusive(x_4); +if (x_286 == 0) { return x_4; } else { -lean_object* x_293; lean_object* x_294; lean_object* x_295; -x_293 = lean_ctor_get(x_4, 0); -x_294 = lean_ctor_get(x_4, 1); -lean_inc(x_294); -lean_inc(x_293); +lean_object* x_287; lean_object* x_288; lean_object* x_289; +x_287 = lean_ctor_get(x_4, 0); +x_288 = lean_ctor_get(x_4, 1); +lean_inc(x_288); +lean_inc(x_287); lean_dec(x_4); -x_295 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_295, 0, x_293); -lean_ctor_set(x_295, 1, x_294); -return x_295; +x_289 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_289, 0, x_287); +lean_ctor_set(x_289, 1, x_288); +return x_289; } } } diff --git a/stage0/stdlib/Init/Lean/Elab/Quotation.c b/stage0/stdlib/Init/Lean/Elab/Quotation.c index 87c932be17..7b99646310 100644 --- a/stage0/stdlib/Init/Lean/Elab/Quotation.c +++ b/stage0/stdlib/Init/Lean/Elab/Quotation.c @@ -209,7 +209,6 @@ lean_object* l_Lean_Elab_Term_oldGetPatternVars___lambda__1___boxed(lean_object* extern lean_object* l_Nat_HasOfNat___closed__1; lean_object* l___private_Init_Lean_Elab_Quotation_16__oldRunTermElabM___rarg___closed__3; lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___spec__1___closed__5; -lean_object* l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Quotation_4__quoteOption___rarg___lambda__1___closed__3; lean_object* l_Lean_Elab_Term_stxQuot_expand___closed__26; lean_object* l_Lean_Elab_Term_antiquotKind_x3f___closed__1; @@ -407,6 +406,7 @@ lean_object* l___private_Init_Lean_Elab_Quotation_16__oldRunTermElabM___rarg___c lean_object* l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__49; lean_object* l_Lean_Elab_Term_stxQuot_expand___closed__19; lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); +lean_object* l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Quotation_13__letBindRhss___main___closed__11; lean_object* l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__2; @@ -3666,7 +3666,7 @@ lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___ _start: { lean_object* x_1; -x_1 = lean_mk_string("addMacroScope"); +x_1 = lean_mk_string("Syntax.ident"); return x_1; } } @@ -3697,8 +3697,8 @@ lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__34; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__13; +x_2 = l_Lean_Syntax_getKind___closed__3; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -3707,8 +3707,8 @@ lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_nameToExprAux___main___closed__4; -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__34; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__15; +x_2 = l_Lean_Syntax_getKind___closed__3; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -3740,122 +3740,6 @@ return x_3; lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__41() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("scp"); -return x_1; -} -} -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__41; -x_2 = lean_string_utf8_byte_size(x_1); -return x_2; -} -} -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__43() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__41; -x_2 = lean_unsigned_to_nat(0u); -x_3 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; -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* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__44() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__41; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__45() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Syntax.ident"); -return x_1; -} -} -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__46() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__45; -x_2 = lean_string_utf8_byte_size(x_1); -return x_2; -} -} -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__45; -x_2 = lean_unsigned_to_nat(0u); -x_3 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__46; -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* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__48() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__13; -x_2 = l_Lean_Syntax_getKind___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__49() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__15; -x_2 = l_Lean_Syntax_getKind___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__49; -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* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; -x_3 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_3, 0, x_2); -lean_ctor_set(x_3, 1, x_1); -return x_3; -} -} -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__52() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); x_2 = l_Prod_HasRepr___rarg___closed__1; @@ -3865,17 +3749,17 @@ lean_ctor_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_empty___closed__1; -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__52; +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__41; x_3 = lean_array_push(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__54() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__43() { _start: { lean_object* x_1; @@ -3883,22 +3767,22 @@ x_1 = lean_mk_string("String.toSubstring"); return x_1; } } -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__55() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__44() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__54; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__43; x_2 = lean_string_utf8_byte_size(x_1); return x_2; } } -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__56() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__45() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__54; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__43; x_2 = lean_unsigned_to_nat(0u); -x_3 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__55; +x_3 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__44; x_4 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_4, 0, x_1); lean_ctor_set(x_4, 1, x_2); @@ -3906,7 +3790,7 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__57() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__46() { _start: { lean_object* x_1; @@ -3914,41 +3798,41 @@ x_1 = lean_mk_string("toSubstring"); return x_1; } } -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Literal_type___closed__5; -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__57; +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__46; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__59() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__48() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58; +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47; 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* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__49() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__59; +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__48; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); return x_3; } } -lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61() { +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -3960,6 +3844,122 @@ lean_ctor_set(x_3, 1, x_2); return x_3; } } +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("addMacroScope"); +return x_1; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__52() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51; +x_2 = lean_string_utf8_byte_size(x_1); +return x_2; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51; +x_2 = lean_unsigned_to_nat(0u); +x_3 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__52; +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* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__54() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__55() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_nameToExprAux___main___closed__4; +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__56() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__55; +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* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__57() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__56; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("scp"); +return x_1; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__59() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58; +x_2 = lean_string_utf8_byte_size(x_1); +return x_2; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58; +x_2 = lean_unsigned_to_nat(0u); +x_3 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__59; +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* _init_l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} lean_object* l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -4501,7 +4501,7 @@ uint8_t x_238; x_238 = !lean_is_exclusive(x_1); if (x_238 == 0) { -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_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; uint8_t x_286; +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_254; lean_object* x_255; uint8_t x_256; x_239 = lean_ctor_get(x_1, 1); x_240 = lean_ctor_get(x_1, 2); x_241 = lean_ctor_get(x_1, 3); @@ -4531,15 +4531,16 @@ lean_dec(x_247); x_253 = l_List_append___rarg(x_252, x_241); x_254 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main(x_240); x_255 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_251); -x_256 = lean_ctor_get(x_255, 0); -lean_inc(x_256); -x_257 = lean_ctor_get(x_255, 1); -lean_inc(x_257); -lean_dec(x_255); +lean_dec(x_2); +x_256 = !lean_is_exclusive(x_255); +if (x_256 == 0) +{ +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; 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; 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; +x_257 = lean_ctor_get(x_255, 0); x_258 = lean_box(0); x_259 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__37; -lean_inc(x_256); -x_260 = lean_name_mk_numeral(x_259, x_256); +lean_inc(x_257); +x_260 = lean_name_mk_numeral(x_259, x_257); x_261 = lean_box(0); x_262 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__36; x_263 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__40; @@ -4556,463 +4557,527 @@ x_269 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_269, 0, x_268); lean_ctor_set(x_269, 1, x_267); x_270 = lean_array_push(x_264, x_269); -x_271 = lean_array_push(x_270, x_254); -x_272 = l_Lean_Parser_Term_app___elambda__1___closed__2; -x_273 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_273, 0, x_272); -lean_ctor_set(x_273, 1, x_271); -x_274 = lean_array_push(x_264, x_273); -x_275 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__44; -x_276 = lean_name_mk_numeral(x_275, x_256); -x_277 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__43; -x_278 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_278, 0, x_258); +x_271 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__31; +lean_inc(x_257); +x_272 = lean_name_mk_numeral(x_271, x_257); +x_273 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__30; +x_274 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__33; +x_275 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_275, 0, x_258); +lean_ctor_set(x_275, 1, x_273); +lean_ctor_set(x_275, 2, x_272); +lean_ctor_set(x_275, 3, x_274); +x_276 = lean_array_push(x_264, x_275); +x_277 = lean_array_push(x_276, x_266); +x_278 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_278, 0, x_268); lean_ctor_set(x_278, 1, x_277); -lean_ctor_set(x_278, 2, x_276); -lean_ctor_set(x_278, 3, x_261); -x_279 = lean_array_push(x_264, x_278); -x_280 = lean_array_push(x_279, x_266); +x_279 = lean_array_push(x_270, x_278); +x_280 = l_Lean_Parser_Term_app___elambda__1___closed__2; x_281 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_281, 0, x_268); -lean_ctor_set(x_281, 1, x_280); -x_282 = lean_array_push(x_274, x_281); -x_283 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_283, 0, x_272); -lean_ctor_set(x_283, 1, x_282); -x_284 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___spec__2(x_253); -x_285 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_257); -lean_dec(x_2); -x_286 = !lean_is_exclusive(x_285); -if (x_286 == 0) -{ -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; lean_object* x_325; 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; -x_287 = lean_ctor_get(x_285, 0); -x_288 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__48; -lean_inc(x_287); -x_289 = lean_name_mk_numeral(x_288, x_287); -x_290 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47; -x_291 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51; -x_292 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_292, 0, x_258); -lean_ctor_set(x_292, 1, x_290); -lean_ctor_set(x_292, 2, x_289); -lean_ctor_set(x_292, 3, x_291); -x_293 = lean_array_push(x_264, x_292); -x_294 = lean_array_push(x_293, x_266); -x_295 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_295, 0, x_268); -lean_ctor_set(x_295, 1, x_294); -x_296 = lean_array_push(x_264, x_295); -x_297 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__31; -lean_inc(x_287); -x_298 = lean_name_mk_numeral(x_297, x_287); -x_299 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__30; -x_300 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__33; -x_301 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_301, 0, x_258); -lean_ctor_set(x_301, 1, x_299); -lean_ctor_set(x_301, 2, x_298); -lean_ctor_set(x_301, 3, x_300); -x_302 = lean_array_push(x_264, x_301); -x_303 = lean_array_push(x_302, x_266); -x_304 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_304, 0, x_268); -lean_ctor_set(x_304, 1, x_303); -x_305 = lean_array_push(x_296, x_304); -x_306 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_306, 0, x_272); -lean_ctor_set(x_306, 1, x_305); -x_307 = lean_array_push(x_264, x_306); -x_308 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58; -x_309 = lean_name_mk_numeral(x_308, x_287); -x_310 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__56; -x_311 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60; -x_312 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_312, 0, x_258); -lean_ctor_set(x_312, 1, x_310); -lean_ctor_set(x_312, 2, x_309); -lean_ctor_set(x_312, 3, x_311); +lean_ctor_set(x_281, 0, x_280); +lean_ctor_set(x_281, 1, x_279); +x_282 = lean_array_push(x_264, x_281); +x_283 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47; +lean_inc(x_257); +x_284 = lean_name_mk_numeral(x_283, x_257); +x_285 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__45; +x_286 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__49; +x_287 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_287, 0, x_258); +lean_ctor_set(x_287, 1, x_285); +lean_ctor_set(x_287, 2, x_284); +lean_ctor_set(x_287, 3, x_286); +x_288 = lean_array_push(x_264, x_287); +x_289 = lean_array_push(x_288, x_266); +x_290 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_290, 0, x_268); +lean_ctor_set(x_290, 1, x_289); +x_291 = lean_array_push(x_264, x_290); +x_292 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__54; +lean_inc(x_257); +x_293 = lean_name_mk_numeral(x_292, x_257); +x_294 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_295 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__57; +x_296 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_296, 0, x_258); +lean_ctor_set(x_296, 1, x_294); +lean_ctor_set(x_296, 2, x_293); +lean_ctor_set(x_296, 3, x_295); +x_297 = lean_array_push(x_264, x_296); +x_298 = lean_array_push(x_297, x_266); +x_299 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_299, 0, x_268); +lean_ctor_set(x_299, 1, x_298); +x_300 = lean_array_push(x_264, x_299); +x_301 = lean_array_push(x_300, x_254); +x_302 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_302, 0, x_280); +lean_ctor_set(x_302, 1, x_301); +x_303 = lean_array_push(x_264, x_302); +x_304 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_305 = lean_name_mk_numeral(x_304, x_257); +x_306 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60; +x_307 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_307, 0, x_258); +lean_ctor_set(x_307, 1, x_306); +lean_ctor_set(x_307, 2, x_305); +lean_ctor_set(x_307, 3, x_261); +x_308 = lean_array_push(x_264, x_307); +x_309 = lean_array_push(x_308, x_266); +x_310 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_310, 0, x_268); +lean_ctor_set(x_310, 1, x_309); +x_311 = lean_array_push(x_303, x_310); +x_312 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_312, 0, x_280); +lean_ctor_set(x_312, 1, x_311); x_313 = lean_array_push(x_264, x_312); x_314 = lean_array_push(x_313, x_266); -x_315 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_315, 0, x_268); -lean_ctor_set(x_315, 1, x_314); -x_316 = lean_array_push(x_264, x_315); -x_317 = lean_ctor_get(x_239, 0); -lean_inc(x_317); -x_318 = lean_ctor_get(x_239, 1); -lean_inc(x_318); -x_319 = lean_ctor_get(x_239, 2); -lean_inc(x_319); +x_315 = l_Lean_nullKind___closed__2; +x_316 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_316, 0, x_315); +lean_ctor_set(x_316, 1, x_314); +x_317 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; +x_318 = lean_array_push(x_317, x_316); +x_319 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; +x_320 = lean_array_push(x_318, x_319); +x_321 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_322 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_322, 0, x_321); +lean_ctor_set(x_322, 1, x_320); +x_323 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___spec__2(x_253); +x_324 = lean_ctor_get(x_239, 0); +lean_inc(x_324); +x_325 = lean_ctor_get(x_239, 1); +lean_inc(x_325); +x_326 = lean_ctor_get(x_239, 2); +lean_inc(x_326); lean_dec(x_239); -x_320 = lean_string_utf8_extract(x_317, x_318, x_319); -lean_dec(x_319); -lean_dec(x_318); -lean_dec(x_317); -x_321 = l_Lean_mkStxStrLit(x_320, x_258); -x_322 = l_Lean_FileMap_ofString___closed__1; -x_323 = lean_array_push(x_322, x_321); -x_324 = l_Lean_Parser_Term_str___elambda__1___closed__2; -x_325 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_325, 0, x_324); -lean_ctor_set(x_325, 1, x_323); -x_326 = lean_array_push(x_316, x_325); -x_327 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_327, 0, x_272); -lean_ctor_set(x_327, 1, x_326); -x_328 = lean_array_push(x_264, x_327); -x_329 = lean_array_push(x_328, x_266); -x_330 = l_Lean_nullKind___closed__2; -x_331 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_331, 0, x_330); -lean_ctor_set(x_331, 1, x_329); -x_332 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; -x_333 = lean_array_push(x_332, x_331); -x_334 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; -x_335 = lean_array_push(x_333, x_334); -x_336 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_327 = lean_string_utf8_extract(x_324, x_325, x_326); +lean_dec(x_326); +lean_dec(x_325); +lean_dec(x_324); +x_328 = l_Lean_mkStxStrLit(x_327, x_258); +x_329 = l_Lean_FileMap_ofString___closed__1; +x_330 = lean_array_push(x_329, x_328); +x_331 = l_Lean_Parser_Term_str___elambda__1___closed__2; +x_332 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_332, 0, x_331); +lean_ctor_set(x_332, 1, x_330); +x_333 = lean_array_push(x_291, x_332); +x_334 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_334, 0, x_280); +lean_ctor_set(x_334, 1, x_333); +x_335 = lean_array_push(x_264, x_334); +x_336 = lean_array_push(x_335, x_266); x_337 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_337, 0, x_336); -lean_ctor_set(x_337, 1, x_335); -x_338 = lean_array_push(x_307, x_337); -x_339 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_339, 0, x_272); -lean_ctor_set(x_339, 1, x_338); -x_340 = lean_array_push(x_264, x_339); -x_341 = lean_array_push(x_340, x_283); +lean_ctor_set(x_337, 0, x_315); +lean_ctor_set(x_337, 1, x_336); +x_338 = lean_array_push(x_317, x_337); +x_339 = lean_array_push(x_338, x_319); +x_340 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_340, 0, x_321); +lean_ctor_set(x_340, 1, x_339); +x_341 = lean_array_push(x_282, x_340); x_342 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_342, 0, x_272); +lean_ctor_set(x_342, 0, x_280); lean_ctor_set(x_342, 1, x_341); x_343 = lean_array_push(x_264, x_342); -x_344 = lean_array_push(x_343, x_284); +x_344 = lean_array_push(x_343, x_322); x_345 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_345, 0, x_272); +lean_ctor_set(x_345, 0, x_280); lean_ctor_set(x_345, 1, x_344); -lean_ctor_set(x_285, 0, x_345); -return x_285; +x_346 = lean_array_push(x_264, x_345); +x_347 = lean_array_push(x_346, x_323); +x_348 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_348, 0, x_280); +lean_ctor_set(x_348, 1, x_347); +lean_ctor_set(x_255, 0, x_348); +return x_255; } else { -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; 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; -x_346 = lean_ctor_get(x_285, 0); -x_347 = lean_ctor_get(x_285, 1); -lean_inc(x_347); -lean_inc(x_346); -lean_dec(x_285); -x_348 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__48; -lean_inc(x_346); -x_349 = lean_name_mk_numeral(x_348, x_346); -x_350 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47; -x_351 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51; -x_352 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_352, 0, x_258); -lean_ctor_set(x_352, 1, x_350); -lean_ctor_set(x_352, 2, x_349); -lean_ctor_set(x_352, 3, x_351); -x_353 = lean_array_push(x_264, x_352); -x_354 = lean_array_push(x_353, x_266); -x_355 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_355, 0, x_268); -lean_ctor_set(x_355, 1, x_354); -x_356 = lean_array_push(x_264, x_355); -x_357 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__31; -lean_inc(x_346); -x_358 = lean_name_mk_numeral(x_357, x_346); -x_359 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__30; -x_360 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__33; -x_361 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_361, 0, x_258); -lean_ctor_set(x_361, 1, x_359); -lean_ctor_set(x_361, 2, x_358); -lean_ctor_set(x_361, 3, x_360); -x_362 = lean_array_push(x_264, x_361); -x_363 = lean_array_push(x_362, x_266); -x_364 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_364, 0, x_268); -lean_ctor_set(x_364, 1, x_363); -x_365 = lean_array_push(x_356, x_364); -x_366 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_366, 0, x_272); -lean_ctor_set(x_366, 1, x_365); -x_367 = lean_array_push(x_264, x_366); -x_368 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58; -x_369 = lean_name_mk_numeral(x_368, x_346); -x_370 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__56; -x_371 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60; -x_372 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_372, 0, x_258); -lean_ctor_set(x_372, 1, x_370); -lean_ctor_set(x_372, 2, x_369); -lean_ctor_set(x_372, 3, x_371); -x_373 = lean_array_push(x_264, x_372); -x_374 = lean_array_push(x_373, x_266); -x_375 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_375, 0, x_268); -lean_ctor_set(x_375, 1, x_374); -x_376 = lean_array_push(x_264, x_375); -x_377 = lean_ctor_get(x_239, 0); -lean_inc(x_377); -x_378 = lean_ctor_get(x_239, 1); -lean_inc(x_378); -x_379 = lean_ctor_get(x_239, 2); -lean_inc(x_379); -lean_dec(x_239); -x_380 = lean_string_utf8_extract(x_377, x_378, x_379); -lean_dec(x_379); -lean_dec(x_378); -lean_dec(x_377); -x_381 = l_Lean_mkStxStrLit(x_380, x_258); -x_382 = l_Lean_FileMap_ofString___closed__1; -x_383 = lean_array_push(x_382, x_381); -x_384 = l_Lean_Parser_Term_str___elambda__1___closed__2; -x_385 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_385, 0, x_384); -lean_ctor_set(x_385, 1, x_383); -x_386 = lean_array_push(x_376, x_385); -x_387 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_387, 0, x_272); -lean_ctor_set(x_387, 1, x_386); -x_388 = lean_array_push(x_264, x_387); -x_389 = lean_array_push(x_388, x_266); -x_390 = l_Lean_nullKind___closed__2; -x_391 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_391, 0, x_390); -lean_ctor_set(x_391, 1, x_389); -x_392 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; -x_393 = lean_array_push(x_392, x_391); -x_394 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; -x_395 = lean_array_push(x_393, x_394); -x_396 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_397 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_397, 0, x_396); -lean_ctor_set(x_397, 1, x_395); -x_398 = lean_array_push(x_367, x_397); -x_399 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_399, 0, x_272); -lean_ctor_set(x_399, 1, x_398); -x_400 = lean_array_push(x_264, x_399); -x_401 = lean_array_push(x_400, x_283); -x_402 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_402, 0, x_272); -lean_ctor_set(x_402, 1, x_401); -x_403 = lean_array_push(x_264, x_402); -x_404 = lean_array_push(x_403, x_284); +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; 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; 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; +x_349 = lean_ctor_get(x_255, 0); +x_350 = lean_ctor_get(x_255, 1); +lean_inc(x_350); +lean_inc(x_349); +lean_dec(x_255); +x_351 = lean_box(0); +x_352 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__37; +lean_inc(x_349); +x_353 = lean_name_mk_numeral(x_352, x_349); +x_354 = lean_box(0); +x_355 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__36; +x_356 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__40; +lean_ctor_set(x_1, 3, x_356); +lean_ctor_set(x_1, 2, x_353); +lean_ctor_set(x_1, 1, x_355); +lean_ctor_set(x_1, 0, x_351); +x_357 = l_Array_empty___closed__1; +x_358 = lean_array_push(x_357, x_1); +x_359 = l___private_Init_Lean_Elab_Term_5__expandCDot___closed__4; +x_360 = lean_array_push(x_358, x_359); +x_361 = l_Lean_Parser_Term_id___elambda__1___closed__2; +x_362 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_362, 0, x_361); +lean_ctor_set(x_362, 1, x_360); +x_363 = lean_array_push(x_357, x_362); +x_364 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__31; +lean_inc(x_349); +x_365 = lean_name_mk_numeral(x_364, x_349); +x_366 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__30; +x_367 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__33; +x_368 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_368, 0, x_351); +lean_ctor_set(x_368, 1, x_366); +lean_ctor_set(x_368, 2, x_365); +lean_ctor_set(x_368, 3, x_367); +x_369 = lean_array_push(x_357, x_368); +x_370 = lean_array_push(x_369, x_359); +x_371 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_371, 0, x_361); +lean_ctor_set(x_371, 1, x_370); +x_372 = lean_array_push(x_363, x_371); +x_373 = l_Lean_Parser_Term_app___elambda__1___closed__2; +x_374 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_374, 0, x_373); +lean_ctor_set(x_374, 1, x_372); +x_375 = lean_array_push(x_357, x_374); +x_376 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47; +lean_inc(x_349); +x_377 = lean_name_mk_numeral(x_376, x_349); +x_378 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__45; +x_379 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__49; +x_380 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_380, 0, x_351); +lean_ctor_set(x_380, 1, x_378); +lean_ctor_set(x_380, 2, x_377); +lean_ctor_set(x_380, 3, x_379); +x_381 = lean_array_push(x_357, x_380); +x_382 = lean_array_push(x_381, x_359); +x_383 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_383, 0, x_361); +lean_ctor_set(x_383, 1, x_382); +x_384 = lean_array_push(x_357, x_383); +x_385 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__54; +lean_inc(x_349); +x_386 = lean_name_mk_numeral(x_385, x_349); +x_387 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_388 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__57; +x_389 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_389, 0, x_351); +lean_ctor_set(x_389, 1, x_387); +lean_ctor_set(x_389, 2, x_386); +lean_ctor_set(x_389, 3, x_388); +x_390 = lean_array_push(x_357, x_389); +x_391 = lean_array_push(x_390, x_359); +x_392 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_392, 0, x_361); +lean_ctor_set(x_392, 1, x_391); +x_393 = lean_array_push(x_357, x_392); +x_394 = lean_array_push(x_393, x_254); +x_395 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_395, 0, x_373); +lean_ctor_set(x_395, 1, x_394); +x_396 = lean_array_push(x_357, x_395); +x_397 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_398 = lean_name_mk_numeral(x_397, x_349); +x_399 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60; +x_400 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_400, 0, x_351); +lean_ctor_set(x_400, 1, x_399); +lean_ctor_set(x_400, 2, x_398); +lean_ctor_set(x_400, 3, x_354); +x_401 = lean_array_push(x_357, x_400); +x_402 = lean_array_push(x_401, x_359); +x_403 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_403, 0, x_361); +lean_ctor_set(x_403, 1, x_402); +x_404 = lean_array_push(x_396, x_403); x_405 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_405, 0, x_272); +lean_ctor_set(x_405, 0, x_373); lean_ctor_set(x_405, 1, x_404); -x_406 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_406, 0, x_405); -lean_ctor_set(x_406, 1, x_347); -return x_406; +x_406 = lean_array_push(x_357, x_405); +x_407 = lean_array_push(x_406, x_359); +x_408 = l_Lean_nullKind___closed__2; +x_409 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_409, 0, x_408); +lean_ctor_set(x_409, 1, x_407); +x_410 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; +x_411 = lean_array_push(x_410, x_409); +x_412 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; +x_413 = lean_array_push(x_411, x_412); +x_414 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_415 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_415, 0, x_414); +lean_ctor_set(x_415, 1, x_413); +x_416 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___spec__2(x_253); +x_417 = lean_ctor_get(x_239, 0); +lean_inc(x_417); +x_418 = lean_ctor_get(x_239, 1); +lean_inc(x_418); +x_419 = lean_ctor_get(x_239, 2); +lean_inc(x_419); +lean_dec(x_239); +x_420 = lean_string_utf8_extract(x_417, x_418, x_419); +lean_dec(x_419); +lean_dec(x_418); +lean_dec(x_417); +x_421 = l_Lean_mkStxStrLit(x_420, x_351); +x_422 = l_Lean_FileMap_ofString___closed__1; +x_423 = lean_array_push(x_422, x_421); +x_424 = l_Lean_Parser_Term_str___elambda__1___closed__2; +x_425 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_425, 0, x_424); +lean_ctor_set(x_425, 1, x_423); +x_426 = lean_array_push(x_384, x_425); +x_427 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_427, 0, x_373); +lean_ctor_set(x_427, 1, x_426); +x_428 = lean_array_push(x_357, x_427); +x_429 = lean_array_push(x_428, x_359); +x_430 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_430, 0, x_408); +lean_ctor_set(x_430, 1, x_429); +x_431 = lean_array_push(x_410, x_430); +x_432 = lean_array_push(x_431, x_412); +x_433 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_433, 0, x_414); +lean_ctor_set(x_433, 1, x_432); +x_434 = lean_array_push(x_375, x_433); +x_435 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_435, 0, x_373); +lean_ctor_set(x_435, 1, x_434); +x_436 = lean_array_push(x_357, x_435); +x_437 = lean_array_push(x_436, x_415); +x_438 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_438, 0, x_373); +lean_ctor_set(x_438, 1, x_437); +x_439 = lean_array_push(x_357, x_438); +x_440 = lean_array_push(x_439, x_416); +x_441 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_441, 0, x_373); +lean_ctor_set(x_441, 1, x_440); +x_442 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_442, 0, x_441); +lean_ctor_set(x_442, 1, x_350); +return x_442; } } else { -lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; 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; 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; 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; -x_407 = lean_ctor_get(x_1, 1); -x_408 = lean_ctor_get(x_1, 2); -x_409 = lean_ctor_get(x_1, 3); -lean_inc(x_409); -lean_inc(x_408); -lean_inc(x_407); +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; 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; +x_443 = lean_ctor_get(x_1, 1); +x_444 = lean_ctor_get(x_1, 2); +x_445 = lean_ctor_get(x_1, 3); +lean_inc(x_445); +lean_inc(x_444); +lean_inc(x_443); lean_dec(x_1); -x_410 = l_Lean_Elab_Term_getEnv___rarg(x_3); -x_411 = lean_ctor_get(x_410, 0); -lean_inc(x_411); -x_412 = lean_ctor_get(x_410, 1); -lean_inc(x_412); -lean_dec(x_410); -x_413 = l_Lean_Elab_Term_getCurrNamespace(x_2, x_412); -x_414 = lean_ctor_get(x_413, 0); -lean_inc(x_414); -x_415 = lean_ctor_get(x_413, 1); -lean_inc(x_415); -lean_dec(x_413); -x_416 = l_Lean_Elab_Term_getOpenDecls(x_2, x_415); -x_417 = lean_ctor_get(x_416, 0); -lean_inc(x_417); -x_418 = lean_ctor_get(x_416, 1); -lean_inc(x_418); -lean_dec(x_416); -lean_inc(x_408); -x_419 = l_Lean_Elab_resolveGlobalName(x_411, x_414, x_417, x_408); -lean_dec(x_414); -x_420 = l_List_append___rarg(x_419, x_409); -x_421 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main(x_408); -x_422 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_418); -x_423 = lean_ctor_get(x_422, 0); -lean_inc(x_423); -x_424 = lean_ctor_get(x_422, 1); -lean_inc(x_424); -lean_dec(x_422); -x_425 = lean_box(0); -x_426 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__37; -lean_inc(x_423); -x_427 = lean_name_mk_numeral(x_426, x_423); -x_428 = lean_box(0); -x_429 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__36; -x_430 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__40; -x_431 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_431, 0, x_425); -lean_ctor_set(x_431, 1, x_429); -lean_ctor_set(x_431, 2, x_427); -lean_ctor_set(x_431, 3, x_430); -x_432 = l_Array_empty___closed__1; -x_433 = lean_array_push(x_432, x_431); -x_434 = l___private_Init_Lean_Elab_Term_5__expandCDot___closed__4; -x_435 = lean_array_push(x_433, x_434); -x_436 = l_Lean_Parser_Term_id___elambda__1___closed__2; -x_437 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_437, 0, x_436); -lean_ctor_set(x_437, 1, x_435); -x_438 = lean_array_push(x_432, x_437); -x_439 = lean_array_push(x_438, x_421); -x_440 = l_Lean_Parser_Term_app___elambda__1___closed__2; -x_441 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_441, 0, x_440); -lean_ctor_set(x_441, 1, x_439); -x_442 = lean_array_push(x_432, x_441); -x_443 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__44; -x_444 = lean_name_mk_numeral(x_443, x_423); -x_445 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__43; -x_446 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_446, 0, x_425); -lean_ctor_set(x_446, 1, x_445); -lean_ctor_set(x_446, 2, x_444); -lean_ctor_set(x_446, 3, x_428); -x_447 = lean_array_push(x_432, x_446); -x_448 = lean_array_push(x_447, x_434); -x_449 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_449, 0, x_436); -lean_ctor_set(x_449, 1, x_448); -x_450 = lean_array_push(x_442, x_449); -x_451 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_451, 0, x_440); -lean_ctor_set(x_451, 1, x_450); -x_452 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___spec__2(x_420); -x_453 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_424); +x_446 = l_Lean_Elab_Term_getEnv___rarg(x_3); +x_447 = lean_ctor_get(x_446, 0); +lean_inc(x_447); +x_448 = lean_ctor_get(x_446, 1); +lean_inc(x_448); +lean_dec(x_446); +x_449 = l_Lean_Elab_Term_getCurrNamespace(x_2, x_448); +x_450 = lean_ctor_get(x_449, 0); +lean_inc(x_450); +x_451 = lean_ctor_get(x_449, 1); +lean_inc(x_451); +lean_dec(x_449); +x_452 = l_Lean_Elab_Term_getOpenDecls(x_2, x_451); +x_453 = lean_ctor_get(x_452, 0); +lean_inc(x_453); +x_454 = lean_ctor_get(x_452, 1); +lean_inc(x_454); +lean_dec(x_452); +lean_inc(x_444); +x_455 = l_Lean_Elab_resolveGlobalName(x_447, x_450, x_453, x_444); +lean_dec(x_450); +x_456 = l_List_append___rarg(x_455, x_445); +x_457 = l___private_Init_Lean_Elab_Quotation_1__quoteName___main(x_444); +x_458 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_454); lean_dec(x_2); -x_454 = lean_ctor_get(x_453, 0); -lean_inc(x_454); -x_455 = lean_ctor_get(x_453, 1); -lean_inc(x_455); -if (lean_is_exclusive(x_453)) { - lean_ctor_release(x_453, 0); - lean_ctor_release(x_453, 1); - x_456 = x_453; +x_459 = lean_ctor_get(x_458, 0); +lean_inc(x_459); +x_460 = lean_ctor_get(x_458, 1); +lean_inc(x_460); +if (lean_is_exclusive(x_458)) { + lean_ctor_release(x_458, 0); + lean_ctor_release(x_458, 1); + x_461 = x_458; } else { - lean_dec_ref(x_453); - x_456 = lean_box(0); + lean_dec_ref(x_458); + x_461 = lean_box(0); } -x_457 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__48; -lean_inc(x_454); -x_458 = lean_name_mk_numeral(x_457, x_454); -x_459 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47; -x_460 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__51; -x_461 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_461, 0, x_425); -lean_ctor_set(x_461, 1, x_459); -lean_ctor_set(x_461, 2, x_458); -lean_ctor_set(x_461, 3, x_460); -x_462 = lean_array_push(x_432, x_461); -x_463 = lean_array_push(x_462, x_434); -x_464 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_464, 0, x_436); -lean_ctor_set(x_464, 1, x_463); -x_465 = lean_array_push(x_432, x_464); -x_466 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__31; -lean_inc(x_454); -x_467 = lean_name_mk_numeral(x_466, x_454); -x_468 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__30; -x_469 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__33; -x_470 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_470, 0, x_425); -lean_ctor_set(x_470, 1, x_468); -lean_ctor_set(x_470, 2, x_467); -lean_ctor_set(x_470, 3, x_469); -x_471 = lean_array_push(x_432, x_470); -x_472 = lean_array_push(x_471, x_434); -x_473 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_473, 0, x_436); -lean_ctor_set(x_473, 1, x_472); -x_474 = lean_array_push(x_465, x_473); -x_475 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_475, 0, x_440); -lean_ctor_set(x_475, 1, x_474); -x_476 = lean_array_push(x_432, x_475); -x_477 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__58; -x_478 = lean_name_mk_numeral(x_477, x_454); -x_479 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__56; -x_480 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60; -x_481 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_481, 0, x_425); -lean_ctor_set(x_481, 1, x_479); -lean_ctor_set(x_481, 2, x_478); -lean_ctor_set(x_481, 3, x_480); -x_482 = lean_array_push(x_432, x_481); -x_483 = lean_array_push(x_482, x_434); -x_484 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_484, 0, x_436); -lean_ctor_set(x_484, 1, x_483); -x_485 = lean_array_push(x_432, x_484); -x_486 = lean_ctor_get(x_407, 0); -lean_inc(x_486); -x_487 = lean_ctor_get(x_407, 1); -lean_inc(x_487); -x_488 = lean_ctor_get(x_407, 2); -lean_inc(x_488); -lean_dec(x_407); -x_489 = lean_string_utf8_extract(x_486, x_487, x_488); -lean_dec(x_488); -lean_dec(x_487); -lean_dec(x_486); -x_490 = l_Lean_mkStxStrLit(x_489, x_425); -x_491 = l_Lean_FileMap_ofString___closed__1; -x_492 = lean_array_push(x_491, x_490); -x_493 = l_Lean_Parser_Term_str___elambda__1___closed__2; -x_494 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_494, 0, x_493); -lean_ctor_set(x_494, 1, x_492); -x_495 = lean_array_push(x_485, x_494); -x_496 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_496, 0, x_440); -lean_ctor_set(x_496, 1, x_495); -x_497 = lean_array_push(x_432, x_496); -x_498 = lean_array_push(x_497, x_434); -x_499 = l_Lean_nullKind___closed__2; -x_500 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_500, 0, x_499); -lean_ctor_set(x_500, 1, x_498); -x_501 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; -x_502 = lean_array_push(x_501, x_500); -x_503 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; -x_504 = lean_array_push(x_502, x_503); -x_505 = l_Lean_Parser_Term_paren___elambda__1___closed__1; -x_506 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_506, 0, x_505); -lean_ctor_set(x_506, 1, x_504); -x_507 = lean_array_push(x_476, x_506); -x_508 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_508, 0, x_440); -lean_ctor_set(x_508, 1, x_507); -x_509 = lean_array_push(x_432, x_508); -x_510 = lean_array_push(x_509, x_451); -x_511 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_511, 0, x_440); -lean_ctor_set(x_511, 1, x_510); -x_512 = lean_array_push(x_432, x_511); -x_513 = lean_array_push(x_512, x_452); -x_514 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_514, 0, x_440); -lean_ctor_set(x_514, 1, x_513); -if (lean_is_scalar(x_456)) { - x_515 = lean_alloc_ctor(0, 2, 0); +x_462 = lean_box(0); +x_463 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__37; +lean_inc(x_459); +x_464 = lean_name_mk_numeral(x_463, x_459); +x_465 = lean_box(0); +x_466 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__36; +x_467 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__40; +x_468 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_468, 0, x_462); +lean_ctor_set(x_468, 1, x_466); +lean_ctor_set(x_468, 2, x_464); +lean_ctor_set(x_468, 3, x_467); +x_469 = l_Array_empty___closed__1; +x_470 = lean_array_push(x_469, x_468); +x_471 = l___private_Init_Lean_Elab_Term_5__expandCDot___closed__4; +x_472 = lean_array_push(x_470, x_471); +x_473 = l_Lean_Parser_Term_id___elambda__1___closed__2; +x_474 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_474, 0, x_473); +lean_ctor_set(x_474, 1, x_472); +x_475 = lean_array_push(x_469, x_474); +x_476 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__31; +lean_inc(x_459); +x_477 = lean_name_mk_numeral(x_476, x_459); +x_478 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__30; +x_479 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__33; +x_480 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_480, 0, x_462); +lean_ctor_set(x_480, 1, x_478); +lean_ctor_set(x_480, 2, x_477); +lean_ctor_set(x_480, 3, x_479); +x_481 = lean_array_push(x_469, x_480); +x_482 = lean_array_push(x_481, x_471); +x_483 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_483, 0, x_473); +lean_ctor_set(x_483, 1, x_482); +x_484 = lean_array_push(x_475, x_483); +x_485 = l_Lean_Parser_Term_app___elambda__1___closed__2; +x_486 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_486, 0, x_485); +lean_ctor_set(x_486, 1, x_484); +x_487 = lean_array_push(x_469, x_486); +x_488 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__47; +lean_inc(x_459); +x_489 = lean_name_mk_numeral(x_488, x_459); +x_490 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__45; +x_491 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__49; +x_492 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_492, 0, x_462); +lean_ctor_set(x_492, 1, x_490); +lean_ctor_set(x_492, 2, x_489); +lean_ctor_set(x_492, 3, x_491); +x_493 = lean_array_push(x_469, x_492); +x_494 = lean_array_push(x_493, x_471); +x_495 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_495, 0, x_473); +lean_ctor_set(x_495, 1, x_494); +x_496 = lean_array_push(x_469, x_495); +x_497 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__54; +lean_inc(x_459); +x_498 = lean_name_mk_numeral(x_497, x_459); +x_499 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_500 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__57; +x_501 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_501, 0, x_462); +lean_ctor_set(x_501, 1, x_499); +lean_ctor_set(x_501, 2, x_498); +lean_ctor_set(x_501, 3, x_500); +x_502 = lean_array_push(x_469, x_501); +x_503 = lean_array_push(x_502, x_471); +x_504 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_504, 0, x_473); +lean_ctor_set(x_504, 1, x_503); +x_505 = lean_array_push(x_469, x_504); +x_506 = lean_array_push(x_505, x_457); +x_507 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_507, 0, x_485); +lean_ctor_set(x_507, 1, x_506); +x_508 = lean_array_push(x_469, x_507); +x_509 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_510 = lean_name_mk_numeral(x_509, x_459); +x_511 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60; +x_512 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_512, 0, x_462); +lean_ctor_set(x_512, 1, x_511); +lean_ctor_set(x_512, 2, x_510); +lean_ctor_set(x_512, 3, x_465); +x_513 = lean_array_push(x_469, x_512); +x_514 = lean_array_push(x_513, x_471); +x_515 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_515, 0, x_473); +lean_ctor_set(x_515, 1, x_514); +x_516 = lean_array_push(x_508, x_515); +x_517 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_517, 0, x_485); +lean_ctor_set(x_517, 1, x_516); +x_518 = lean_array_push(x_469, x_517); +x_519 = lean_array_push(x_518, x_471); +x_520 = l_Lean_nullKind___closed__2; +x_521 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_521, 0, x_520); +lean_ctor_set(x_521, 1, x_519); +x_522 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; +x_523 = lean_array_push(x_522, x_521); +x_524 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; +x_525 = lean_array_push(x_523, x_524); +x_526 = l_Lean_Parser_Term_paren___elambda__1___closed__1; +x_527 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_527, 0, x_526); +lean_ctor_set(x_527, 1, x_525); +x_528 = l___private_Init_Lean_Elab_Quotation_3__quoteList___main___at___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___spec__2(x_456); +x_529 = lean_ctor_get(x_443, 0); +lean_inc(x_529); +x_530 = lean_ctor_get(x_443, 1); +lean_inc(x_530); +x_531 = lean_ctor_get(x_443, 2); +lean_inc(x_531); +lean_dec(x_443); +x_532 = lean_string_utf8_extract(x_529, x_530, x_531); +lean_dec(x_531); +lean_dec(x_530); +lean_dec(x_529); +x_533 = l_Lean_mkStxStrLit(x_532, x_462); +x_534 = l_Lean_FileMap_ofString___closed__1; +x_535 = lean_array_push(x_534, x_533); +x_536 = l_Lean_Parser_Term_str___elambda__1___closed__2; +x_537 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_537, 0, x_536); +lean_ctor_set(x_537, 1, x_535); +x_538 = lean_array_push(x_496, x_537); +x_539 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_539, 0, x_485); +lean_ctor_set(x_539, 1, x_538); +x_540 = lean_array_push(x_469, x_539); +x_541 = lean_array_push(x_540, x_471); +x_542 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_542, 0, x_520); +lean_ctor_set(x_542, 1, x_541); +x_543 = lean_array_push(x_522, x_542); +x_544 = lean_array_push(x_543, x_524); +x_545 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_545, 0, x_526); +lean_ctor_set(x_545, 1, x_544); +x_546 = lean_array_push(x_487, x_545); +x_547 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_547, 0, x_485); +lean_ctor_set(x_547, 1, x_546); +x_548 = lean_array_push(x_469, x_547); +x_549 = lean_array_push(x_548, x_527); +x_550 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_550, 0, x_485); +lean_ctor_set(x_550, 1, x_549); +x_551 = lean_array_push(x_469, x_550); +x_552 = lean_array_push(x_551, x_528); +x_553 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_553, 0, x_485); +lean_ctor_set(x_553, 1, x_552); +if (lean_is_scalar(x_461)) { + x_554 = lean_alloc_ctor(0, 2, 0); } else { - x_515 = x_456; + x_554 = x_461; } -lean_ctor_set(x_515, 0, x_514); -lean_ctor_set(x_515, 1, x_455); -return x_515; +lean_ctor_set(x_554, 0, x_553); +lean_ctor_set(x_554, 1, x_460); +return x_554; } } } @@ -5409,10 +5474,10 @@ x_37 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_37, 0, x_36); lean_ctor_set(x_37, 1, x_35); x_38 = lean_array_push(x_20, x_37); -x_39 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__44; +x_39 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; lean_inc(x_12); x_40 = lean_name_mk_numeral(x_39, x_12); -x_41 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__43; +x_41 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60; x_42 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_42, 0, x_13); lean_ctor_set(x_42, 1, x_41); @@ -5461,9 +5526,9 @@ x_68 = lean_array_push(x_67, x_22); x_69 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_69, 0, x_47); lean_ctor_set(x_69, 1, x_68); -x_70 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_70 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_71 = lean_array_push(x_70, x_69); -x_72 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_72 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_73 = lean_array_push(x_71, x_72); x_74 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_75 = lean_alloc_ctor(1, 2, 0); @@ -5526,10 +5591,10 @@ x_104 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_104, 0, x_103); lean_ctor_set(x_104, 1, x_102); x_105 = lean_array_push(x_87, x_104); -x_106 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__44; +x_106 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; lean_inc(x_78); x_107 = lean_name_mk_numeral(x_106, x_78); -x_108 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__43; +x_108 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__60; x_109 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_109, 0, x_80); lean_ctor_set(x_109, 1, x_108); @@ -5578,9 +5643,9 @@ x_135 = lean_array_push(x_134, x_89); x_136 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_136, 0, x_114); lean_ctor_set(x_136, 1, x_135); -x_137 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_137 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_138 = lean_array_push(x_137, x_136); -x_139 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_139 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_140 = lean_array_push(x_138, x_139); x_141 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_142 = lean_alloc_ctor(1, 2, 0); @@ -10618,9 +10683,9 @@ x_625 = l_Lean_nullKind___closed__2; x_626 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_626, 0, x_625); lean_ctor_set(x_626, 1, x_624); -x_627 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_627 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_628 = lean_array_push(x_627, x_626); -x_629 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_629 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_630 = lean_array_push(x_628, x_629); x_631 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_632 = lean_alloc_ctor(1, 2, 0); @@ -10959,9 +11024,9 @@ x_804 = l_Lean_nullKind___closed__2; x_805 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_805, 0, x_804); lean_ctor_set(x_805, 1, x_803); -x_806 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_806 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_807 = lean_array_push(x_806, x_805); -x_808 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_808 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_809 = lean_array_push(x_807, x_808); x_810 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_811 = lean_alloc_ctor(1, 2, 0); @@ -11455,9 +11520,9 @@ x_1005 = l_Lean_nullKind___closed__2; x_1006 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_1006, 0, x_1005); lean_ctor_set(x_1006, 1, x_1004); -x_1007 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_1007 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_1008 = lean_array_push(x_1007, x_1006); -x_1009 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_1009 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_1010 = lean_array_push(x_1008, x_1009); x_1011 = l_Lean_Parser_Term_paren___elambda__1___closed__1; x_1012 = lean_alloc_ctor(1, 2, 0); @@ -12607,7 +12672,7 @@ lean_object* _init_l___private_Init_Lean_Elab_Quotation_13__letBindRhss___main__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__53; +x_1 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__42; x_2 = l___private_Init_Lean_Elab_Term_5__expandCDot___closed__4; x_3 = lean_array_push(x_1, x_2); return x_3; @@ -12618,7 +12683,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Init_Lean_Elab_Quotation_13__letBindRhss___main___closed__5; -x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__61; +x_2 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; x_3 = lean_array_push(x_1, x_2); return x_3; } @@ -25926,7 +25991,7 @@ lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_3 = lean_alloc_closure((void*)(l_Lean_Elab_Term_stxQuot_expand___boxed), 3, 1); lean_closure_set(x_3, 0, x_2); x_4 = l_Lean_Elab_Term_oldExpandStxQuot___closed__1; -x_5 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_5 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_5, 0, x_3); lean_closure_set(x_5, 1, x_4); x_6 = l___private_Init_Lean_Elab_Quotation_16__oldRunTermElabM___rarg(x_1, x_5); @@ -26082,7 +26147,7 @@ x_5 = lean_alloc_closure((void*)(l_ReaderT_map___at_Lean_Elab_Term_oldGetPattern lean_closure_set(x_5, 0, x_4); lean_closure_set(x_5, 1, x_3); x_6 = l_Lean_Elab_Term_oldGetPatternVars___closed__2; -x_7 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_7 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_7, 0, x_5); lean_closure_set(x_7, 1, x_6); x_8 = l___private_Init_Lean_Elab_Quotation_16__oldRunTermElabM___rarg(x_1, x_7); @@ -26243,7 +26308,7 @@ lean_closure_set(x_12, 0, x_11); lean_closure_set(x_12, 1, x_10); lean_closure_set(x_12, 2, x_9); x_13 = l_Lean_Elab_Term_oldExpandStxQuot___closed__1; -x_14 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_14 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_14, 0, x_12); lean_closure_set(x_14, 1, x_13); x_15 = l___private_Init_Lean_Elab_Quotation_16__oldRunTermElabM___rarg(x_1, x_14); diff --git a/stage0/stdlib/Init/Lean/Elab/Syntax.c b/stage0/stdlib/Init/Lean/Elab/Syntax.c index 979b60ce78..bf517d69a9 100644 --- a/stage0/stdlib/Init/Lean/Elab/Syntax.c +++ b/stage0/stdlib/Init/Lean/Elab/Syntax.c @@ -19,12 +19,16 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__95; extern lean_object* l_Lean_Parser_Syntax_many___elambda__1___closed__1; lean_object* l_Lean_Elab_Term_getEnv___rarg(lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__2; +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabSyntax___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__79; extern lean_object* l_Lean_Parser_Term_andthen___elambda__1___closed__1; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__3; +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1___closed__4; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__116; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__12; +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isNatLitAux(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_many___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_getOptions(lean_object*, lean_object*); @@ -34,6 +38,7 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__58; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__114; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation(lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__75; +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__3___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabReserve(lean_object*); extern lean_object* l_Lean_Parser_Syntax_try___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Syntax_many1___elambda__1___closed__1; @@ -47,8 +52,11 @@ lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__7; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__92; extern lean_object* l_Lean_Syntax_formatStxAux___main___closed__5; extern lean_object* l___private_Init_Lean_Elab_Quotation_13__letBindRhss___main___closed__9; +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__1; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__36; +extern lean_object* l_Lean_Meta_mkEqTrans___closed__3; +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1___closed__1; extern lean_object* l_Lean_Parser_Syntax_many1___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__104; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__25; @@ -56,13 +64,17 @@ lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabReserve___closed__1 lean_object* l_Lean_Syntax_getIdAt(lean_object*, lean_object*); extern lean_object* l_Lean_nameToExprAux___main___closed__4; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabMacro___closed__3; +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_array_fswap(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Command_runTermElabM___rarg___closed__1; lean_object* l_Lean_Elab_Command_elabSyntax___closed__7; +extern lean_object* l_PersistentHashMap_mkCollisionNode___rarg___closed__1; extern lean_object* l_Lean_Parser_Syntax_orelse___elambda__1___closed__1; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__101; extern lean_object* l_Array_empty___closed__1; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__46; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabReserve___closed__2; +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main(lean_object*, lean_object*); uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__24; lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__8; @@ -84,10 +96,11 @@ lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__51; extern lean_object* l___private_Init_Lean_Elab_TermBinders_10__expandFunBindersAux___main___closed__7; extern lean_object* l_Lean_Parser_Term_num___elambda__1___closed__1; +lean_object* l_Lean_Elab_Command_elabNotation___closed__1; lean_object* l_ReaderT_bind___at___private_Init_Lean_Elab_Quotation_1__quoteName___main___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__20; extern lean_object* l_Lean_Elab_mkMacroAttribute___closed__3; -lean_object* l_Lean_Elab_Command_elabNotation___boxed(lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__4(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabDeclareSyntaxCat___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__81; @@ -98,9 +111,11 @@ extern lean_object* l_Lean_Parser_Syntax_ident___elambda__1___closed__1; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__73; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__98; lean_object* lean_string_utf8_byte_size(lean_object*); +lean_object* l_Lean_mkAtom(lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__20; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__10; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__32; +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__3(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__10; extern lean_object* l_Lean_Parser_Command_mixfix___elambda__1___closed__2; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabSyntax___closed__1; @@ -117,16 +132,18 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__103; lean_object* l_Lean_Elab_Command_addBuiltinCommandElab(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__28; lean_object* l___private_Init_Lean_Elab_Syntax_2__mkParserSeq(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__6___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__123; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__30; lean_object* l___private_Init_Lean_Elab_Quotation_4__quoteOption___at_Lean_Elab_Term_toParserDescrAux___main___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Command_elabNotation___rarg(lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__16; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__49; extern lean_object* l_Lean_Parser_unicodeSymbolFn___rarg___closed__1; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__105; lean_object* l___private_Init_Lean_Elab_Syntax_6__withNoPushLeading___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_filterAux___main___at_Lean_Elab_Command_elabNotation___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__6(lean_object*, lean_object*, lean_object*); lean_object* lean_mk_syntax_ident(lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__115; lean_object* l_Array_umapMAux___main___at_Lean_Elab_Term_toParserDescrAux___main___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -134,7 +151,10 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__85; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__100; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__53; +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__1; +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main___boxed(lean_object*, lean_object*); lean_object* l_Array_umapMAux___main___at_Lean_Elab_Term_toParserDescrAux___main___spec__2(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +extern lean_object* l_Lean_Syntax_getKind___closed__4; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__42; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__112; lean_object* lean_array_fget(lean_object*, lean_object*); @@ -147,15 +167,21 @@ extern lean_object* l_Lean_Parser_Term_id___elambda__1___closed__2; extern lean_object* l_Lean_numLitKind; extern lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__2; +extern lean_object* l_Lean_Parser_Command_strLitPrec___elambda__1___closed__2; extern lean_object* l_Lean_Parser_Syntax_num___elambda__1___closed__1; +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__5___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(lean_object*); +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__87; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__68; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__24; +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1___closed__3; lean_object* l_Lean_Syntax_isStrLit_x3f(lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__6; lean_object* l_Lean_Name_append___main(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_expandNotationItemIntoPattern(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__14; +lean_object* l_Array_shrink___main___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__9; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__40; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__67; @@ -163,7 +189,9 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__83; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__3; lean_object* l___private_Init_Lean_Elab_Syntax_5__withAnyIfNotFirst___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_def___elambda__1___closed__2; +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_declValSimple___elambda__1___closed__2; +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1___closed__5; extern lean_object* l_Lean_Parser_Syntax_paren___elambda__1___closed__1; lean_object* l___private_Init_Lean_Elab_Syntax_4__markAsTrailingParser(lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__16; @@ -173,7 +201,9 @@ lean_object* l_Lean_Elab_Command_elabSyntax___closed__25; extern lean_object* l_Lean_Parser_Command_def___elambda__1___closed__1; lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_optional___elambda__1___closed__1; +extern lean_object* l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; extern lean_object* l_Lean_Elab_Term_mkConst___closed__4; +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__2; extern lean_object* l_Lean_Parser_unquotedSymbolFn___rarg___closed__1; extern lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__4; lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__3; @@ -187,6 +217,7 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__55; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__37; lean_object* l___private_Init_Lean_Elab_Command_1__ioErrorToMessage(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__10; +lean_object* l_Lean_Syntax_getId(lean_object*); lean_object* l_Lean_Elab_Command_adaptExpander(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_mkParserAttributeImpl___closed__1; lean_object* lean_name_mk_string(lean_object*, lean_object*); @@ -197,6 +228,7 @@ lean_object* l_Lean_Elab_Term_throwError___rarg(lean_object*, lean_object*, lean lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__33; lean_object* l_Lean_Elab_Command_elabSyntax___closed__22; extern lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__2; +extern lean_object* l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__1; lean_object* l_Lean_Elab_Term_getCurrMacroScope(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__91; @@ -216,6 +248,7 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__47; lean_object* l_Lean_Elab_Term_toParserDescrAux___main(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__5; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabSyntax___closed__3; +extern lean_object* l_Lean_Parser_Command_identPrec___elambda__1___closed__1; uint8_t l_coeDecidableEq(uint8_t); lean_object* l_Lean_Elab_Command_elabSyntax___closed__14; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__19; @@ -225,11 +258,13 @@ extern lean_object* l_Lean_Parser_Command_attributes___elambda__1___closed__5; lean_object* l_Lean_Elab_Command_elabSyntax___closed__18; lean_object* l_Lean_Elab_Command_elabCommand___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__15; +extern lean_object* l_Lean_Parser_Command_identPrec___elambda__1___closed__2; extern lean_object* l_Lean_Parser_Syntax_cat___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__86; extern lean_object* l_Lean_Parser_Command_attributes___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__25; lean_object* l_Lean_Elab_Command_elabSyntax___closed__3; +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__3(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_sepBy___elambda__1___closed__1; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__52; lean_object* l___private_Init_Lean_Elab_Syntax_4__markAsTrailingParser___rarg(lean_object*); @@ -240,6 +275,7 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__34; extern lean_object* l_Lean_Parser_Command_declModifiers___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__117; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__77; +extern lean_object* l_Lean_Parser_dollarSymbol___elambda__1___rarg___closed__1; extern lean_object* l_Lean_Parser_Command_notation___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabMacro(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_nullKind___closed__2; @@ -249,7 +285,10 @@ extern lean_object* l_Lean_Unhygienic_MonadQuotation___closed__1; extern lean_object* l___private_Init_Lean_Elab_Quotation_4__quoteOption___rarg___lambda__2___closed__8; extern lean_object* l_Lean_Parser_Syntax_lookahead___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Syntax_sepBy1___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_mkTermIdFromIdent(lean_object*); +lean_object* l_Lean_mkAtomFrom(lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabMixfix___closed__3; +extern lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__4; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__108; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__7; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__71; @@ -265,6 +304,7 @@ lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__26; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__102; extern lean_object* l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabSyntax___closed__4; +extern lean_object* l_Lean_Elab_Term_elabArrow___lambda__1___closed__5; lean_object* l_Lean_Elab_Command_elabReserve(lean_object*, lean_object*); lean_object* l_Lean_Name_appendAfter(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__15; @@ -278,19 +318,24 @@ lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabMacro(lean_object*) lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__3; extern lean_object* l_Lean_Parser_Syntax_sepBy1___elambda__1___closed__1; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabMacro___closed__2; +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__5(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Parser_isParserCategory(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_getCurrMacroScope(lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Syntax_7__elabKind___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Elab_Quotation_13__letBindRhss___main___closed__7; +extern lean_object* l_Lean_Elab_Term_elabArrayLit___closed__12; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabMacro___closed__1; +extern lean_object* l_Lean_Syntax_asNode___closed__1; extern lean_object* l_Lean_Parser_Syntax_optional___elambda__1___closed__2; lean_object* l___private_Init_Lean_Elab_Syntax_4__markAsTrailingParser___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_reserve___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabSyntax___closed__8; lean_object* l_Lean_Syntax_getArgs(lean_object*); +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabReserve___closed__3; lean_object* l_Lean_Syntax_getKind(lean_object*); extern lean_object* l_Lean_Parser_Term_match__syntax___elambda__1___closed__2; +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_atom___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__48; lean_object* l_Lean_Elab_Command_elabSyntax___closed__1; @@ -300,6 +345,7 @@ lean_object* l___private_Init_Lean_Elab_Syntax_5__withAnyIfNotFirst___rarg(uint8 lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabDeclareSyntaxCat(lean_object*); extern lean_object* l_Lean_Parser_Term_app___elambda__1___closed__2; lean_object* l_Lean_Parser_mkFreshKind(lean_object*, lean_object*); +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__64; lean_object* l___private_Init_Lean_Elab_Syntax_1__expandOptPrecedence___boxed(lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -312,7 +358,8 @@ lean_object* l_Lean_Elab_Command_elabReserve___rarg(lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabMixfix(lean_object*); lean_object* l_Lean_Elab_Term_toParserDescr(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_str___elambda__1___closed__1; -lean_object* l_Lean_Elab_Command_elabNotation(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabNotation(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_regBuiltinSyntaxParserAttr___closed__3; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__74; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__60; lean_object* l_Lean_mkStxStrLit(lean_object*, lean_object*); @@ -324,6 +371,7 @@ lean_object* l_Lean_Elab_Command_elabSyntax(lean_object*, lean_object*, lean_obj lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__13; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__69; lean_object* l_Lean_Elab_Command_elabSyntax___closed__21; +lean_object* l_Lean_Elab_Command_expandNotationItemIntoPattern___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Command_declareBuiltinCommandElab___closed__3; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__23; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__4; @@ -335,6 +383,7 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__17; lean_object* l_Lean_Elab_Command_elabSyntax___closed__23; lean_object* l___private_Init_Lean_Elab_Syntax_3__getMode___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkOptionalNode___closed__1; +lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__13; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__57; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__122; @@ -358,6 +407,7 @@ lean_object* l_Lean_Elab_Command_elabReserve___boxed(lean_object*, lean_object*) extern lean_object* l_Lean_Syntax_getKind___closed__3; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__4; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabDeclareSyntaxCat___closed__3; +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__27; lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Syntax_2__mkParserSeq___spec__1___closed__9; extern lean_object* l_Lean_Parser_Command_syntaxCat___elambda__1___closed__2; @@ -368,6 +418,7 @@ lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__9; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__6; extern lean_object* l_Lean_Parser_Command_optDeclSig___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabMacro___closed__1; +extern lean_object* l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__99; extern lean_object* l_Lean_Parser_Term_typeSpec___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__11; @@ -385,14 +436,18 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__38; extern lean_object* l_Lean_Parser_Command_macro___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabSyntax___closed__12; extern lean_object* l_Lean_Elab_mkMacroAttribute___closed__2; +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__88; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__1; extern lean_object* l_Lean_Parser_Syntax_sepBy___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabSyntax___closed__26; +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__107; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__72; +extern lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___closed__5; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__96; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__13; +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__41; extern lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__3; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__23; @@ -400,11 +455,14 @@ extern lean_object* l_Lean_Elab_mkMacroAttribute___closed__1; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__44; extern lean_object* l_Lean_Parser_Command_syntax___elambda__1___closed__1; lean_object* l___private_Init_Lean_Elab_Command_7__mkTermState(lean_object*); +lean_object* l_Lean_Elab_Command_expandNotationItemIntoSyntaxItem(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__35; +extern lean_object* l_Lean_Parser_mkAntiquot___closed__2; extern uint8_t l___private_Init_Lean_Elab_Term_4__hasCDot___main___closed__1; extern lean_object* l_Lean_Parser_Term_orelse___elambda__1___closed__1; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__2; lean_object* lean_name_mk_numeral(lean_object*, lean_object*); +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_try___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__70; @@ -422,8 +480,10 @@ lean_object* l___private_Init_Lean_Elab_Quotation_4__quoteOption___at_Lean_Elab_ lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__28; lean_object* l_Lean_Elab_Command_elabMacro___lambda__1___closed__14; uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_expandNotationItemIntoSyntaxItem___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__59; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__82; +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1___closed__6; extern lean_object* l_Lean_Parser_Command_declId___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_logTrace(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Syntax_1__expandOptPrecedence(lean_object* x_1) { @@ -9186,35 +9246,1561 @@ x_5 = l_Lean_Elab_Command_addBuiltinCommandElab(x_2, x_3, x_4, x_1); return x_5; } } -lean_object* l_Lean_Elab_Command_elabNotation___rarg(lean_object* x_1) { +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_2; lean_object* x_3; -x_2 = lean_box(0); -x_3 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3, 0, x_2); -lean_ctor_set(x_3, 1, x_1); +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_3); +x_5 = lean_nat_dec_lt(x_2, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = l_Array_empty___closed__1; +x_7 = x_3; +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_8 = lean_array_fget(x_3, x_2); +x_9 = lean_box(0); +x_10 = x_9; +x_11 = lean_array_fset(x_3, x_2, x_10); +lean_inc(x_8); +x_12 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main(x_1, x_8); +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_add(x_2, x_13); +x_15 = x_12; +lean_dec(x_8); +x_16 = lean_array_fset(x_11, x_2, x_15); +lean_dec(x_2); +x_2 = x_14; +x_3 = x_16; +goto _start; +} +} +} +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_3); +x_5 = lean_nat_dec_lt(x_2, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = l_Array_empty___closed__1; +x_7 = x_3; +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_8 = lean_array_fget(x_3, x_2); +x_9 = lean_box(0); +x_10 = x_9; +x_11 = lean_array_fset(x_3, x_2, x_10); +lean_inc(x_8); +x_12 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main(x_1, x_8); +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_add(x_2, x_13); +x_15 = x_12; +lean_dec(x_8); +x_16 = lean_array_fset(x_11, x_2, x_15); +lean_dec(x_2); +x_2 = x_14; +x_3 = x_16; +goto _start; +} +} +} +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_3); +x_5 = lean_nat_dec_lt(x_2, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = l_Array_empty___closed__1; +x_7 = x_3; +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_8 = lean_array_fget(x_3, x_2); +x_9 = lean_box(0); +x_10 = x_9; +x_11 = lean_array_fset(x_3, x_2, x_10); +lean_inc(x_8); +x_12 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main(x_1, x_8); +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_add(x_2, x_13); +x_15 = x_12; +lean_dec(x_8); +x_16 = lean_array_fset(x_11, x_2, x_15); +lean_dec(x_2); +x_2 = x_14; +x_3 = x_16; +goto _start; +} +} +} +lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_lt(x_3, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; +lean_dec(x_3); +x_6 = lean_box(0); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_array_fget(x_2, x_3); +x_8 = l_Lean_Syntax_getId(x_7); +lean_dec(x_7); +x_9 = l_Lean_Syntax_getId(x_1); +x_10 = lean_name_eq(x_8, x_9); +lean_dec(x_9); +lean_dec(x_8); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_3, x_11); +lean_dec(x_3); +x_3 = x_12; +goto _start; +} +else +{ +lean_object* x_14; +x_14 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_14, 0, x_3); +return x_14; +} +} +} +} +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_3); +x_5 = lean_nat_dec_lt(x_2, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = l_Array_empty___closed__1; +x_7 = x_3; +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_8 = lean_array_fget(x_3, x_2); +x_9 = lean_box(0); +x_10 = x_9; +x_11 = lean_array_fset(x_3, x_2, x_10); +lean_inc(x_8); +x_12 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main(x_1, x_8); +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_add(x_2, x_13); +x_15 = x_12; +lean_dec(x_8); +x_16 = lean_array_fset(x_11, x_2, x_15); +lean_dec(x_2); +x_2 = x_14; +x_3 = x_16; +goto _start; +} +} +} +lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__6(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_lt(x_3, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; +lean_dec(x_3); +x_6 = lean_box(0); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_array_fget(x_2, x_3); +x_8 = l_Lean_Syntax_getId(x_7); +lean_dec(x_7); +x_9 = l_Lean_Syntax_getId(x_1); +x_10 = lean_name_eq(x_8, x_9); +lean_dec(x_9); +lean_dec(x_8); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_3, x_11); +lean_dec(x_3); +x_3 = x_12; +goto _start; +} +else +{ +lean_object* x_14; +x_14 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_14, 0, x_3); +return x_14; +} +} +} +} +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_7 = l_Array_empty___closed__1; +x_8 = lean_array_push(x_7, x_1); +x_9 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_9, 0, x_2); +lean_ctor_set(x_9, 1, x_7); +x_10 = lean_array_push(x_8, x_9); +x_11 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_11, 0, x_3); +lean_ctor_set(x_11, 1, x_10); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_6); +return x_12; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_dollarSymbol___elambda__1___rarg___closed__1; +x_2 = l_Lean_mkAtom(x_1); +return x_2; +} +} +lean_object* _init_l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_PersistentHashMap_mkCollisionNode___rarg___closed__1; +x_2 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__1; +x_3 = lean_array_push(x_1, x_2); return x_3; } } -lean_object* l_Lean_Elab_Command_elabNotation(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabNotation___rarg), 1, 0); -return x_3; +uint8_t x_3; lean_object* x_69; uint8_t x_70; +x_69 = l_Lean_Parser_Term_id___elambda__1___closed__2; +lean_inc(x_2); +x_70 = l_Lean_Syntax_isOfKind(x_2, x_69); +if (x_70 == 0) +{ +uint8_t x_71; +x_71 = 0; +x_3 = x_71; +goto block_68; +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; uint8_t x_75; +x_72 = l_Lean_Syntax_getArgs(x_2); +x_73 = lean_array_get_size(x_72); +lean_dec(x_72); +x_74 = lean_unsigned_to_nat(2u); +x_75 = lean_nat_dec_eq(x_73, x_74); +lean_dec(x_73); +x_3 = x_75; +goto block_68; +} +block_68: +{ +uint8_t x_4; +x_4 = l_coeDecidableEq(x_3); +if (x_4 == 0) +{ +if (lean_obj_tag(x_2) == 1) +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_2); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_ctor_get(x_2, 1); +x_7 = lean_unsigned_to_nat(0u); +x_8 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__1(x_1, x_7, x_6); +lean_ctor_set(x_2, 1, x_8); +return x_2; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_2, 0); +x_10 = lean_ctor_get(x_2, 1); +lean_inc(x_10); +lean_inc(x_9); +lean_dec(x_2); +x_11 = lean_unsigned_to_nat(0u); +x_12 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__1(x_1, x_11, x_10); +x_13 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_13, 0, x_9); +lean_ctor_set(x_13, 1, x_12); +return x_13; } } -lean_object* l_Lean_Elab_Command_elabNotation___boxed(lean_object* x_1, lean_object* x_2) { +else +{ +return x_2; +} +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; uint8_t x_18; +x_14 = lean_unsigned_to_nat(0u); +x_15 = l_Lean_Syntax_getArg(x_2, x_14); +x_16 = l_Lean_Syntax_getKind___closed__4; +lean_inc(x_15); +x_17 = l_Lean_Syntax_isOfKind(x_15, x_16); +x_18 = l_coeDecidableEq(x_17); +if (x_18 == 0) +{ +lean_dec(x_15); +if (lean_obj_tag(x_2) == 1) +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_2); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; +x_20 = lean_ctor_get(x_2, 1); +x_21 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__2(x_1, x_14, x_20); +lean_ctor_set(x_2, 1, x_21); +return x_2; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_22 = lean_ctor_get(x_2, 0); +x_23 = lean_ctor_get(x_2, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_2); +x_24 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__2(x_1, x_14, x_23); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_22); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +else +{ +return x_2; +} +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_43; uint8_t x_44; +x_26 = lean_unsigned_to_nat(1u); +x_27 = l_Lean_Syntax_getArg(x_2, x_26); +x_43 = l_Lean_nullKind___closed__2; +lean_inc(x_27); +x_44 = l_Lean_Syntax_isOfKind(x_27, x_43); +if (x_44 == 0) +{ +uint8_t x_45; +lean_dec(x_27); +x_45 = l___private_Init_Lean_Elab_Term_4__hasCDot___main___closed__1; +if (x_45 == 0) +{ +lean_dec(x_15); +if (lean_obj_tag(x_2) == 1) +{ +uint8_t x_46; +x_46 = !lean_is_exclusive(x_2); +if (x_46 == 0) +{ +lean_object* x_47; lean_object* x_48; +x_47 = lean_ctor_get(x_2, 1); +x_48 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__3(x_1, x_14, x_47); +lean_ctor_set(x_2, 1, x_48); +return x_2; +} +else +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_49 = lean_ctor_get(x_2, 0); +x_50 = lean_ctor_get(x_2, 1); +lean_inc(x_50); +lean_inc(x_49); +lean_dec(x_2); +x_51 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__3(x_1, x_14, x_50); +x_52 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_52, 0, x_49); +lean_ctor_set(x_52, 1, x_51); +return x_52; +} +} +else +{ +return x_2; +} +} +else +{ +lean_object* x_53; +x_53 = l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__4(x_15, x_1, x_14); +if (lean_obj_tag(x_53) == 0) +{ +lean_dec(x_15); +return x_2; +} +else +{ +lean_object* x_54; +lean_dec(x_53); +lean_dec(x_2); +x_54 = lean_box(0); +x_28 = x_54; +goto block_42; +} +} +} +else +{ +lean_object* x_55; lean_object* x_56; uint8_t x_57; uint8_t x_58; +x_55 = l_Lean_Syntax_getArgs(x_27); +lean_dec(x_27); +x_56 = lean_array_get_size(x_55); +lean_dec(x_55); +x_57 = lean_nat_dec_eq(x_56, x_14); +lean_dec(x_56); +x_58 = l_coeDecidableEq(x_57); +if (x_58 == 0) +{ +lean_dec(x_15); +if (lean_obj_tag(x_2) == 1) +{ +uint8_t x_59; +x_59 = !lean_is_exclusive(x_2); +if (x_59 == 0) +{ +lean_object* x_60; lean_object* x_61; +x_60 = lean_ctor_get(x_2, 1); +x_61 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__5(x_1, x_14, x_60); +lean_ctor_set(x_2, 1, x_61); +return x_2; +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_62 = lean_ctor_get(x_2, 0); +x_63 = lean_ctor_get(x_2, 1); +lean_inc(x_63); +lean_inc(x_62); +lean_dec(x_2); +x_64 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__5(x_1, x_14, x_63); +x_65 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_65, 0, x_62); +lean_ctor_set(x_65, 1, x_64); +return x_65; +} +} +else +{ +return x_2; +} +} +else +{ +lean_object* x_66; +x_66 = l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__6(x_15, x_1, x_14); +if (lean_obj_tag(x_66) == 0) +{ +lean_dec(x_15); +return x_2; +} +else +{ +lean_object* x_67; +lean_dec(x_66); +lean_dec(x_2); +x_67 = lean_box(0); +x_28 = x_67; +goto block_42; +} +} +} +block_42: +{ +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_40; lean_object* x_41; +lean_dec(x_28); +x_29 = l_Lean_nullKind___closed__2; +x_30 = l_Lean_Parser_Term_id___elambda__1___closed__2; +x_31 = lean_alloc_closure((void*)(l___private_Init_Lean_Elab_Syntax_8__antiquote___main___lambda__1___boxed), 6, 3); +lean_closure_set(x_31, 0, x_15); +lean_closure_set(x_31, 1, x_29); +lean_closure_set(x_31, 2, x_30); +x_32 = l_Lean_Unhygienic_MonadQuotation___closed__1; +x_33 = lean_alloc_closure((void*)(l_ReaderT_bind___at___private_Init_Lean_Elab_Quotation_1__quoteName___main___spec__1___rarg), 4, 2); +lean_closure_set(x_33, 0, x_32); +lean_closure_set(x_33, 1, x_31); +x_34 = l_Lean_Unhygienic_run___rarg(x_33); +x_35 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__2; +x_36 = lean_array_push(x_35, x_34); +x_37 = l_Lean_Syntax_asNode___closed__1; +x_38 = lean_array_push(x_36, x_37); +x_39 = lean_array_push(x_38, x_37); +x_40 = l_Lean_Parser_mkAntiquot___closed__2; +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +return x_41; +} +} +} +} +} +} +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_3; -x_3 = l_Lean_Elab_Command_elabNotation(x_1, x_2); +lean_object* x_4; +x_4 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__1(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__2(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__3(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__4(x_1, x_2, x_3); lean_dec(x_2); lean_dec(x_1); +return x_4; +} +} +lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__5(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__6(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_7; +} +} +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___main___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main(x_1, x_2); +lean_dec(x_1); return x_3; } } +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main(x_1, x_2); +return x_3; +} +} +lean_object* l___private_Init_Lean_Elab_Syntax_8__antiquote___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l___private_Init_Lean_Elab_Syntax_8__antiquote(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Command_expandNotationItemIntoSyntaxItem(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; +lean_inc(x_1); +x_4 = l_Lean_Syntax_getKind(x_1); +x_5 = l_Lean_Parser_Command_identPrec___elambda__1___closed__2; +x_6 = lean_name_eq(x_4, x_5); +if (x_6 == 0) +{ +lean_object* x_7; uint8_t x_8; +x_7 = l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed__2; +x_8 = lean_name_eq(x_4, x_7); +if (x_8 == 0) +{ +lean_object* x_9; uint8_t x_10; +x_9 = l_Lean_Parser_Command_strLitPrec___elambda__1___closed__2; +x_10 = lean_name_eq(x_4, x_9); +lean_dec(x_4); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +lean_dec(x_1); +x_11 = lean_box(1); +x_12 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_3); +return x_12; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = l_Lean_Syntax_getArgs(x_1); +lean_dec(x_1); +x_14 = l_Lean_Parser_Syntax_atom___elambda__1___closed__2; +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_3); +return x_16; +} +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_dec(x_4); +x_17 = lean_unsigned_to_nat(0u); +x_18 = l_Lean_Syntax_getArg(x_1, x_17); +x_19 = lean_unsigned_to_nat(1u); +x_20 = l_Lean_Syntax_getArg(x_18, x_19); +lean_dec(x_18); +if (lean_obj_tag(x_20) == 2) +{ +uint8_t x_21; +x_21 = !lean_is_exclusive(x_20); +if (x_21 == 0) +{ +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_22 = lean_ctor_get(x_20, 0); +x_23 = lean_ctor_get(x_20, 1); +x_24 = l_Lean_mkStxStrLit(x_23, x_22); +x_25 = l_Lean_Syntax_getArg(x_1, x_19); +lean_dec(x_1); +x_26 = l_Lean_Meta_mkEqTrans___closed__3; +x_27 = lean_array_push(x_26, x_24); +x_28 = lean_array_push(x_27, x_25); +x_29 = l_Lean_Parser_Syntax_atom___elambda__1___closed__2; +lean_ctor_set_tag(x_20, 1); +lean_ctor_set(x_20, 1, x_28); +lean_ctor_set(x_20, 0, x_29); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_20); +lean_ctor_set(x_30, 1, x_3); +return x_30; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_31 = lean_ctor_get(x_20, 0); +x_32 = lean_ctor_get(x_20, 1); +lean_inc(x_32); +lean_inc(x_31); +lean_dec(x_20); +x_33 = l_Lean_mkStxStrLit(x_32, x_31); +x_34 = l_Lean_Syntax_getArg(x_1, x_19); +lean_dec(x_1); +x_35 = l_Lean_Meta_mkEqTrans___closed__3; +x_36 = lean_array_push(x_35, x_33); +x_37 = lean_array_push(x_36, x_34); +x_38 = l_Lean_Parser_Syntax_atom___elambda__1___closed__2; +x_39 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_37); +x_40 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_3); +return x_40; +} +} +else +{ +lean_object* x_41; lean_object* x_42; +lean_dec(x_20); +lean_dec(x_1); +x_41 = lean_box(1); +x_42 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_42, 0, x_41); +lean_ctor_set(x_42, 1, x_3); +return x_42; +} +} +} +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; lean_object* x_52; +lean_dec(x_4); +x_43 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4; +x_44 = l_Lean_mkIdentFrom(x_1, x_43); +x_45 = lean_unsigned_to_nat(1u); +x_46 = l_Lean_Syntax_getArg(x_1, x_45); +lean_dec(x_1); +x_47 = l_Lean_Meta_mkEqTrans___closed__3; +x_48 = lean_array_push(x_47, x_44); +x_49 = lean_array_push(x_48, x_46); +x_50 = l_Lean_Parser_Syntax_cat___elambda__1___closed__2; +x_51 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_51, 0, x_50); +lean_ctor_set(x_51, 1, x_49); +x_52 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_3); +return x_52; +} +} +} +lean_object* l_Lean_Elab_Command_expandNotationItemIntoSyntaxItem___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Command_expandNotationItemIntoSyntaxItem(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Lean_Elab_Command_expandNotationItemIntoPattern(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; +lean_inc(x_1); +x_4 = l_Lean_Syntax_getKind(x_1); +x_5 = l_Lean_Parser_Command_identPrec___elambda__1___closed__2; +x_6 = lean_name_eq(x_4, x_5); +if (x_6 == 0) +{ +lean_object* x_7; uint8_t x_8; +x_7 = l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed__2; +x_8 = lean_name_eq(x_4, x_7); +if (x_8 == 0) +{ +lean_object* x_9; uint8_t x_10; +x_9 = l_Lean_Parser_Command_strLitPrec___elambda__1___closed__2; +x_10 = lean_name_eq(x_4, x_9); +lean_dec(x_4); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +lean_dec(x_1); +x_11 = lean_box(1); +x_12 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_3); +return x_12; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_unsigned_to_nat(0u); +x_14 = l_Lean_Syntax_getArg(x_1, x_13); +x_15 = l_Lean_Syntax_isStrLit_x3f(x_14); +lean_dec(x_14); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; +lean_dec(x_1); +x_16 = lean_box(1); +x_17 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_3); +return x_17; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_15, 0); +lean_inc(x_18); +lean_dec(x_15); +x_19 = l_Lean_mkAtomFrom(x_1, x_18); +lean_dec(x_1); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_3); +return x_20; +} +} +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_dec(x_4); +x_21 = lean_unsigned_to_nat(0u); +x_22 = l_Lean_Syntax_getArg(x_1, x_21); +lean_dec(x_1); +x_23 = lean_unsigned_to_nat(1u); +x_24 = l_Lean_Syntax_getArg(x_22, x_23); +lean_dec(x_22); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_3); +return x_25; +} +} +else +{ +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_dec(x_4); +x_26 = lean_unsigned_to_nat(0u); +x_27 = l_Lean_Syntax_getArg(x_1, x_26); +lean_dec(x_1); +x_28 = l_Lean_Elab_Term_mkTermIdFromIdent(x_27); +x_29 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__2; +x_30 = lean_array_push(x_29, x_28); +x_31 = l_Lean_Syntax_asNode___closed__1; +x_32 = lean_array_push(x_30, x_31); +x_33 = lean_array_push(x_32, x_31); +x_34 = l_Lean_Parser_mkAntiquot___closed__2; +x_35 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_33); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_35); +lean_ctor_set(x_36, 1, x_3); +return x_36; +} +} +} +lean_object* l_Lean_Elab_Command_expandNotationItemIntoPattern___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Command_expandNotationItemIntoPattern(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_1, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_dec(x_1); +x_7 = l_Array_empty___closed__1; +x_8 = x_2; +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_4); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_10 = lean_array_fget(x_2, x_1); +x_11 = lean_box(0); +x_12 = x_11; +x_13 = lean_array_fset(x_2, x_1, x_12); +lean_inc(x_10); +x_14 = l_Lean_Elab_Command_expandNotationItemIntoSyntaxItem(x_10, x_3, x_4); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +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_unsigned_to_nat(1u); +x_18 = lean_nat_add(x_1, x_17); +x_19 = x_15; +lean_dec(x_10); +x_20 = lean_array_fset(x_13, x_1, x_19); +lean_dec(x_1); +x_1 = x_18; +x_2 = x_20; +x_4 = x_16; +goto _start; +} +else +{ +uint8_t x_22; +lean_dec(x_13); +lean_dec(x_10); +lean_dec(x_1); +x_22 = !lean_is_exclusive(x_14); +if (x_22 == 0) +{ +return x_14; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_14, 0); +x_24 = lean_ctor_get(x_14, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_14); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +} +} +lean_object* l_Array_filterAux___main___at_Lean_Elab_Command_elabNotation___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_3, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_object* x_7; +lean_dec(x_3); +lean_dec(x_1); +x_7 = l_Array_shrink___main___rarg(x_2, x_4); +lean_dec(x_4); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_8 = lean_array_fget(x_2, x_3); +x_9 = l_Lean_Syntax_getKind(x_8); +x_10 = l_Lean_Parser_Command_identPrec___elambda__1___closed__1; +lean_inc(x_1); +x_11 = lean_name_mk_string(x_1, x_10); +x_12 = lean_name_eq(x_9, x_11); +lean_dec(x_11); +lean_dec(x_9); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_add(x_3, x_13); +lean_dec(x_3); +x_3 = x_14; +goto _start; +} +else +{ +uint8_t x_16; +x_16 = lean_nat_dec_lt(x_4, x_3); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_add(x_3, x_17); +lean_dec(x_3); +x_19 = lean_nat_add(x_4, x_17); +lean_dec(x_4); +x_3 = x_18; +x_4 = x_19; +goto _start; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_21 = lean_array_fswap(x_2, x_3, x_4); +x_22 = lean_unsigned_to_nat(1u); +x_23 = lean_nat_add(x_3, x_22); +lean_dec(x_3); +x_24 = lean_nat_add(x_4, x_22); +lean_dec(x_4); +x_2 = x_21; +x_3 = x_23; +x_4 = x_24; +goto _start; +} +} +} +} +} +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__3(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_array_get_size(x_2); +x_4 = lean_nat_dec_lt(x_1, x_3); +lean_dec(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_1); +x_5 = l_Array_empty___closed__1; +x_6 = x_2; +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; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_7 = lean_array_fget(x_2, x_1); +x_8 = lean_box(0); +x_9 = x_8; +x_10 = lean_array_fset(x_2, x_1, x_9); +x_11 = lean_unsigned_to_nat(0u); +x_12 = l_Lean_Syntax_getArg(x_7, x_11); +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_add(x_1, x_13); +x_15 = x_12; +lean_dec(x_7); +x_16 = lean_array_fset(x_10, x_1, x_15); +lean_dec(x_1); +x_1 = x_14; +x_2 = x_16; +goto _start; +} +} +} +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_1, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_dec(x_1); +x_7 = l_Array_empty___closed__1; +x_8 = x_2; +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_4); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_10 = lean_array_fget(x_2, x_1); +x_11 = lean_box(0); +x_12 = x_11; +x_13 = lean_array_fset(x_2, x_1, x_12); +lean_inc(x_10); +x_14 = l_Lean_Elab_Command_expandNotationItemIntoPattern(x_10, x_3, x_4); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +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_unsigned_to_nat(1u); +x_18 = lean_nat_add(x_1, x_17); +x_19 = x_15; +lean_dec(x_10); +x_20 = lean_array_fset(x_13, x_1, x_19); +lean_dec(x_1); +x_1 = x_18; +x_2 = x_20; +x_4 = x_16; +goto _start; +} +else +{ +uint8_t x_22; +lean_dec(x_13); +lean_dec(x_10); +lean_dec(x_1); +x_22 = !lean_is_exclusive(x_14); +if (x_22 == 0) +{ +return x_14; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_14, 0); +x_24 = lean_ctor_get(x_14, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_14); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +} +} +lean_object* _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_regBuiltinSyntaxParserAttr___closed__3; +x_3 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Array_empty___closed__1; +x_2 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__1; +x_3 = lean_array_push(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Command_macro___elambda__1___closed__1; +x_3 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Array_empty___closed__1; +x_2 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__3; +x_3 = lean_array_push(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__5; +x_3 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Array_empty___closed__1; +x_2 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__5; +x_3 = lean_array_push(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; lean_object* x_136; uint8_t x_137; +x_136 = l_Lean_Parser_Command_notation___elambda__1___closed__2; +lean_inc(x_1); +x_137 = l_Lean_Syntax_isOfKind(x_1, x_136); +if (x_137 == 0) +{ +uint8_t x_138; +x_138 = 0; +x_4 = x_138; +goto block_135; +} +else +{ +lean_object* x_139; lean_object* x_140; lean_object* x_141; uint8_t x_142; +x_139 = l_Lean_Syntax_getArgs(x_1); +x_140 = lean_array_get_size(x_139); +lean_dec(x_139); +x_141 = lean_unsigned_to_nat(4u); +x_142 = lean_nat_dec_eq(x_140, x_141); +lean_dec(x_140); +x_4 = x_142; +goto block_135; +} +block_135: +{ +uint8_t x_5; +x_5 = l_coeDecidableEq(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_1); +x_6 = lean_box(1); +x_7 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_7, 0, x_6); +lean_ctor_set(x_7, 1, x_3); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_8 = lean_unsigned_to_nat(1u); +x_9 = l_Lean_Syntax_getArg(x_1, x_8); +x_10 = lean_unsigned_to_nat(3u); +x_11 = l_Lean_Syntax_getArg(x_1, x_10); +x_12 = l_Lean_Syntax_getArgs(x_9); +lean_dec(x_9); +x_13 = lean_unsigned_to_nat(0u); +lean_inc(x_12); +x_14 = l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__1(x_13, x_12, x_2, x_3); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +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 = l_Lean_Parser_regBuiltinTermParserAttr___closed__4; +x_18 = l_Lean_mkIdentFrom(x_1, x_17); +x_19 = l___regBuiltinParser_Lean_Parser_Command_antiquot___closed__2; +lean_inc(x_12); +x_20 = l_Array_filterAux___main___at_Lean_Elab_Command_elabNotation___spec__2(x_19, x_12, x_13, x_13); +x_21 = l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__3(x_13, x_20); +x_22 = l___private_Init_Lean_Elab_Syntax_8__antiquote___main(x_21, x_11); +lean_dec(x_21); +x_23 = l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__4(x_13, x_12, x_2, x_16); +if (lean_obj_tag(x_23) == 0) +{ +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; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = l_Lean_Elab_Command_getCurrMacroScope(x_2, x_25); +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = l_Lean_Elab_Command_elabSyntax___closed__14; +x_30 = lean_name_mk_numeral(x_29, x_27); +lean_inc(x_30); +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_24); +x_32 = l_Lean_Elab_Command_getCurrMacroScope(x_2, x_28); +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 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; +x_34 = lean_ctor_get(x_32, 0); +lean_dec(x_34); +x_35 = l_Lean_mkIdentFrom(x_1, x_30); +lean_dec(x_1); +x_36 = l_Lean_Elab_Term_elabArrayLit___closed__12; +x_37 = lean_array_push(x_36, x_35); +x_38 = l_Lean_Elab_Term_elabArrayLit___closed__13; +x_39 = lean_array_push(x_37, x_38); +x_40 = l_Lean_nullKind___closed__2; +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +x_42 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__2; +x_43 = lean_array_push(x_42, x_41); +x_44 = l_Array_empty___closed__1; +x_45 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_15, x_15, x_13, x_44); +lean_dec(x_15); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_40); +lean_ctor_set(x_46, 1, x_45); +x_47 = lean_array_push(x_43, x_46); +x_48 = l_Lean_Elab_Term_elabArrow___lambda__1___closed__5; +x_49 = lean_array_push(x_47, x_48); +x_50 = lean_array_push(x_49, x_18); +x_51 = l_Lean_Parser_Command_syntax___elambda__1___closed__1; +x_52 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_50); +x_53 = lean_array_push(x_44, x_52); +x_54 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__6; +x_55 = lean_array_push(x_54, x_31); +x_56 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; +x_57 = lean_array_push(x_55, x_56); +x_58 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_58); +lean_ctor_set(x_59, 1, x_57); +x_60 = lean_array_push(x_44, x_59); +x_61 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_61, 0, x_40); +lean_ctor_set(x_61, 1, x_60); +x_62 = l___private_Init_Lean_Elab_TermBinders_10__expandFunBindersAux___main___closed__7; +x_63 = lean_array_push(x_62, x_61); +x_64 = l_Lean_Elab_Term_expandCDot_x3f___closed__3; +x_65 = lean_array_push(x_63, x_64); +x_66 = lean_array_push(x_54, x_22); +x_67 = lean_array_push(x_66, x_56); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_58); +lean_ctor_set(x_68, 1, x_67); +x_69 = lean_array_push(x_65, x_68); +x_70 = l_Lean_Parser_Term_matchAlt___elambda__1___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 = lean_array_push(x_44, x_71); +x_73 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_73, 0, x_40); +lean_ctor_set(x_73, 1, x_72); +x_74 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__4; +x_75 = lean_array_push(x_74, x_73); +x_76 = l_Lean_Parser_Command_macro___elambda__1___closed__2; +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_53, x_77); +x_79 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_79, 0, x_40); +lean_ctor_set(x_79, 1, x_78); +lean_ctor_set(x_32, 0, x_79); +return x_32; +} +else +{ +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; lean_object* x_125; lean_object* x_126; +x_80 = lean_ctor_get(x_32, 1); +lean_inc(x_80); +lean_dec(x_32); +x_81 = l_Lean_mkIdentFrom(x_1, x_30); +lean_dec(x_1); +x_82 = l_Lean_Elab_Term_elabArrayLit___closed__12; +x_83 = lean_array_push(x_82, x_81); +x_84 = l_Lean_Elab_Term_elabArrayLit___closed__13; +x_85 = lean_array_push(x_83, x_84); +x_86 = l_Lean_nullKind___closed__2; +x_87 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_87, 0, x_86); +lean_ctor_set(x_87, 1, x_85); +x_88 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__2; +x_89 = lean_array_push(x_88, x_87); +x_90 = l_Array_empty___closed__1; +x_91 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_15, x_15, x_13, x_90); +lean_dec(x_15); +x_92 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_92, 0, x_86); +lean_ctor_set(x_92, 1, x_91); +x_93 = lean_array_push(x_89, x_92); +x_94 = l_Lean_Elab_Term_elabArrow___lambda__1___closed__5; +x_95 = lean_array_push(x_93, x_94); +x_96 = lean_array_push(x_95, x_18); +x_97 = l_Lean_Parser_Command_syntax___elambda__1___closed__1; +x_98 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_98, 0, x_97); +lean_ctor_set(x_98, 1, x_96); +x_99 = lean_array_push(x_90, x_98); +x_100 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__6; +x_101 = lean_array_push(x_100, x_31); +x_102 = l___private_Init_Lean_Elab_Quotation_6__quoteSyntax___main___closed__50; +x_103 = lean_array_push(x_101, x_102); +x_104 = l_Lean_Parser_Term_stxQuot___elambda__1___closed__2; +x_105 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_105, 0, x_104); +lean_ctor_set(x_105, 1, x_103); +x_106 = lean_array_push(x_90, x_105); +x_107 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_107, 0, x_86); +lean_ctor_set(x_107, 1, x_106); +x_108 = l___private_Init_Lean_Elab_TermBinders_10__expandFunBindersAux___main___closed__7; +x_109 = lean_array_push(x_108, x_107); +x_110 = l_Lean_Elab_Term_expandCDot_x3f___closed__3; +x_111 = lean_array_push(x_109, x_110); +x_112 = lean_array_push(x_100, x_22); +x_113 = lean_array_push(x_112, x_102); +x_114 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_114, 0, x_104); +lean_ctor_set(x_114, 1, x_113); +x_115 = lean_array_push(x_111, x_114); +x_116 = l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; +x_117 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_117, 0, x_116); +lean_ctor_set(x_117, 1, x_115); +x_118 = lean_array_push(x_90, x_117); +x_119 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_119, 0, x_86); +lean_ctor_set(x_119, 1, x_118); +x_120 = l_Lean_Elab_Command_elabNotation___lambda__1___closed__4; +x_121 = lean_array_push(x_120, x_119); +x_122 = l_Lean_Parser_Command_macro___elambda__1___closed__2; +x_123 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_123, 0, x_122); +lean_ctor_set(x_123, 1, x_121); +x_124 = lean_array_push(x_99, x_123); +x_125 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_125, 0, x_86); +lean_ctor_set(x_125, 1, x_124); +x_126 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_126, 0, x_125); +lean_ctor_set(x_126, 1, x_80); +return x_126; +} +} +else +{ +uint8_t x_127; +lean_dec(x_22); +lean_dec(x_18); +lean_dec(x_15); +lean_dec(x_1); +x_127 = !lean_is_exclusive(x_23); +if (x_127 == 0) +{ +return x_23; +} +else +{ +lean_object* x_128; lean_object* x_129; lean_object* x_130; +x_128 = lean_ctor_get(x_23, 0); +x_129 = lean_ctor_get(x_23, 1); +lean_inc(x_129); +lean_inc(x_128); +lean_dec(x_23); +x_130 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_130, 0, x_128); +lean_ctor_set(x_130, 1, x_129); +return x_130; +} +} +} +else +{ +uint8_t x_131; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_1); +x_131 = !lean_is_exclusive(x_14); +if (x_131 == 0) +{ +return x_14; +} +else +{ +lean_object* x_132; lean_object* x_133; lean_object* x_134; +x_132 = lean_ctor_get(x_14, 0); +x_133 = lean_ctor_get(x_14, 1); +lean_inc(x_133); +lean_inc(x_132); +lean_dec(x_14); +x_134 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_134, 0, x_132); +lean_ctor_set(x_134, 1, x_133); +return x_134; +} +} +} +} +} +} +lean_object* _init_l_Lean_Elab_Command_elabNotation___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabNotation___lambda__1___boxed), 3, 0); +return x_1; +} +} +lean_object* l_Lean_Elab_Command_elabNotation(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_Elab_Command_elabNotation___closed__1; +x_5 = l_Lean_Elab_Command_adaptExpander(x_4, x_1, x_2, x_3); +return x_5; +} +} +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_3); +return x_5; +} +} +lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__4(x_1, x_2, x_3, x_4); +lean_dec(x_3); +return x_5; +} +} +lean_object* l_Lean_Elab_Command_elabNotation___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Command_elabNotation___lambda__1(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} lean_object* _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__1() { _start: { @@ -9237,7 +10823,7 @@ lean_object* _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___cl _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabNotation___boxed), 2, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabNotation), 3, 0); return x_1; } } @@ -9690,6 +11276,24 @@ lean_mark_persistent(l___regBuiltinCommandElab_Lean_Elab_Command_elabReserve___c res = l___regBuiltinCommandElab_Lean_Elab_Command_elabReserve(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__1 = _init_l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__1(); +lean_mark_persistent(l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__1); +l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__2 = _init_l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__2(); +lean_mark_persistent(l___private_Init_Lean_Elab_Syntax_8__antiquote___main___closed__2); +l_Lean_Elab_Command_elabNotation___lambda__1___closed__1 = _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Elab_Command_elabNotation___lambda__1___closed__1); +l_Lean_Elab_Command_elabNotation___lambda__1___closed__2 = _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_Elab_Command_elabNotation___lambda__1___closed__2); +l_Lean_Elab_Command_elabNotation___lambda__1___closed__3 = _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Elab_Command_elabNotation___lambda__1___closed__3); +l_Lean_Elab_Command_elabNotation___lambda__1___closed__4 = _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Elab_Command_elabNotation___lambda__1___closed__4); +l_Lean_Elab_Command_elabNotation___lambda__1___closed__5 = _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__5(); +lean_mark_persistent(l_Lean_Elab_Command_elabNotation___lambda__1___closed__5); +l_Lean_Elab_Command_elabNotation___lambda__1___closed__6 = _init_l_Lean_Elab_Command_elabNotation___lambda__1___closed__6(); +lean_mark_persistent(l_Lean_Elab_Command_elabNotation___lambda__1___closed__6); +l_Lean_Elab_Command_elabNotation___closed__1 = _init_l_Lean_Elab_Command_elabNotation___closed__1(); +lean_mark_persistent(l_Lean_Elab_Command_elabNotation___closed__1); l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__1 = _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__1(); lean_mark_persistent(l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__1); l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__2 = _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabNotation___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Elab/Tactic.c b/stage0/stdlib/Init/Lean/Elab/Tactic.c index 2ce897e596..504a3ac0b4 100644 --- a/stage0/stdlib/Init/Lean/Elab/Tactic.c +++ b/stage0/stdlib/Init/Lean/Elab/Tactic.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Init.Lean.Elab.Tactic -// Imports: Init.Lean.Elab.Term +// Imports: Init.Lean.Elab.Term Init.Lean.Elab.Tactic.Basic #include "runtime/lean.h" #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -118,6 +118,7 @@ return x_5; } } lean_object* initialize_Init_Lean_Elab_Term(lean_object*); +lean_object* initialize_Init_Lean_Elab_Tactic_Basic(lean_object*); static bool _G_initialized = false; lean_object* initialize_Init_Lean_Elab_Tactic(lean_object* w) { lean_object * res; @@ -126,6 +127,9 @@ _G_initialized = true; res = initialize_Init_Lean_Elab_Term(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +res = initialize_Init_Lean_Elab_Tactic_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l_Lean_Elab_Term_elabTacticBlock___closed__1 = _init_l_Lean_Elab_Term_elabTacticBlock___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_elabTacticBlock___closed__1); l_Lean_Elab_Term_elabTacticBlock___closed__2 = _init_l_Lean_Elab_Term_elabTacticBlock___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c b/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c new file mode 100644 index 0000000000..57923c49b1 --- /dev/null +++ b/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c @@ -0,0 +1,5584 @@ +// Lean compiler output +// Module: Init.Lean.Elab.Tactic.Basic +// Imports: Init.Lean.Elab.Util Init.Lean.Elab.Term +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_Lean_Elab_Tactic_withIncRecDepth___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__5; +extern lean_object* l_Lean_Name_toString___closed__1; +lean_object* l_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__2___boxed(lean_object*, lean_object*); +lean_object* l_mkHashMap___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__2(lean_object*); +lean_object* l_Lean_Elab_Tactic_getLocalInsts___boxed(lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; +lean_object* l_Lean_Elab_Tactic_elabTactic___main___closed__4; +extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__8; +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__4(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_nameToExprAux___main___closed__1; +lean_object* l_Lean_Elab_Tactic_monadQuotation; +lean_object* l_unreachable_x21___rarg(lean_object*); +lean_object* l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__1___boxed(lean_object*, lean_object*); +extern lean_object* l_Lean_Elab_Term_elabTermAux___main___closed__6; +lean_object* l_Lean_Elab_Tactic_getMCtx___rarg(lean_object*); +extern lean_object* l_Lean_MessageData_ofList___closed__3; +lean_object* lean_array_uget(lean_object*, size_t); +lean_object* l_Lean_Elab_Tactic_elabTactic(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_elabTactic___main___closed__2; +lean_object* l_Lean_Elab_Tactic_getEnv(lean_object*); +lean_object* l_Lean_Elab_Tactic_elabTactic___main___closed__1; +extern size_t l_PersistentHashMap_insertAux___main___rarg___closed__2; +lean_object* l_Lean_Elab_Tactic_trace(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_getLCtx___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadQuotation___closed__2; +lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__3___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Array_empty___closed__1; +lean_object* lean_environment_find(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadQuotation___closed__1; +lean_object* lean_dbg_trace(lean_object*, lean_object*); +lean_object* lean_io_mk_ref(lean_object*, lean_object*); +lean_object* l_Lean_Elab_ElabFnTable_insert___rarg(lean_object*, lean_object*, lean_object*); +uint8_t lean_name_eq(lean_object*, lean_object*); +lean_object* lean_io_ref_get(lean_object*, lean_object*); +uint8_t l_PersistentHashMap_containsAtAux___main___at_Lean_Parser_mkFreshKindAux___main___spec__3(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_array_push(lean_object*, lean_object*); +lean_object* lean_array_get_size(lean_object*); +lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_getMCtx___boxed(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_Term_logTrace___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_withFreshMacroScope(lean_object*); +extern lean_object* l_Lean_Meta_isLevelDefEqAux___main___closed__5; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__4; +size_t l_USize_shiftRight(size_t, size_t); +lean_object* l_Lean_Elab_Tactic_getLocalInsts(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___closed__10; +extern lean_object* l_Lean_LocalContext_Inhabited___closed__1; +extern lean_object* l___private_Init_Lean_Elab_Util_8__regTraceClasses___closed__2; +lean_object* l_Lean_Elab_Term_trace___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__2; +extern lean_object* l_Lean_AttributeImpl_inhabited___closed__2; +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__1; +lean_object* l_IO_ofExcept___at_Lean_registerClassAttr___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___closed__3; +extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__1; +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_AssocList_contains___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__3___boxed(lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_dbgTrace___rarg___closed__1; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__4; +extern lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1___boxed(lean_object*, lean_object*); +lean_object* lean_array_fget(lean_object*, lean_object*); +extern lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__3; +uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +extern lean_object* l_Lean_Elab_Term_termElabAttribute___closed__4; +lean_object* l_Lean_Elab_Term_addContext___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_EnvExtension_Inhabited___rarg___closed__1; +lean_object* l_Lean_Elab_Tactic_monadLog___closed__5; +lean_object* l_Lean_Name_append___main(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_dbgTrace___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_addContext(lean_object*, lean_object*, lean_object*); +lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_addBuiltinTacticElab___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_elabTactic___main___lambda__1(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_liftTermElabM(lean_object*); +lean_object* l_Lean_Elab_Tactic_addBuiltinTacticElab___closed__1; +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_elabTactic___main___closed__6; +size_t l_Lean_Name_hash(lean_object*); +extern lean_object* l_Lean_Elab_Term_State_inhabited___closed__2; +extern lean_object* l_Char_HasRepr___closed__1; +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__5; +lean_object* l_Lean_Elab_Tactic_monadLog___closed__7; +lean_object* l_PersistentHashMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__3; +lean_object* l_Lean_Syntax_prettyPrint(lean_object*); +lean_object* lean_name_mk_string(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__4; +lean_object* l_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__2(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__4___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_State_inhabited___closed__1; +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); +uint8_t l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__2(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_throwUnsupportedSyntax___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__6; +lean_object* l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__7; +lean_object* l_Lean_Elab_Tactic_monadLog___closed__8; +lean_object* l_Lean_Elab_Tactic_mkTacticElabAttribute(lean_object*); +extern lean_object* l_Lean_Options_empty; +lean_object* l_ReaderT_read___at_Lean_Elab_Tactic_monadLog___spec__1(lean_object*, lean_object*); +size_t lean_usize_modn(size_t, lean_object*); +lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__1; +lean_object* l_Lean_registerBuiltinAttribute(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___closed__1; +lean_object* l_Lean_Elab_mkElabAttribute___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_mkHashMapImp___rarg(lean_object*); +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__7; +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__3; +lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(lean_object*, lean_object*); +extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__3; +lean_object* l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_tacticElabAttribute; +lean_object* l_Lean_ConstantInfo_type(lean_object*); +lean_object* l_Lean_Elab_Tactic_State_inhabited; +lean_object* l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__2; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__3; +size_t l_USize_land(size_t, size_t); +uint8_t l_PersistentHashMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__4(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParametricAttribute_setParam___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__5___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_elabTactic___main___lambda__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_traceAtCmdPos___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_elabTactic___main___closed__3; +lean_object* l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1; +lean_object* l_Lean_Elab_Tactic_throwUnsupportedSyntax(lean_object*); +uint8_t l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__1(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_containsAux___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__5___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Elab_Exception_inhabited; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); +lean_object* l_Lean_Elab_Tactic_elabTactic___main___closed__5; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__2; +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__2; +lean_object* l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2(lean_object*, lean_object*); +lean_object* l_Lean_nameToExprAux___main(lean_object*); +lean_object* l_Lean_Elab_Tactic_elabTactic___main___closed__7; +lean_object* l_Lean_Elab_Term_throwError___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___closed__6; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__3; +lean_object* l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__2___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Environment_addAndCompile(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_getKind(lean_object*); +lean_object* l_Lean_Elab_Tactic_addBuiltinTacticElab(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___closed__2; +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__4; +lean_object* l_Lean_Elab_Tactic_getOptions___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__2; +lean_object* l_Lean_Elab_Tactic_logTrace(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_io_ref_reset(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__1; +lean_object* l_Lean_Elab_Tactic_withFreshMacroScope___rarg(lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Elab_Term_9__elabTermUsing___main___closed__3; +lean_object* l_Lean_Elab_Tactic_throwError(lean_object*); +lean_object* l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__5(lean_object*, lean_object*); +lean_object* lean_io_ref_set(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_liftTermElabM___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_getOptions(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__5; +lean_object* l_PersistentHashMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__4___boxed(lean_object*, lean_object*); +lean_object* l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__2; +lean_object* l_Lean_Elab_Tactic_getEnv___rarg(lean_object*); +lean_object* l_AssocList_find___main___at_Lean_Elab_Tactic_elabTactic___main___spec__6(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_withMacroExpansion___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__6; +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__3(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__1; +lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__1; +lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__3; +extern lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__3; +extern lean_object* l___private_Init_Lean_Parser_Parser_8__throwParserCategoryAlreadyDefined___rarg___closed__2; +lean_object* l_Lean_Elab_Tactic_elabTactic___main(lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Meta_Tactic_Util_1__regTraceClasses___closed__1; +lean_object* l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___closed__11; +uint8_t l_AssocList_contains___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__3(lean_object*, lean_object*); +lean_object* l_AssocList_find___main___at_Lean_Elab_Tactic_elabTactic___main___spec__6___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__1; +lean_object* l_Lean_Elab_Tactic_withMacroExpansion(lean_object*); +lean_object* l_Lean_Elab_Tactic_mkBuiltinTacticElabTable(lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_dbgTrace(lean_object*); +lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Elab_Util_8__regTraceClasses___closed__1; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__5; +lean_object* l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__3; +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__3___boxed(lean_object*, lean_object*, lean_object*); +lean_object* lean_usize_to_nat(size_t); +lean_object* l_Lean_Elab_Tactic_getCurrMacroScope(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg___closed__1; +uint8_t l_PersistentHashMap_containsAux___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__5(lean_object*, size_t, lean_object*); +lean_object* l_Lean_Elab_Tactic_monadQuotation___closed__3; +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr(lean_object*); +lean_object* l_IO_ofExcept___at___private_Init_Lean_Elab_Util_6__ElabAttribute_add___spec__1(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__3(lean_object*, size_t, lean_object*); +lean_object* l_Lean_mkConst(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_getCurrMacroScope___boxed(lean_object*, lean_object*); +extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__4; +lean_object* l_Lean_Elab_Tactic_traceAtCmdPos(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_initAttr; +lean_object* l_Lean_Elab_syntaxNodeKindOfAttrParam(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_getLCtx(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_getEnv___boxed(lean_object*); +lean_object* l_Lean_Elab_Tactic_monadLog___closed__4; +lean_object* l_Lean_Elab_Tactic_getMCtx(lean_object*); +lean_object* l_Lean_Elab_Tactic_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Lean_Parser_Parser_18__BuiltinParserAttribute_add___closed__2; +lean_object* l_Lean_Elab_Tactic_monadLog___closed__9; +uint8_t lean_string_dec_eq(lean_object*, lean_object*); +lean_object* l_Lean_Elab_expandMacro(lean_object*, lean_object*, lean_object*); +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_withIncRecDepth(lean_object*); +lean_object* l_Lean_Elab_Tactic_builtinTacticElabTable; +lean_object* _init_l_Lean_Elab_Tactic_State_inhabited___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_State_inhabited___closed__2; +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* _init_l_Lean_Elab_Tactic_State_inhabited() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Elab_Tactic_State_inhabited___closed__1; +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Exception_inhabited; +x_2 = l_Lean_Elab_Tactic_State_inhabited; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_liftTermElabM___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_ctor_get(x_2, 0); +lean_inc(x_4); +lean_dec(x_2); +x_5 = !lean_is_exclusive(x_3); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_ctor_get(x_3, 0); +x_7 = lean_ctor_get(x_3, 1); +x_8 = lean_apply_2(x_1, x_4, x_6); +if (lean_obj_tag(x_8) == 0) +{ +uint8_t x_9; +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; +x_10 = lean_ctor_get(x_8, 1); +lean_ctor_set(x_3, 0, x_10); +lean_ctor_set(x_8, 1, x_3); +return x_8; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_8, 0); +x_12 = lean_ctor_get(x_8, 1); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_8); +lean_ctor_set(x_3, 0, x_12); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_11); +lean_ctor_set(x_13, 1, x_3); +return x_13; +} +} +else +{ +lean_object* x_14; +x_14 = lean_ctor_get(x_8, 0); +lean_inc(x_14); +if (lean_obj_tag(x_14) == 0) +{ +uint8_t x_15; +x_15 = !lean_is_exclusive(x_8); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_8, 1); +x_17 = lean_ctor_get(x_8, 0); +lean_dec(x_17); +x_18 = lean_ctor_get(x_14, 0); +lean_inc(x_18); +lean_dec(x_14); +lean_ctor_set(x_3, 0, x_16); +lean_ctor_set(x_8, 1, x_3); +lean_ctor_set(x_8, 0, x_18); +return x_8; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_19 = lean_ctor_get(x_8, 1); +lean_inc(x_19); +lean_dec(x_8); +x_20 = lean_ctor_get(x_14, 0); +lean_inc(x_20); +lean_dec(x_14); +lean_ctor_set(x_3, 0, x_19); +x_21 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_3); +return x_21; +} +} +else +{ +lean_object* x_22; lean_object* x_23; +lean_dec(x_8); +lean_free_object(x_3); +lean_dec(x_7); +x_22 = l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1; +x_23 = l_unreachable_x21___rarg(x_22); +return x_23; +} +} +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_3, 0); +x_25 = lean_ctor_get(x_3, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_3); +x_26 = lean_apply_2(x_1, x_4, x_24); +if (lean_obj_tag(x_26) == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +if (lean_is_exclusive(x_26)) { + lean_ctor_release(x_26, 0); + lean_ctor_release(x_26, 1); + x_29 = x_26; +} else { + lean_dec_ref(x_26); + x_29 = lean_box(0); +} +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_25); +if (lean_is_scalar(x_29)) { + x_31 = lean_alloc_ctor(0, 2, 0); +} else { + x_31 = x_29; +} +lean_ctor_set(x_31, 0, x_27); +lean_ctor_set(x_31, 1, x_30); +return x_31; +} +else +{ +lean_object* x_32; +x_32 = lean_ctor_get(x_26, 0); +lean_inc(x_32); +if (lean_obj_tag(x_32) == 0) +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_33 = lean_ctor_get(x_26, 1); +lean_inc(x_33); +if (lean_is_exclusive(x_26)) { + lean_ctor_release(x_26, 0); + lean_ctor_release(x_26, 1); + x_34 = x_26; +} else { + lean_dec_ref(x_26); + x_34 = lean_box(0); +} +x_35 = lean_ctor_get(x_32, 0); +lean_inc(x_35); +lean_dec(x_32); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_33); +lean_ctor_set(x_36, 1, x_25); +if (lean_is_scalar(x_34)) { + x_37 = lean_alloc_ctor(1, 2, 0); +} else { + x_37 = x_34; +} +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +return x_37; +} +else +{ +lean_object* x_38; lean_object* x_39; +lean_dec(x_26); +lean_dec(x_25); +x_38 = l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1; +x_39 = l_unreachable_x21___rarg(x_38); +return x_39; +} +} +} +} +} +lean_object* l_Lean_Elab_Tactic_liftTermElabM(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_liftTermElabM___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_getEnv___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +lean_dec(x_2); +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +lean_dec(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* l_Lean_Elab_Tactic_getEnv(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_getEnv___rarg), 1, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_getEnv___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Elab_Tactic_getEnv(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_getMCtx___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +lean_dec(x_2); +x_4 = lean_ctor_get(x_3, 1); +lean_inc(x_4); +lean_dec(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* l_Lean_Elab_Tactic_getMCtx(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_getMCtx___rarg), 1, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_getMCtx___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Elab_Tactic_getMCtx(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_getLCtx(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; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_4, 1); +lean_inc(x_5); +x_6 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_6, 0, x_5); +lean_ctor_set(x_6, 1, x_2); +return x_6; +} +} +lean_object* l_Lean_Elab_Tactic_getLCtx___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Tactic_getLCtx(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_getLocalInsts(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; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_4, 2); +lean_inc(x_5); +x_6 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_6, 0, x_5); +lean_ctor_set(x_6, 1, x_2); +return x_6; +} +} +lean_object* l_Lean_Elab_Tactic_getLocalInsts___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Tactic_getLocalInsts(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_getOptions(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; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_4, 0); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_6); +lean_ctor_set(x_7, 1, x_2); +return x_7; +} +} +lean_object* l_Lean_Elab_Tactic_getOptions___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Tactic_getOptions(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_addContext(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_alloc_closure((void*)(l_Lean_Elab_Term_addContext___boxed), 3, 1); +lean_closure_set(x_4, 0, x_1); +x_5 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_4, x_2, x_3); +return x_5; +} +} +lean_object* l_ReaderT_read___at_Lean_Elab_Tactic_monadLog___spec__1(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_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +lean_inc(x_3); +x_5 = lean_apply_2(x_1, x_3, x_4); +if (lean_obj_tag(x_5) == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = lean_apply_3(x_2, x_6, x_3, x_7); +return x_8; +} +else +{ +uint8_t x_9; +lean_dec(x_3); +lean_dec(x_2); +x_9 = !lean_is_exclusive(x_5); +if (x_9 == 0) +{ +return x_5; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_5, 0); +x_11 = lean_ctor_get(x_5, 1); +lean_inc(x_11); +lean_inc(x_10); +lean_dec(x_5); +x_12 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_12, 0, x_10); +lean_ctor_set(x_12, 1, x_11); +return x_12; +} +} +} +} +lean_object* l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg), 4, 0); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_4 = lean_ctor_get(x_1, 0); +x_5 = lean_ctor_get(x_4, 2); +lean_inc(x_5); +x_6 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_6, 0, x_5); +lean_ctor_set(x_6, 1, x_3); +return x_6; +} +} +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_4 = lean_ctor_get(x_1, 0); +x_5 = lean_ctor_get(x_4, 1); +lean_inc(x_5); +x_6 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_6, 0, x_5); +lean_ctor_set(x_6, 1, x_3); +return x_6; +} +} +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_4 = lean_ctor_get(x_1, 0); +x_5 = lean_ctor_get(x_4, 3); +lean_inc(x_5); +x_6 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_6, 0, x_5); +lean_ctor_set(x_6, 1, x_3); +return x_6; +} +} +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_ctor_get(x_3, 0); +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_5, 2); +x_8 = l_PersistentArray_push___rarg(x_7, x_1); +lean_ctor_set(x_5, 2, x_8); +x_9 = lean_box(0); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_3); +return x_10; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_11 = lean_ctor_get(x_5, 0); +x_12 = lean_ctor_get(x_5, 1); +x_13 = lean_ctor_get(x_5, 2); +x_14 = lean_ctor_get(x_5, 3); +x_15 = lean_ctor_get(x_5, 4); +x_16 = lean_ctor_get(x_5, 5); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_5); +x_17 = l_PersistentArray_push___rarg(x_13, x_1); +x_18 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_18, 0, x_11); +lean_ctor_set(x_18, 1, x_12); +lean_ctor_set(x_18, 2, x_17); +lean_ctor_set(x_18, 3, x_14); +lean_ctor_set(x_18, 4, x_15); +lean_ctor_set(x_18, 5, x_16); +lean_ctor_set(x_3, 0, x_18); +x_19 = lean_box(0); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_3); +return x_20; +} +} +else +{ +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; +x_21 = lean_ctor_get(x_3, 0); +x_22 = lean_ctor_get(x_3, 1); +lean_inc(x_22); +lean_inc(x_21); +lean_dec(x_3); +x_23 = lean_ctor_get(x_21, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_21, 1); +lean_inc(x_24); +x_25 = lean_ctor_get(x_21, 2); +lean_inc(x_25); +x_26 = lean_ctor_get(x_21, 3); +lean_inc(x_26); +x_27 = lean_ctor_get(x_21, 4); +lean_inc(x_27); +x_28 = lean_ctor_get(x_21, 5); +lean_inc(x_28); +if (lean_is_exclusive(x_21)) { + lean_ctor_release(x_21, 0); + lean_ctor_release(x_21, 1); + lean_ctor_release(x_21, 2); + lean_ctor_release(x_21, 3); + lean_ctor_release(x_21, 4); + lean_ctor_release(x_21, 5); + x_29 = x_21; +} else { + lean_dec_ref(x_21); + x_29 = lean_box(0); +} +x_30 = l_PersistentArray_push___rarg(x_25, x_1); +if (lean_is_scalar(x_29)) { + x_31 = lean_alloc_ctor(0, 6, 0); +} else { + x_31 = x_29; +} +lean_ctor_set(x_31, 0, x_23); +lean_ctor_set(x_31, 1, x_24); +lean_ctor_set(x_31, 2, x_30); +lean_ctor_set(x_31, 3, x_26); +lean_ctor_set(x_31, 4, x_27); +lean_ctor_set(x_31, 5, x_28); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_22); +x_33 = lean_box(0); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +return x_34; +} +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_ReaderT_read___at_Lean_Elab_Tactic_monadLog___spec__1), 2, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_monadLog___lambda__1___boxed), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_monadLog___closed__1; +x_2 = l_Lean_Elab_Tactic_monadLog___closed__2; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg), 4, 2); +lean_closure_set(x_3, 0, x_1); +lean_closure_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_monadLog___lambda__2___boxed), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_monadLog___closed__1; +x_2 = l_Lean_Elab_Tactic_monadLog___closed__4; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg), 4, 2); +lean_closure_set(x_3, 0, x_1); +lean_closure_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_monadLog___lambda__3___boxed), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_monadLog___closed__1; +x_2 = l_Lean_Elab_Tactic_monadLog___closed__6; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg), 4, 2); +lean_closure_set(x_3, 0, x_1); +lean_closure_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__8() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_addContext), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__9() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_1 = l_Lean_Elab_Tactic_monadLog___closed__3; +x_2 = l_Lean_Elab_Tactic_monadLog___closed__5; +x_3 = l_Lean_Elab_Tactic_monadLog___closed__7; +x_4 = l_Lean_Elab_Tactic_monadLog___closed__8; +x_5 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_5, 0, x_1); +lean_ctor_set(x_5, 1, x_2); +lean_ctor_set(x_5, 2, x_3); +lean_ctor_set(x_5, 3, x_4); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__10() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_monadLog___lambda__4___boxed), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog___closed__11() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_monadLog___closed__9; +x_2 = l_Lean_Elab_Tactic_monadLog___closed__10; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadLog() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Elab_Tactic_monadLog___closed__11; +return x_1; +} +} +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Tactic_monadLog___lambda__1(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Tactic_monadLog___lambda__2(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Tactic_monadLog___lambda__3(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_Elab_Tactic_monadLog___lambda__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Tactic_monadLog___lambda__4(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Lean_Elab_Tactic_throwError___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; +x_5 = lean_alloc_closure((void*)(l_Lean_Elab_Term_throwError___rarg___boxed), 4, 2); +lean_closure_set(x_5, 0, x_1); +lean_closure_set(x_5, 1, x_2); +x_6 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_5, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Tactic_throwError(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_throwError___rarg), 4, 0); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_throwUnsupportedSyntax___boxed), 2, 1); +lean_closure_set(x_1, 0, lean_box(0)); +return x_1; +} +} +lean_object* l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; +x_3 = l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg___closed__1; +x_4 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_3, x_1, x_2); +return x_4; +} +} +lean_object* l_Lean_Elab_Tactic_throwUnsupportedSyntax(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg), 2, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_withIncRecDepth___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; uint8_t x_76; +x_72 = lean_ctor_get(x_3, 0); +lean_inc(x_72); +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +lean_dec(x_72); +x_74 = lean_ctor_get(x_73, 3); +lean_inc(x_74); +x_75 = lean_ctor_get(x_73, 4); +lean_inc(x_75); +lean_dec(x_73); +x_76 = lean_nat_dec_eq(x_74, x_75); +lean_dec(x_75); +lean_dec(x_74); +if (x_76 == 0) +{ +lean_dec(x_1); +x_5 = x_4; +goto block_71; +} +else +{ +lean_object* x_77; lean_object* x_78; +x_77 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +lean_inc(x_3); +x_78 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_77, x_3, x_4); +if (lean_obj_tag(x_78) == 0) +{ +lean_object* x_79; +x_79 = lean_ctor_get(x_78, 1); +lean_inc(x_79); +lean_dec(x_78); +x_5 = x_79; +goto block_71; +} +else +{ +uint8_t x_80; +lean_dec(x_3); +lean_dec(x_2); +x_80 = !lean_is_exclusive(x_78); +if (x_80 == 0) +{ +return x_78; +} +else +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; +x_81 = lean_ctor_get(x_78, 0); +x_82 = lean_ctor_get(x_78, 1); +lean_inc(x_82); +lean_inc(x_81); +lean_dec(x_78); +x_83 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_83, 0, x_81); +lean_ctor_set(x_83, 1, x_82); +return x_83; +} +} +} +block_71: +{ +lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_6 = lean_ctor_get(x_3, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = !lean_is_exclusive(x_3); +if (x_8 == 0) +{ +lean_object* x_9; uint8_t x_10; +x_9 = lean_ctor_get(x_3, 0); +lean_dec(x_9); +x_10 = !lean_is_exclusive(x_6); +if (x_10 == 0) +{ +lean_object* x_11; uint8_t x_12; +x_11 = lean_ctor_get(x_6, 0); +lean_dec(x_11); +x_12 = !lean_is_exclusive(x_7); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_7, 3); +x_14 = lean_unsigned_to_nat(1u); +x_15 = lean_nat_add(x_13, x_14); +lean_dec(x_13); +lean_ctor_set(x_7, 3, x_15); +x_16 = lean_apply_2(x_2, x_3, x_5); +return x_16; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_17 = lean_ctor_get(x_7, 0); +x_18 = lean_ctor_get(x_7, 1); +x_19 = lean_ctor_get(x_7, 2); +x_20 = lean_ctor_get(x_7, 3); +x_21 = lean_ctor_get(x_7, 4); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_7); +x_22 = lean_unsigned_to_nat(1u); +x_23 = lean_nat_add(x_20, x_22); +lean_dec(x_20); +x_24 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_24, 0, x_17); +lean_ctor_set(x_24, 1, x_18); +lean_ctor_set(x_24, 2, x_19); +lean_ctor_set(x_24, 3, x_23); +lean_ctor_set(x_24, 4, x_21); +lean_ctor_set(x_6, 0, x_24); +x_25 = lean_apply_2(x_2, x_3, x_5); +return x_25; +} +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; lean_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; +x_26 = lean_ctor_get(x_6, 1); +x_27 = lean_ctor_get(x_6, 2); +x_28 = lean_ctor_get(x_6, 3); +x_29 = lean_ctor_get(x_6, 4); +x_30 = lean_ctor_get(x_6, 5); +x_31 = lean_ctor_get(x_6, 6); +x_32 = lean_ctor_get(x_6, 7); +x_33 = lean_ctor_get(x_6, 8); +x_34 = lean_ctor_get(x_6, 9); +x_35 = lean_ctor_get_uint8(x_6, sizeof(void*)*10); +lean_inc(x_34); +lean_inc(x_33); +lean_inc(x_32); +lean_inc(x_31); +lean_inc(x_30); +lean_inc(x_29); +lean_inc(x_28); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_6); +x_36 = lean_ctor_get(x_7, 0); +lean_inc(x_36); +x_37 = lean_ctor_get(x_7, 1); +lean_inc(x_37); +x_38 = lean_ctor_get(x_7, 2); +lean_inc(x_38); +x_39 = lean_ctor_get(x_7, 3); +lean_inc(x_39); +x_40 = lean_ctor_get(x_7, 4); +lean_inc(x_40); +if (lean_is_exclusive(x_7)) { + lean_ctor_release(x_7, 0); + lean_ctor_release(x_7, 1); + lean_ctor_release(x_7, 2); + lean_ctor_release(x_7, 3); + lean_ctor_release(x_7, 4); + x_41 = x_7; +} else { + lean_dec_ref(x_7); + x_41 = lean_box(0); +} +x_42 = lean_unsigned_to_nat(1u); +x_43 = lean_nat_add(x_39, x_42); +lean_dec(x_39); +if (lean_is_scalar(x_41)) { + x_44 = lean_alloc_ctor(0, 5, 0); +} else { + x_44 = x_41; +} +lean_ctor_set(x_44, 0, x_36); +lean_ctor_set(x_44, 1, x_37); +lean_ctor_set(x_44, 2, x_38); +lean_ctor_set(x_44, 3, x_43); +lean_ctor_set(x_44, 4, x_40); +x_45 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set(x_45, 1, x_26); +lean_ctor_set(x_45, 2, x_27); +lean_ctor_set(x_45, 3, x_28); +lean_ctor_set(x_45, 4, x_29); +lean_ctor_set(x_45, 5, x_30); +lean_ctor_set(x_45, 6, x_31); +lean_ctor_set(x_45, 7, x_32); +lean_ctor_set(x_45, 8, x_33); +lean_ctor_set(x_45, 9, x_34); +lean_ctor_set_uint8(x_45, sizeof(void*)*10, x_35); +lean_ctor_set(x_3, 0, x_45); +x_46 = lean_apply_2(x_2, x_3, x_5); +return x_46; +} +} +else +{ +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; uint8_t 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; +x_47 = lean_ctor_get(x_3, 1); +lean_inc(x_47); +lean_dec(x_3); +x_48 = lean_ctor_get(x_6, 1); +lean_inc(x_48); +x_49 = lean_ctor_get(x_6, 2); +lean_inc(x_49); +x_50 = lean_ctor_get(x_6, 3); +lean_inc(x_50); +x_51 = lean_ctor_get(x_6, 4); +lean_inc(x_51); +x_52 = lean_ctor_get(x_6, 5); +lean_inc(x_52); +x_53 = lean_ctor_get(x_6, 6); +lean_inc(x_53); +x_54 = lean_ctor_get(x_6, 7); +lean_inc(x_54); +x_55 = lean_ctor_get(x_6, 8); +lean_inc(x_55); +x_56 = lean_ctor_get(x_6, 9); +lean_inc(x_56); +x_57 = lean_ctor_get_uint8(x_6, sizeof(void*)*10); +if (lean_is_exclusive(x_6)) { + lean_ctor_release(x_6, 0); + lean_ctor_release(x_6, 1); + lean_ctor_release(x_6, 2); + lean_ctor_release(x_6, 3); + lean_ctor_release(x_6, 4); + lean_ctor_release(x_6, 5); + lean_ctor_release(x_6, 6); + lean_ctor_release(x_6, 7); + lean_ctor_release(x_6, 8); + lean_ctor_release(x_6, 9); + x_58 = x_6; +} else { + lean_dec_ref(x_6); + x_58 = lean_box(0); +} +x_59 = lean_ctor_get(x_7, 0); +lean_inc(x_59); +x_60 = lean_ctor_get(x_7, 1); +lean_inc(x_60); +x_61 = lean_ctor_get(x_7, 2); +lean_inc(x_61); +x_62 = lean_ctor_get(x_7, 3); +lean_inc(x_62); +x_63 = lean_ctor_get(x_7, 4); +lean_inc(x_63); +if (lean_is_exclusive(x_7)) { + lean_ctor_release(x_7, 0); + lean_ctor_release(x_7, 1); + lean_ctor_release(x_7, 2); + lean_ctor_release(x_7, 3); + lean_ctor_release(x_7, 4); + x_64 = x_7; +} else { + lean_dec_ref(x_7); + x_64 = lean_box(0); +} +x_65 = lean_unsigned_to_nat(1u); +x_66 = lean_nat_add(x_62, x_65); +lean_dec(x_62); +if (lean_is_scalar(x_64)) { + x_67 = lean_alloc_ctor(0, 5, 0); +} else { + x_67 = x_64; +} +lean_ctor_set(x_67, 0, x_59); +lean_ctor_set(x_67, 1, x_60); +lean_ctor_set(x_67, 2, x_61); +lean_ctor_set(x_67, 3, x_66); +lean_ctor_set(x_67, 4, x_63); +if (lean_is_scalar(x_58)) { + x_68 = lean_alloc_ctor(0, 10, 1); +} else { + x_68 = x_58; +} +lean_ctor_set(x_68, 0, x_67); +lean_ctor_set(x_68, 1, x_48); +lean_ctor_set(x_68, 2, x_49); +lean_ctor_set(x_68, 3, x_50); +lean_ctor_set(x_68, 4, x_51); +lean_ctor_set(x_68, 5, x_52); +lean_ctor_set(x_68, 6, x_53); +lean_ctor_set(x_68, 7, x_54); +lean_ctor_set(x_68, 8, x_55); +lean_ctor_set(x_68, 9, x_56); +lean_ctor_set_uint8(x_68, sizeof(void*)*10, x_57); +x_69 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_69, 0, x_68); +lean_ctor_set(x_69, 1, x_47); +x_70 = lean_apply_2(x_2, x_69, x_5); +return x_70; +} +} +} +} +lean_object* l_Lean_Elab_Tactic_withIncRecDepth(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_withIncRecDepth___rarg), 4, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_getCurrMacroScope(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_ctor_get(x_3, 9); +lean_inc(x_4); +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_4); +lean_ctor_set(x_5, 1, x_2); +return x_5; +} +} +lean_object* l_Lean_Elab_Tactic_getCurrMacroScope___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Tactic_getCurrMacroScope(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_withFreshMacroScope___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_ctor_get(x_3, 0); +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_ctor_get(x_5, 5); +x_8 = lean_unsigned_to_nat(1u); +x_9 = lean_nat_add(x_7, x_8); +lean_ctor_set(x_5, 5, x_9); +x_10 = !lean_is_exclusive(x_2); +if (x_10 == 0) +{ +lean_object* x_11; uint8_t x_12; +x_11 = lean_ctor_get(x_2, 0); +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_11, 9); +lean_dec(x_13); +lean_ctor_set(x_11, 9, x_7); +x_14 = lean_apply_2(x_1, x_2, 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; uint8_t x_24; lean_object* x_25; lean_object* x_26; +x_15 = lean_ctor_get(x_11, 0); +x_16 = lean_ctor_get(x_11, 1); +x_17 = lean_ctor_get(x_11, 2); +x_18 = lean_ctor_get(x_11, 3); +x_19 = lean_ctor_get(x_11, 4); +x_20 = lean_ctor_get(x_11, 5); +x_21 = lean_ctor_get(x_11, 6); +x_22 = lean_ctor_get(x_11, 7); +x_23 = lean_ctor_get(x_11, 8); +x_24 = lean_ctor_get_uint8(x_11, sizeof(void*)*10); +lean_inc(x_23); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_dec(x_11); +x_25 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_25, 0, x_15); +lean_ctor_set(x_25, 1, x_16); +lean_ctor_set(x_25, 2, x_17); +lean_ctor_set(x_25, 3, x_18); +lean_ctor_set(x_25, 4, x_19); +lean_ctor_set(x_25, 5, x_20); +lean_ctor_set(x_25, 6, x_21); +lean_ctor_set(x_25, 7, x_22); +lean_ctor_set(x_25, 8, x_23); +lean_ctor_set(x_25, 9, x_7); +lean_ctor_set_uint8(x_25, sizeof(void*)*10, x_24); +lean_ctor_set(x_2, 0, x_25); +x_26 = lean_apply_2(x_1, x_2, x_3); +return x_26; +} +} +else +{ +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; uint8_t x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_27 = lean_ctor_get(x_2, 0); +x_28 = lean_ctor_get(x_2, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_2); +x_29 = lean_ctor_get(x_27, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_27, 1); +lean_inc(x_30); +x_31 = lean_ctor_get(x_27, 2); +lean_inc(x_31); +x_32 = lean_ctor_get(x_27, 3); +lean_inc(x_32); +x_33 = lean_ctor_get(x_27, 4); +lean_inc(x_33); +x_34 = lean_ctor_get(x_27, 5); +lean_inc(x_34); +x_35 = lean_ctor_get(x_27, 6); +lean_inc(x_35); +x_36 = lean_ctor_get(x_27, 7); +lean_inc(x_36); +x_37 = lean_ctor_get(x_27, 8); +lean_inc(x_37); +x_38 = lean_ctor_get_uint8(x_27, sizeof(void*)*10); +if (lean_is_exclusive(x_27)) { + lean_ctor_release(x_27, 0); + lean_ctor_release(x_27, 1); + lean_ctor_release(x_27, 2); + lean_ctor_release(x_27, 3); + lean_ctor_release(x_27, 4); + lean_ctor_release(x_27, 5); + lean_ctor_release(x_27, 6); + lean_ctor_release(x_27, 7); + lean_ctor_release(x_27, 8); + lean_ctor_release(x_27, 9); + x_39 = x_27; +} else { + lean_dec_ref(x_27); + x_39 = lean_box(0); +} +if (lean_is_scalar(x_39)) { + x_40 = lean_alloc_ctor(0, 10, 1); +} else { + x_40 = x_39; +} +lean_ctor_set(x_40, 0, x_29); +lean_ctor_set(x_40, 1, x_30); +lean_ctor_set(x_40, 2, x_31); +lean_ctor_set(x_40, 3, x_32); +lean_ctor_set(x_40, 4, x_33); +lean_ctor_set(x_40, 5, x_34); +lean_ctor_set(x_40, 6, x_35); +lean_ctor_set(x_40, 7, x_36); +lean_ctor_set(x_40, 8, x_37); +lean_ctor_set(x_40, 9, x_7); +lean_ctor_set_uint8(x_40, sizeof(void*)*10, 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_28); +x_42 = lean_apply_2(x_1, x_41, x_3); +return x_42; +} +} +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; 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; uint8_t x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_43 = lean_ctor_get(x_5, 0); +x_44 = lean_ctor_get(x_5, 1); +x_45 = lean_ctor_get(x_5, 2); +x_46 = lean_ctor_get(x_5, 3); +x_47 = lean_ctor_get(x_5, 4); +x_48 = lean_ctor_get(x_5, 5); +lean_inc(x_48); +lean_inc(x_47); +lean_inc(x_46); +lean_inc(x_45); +lean_inc(x_44); +lean_inc(x_43); +lean_dec(x_5); +x_49 = lean_unsigned_to_nat(1u); +x_50 = lean_nat_add(x_48, x_49); +x_51 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_51, 0, x_43); +lean_ctor_set(x_51, 1, x_44); +lean_ctor_set(x_51, 2, x_45); +lean_ctor_set(x_51, 3, x_46); +lean_ctor_set(x_51, 4, x_47); +lean_ctor_set(x_51, 5, x_50); +lean_ctor_set(x_3, 0, x_51); +x_52 = lean_ctor_get(x_2, 0); +lean_inc(x_52); +x_53 = lean_ctor_get(x_2, 1); +lean_inc(x_53); +if (lean_is_exclusive(x_2)) { + lean_ctor_release(x_2, 0); + lean_ctor_release(x_2, 1); + x_54 = x_2; +} else { + lean_dec_ref(x_2); + x_54 = lean_box(0); +} +x_55 = lean_ctor_get(x_52, 0); +lean_inc(x_55); +x_56 = lean_ctor_get(x_52, 1); +lean_inc(x_56); +x_57 = lean_ctor_get(x_52, 2); +lean_inc(x_57); +x_58 = lean_ctor_get(x_52, 3); +lean_inc(x_58); +x_59 = lean_ctor_get(x_52, 4); +lean_inc(x_59); +x_60 = lean_ctor_get(x_52, 5); +lean_inc(x_60); +x_61 = lean_ctor_get(x_52, 6); +lean_inc(x_61); +x_62 = lean_ctor_get(x_52, 7); +lean_inc(x_62); +x_63 = lean_ctor_get(x_52, 8); +lean_inc(x_63); +x_64 = lean_ctor_get_uint8(x_52, sizeof(void*)*10); +if (lean_is_exclusive(x_52)) { + lean_ctor_release(x_52, 0); + lean_ctor_release(x_52, 1); + lean_ctor_release(x_52, 2); + lean_ctor_release(x_52, 3); + lean_ctor_release(x_52, 4); + lean_ctor_release(x_52, 5); + lean_ctor_release(x_52, 6); + lean_ctor_release(x_52, 7); + lean_ctor_release(x_52, 8); + lean_ctor_release(x_52, 9); + x_65 = x_52; +} else { + lean_dec_ref(x_52); + x_65 = lean_box(0); +} +if (lean_is_scalar(x_65)) { + x_66 = lean_alloc_ctor(0, 10, 1); +} else { + x_66 = x_65; +} +lean_ctor_set(x_66, 0, x_55); +lean_ctor_set(x_66, 1, x_56); +lean_ctor_set(x_66, 2, x_57); +lean_ctor_set(x_66, 3, x_58); +lean_ctor_set(x_66, 4, x_59); +lean_ctor_set(x_66, 5, x_60); +lean_ctor_set(x_66, 6, x_61); +lean_ctor_set(x_66, 7, x_62); +lean_ctor_set(x_66, 8, x_63); +lean_ctor_set(x_66, 9, x_48); +lean_ctor_set_uint8(x_66, sizeof(void*)*10, x_64); +if (lean_is_scalar(x_54)) { + x_67 = lean_alloc_ctor(0, 2, 0); +} else { + x_67 = x_54; +} +lean_ctor_set(x_67, 0, x_66); +lean_ctor_set(x_67, 1, x_53); +x_68 = lean_apply_2(x_1, x_67, x_3); +return x_68; +} +} +else +{ +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; uint8_t x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; +x_69 = lean_ctor_get(x_3, 0); +x_70 = lean_ctor_get(x_3, 1); +lean_inc(x_70); +lean_inc(x_69); +lean_dec(x_3); +x_71 = lean_ctor_get(x_69, 0); +lean_inc(x_71); +x_72 = lean_ctor_get(x_69, 1); +lean_inc(x_72); +x_73 = lean_ctor_get(x_69, 2); +lean_inc(x_73); +x_74 = lean_ctor_get(x_69, 3); +lean_inc(x_74); +x_75 = lean_ctor_get(x_69, 4); +lean_inc(x_75); +x_76 = lean_ctor_get(x_69, 5); +lean_inc(x_76); +if (lean_is_exclusive(x_69)) { + lean_ctor_release(x_69, 0); + lean_ctor_release(x_69, 1); + lean_ctor_release(x_69, 2); + lean_ctor_release(x_69, 3); + lean_ctor_release(x_69, 4); + lean_ctor_release(x_69, 5); + x_77 = x_69; +} else { + lean_dec_ref(x_69); + x_77 = lean_box(0); +} +x_78 = lean_unsigned_to_nat(1u); +x_79 = lean_nat_add(x_76, x_78); +if (lean_is_scalar(x_77)) { + x_80 = lean_alloc_ctor(0, 6, 0); +} else { + x_80 = x_77; +} +lean_ctor_set(x_80, 0, x_71); +lean_ctor_set(x_80, 1, x_72); +lean_ctor_set(x_80, 2, x_73); +lean_ctor_set(x_80, 3, x_74); +lean_ctor_set(x_80, 4, x_75); +lean_ctor_set(x_80, 5, x_79); +x_81 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_81, 0, x_80); +lean_ctor_set(x_81, 1, x_70); +x_82 = lean_ctor_get(x_2, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_2, 1); +lean_inc(x_83); +if (lean_is_exclusive(x_2)) { + lean_ctor_release(x_2, 0); + lean_ctor_release(x_2, 1); + x_84 = x_2; +} else { + lean_dec_ref(x_2); + x_84 = lean_box(0); +} +x_85 = lean_ctor_get(x_82, 0); +lean_inc(x_85); +x_86 = lean_ctor_get(x_82, 1); +lean_inc(x_86); +x_87 = lean_ctor_get(x_82, 2); +lean_inc(x_87); +x_88 = lean_ctor_get(x_82, 3); +lean_inc(x_88); +x_89 = lean_ctor_get(x_82, 4); +lean_inc(x_89); +x_90 = lean_ctor_get(x_82, 5); +lean_inc(x_90); +x_91 = lean_ctor_get(x_82, 6); +lean_inc(x_91); +x_92 = lean_ctor_get(x_82, 7); +lean_inc(x_92); +x_93 = lean_ctor_get(x_82, 8); +lean_inc(x_93); +x_94 = lean_ctor_get_uint8(x_82, sizeof(void*)*10); +if (lean_is_exclusive(x_82)) { + lean_ctor_release(x_82, 0); + lean_ctor_release(x_82, 1); + lean_ctor_release(x_82, 2); + lean_ctor_release(x_82, 3); + lean_ctor_release(x_82, 4); + lean_ctor_release(x_82, 5); + lean_ctor_release(x_82, 6); + lean_ctor_release(x_82, 7); + lean_ctor_release(x_82, 8); + lean_ctor_release(x_82, 9); + x_95 = x_82; +} else { + lean_dec_ref(x_82); + x_95 = lean_box(0); +} +if (lean_is_scalar(x_95)) { + x_96 = lean_alloc_ctor(0, 10, 1); +} else { + x_96 = x_95; +} +lean_ctor_set(x_96, 0, x_85); +lean_ctor_set(x_96, 1, x_86); +lean_ctor_set(x_96, 2, x_87); +lean_ctor_set(x_96, 3, x_88); +lean_ctor_set(x_96, 4, x_89); +lean_ctor_set(x_96, 5, x_90); +lean_ctor_set(x_96, 6, x_91); +lean_ctor_set(x_96, 7, x_92); +lean_ctor_set(x_96, 8, x_93); +lean_ctor_set(x_96, 9, x_76); +lean_ctor_set_uint8(x_96, sizeof(void*)*10, x_94); +if (lean_is_scalar(x_84)) { + x_97 = lean_alloc_ctor(0, 2, 0); +} else { + x_97 = x_84; +} +lean_ctor_set(x_97, 0, x_96); +lean_ctor_set(x_97, 1, x_83); +x_98 = lean_apply_2(x_1, x_97, x_81); +return x_98; +} +} +} +lean_object* l_Lean_Elab_Tactic_withFreshMacroScope(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_withFreshMacroScope___rarg), 3, 0); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadQuotation___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_getCurrMacroScope___boxed), 2, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadQuotation___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_withFreshMacroScope), 1, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadQuotation___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_monadQuotation___closed__1; +x_2 = l_Lean_Elab_Tactic_monadQuotation___closed__2; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_monadQuotation() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Elab_Tactic_monadQuotation___closed__3; +return x_1; +} +} +lean_object* l_mkHashMap___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_PersistentHashMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__3() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_LocalContext_Inhabited___closed__1; +return x_1; +} +} +lean_object* _init_l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(8u); +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__2() { +_start: +{ +uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = 1; +x_2 = l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__1; +x_3 = l_PersistentHashMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__3; +x_4 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_4, 0, x_2); +lean_ctor_set(x_4, 1, x_3); +lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_1); +return x_4; +} +} +lean_object* _init_l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__2; +return x_1; +} +} +lean_object* l_Lean_Elab_Tactic_mkBuiltinTacticElabTable(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1; +x_3 = lean_io_mk_ref(x_2, x_1); +return x_3; +} +} +uint8_t l_AssocList_contains___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__3(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 2); +x_6 = lean_name_eq(x_4, x_1); +if (x_6 == 0) +{ +x_2 = x_5; +goto _start; +} +else +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +} +} +} +uint8_t l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; size_t x_5; size_t x_6; lean_object* x_7; uint8_t x_8; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_array_get_size(x_3); +x_5 = l_Lean_Name_hash(x_2); +x_6 = lean_usize_modn(x_5, x_4); +lean_dec(x_4); +x_7 = lean_array_uget(x_3, x_6); +x_8 = l_AssocList_contains___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__3(x_2, x_7); +lean_dec(x_7); +return x_8; +} +} +uint8_t l_PersistentHashMap_containsAux___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__5(lean_object* x_1, size_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; size_t x_5; size_t x_6; size_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = 5; +x_6 = l_PersistentHashMap_insertAux___main___rarg___closed__2; +x_7 = x_2 & x_6; +x_8 = lean_usize_to_nat(x_7); +x_9 = lean_box(2); +x_10 = lean_array_get(x_9, x_4, x_8); +lean_dec(x_8); +lean_dec(x_4); +switch (lean_obj_tag(x_10)) { +case 0: +{ +lean_object* x_11; uint8_t x_12; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = lean_name_eq(x_3, x_11); +lean_dec(x_11); +return x_12; +} +case 1: +{ +lean_object* x_13; size_t x_14; +x_13 = lean_ctor_get(x_10, 0); +lean_inc(x_13); +lean_dec(x_10); +x_14 = x_2 >> x_5; +x_1 = x_13; +x_2 = x_14; +goto _start; +} +default: +{ +uint8_t x_16; +x_16 = 0; +return x_16; +} +} +} +else +{ +lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_17 = lean_ctor_get(x_1, 0); +lean_inc(x_17); +lean_dec(x_1); +x_18 = lean_unsigned_to_nat(0u); +x_19 = l_PersistentHashMap_containsAtAux___main___at_Lean_Parser_mkFreshKindAux___main___spec__3(x_17, x_18, x_3); +lean_dec(x_17); +return x_19; +} +} +} +uint8_t l_PersistentHashMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__4(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; size_t x_4; uint8_t x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +lean_dec(x_1); +x_4 = l_Lean_Name_hash(x_2); +x_5 = l_PersistentHashMap_containsAux___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__5(x_3, x_4, x_2); +return x_5; +} +} +uint8_t l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = lean_ctor_get_uint8(x_1, sizeof(void*)*2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +lean_dec(x_1); +x_6 = l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__2(x_4, x_2); +lean_dec(x_4); +if (x_6 == 0) +{ +uint8_t x_7; +x_7 = l_PersistentHashMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__4(x_5, x_2); +return x_7; +} +else +{ +uint8_t x_8; +lean_dec(x_5); +x_8 = 1; +return x_8; +} +} +else +{ +lean_object* x_9; uint8_t x_10; +x_9 = lean_ctor_get(x_1, 0); +lean_inc(x_9); +lean_dec(x_1); +x_10 = l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__2(x_9, x_2); +lean_dec(x_9); +return x_10; +} +} +} +lean_object* _init_l_Lean_Elab_Tactic_addBuiltinTacticElab___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("invalid builtin tactic elaborator, elaborator for '"); +return x_1; +} +} +lean_object* l_Lean_Elab_Tactic_addBuiltinTacticElab(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; +x_5 = l_Lean_Elab_Tactic_builtinTacticElabTable; +x_6 = lean_io_ref_get(x_5, x_4); +if (lean_obj_tag(x_6) == 0) +{ +uint8_t x_7; +x_7 = !lean_is_exclusive(x_6); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_6, 0); +x_9 = lean_ctor_get(x_6, 1); +x_10 = l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__1(x_8, x_1); +if (x_10 == 0) +{ +lean_object* x_11; +lean_free_object(x_6); +x_11 = lean_io_ref_get(x_5, x_9); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +lean_dec(x_11); +x_14 = lean_io_ref_reset(x_5, x_13); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_16 = l_Lean_Elab_ElabFnTable_insert___rarg(x_12, x_1, x_3); +x_17 = lean_io_ref_set(x_5, x_16, x_15); +return x_17; +} +else +{ +uint8_t x_18; +lean_dec(x_12); +lean_dec(x_3); +lean_dec(x_1); +x_18 = !lean_is_exclusive(x_14); +if (x_18 == 0) +{ +return x_14; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_19 = lean_ctor_get(x_14, 0); +x_20 = lean_ctor_get(x_14, 1); +lean_inc(x_20); +lean_inc(x_19); +lean_dec(x_14); +x_21 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_20); +return x_21; +} +} +} +else +{ +uint8_t x_22; +lean_dec(x_3); +lean_dec(x_1); +x_22 = !lean_is_exclusive(x_11); +if (x_22 == 0) +{ +return x_11; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_11, 0); +x_24 = lean_ctor_get(x_11, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_11); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +else +{ +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_dec(x_3); +x_26 = l_Lean_Name_toString___closed__1; +x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_1); +x_28 = l_Lean_Elab_Tactic_addBuiltinTacticElab___closed__1; +x_29 = lean_string_append(x_28, x_27); +lean_dec(x_27); +x_30 = l___private_Init_Lean_Parser_Parser_8__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_31 = lean_string_append(x_29, x_30); +x_32 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set_tag(x_6, 1); +lean_ctor_set(x_6, 0, x_32); +return x_6; +} +} +else +{ +lean_object* x_33; lean_object* x_34; uint8_t x_35; +x_33 = lean_ctor_get(x_6, 0); +x_34 = lean_ctor_get(x_6, 1); +lean_inc(x_34); +lean_inc(x_33); +lean_dec(x_6); +x_35 = l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__1(x_33, x_1); +if (x_35 == 0) +{ +lean_object* x_36; +x_36 = lean_io_ref_get(x_5, x_34); +if (lean_obj_tag(x_36) == 0) +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +x_38 = lean_ctor_get(x_36, 1); +lean_inc(x_38); +lean_dec(x_36); +x_39 = lean_io_ref_reset(x_5, x_38); +if (lean_obj_tag(x_39) == 0) +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_39, 1); +lean_inc(x_40); +lean_dec(x_39); +x_41 = l_Lean_Elab_ElabFnTable_insert___rarg(x_37, x_1, x_3); +x_42 = lean_io_ref_set(x_5, x_41, x_40); +return x_42; +} +else +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +lean_dec(x_37); +lean_dec(x_3); +lean_dec(x_1); +x_43 = lean_ctor_get(x_39, 0); +lean_inc(x_43); +x_44 = lean_ctor_get(x_39, 1); +lean_inc(x_44); +if (lean_is_exclusive(x_39)) { + lean_ctor_release(x_39, 0); + lean_ctor_release(x_39, 1); + x_45 = x_39; +} else { + lean_dec_ref(x_39); + x_45 = lean_box(0); +} +if (lean_is_scalar(x_45)) { + x_46 = lean_alloc_ctor(1, 2, 0); +} else { + x_46 = x_45; +} +lean_ctor_set(x_46, 0, x_43); +lean_ctor_set(x_46, 1, x_44); +return x_46; +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +lean_dec(x_3); +lean_dec(x_1); +x_47 = lean_ctor_get(x_36, 0); +lean_inc(x_47); +x_48 = lean_ctor_get(x_36, 1); +lean_inc(x_48); +if (lean_is_exclusive(x_36)) { + lean_ctor_release(x_36, 0); + lean_ctor_release(x_36, 1); + x_49 = x_36; +} else { + lean_dec_ref(x_36); + x_49 = lean_box(0); +} +if (lean_is_scalar(x_49)) { + x_50 = lean_alloc_ctor(1, 2, 0); +} else { + x_50 = x_49; +} +lean_ctor_set(x_50, 0, x_47); +lean_ctor_set(x_50, 1, x_48); +return x_50; +} +} +else +{ +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_dec(x_3); +x_51 = l_Lean_Name_toString___closed__1; +x_52 = l_Lean_Name_toStringWithSep___main(x_51, x_1); +x_53 = l_Lean_Elab_Tactic_addBuiltinTacticElab___closed__1; +x_54 = lean_string_append(x_53, x_52); +lean_dec(x_52); +x_55 = l___private_Init_Lean_Parser_Parser_8__throwParserCategoryAlreadyDefined___rarg___closed__2; +x_56 = lean_string_append(x_54, x_55); +x_57 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_57, 0, x_56); +x_58 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_58, 0, x_57); +lean_ctor_set(x_58, 1, x_34); +return x_58; +} +} +} +else +{ +uint8_t x_59; +lean_dec(x_3); +lean_dec(x_1); +x_59 = !lean_is_exclusive(x_6); +if (x_59 == 0) +{ +return x_6; +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_60 = lean_ctor_get(x_6, 0); +x_61 = lean_ctor_get(x_6, 1); +lean_inc(x_61); +lean_inc(x_60); +lean_dec(x_6); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_60); +lean_ctor_set(x_62, 1, x_61); +return x_62; +} +} +} +} +lean_object* l_AssocList_contains___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__3___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_AssocList_contains___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__3(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__2(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_PersistentHashMap_containsAux___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; uint8_t x_5; lean_object* x_6; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = l_PersistentHashMap_containsAux___main___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__5(x_1, x_4, x_3); +lean_dec(x_3); +x_6 = lean_box(x_5); +return x_6; +} +} +lean_object* l_PersistentHashMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__4___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_PersistentHashMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__4(x_1, x_2); +lean_dec(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTacticElab___spec__1(x_1, x_2); +lean_dec(x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_Elab_Tactic_addBuiltinTacticElab___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Tactic_addBuiltinTacticElab(x_1, x_2, x_3, x_4); +lean_dec(x_2); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("_regBuiltinTacticElab"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__3; +x_2 = l___private_Init_Lean_Meta_Tactic_Util_1__regTraceClasses___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("addBuiltinTacticElab"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__3; +x_2 = l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__4; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__5; +x_3 = l_Lean_mkConst(x_2, x_1); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("failed to emit registration code for builtin tactic elaborator '"); +return x_1; +} +} +lean_object* l_Lean_Elab_Tactic_declareBuiltinTacticElab(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; 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; uint8_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_5 = l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__2; +lean_inc(x_3); +x_6 = l_Lean_Name_append___main(x_5, x_3); +x_7 = lean_box(0); +x_8 = l_Lean_nameToExprAux___main(x_2); +lean_inc(x_3); +x_9 = l_Lean_nameToExprAux___main(x_3); +lean_inc(x_3); +x_10 = l_Lean_mkConst(x_3, x_7); +x_11 = l_Lean_Parser_declareBuiltinParser___closed__8; +x_12 = lean_array_push(x_11, x_8); +x_13 = lean_array_push(x_12, x_9); +x_14 = lean_array_push(x_13, x_10); +x_15 = lean_unsigned_to_nat(0u); +x_16 = l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__6; +x_17 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_14, x_14, x_15, x_16); +lean_dec(x_14); +x_18 = l_Lean_Parser_declareBuiltinParser___closed__7; +lean_inc(x_6); +x_19 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_19, 0, x_6); +lean_ctor_set(x_19, 1, x_7); +lean_ctor_set(x_19, 2, x_18); +x_20 = lean_box(0); +x_21 = 0; +x_22 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_22, 0, x_19); +lean_ctor_set(x_22, 1, x_17); +lean_ctor_set(x_22, 2, x_20); +lean_ctor_set_uint8(x_22, sizeof(void*)*3, x_21); +x_23 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_23, 0, x_22); +x_24 = l_Lean_Options_empty; +x_25 = l_Lean_Environment_addAndCompile(x_1, x_24, x_23); +lean_dec(x_23); +if (lean_obj_tag(x_25) == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_25); +lean_dec(x_6); +x_26 = l_Lean_Name_toString___closed__1; +x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_3); +x_28 = l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__7; +x_29 = lean_string_append(x_28, x_27); +lean_dec(x_27); +x_30 = l_Char_HasRepr___closed__1; +x_31 = lean_string_append(x_29, x_30); +x_32 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_32, 0, x_31); +x_33 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_33, 0, x_32); +lean_ctor_set(x_33, 1, x_4); +return x_33; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +lean_dec(x_3); +x_34 = lean_ctor_get(x_25, 0); +lean_inc(x_34); +lean_dec(x_25); +x_35 = l_Lean_initAttr; +x_36 = lean_box(0); +x_37 = l_Lean_ParametricAttribute_setParam___rarg(x_35, x_34, x_6, x_36); +x_38 = l_IO_ofExcept___at_Lean_registerClassAttr___spec__1(x_37, x_4); +lean_dec(x_37); +return x_38; +} +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("invalid attribute 'builtinTacticElab', must be persistent"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__1; +x_2 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_declareLeadingBuiltinParser___closed__1; +x_2 = l___private_Init_Lean_Meta_Tactic_Util_1__regTraceClasses___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unexpected tactic elaborator type at '"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("' `TacticElab` expected"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("TacticElab"); +return x_1; +} +} +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5) { +_start: +{ +if (x_4 == 0) +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +lean_dec(x_1); +x_6 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__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; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__3; +lean_inc(x_1); +x_9 = l_Lean_Elab_syntaxNodeKindOfAttrParam(x_1, x_8, x_3); +x_10 = l_IO_ofExcept___at___private_Init_Lean_Elab_Util_6__ElabAttribute_add___spec__1(x_9, x_5); +lean_dec(x_9); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_24; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +if (lean_is_exclusive(x_10)) { + lean_ctor_release(x_10, 0); + lean_ctor_release(x_10, 1); + x_13 = x_10; +} else { + lean_dec_ref(x_10); + x_13 = lean_box(0); +} +lean_inc(x_2); +lean_inc(x_1); +x_24 = lean_environment_find(x_1, x_2); +if (lean_obj_tag(x_24) == 0) +{ +lean_object* x_25; lean_object* x_26; +lean_dec(x_13); +lean_dec(x_11); +lean_dec(x_2); +lean_dec(x_1); +x_25 = l___private_Init_Lean_Parser_Parser_18__BuiltinParserAttribute_add___closed__2; +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_12); +return x_26; +} +else +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_ctor_get(x_24, 0); +lean_inc(x_27); +lean_dec(x_24); +x_28 = l_Lean_ConstantInfo_type(x_27); +lean_dec(x_27); +if (lean_obj_tag(x_28) == 4) +{ +lean_object* x_29; +x_29 = lean_ctor_get(x_28, 0); +lean_inc(x_29); +lean_dec(x_28); +if (lean_obj_tag(x_29) == 1) +{ +lean_object* x_30; +x_30 = lean_ctor_get(x_29, 0); +lean_inc(x_30); +if (lean_obj_tag(x_30) == 1) +{ +lean_object* x_31; +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +if (lean_obj_tag(x_31) == 1) +{ +lean_object* x_32; +x_32 = lean_ctor_get(x_31, 0); +lean_inc(x_32); +if (lean_obj_tag(x_32) == 1) +{ +lean_object* x_33; +x_33 = lean_ctor_get(x_32, 0); +lean_inc(x_33); +if (lean_obj_tag(x_33) == 0) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_34 = lean_ctor_get(x_29, 1); +lean_inc(x_34); +lean_dec(x_29); +x_35 = lean_ctor_get(x_30, 1); +lean_inc(x_35); +lean_dec(x_30); +x_36 = lean_ctor_get(x_31, 1); +lean_inc(x_36); +lean_dec(x_31); +x_37 = lean_ctor_get(x_32, 1); +lean_inc(x_37); +lean_dec(x_32); +x_38 = l_Lean_nameToExprAux___main___closed__1; +x_39 = lean_string_dec_eq(x_37, x_38); +lean_dec(x_37); +if (x_39 == 0) +{ +lean_object* x_40; +lean_dec(x_36); +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_11); +lean_dec(x_1); +x_40 = lean_box(0); +x_14 = x_40; +goto block_23; +} +else +{ +lean_object* x_41; uint8_t x_42; +x_41 = l___private_Init_Lean_Elab_Util_8__regTraceClasses___closed__1; +x_42 = lean_string_dec_eq(x_36, x_41); +lean_dec(x_36); +if (x_42 == 0) +{ +lean_object* x_43; +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_11); +lean_dec(x_1); +x_43 = lean_box(0); +x_14 = x_43; +goto block_23; +} +else +{ +lean_object* x_44; uint8_t x_45; +x_44 = l___private_Init_Lean_Meta_Tactic_Util_1__regTraceClasses___closed__1; +x_45 = lean_string_dec_eq(x_35, x_44); +lean_dec(x_35); +if (x_45 == 0) +{ +lean_object* x_46; +lean_dec(x_34); +lean_dec(x_11); +lean_dec(x_1); +x_46 = lean_box(0); +x_14 = x_46; +goto block_23; +} +else +{ +lean_object* x_47; uint8_t x_48; +x_47 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__6; +x_48 = lean_string_dec_eq(x_34, x_47); +lean_dec(x_34); +if (x_48 == 0) +{ +lean_object* x_49; +lean_dec(x_11); +lean_dec(x_1); +x_49 = lean_box(0); +x_14 = x_49; +goto block_23; +} +else +{ +lean_object* x_50; +lean_dec(x_13); +x_50 = l_Lean_Elab_Tactic_declareBuiltinTacticElab(x_1, x_11, x_2, x_12); +return x_50; +} +} +} +} +} +else +{ +lean_object* x_51; +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_11); +lean_dec(x_1); +x_51 = lean_box(0); +x_14 = x_51; +goto block_23; +} +} +else +{ +lean_object* x_52; +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_11); +lean_dec(x_1); +x_52 = lean_box(0); +x_14 = x_52; +goto block_23; +} +} +else +{ +lean_object* x_53; +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_11); +lean_dec(x_1); +x_53 = lean_box(0); +x_14 = x_53; +goto block_23; +} +} +else +{ +lean_object* x_54; +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_11); +lean_dec(x_1); +x_54 = lean_box(0); +x_14 = x_54; +goto block_23; +} +} +else +{ +lean_object* x_55; +lean_dec(x_29); +lean_dec(x_11); +lean_dec(x_1); +x_55 = lean_box(0); +x_14 = x_55; +goto block_23; +} +} +else +{ +lean_object* x_56; +lean_dec(x_28); +lean_dec(x_11); +lean_dec(x_1); +x_56 = lean_box(0); +x_14 = x_56; +goto block_23; +} +} +block_23: +{ +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_dec(x_14); +x_15 = l_Lean_Name_toString___closed__1; +x_16 = l_Lean_Name_toStringWithSep___main(x_15, x_2); +x_17 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__4; +x_18 = lean_string_append(x_17, x_16); +lean_dec(x_16); +x_19 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__5; +x_20 = lean_string_append(x_18, x_19); +x_21 = lean_alloc_ctor(18, 1, 0); +lean_ctor_set(x_21, 0, x_20); +if (lean_is_scalar(x_13)) { + x_22 = lean_alloc_ctor(1, 2, 0); +} else { + x_22 = x_13; + lean_ctor_set_tag(x_22, 1); +} +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_12); +return x_22; +} +} +else +{ +uint8_t x_57; +lean_dec(x_2); +lean_dec(x_1); +x_57 = !lean_is_exclusive(x_10); +if (x_57 == 0) +{ +return x_10; +} +else +{ +lean_object* x_58; lean_object* x_59; lean_object* x_60; +x_58 = lean_ctor_get(x_10, 0); +x_59 = lean_ctor_get(x_10, 1); +lean_inc(x_59); +lean_inc(x_58); +lean_dec(x_10); +x_60 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_60, 0, x_58); +lean_ctor_set(x_60, 1, x_59); +return x_60; +} +} +} +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("builtinTacticElab"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Builtin tactic elaborator"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___boxed), 5, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; +x_1 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__2; +x_2 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__3; +x_3 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__4; +x_4 = 1; +x_5 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_5, 0, x_1); +lean_ctor_set(x_5, 1, x_2); +lean_ctor_set(x_5, 2, x_3); +lean_ctor_set_uint8(x_5, sizeof(void*)*3, x_4); +return x_5; +} +} +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__5; +x_3 = l_Lean_registerBuiltinAttribute(x_2, x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +uint8_t x_6; lean_object* x_7; +x_6 = lean_unbox(x_4); +lean_dec(x_4); +x_7 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1(x_1, x_2, x_3, x_6, x_5); +lean_dec(x_3); +return x_7; +} +} +lean_object* _init_l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("tacticElab"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__3; +x_2 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__6; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_mkTacticElabAttribute(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; +x_2 = l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__2; +x_3 = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__3; +x_4 = l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__3; +x_5 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__3; +x_6 = l_Lean_Elab_Tactic_builtinTacticElabTable; +x_7 = l_Lean_Elab_mkElabAttribute___rarg(x_2, x_3, x_4, x_5, x_6, x_1); +return x_7; +} +} +lean_object* _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Array_empty___closed__1; +x_2 = l_Lean_Elab_Tactic_tacticElabAttribute___closed__1; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = lean_unsigned_to_nat(0u); +x_2 = l_Lean_EnvExtension_Inhabited___rarg___closed__1; +x_3 = l_Lean_Elab_Tactic_tacticElabAttribute___closed__2; +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* _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_1 = l_Lean_Elab_Tactic_tacticElabAttribute___closed__3; +x_2 = lean_box(0); +x_3 = l_Lean_PersistentEnvExtension_inhabited___rarg___closed__1; +x_4 = l_Lean_Elab_Term_termElabAttribute___closed__4; +x_5 = l_Lean_PersistentEnvExtension_inhabited___rarg___closed__3; +x_6 = l_Lean_PersistentEnvExtension_inhabited___rarg___closed__4; +x_7 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_7, 0, x_1); +lean_ctor_set(x_7, 1, x_2); +lean_ctor_set(x_7, 2, x_3); +lean_ctor_set(x_7, 3, x_4); +lean_ctor_set(x_7, 4, x_5); +lean_ctor_set(x_7, 5, x_6); +return x_7; +} +} +lean_object* _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Lean_AttributeImpl_inhabited___closed__2; +x_2 = l_Lean_Elab_Tactic_tacticElabAttribute___closed__4; +x_3 = l_String_splitAux___main___closed__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_Elab_Tactic_logTrace(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; +x_6 = lean_alloc_closure((void*)(l_Lean_Elab_Term_logTrace___boxed), 5, 3); +lean_closure_set(x_6, 0, x_1); +lean_closure_set(x_6, 1, x_2); +lean_closure_set(x_6, 2, x_3); +x_7 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_6, x_4, x_5); +return x_7; +} +} +lean_object* l_Lean_Elab_Tactic_trace(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; +x_6 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_6, 0, x_1); +lean_closure_set(x_6, 1, x_2); +lean_closure_set(x_6, 2, x_3); +x_7 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_6, x_4, x_5); +return x_7; +} +} +lean_object* l_Lean_Elab_Tactic_traceAtCmdPos(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; +x_5 = lean_alloc_closure((void*)(l_Lean_Elab_Term_traceAtCmdPos___boxed), 4, 2); +lean_closure_set(x_5, 0, x_1); +lean_closure_set(x_5, 1, x_2); +x_6 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_5, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Tactic_dbgTrace___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_5 = lean_apply_1(x_1, x_2); +x_6 = l_Lean_Meta_dbgTrace___rarg___closed__1; +x_7 = lean_dbg_trace(x_5, x_6); +x_8 = lean_apply_2(x_7, x_3, x_4); +return x_8; +} +} +lean_object* l_Lean_Elab_Tactic_dbgTrace(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_dbgTrace___rarg), 4, 0); +return x_2; +} +} +lean_object* l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +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_dec(x_1); +lean_inc(x_2); +x_6 = l_Lean_Syntax_prettyPrint(x_2); +x_7 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_7, 0, x_6); +x_8 = l_Lean_MessageData_ofList___closed__3; +x_9 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_7); +x_10 = lean_unsigned_to_nat(2u); +x_11 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +x_12 = l___private_Init_Lean_Elab_Term_9__elabTermUsing___main___closed__3; +x_13 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_11); +x_14 = l_Lean_Elab_Tactic_throwError___rarg(x_2, x_13, x_4, x_5); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_3, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_3, 1); +lean_inc(x_16); +lean_dec(x_3); +lean_inc(x_4); +lean_inc(x_2); +x_17 = lean_apply_3(x_15, x_2, x_4, x_5); +if (lean_obj_tag(x_17) == 0) +{ +lean_dec(x_16); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +return x_17; +} +else +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +uint8_t x_19; +lean_dec(x_16); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_19 = !lean_is_exclusive(x_17); +if (x_19 == 0) +{ +lean_object* x_20; +x_20 = lean_ctor_get(x_17, 0); +lean_dec(x_20); +return x_17; +} +else +{ +lean_object* x_21; lean_object* x_22; +x_21 = lean_ctor_get(x_17, 1); +lean_inc(x_21); +lean_dec(x_17); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_18); +lean_ctor_set(x_22, 1, x_21); +return x_22; +} +} +else +{ +lean_dec(x_17); +lean_inc(x_1); +{ +lean_object* _tmp_2 = x_16; +lean_object* _tmp_4 = x_1; +x_3 = _tmp_2; +x_5 = _tmp_4; +} +goto _start; +} +} +} +} +} +lean_object* l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(x_1, x_2, x_3, x_4, x_5); +return x_6; +} +} +lean_object* l_Lean_Elab_Tactic_withMacroExpansion___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_3); +if (x_5 == 0) +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_ctor_get(x_3, 0); +x_7 = !lean_is_exclusive(x_6); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = lean_ctor_get(x_6, 8); +x_9 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_9, 0, x_1); +lean_ctor_set(x_9, 1, x_8); +lean_ctor_set(x_6, 8, x_9); +x_10 = lean_apply_2(x_2, x_3, x_4); +return x_10; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_11 = lean_ctor_get(x_6, 0); +x_12 = lean_ctor_get(x_6, 1); +x_13 = lean_ctor_get(x_6, 2); +x_14 = lean_ctor_get(x_6, 3); +x_15 = lean_ctor_get(x_6, 4); +x_16 = lean_ctor_get(x_6, 5); +x_17 = lean_ctor_get(x_6, 6); +x_18 = lean_ctor_get(x_6, 7); +x_19 = lean_ctor_get(x_6, 8); +x_20 = lean_ctor_get(x_6, 9); +x_21 = lean_ctor_get_uint8(x_6, sizeof(void*)*10); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_6); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_1); +lean_ctor_set(x_22, 1, x_19); +x_23 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_23, 0, x_11); +lean_ctor_set(x_23, 1, x_12); +lean_ctor_set(x_23, 2, x_13); +lean_ctor_set(x_23, 3, x_14); +lean_ctor_set(x_23, 4, x_15); +lean_ctor_set(x_23, 5, x_16); +lean_ctor_set(x_23, 6, x_17); +lean_ctor_set(x_23, 7, x_18); +lean_ctor_set(x_23, 8, x_22); +lean_ctor_set(x_23, 9, x_20); +lean_ctor_set_uint8(x_23, sizeof(void*)*10, x_21); +lean_ctor_set(x_3, 0, x_23); +x_24 = lean_apply_2(x_2, x_3, x_4); +return x_24; +} +} +else +{ +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; uint8_t x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_25 = lean_ctor_get(x_3, 0); +x_26 = lean_ctor_get(x_3, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_3); +x_27 = lean_ctor_get(x_25, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_25, 1); +lean_inc(x_28); +x_29 = lean_ctor_get(x_25, 2); +lean_inc(x_29); +x_30 = lean_ctor_get(x_25, 3); +lean_inc(x_30); +x_31 = lean_ctor_get(x_25, 4); +lean_inc(x_31); +x_32 = lean_ctor_get(x_25, 5); +lean_inc(x_32); +x_33 = lean_ctor_get(x_25, 6); +lean_inc(x_33); +x_34 = lean_ctor_get(x_25, 7); +lean_inc(x_34); +x_35 = lean_ctor_get(x_25, 8); +lean_inc(x_35); +x_36 = lean_ctor_get(x_25, 9); +lean_inc(x_36); +x_37 = lean_ctor_get_uint8(x_25, sizeof(void*)*10); +if (lean_is_exclusive(x_25)) { + lean_ctor_release(x_25, 0); + lean_ctor_release(x_25, 1); + lean_ctor_release(x_25, 2); + lean_ctor_release(x_25, 3); + lean_ctor_release(x_25, 4); + lean_ctor_release(x_25, 5); + lean_ctor_release(x_25, 6); + lean_ctor_release(x_25, 7); + lean_ctor_release(x_25, 8); + lean_ctor_release(x_25, 9); + x_38 = x_25; +} else { + lean_dec_ref(x_25); + x_38 = lean_box(0); +} +x_39 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_39, 0, x_1); +lean_ctor_set(x_39, 1, x_35); +if (lean_is_scalar(x_38)) { + x_40 = lean_alloc_ctor(0, 10, 1); +} else { + x_40 = x_38; +} +lean_ctor_set(x_40, 0, x_27); +lean_ctor_set(x_40, 1, x_28); +lean_ctor_set(x_40, 2, x_29); +lean_ctor_set(x_40, 3, x_30); +lean_ctor_set(x_40, 4, x_31); +lean_ctor_set(x_40, 5, x_32); +lean_ctor_set(x_40, 6, x_33); +lean_ctor_set(x_40, 7, x_34); +lean_ctor_set(x_40, 8, x_39); +lean_ctor_set(x_40, 9, x_36); +lean_ctor_set_uint8(x_40, sizeof(void*)*10, x_37); +x_41 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_26); +x_42 = lean_apply_2(x_2, x_41, x_4); +return x_42; +} +} +} +lean_object* l_Lean_Elab_Tactic_withMacroExpansion(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_withMacroExpansion___rarg), 4, 0); +return x_2; +} +} +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__4(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; uint8_t x_7; +x_6 = lean_array_get_size(x_1); +x_7 = lean_nat_dec_lt(x_4, x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +lean_object* x_8; +lean_dec(x_4); +x_8 = lean_box(0); +return x_8; +} +else +{ +lean_object* x_9; uint8_t x_10; +x_9 = lean_array_fget(x_1, x_4); +x_10 = lean_name_eq(x_5, x_9); +lean_dec(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_4, x_11); +lean_dec(x_4); +x_3 = lean_box(0); +x_4 = x_12; +goto _start; +} +else +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_array_fget(x_2, x_4); +lean_dec(x_4); +x_15 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_15, 0, x_14); +return x_15; +} +} +} +} +lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__3(lean_object* x_1, size_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; size_t x_5; size_t x_6; size_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = 5; +x_6 = l_PersistentHashMap_insertAux___main___rarg___closed__2; +x_7 = x_2 & x_6; +x_8 = lean_usize_to_nat(x_7); +x_9 = lean_box(2); +x_10 = lean_array_get(x_9, x_4, x_8); +lean_dec(x_8); +lean_dec(x_4); +switch (lean_obj_tag(x_10)) { +case 0: +{ +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = lean_name_eq(x_3, x_11); +lean_dec(x_11); +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_12); +x_14 = lean_box(0); +return x_14; +} +else +{ +lean_object* x_15; +x_15 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_15, 0, x_12); +return x_15; +} +} +case 1: +{ +lean_object* x_16; size_t x_17; +x_16 = lean_ctor_get(x_10, 0); +lean_inc(x_16); +lean_dec(x_10); +x_17 = x_2 >> x_5; +x_1 = x_16; +x_2 = x_17; +goto _start; +} +default: +{ +lean_object* x_19; +x_19 = lean_box(0); +return x_19; +} +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_20 = lean_ctor_get(x_1, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +lean_dec(x_1); +x_22 = lean_unsigned_to_nat(0u); +x_23 = l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__4(x_20, x_21, lean_box(0), x_22, x_3); +lean_dec(x_21); +lean_dec(x_20); +return x_23; +} +} +} +lean_object* l_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; size_t x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +lean_dec(x_1); +x_4 = l_Lean_Name_hash(x_2); +x_5 = l_PersistentHashMap_findAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__3(x_3, x_4, x_2); +return x_5; +} +} +lean_object* l_AssocList_find___main___at_Lean_Elab_Tactic_elabTactic___main___spec__6(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_3; +x_3 = lean_box(0); +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 1); +x_6 = lean_ctor_get(x_2, 2); +x_7 = lean_name_eq(x_4, x_1); +if (x_7 == 0) +{ +x_2 = x_6; +goto _start; +} +else +{ +lean_object* x_9; +lean_inc(x_5); +x_9 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_9, 0, x_5); +return x_9; +} +} +} +} +lean_object* l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__5(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; size_t x_5; size_t x_6; lean_object* x_7; lean_object* x_8; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_array_get_size(x_3); +x_5 = l_Lean_Name_hash(x_2); +x_6 = lean_usize_modn(x_5, x_4); +lean_dec(x_4); +x_7 = lean_array_uget(x_3, x_6); +x_8 = l_AssocList_find___main___at_Lean_Elab_Tactic_elabTactic___main___spec__6(x_2, x_7); +lean_dec(x_7); +return x_8; +} +} +lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = lean_ctor_get_uint8(x_1, sizeof(void*)*2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +lean_dec(x_1); +x_6 = l_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__2(x_5, x_2); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; +x_7 = l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__5(x_4, x_2); +lean_dec(x_4); +return x_7; +} +else +{ +lean_dec(x_4); +return x_6; +} +} +else +{ +lean_object* x_8; lean_object* x_9; +x_8 = lean_ctor_get(x_1, 0); +lean_inc(x_8); +lean_dec(x_1); +x_9 = l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__5(x_8, x_2); +lean_dec(x_8); +return x_9; +} +} +} +lean_object* l_Lean_Elab_Tactic_elabTactic___main___lambda__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_3, 0, x_1); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_elabTactic___main___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unexpected command"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_elabTactic___main___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Tactic_elabTactic___main___closed__1; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Tactic_elabTactic___main___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Tactic_elabTactic___main___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Tactic_elabTactic___main___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Init_Lean_Elab_Util_8__regTraceClasses___closed__2; +x_2 = l_Lean_Meta_isLevelDefEqAux___main___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_elabTactic___main___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("tactic '"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_elabTactic___main___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Tactic_elabTactic___main___closed__5; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Tactic_elabTactic___main___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Tactic_elabTactic___main___closed__6; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_elabTactic___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; uint8_t x_402; +x_398 = lean_ctor_get(x_2, 0); +lean_inc(x_398); +x_399 = lean_ctor_get(x_398, 0); +lean_inc(x_399); +lean_dec(x_398); +x_400 = lean_ctor_get(x_399, 3); +lean_inc(x_400); +x_401 = lean_ctor_get(x_399, 4); +lean_inc(x_401); +lean_dec(x_399); +x_402 = lean_nat_dec_eq(x_400, x_401); +lean_dec(x_401); +lean_dec(x_400); +if (x_402 == 0) +{ +x_4 = x_3; +goto block_397; +} +else +{ +lean_object* x_403; lean_object* x_404; +x_403 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +lean_inc(x_2); +lean_inc(x_1); +x_404 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_403, x_2, x_3); +if (lean_obj_tag(x_404) == 0) +{ +lean_object* x_405; +x_405 = lean_ctor_get(x_404, 1); +lean_inc(x_405); +lean_dec(x_404); +x_4 = x_405; +goto block_397; +} +else +{ +uint8_t x_406; +lean_dec(x_2); +lean_dec(x_1); +x_406 = !lean_is_exclusive(x_404); +if (x_406 == 0) +{ +return x_404; +} +else +{ +lean_object* x_407; lean_object* x_408; lean_object* x_409; +x_407 = lean_ctor_get(x_404, 0); +x_408 = lean_ctor_get(x_404, 1); +lean_inc(x_408); +lean_inc(x_407); +lean_dec(x_404); +x_409 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_409, 0, x_407); +lean_ctor_set(x_409, 1, x_408); +return x_409; +} +} +} +block_397: +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_5 = lean_ctor_get(x_2, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = !lean_is_exclusive(x_2); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_2, 1); +x_9 = lean_ctor_get(x_2, 0); +lean_dec(x_9); +x_10 = !lean_is_exclusive(x_5); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_11 = lean_ctor_get(x_5, 1); +x_12 = lean_ctor_get(x_5, 2); +x_13 = lean_ctor_get(x_5, 3); +x_14 = lean_ctor_get(x_5, 4); +x_15 = lean_ctor_get(x_5, 5); +x_16 = lean_ctor_get(x_5, 6); +x_17 = lean_ctor_get(x_5, 7); +x_18 = lean_ctor_get(x_5, 8); +x_19 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); +x_20 = lean_ctor_get(x_5, 9); +lean_dec(x_20); +x_21 = lean_ctor_get(x_5, 0); +lean_dec(x_21); +x_22 = !lean_is_exclusive(x_6); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; +x_23 = lean_ctor_get(x_6, 3); +x_24 = lean_unsigned_to_nat(1u); +x_25 = lean_nat_add(x_23, x_24); +lean_dec(x_23); +lean_ctor_set(x_6, 3, x_25); +x_26 = !lean_is_exclusive(x_4); +if (x_26 == 0) +{ +lean_object* x_27; uint8_t x_28; +x_27 = lean_ctor_get(x_4, 0); +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; +x_29 = lean_ctor_get(x_27, 5); +x_30 = lean_nat_add(x_29, x_24); +lean_ctor_set(x_27, 5, x_30); +lean_inc(x_29); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_6); +lean_ctor_set(x_5, 9, x_29); +lean_inc(x_8); +if (lean_obj_tag(x_1) == 1) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +lean_inc(x_1); +x_31 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_elabTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_31, 0, x_1); +x_32 = l_Lean_Elab_Tactic_elabTactic___main___closed__4; +lean_inc(x_1); +x_33 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_33, 0, x_32); +lean_closure_set(x_33, 1, x_1); +lean_closure_set(x_33, 2, x_31); +lean_inc(x_2); +x_34 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_33, x_2, x_4); +if (lean_obj_tag(x_34) == 0) +{ +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; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_37 = lean_ctor_get(x_36, 1); +lean_inc(x_37); +x_38 = lean_ctor_get(x_35, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +lean_dec(x_38); +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +lean_dec(x_39); +x_41 = l_Lean_PersistentEnvExtension_getState___rarg(x_37, x_40); +lean_dec(x_40); +lean_dec(x_37); +x_42 = lean_ctor_get(x_41, 1); +lean_inc(x_42); +lean_dec(x_41); +lean_inc(x_1); +x_43 = l_Lean_Syntax_getKind(x_1); +x_44 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(x_42, x_43); +if (lean_obj_tag(x_44) == 0) +{ +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_45 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_35); +x_46 = lean_ctor_get(x_45, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_45, 1); +lean_inc(x_47); +lean_dec(x_45); +x_48 = l_Lean_Elab_Tactic_getEnv___rarg(x_47); +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_48, 1); +lean_inc(x_50); +lean_dec(x_48); +lean_inc(x_1); +x_51 = l_Lean_Elab_expandMacro(x_49, x_1, x_46); +lean_dec(x_49); +if (lean_obj_tag(x_51) == 0) +{ +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_dec(x_29); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_52 = l_Lean_Name_toString___closed__1; +x_53 = l_Lean_Name_toStringWithSep___main(x_52, x_43); +x_54 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_54, 0, x_53); +x_55 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_55, 0, x_54); +x_56 = l_Lean_Elab_Tactic_elabTactic___main___closed__7; +x_57 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_55); +x_58 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_59 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +x_60 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_59, x_2, x_50); +return x_60; +} +else +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; +lean_dec(x_43); +lean_dec(x_2); +x_61 = lean_ctor_get(x_51, 0); +lean_inc(x_61); +lean_dec(x_51); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_1); +lean_ctor_set(x_62, 1, x_18); +x_63 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_63, 0, x_6); +lean_ctor_set(x_63, 1, x_11); +lean_ctor_set(x_63, 2, x_12); +lean_ctor_set(x_63, 3, x_13); +lean_ctor_set(x_63, 4, x_14); +lean_ctor_set(x_63, 5, x_15); +lean_ctor_set(x_63, 6, x_16); +lean_ctor_set(x_63, 7, x_17); +lean_ctor_set(x_63, 8, x_62); +lean_ctor_set(x_63, 9, x_29); +lean_ctor_set_uint8(x_63, sizeof(void*)*10, x_19); +x_64 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_64, 0, x_63); +lean_ctor_set(x_64, 1, x_8); +x_1 = x_61; +x_2 = x_64; +x_3 = x_50; +goto _start; +} +} +else +{ +lean_object* x_66; lean_object* x_67; +lean_dec(x_43); +lean_dec(x_29); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_66 = lean_ctor_get(x_44, 0); +lean_inc(x_66); +lean_dec(x_44); +lean_inc(x_35); +x_67 = l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(x_35, x_1, x_66, x_2, x_35); +return x_67; +} +} +else +{ +uint8_t x_68; +lean_dec(x_2); +lean_dec(x_29); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +lean_dec(x_1); +x_68 = !lean_is_exclusive(x_34); +if (x_68 == 0) +{ +return x_34; +} +else +{ +lean_object* x_69; lean_object* x_70; lean_object* x_71; +x_69 = lean_ctor_get(x_34, 0); +x_70 = lean_ctor_get(x_34, 1); +lean_inc(x_70); +lean_inc(x_69); +lean_dec(x_34); +x_71 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_71, 0, x_69); +lean_ctor_set(x_71, 1, x_70); +return x_71; +} +} +} +else +{ +lean_object* x_72; lean_object* x_73; +lean_dec(x_29); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_72 = l_Lean_Elab_Tactic_elabTactic___main___closed__3; +x_73 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_72, x_2, x_4); +return x_73; +} +} +else +{ +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; +x_74 = lean_ctor_get(x_27, 0); +x_75 = lean_ctor_get(x_27, 1); +x_76 = lean_ctor_get(x_27, 2); +x_77 = lean_ctor_get(x_27, 3); +x_78 = lean_ctor_get(x_27, 4); +x_79 = lean_ctor_get(x_27, 5); +lean_inc(x_79); +lean_inc(x_78); +lean_inc(x_77); +lean_inc(x_76); +lean_inc(x_75); +lean_inc(x_74); +lean_dec(x_27); +x_80 = lean_nat_add(x_79, x_24); +x_81 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_81, 0, x_74); +lean_ctor_set(x_81, 1, x_75); +lean_ctor_set(x_81, 2, x_76); +lean_ctor_set(x_81, 3, x_77); +lean_ctor_set(x_81, 4, x_78); +lean_ctor_set(x_81, 5, x_80); +lean_ctor_set(x_4, 0, x_81); +lean_inc(x_79); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_6); +lean_ctor_set(x_5, 9, x_79); +lean_inc(x_8); +if (lean_obj_tag(x_1) == 1) +{ +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; +lean_inc(x_1); +x_82 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_elabTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_82, 0, x_1); +x_83 = l_Lean_Elab_Tactic_elabTactic___main___closed__4; +lean_inc(x_1); +x_84 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_84, 0, x_83); +lean_closure_set(x_84, 1, x_1); +lean_closure_set(x_84, 2, x_82); +lean_inc(x_2); +x_85 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_84, x_2, x_4); +if (lean_obj_tag(x_85) == 0) +{ +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; +x_86 = lean_ctor_get(x_85, 1); +lean_inc(x_86); +lean_dec(x_85); +x_87 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_88 = lean_ctor_get(x_87, 1); +lean_inc(x_88); +x_89 = lean_ctor_get(x_86, 0); +lean_inc(x_89); +x_90 = lean_ctor_get(x_89, 0); +lean_inc(x_90); +lean_dec(x_89); +x_91 = lean_ctor_get(x_90, 0); +lean_inc(x_91); +lean_dec(x_90); +x_92 = l_Lean_PersistentEnvExtension_getState___rarg(x_88, x_91); +lean_dec(x_91); +lean_dec(x_88); +x_93 = lean_ctor_get(x_92, 1); +lean_inc(x_93); +lean_dec(x_92); +lean_inc(x_1); +x_94 = l_Lean_Syntax_getKind(x_1); +x_95 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(x_93, x_94); +if (lean_obj_tag(x_95) == 0) +{ +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; +x_96 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_86); +x_97 = lean_ctor_get(x_96, 0); +lean_inc(x_97); +x_98 = lean_ctor_get(x_96, 1); +lean_inc(x_98); +lean_dec(x_96); +x_99 = l_Lean_Elab_Tactic_getEnv___rarg(x_98); +x_100 = lean_ctor_get(x_99, 0); +lean_inc(x_100); +x_101 = lean_ctor_get(x_99, 1); +lean_inc(x_101); +lean_dec(x_99); +lean_inc(x_1); +x_102 = l_Lean_Elab_expandMacro(x_100, x_1, x_97); +lean_dec(x_100); +if (lean_obj_tag(x_102) == 0) +{ +lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; +lean_dec(x_79); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_103 = l_Lean_Name_toString___closed__1; +x_104 = l_Lean_Name_toStringWithSep___main(x_103, x_94); +x_105 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_105, 0, x_104); +x_106 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_106, 0, x_105); +x_107 = l_Lean_Elab_Tactic_elabTactic___main___closed__7; +x_108 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_108, 0, x_107); +lean_ctor_set(x_108, 1, x_106); +x_109 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_110 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_110, 0, x_108); +lean_ctor_set(x_110, 1, x_109); +x_111 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_110, x_2, x_101); +return x_111; +} +else +{ +lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; +lean_dec(x_94); +lean_dec(x_2); +x_112 = lean_ctor_get(x_102, 0); +lean_inc(x_112); +lean_dec(x_102); +x_113 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_113, 0, x_1); +lean_ctor_set(x_113, 1, x_18); +x_114 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_114, 0, x_6); +lean_ctor_set(x_114, 1, x_11); +lean_ctor_set(x_114, 2, x_12); +lean_ctor_set(x_114, 3, x_13); +lean_ctor_set(x_114, 4, x_14); +lean_ctor_set(x_114, 5, x_15); +lean_ctor_set(x_114, 6, x_16); +lean_ctor_set(x_114, 7, x_17); +lean_ctor_set(x_114, 8, x_113); +lean_ctor_set(x_114, 9, x_79); +lean_ctor_set_uint8(x_114, sizeof(void*)*10, x_19); +x_115 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_115, 0, x_114); +lean_ctor_set(x_115, 1, x_8); +x_1 = x_112; +x_2 = x_115; +x_3 = x_101; +goto _start; +} +} +else +{ +lean_object* x_117; lean_object* x_118; +lean_dec(x_94); +lean_dec(x_79); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_117 = lean_ctor_get(x_95, 0); +lean_inc(x_117); +lean_dec(x_95); +lean_inc(x_86); +x_118 = l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(x_86, x_1, x_117, x_2, x_86); +return x_118; +} +} +else +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; +lean_dec(x_2); +lean_dec(x_79); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +lean_dec(x_1); +x_119 = lean_ctor_get(x_85, 0); +lean_inc(x_119); +x_120 = lean_ctor_get(x_85, 1); +lean_inc(x_120); +if (lean_is_exclusive(x_85)) { + lean_ctor_release(x_85, 0); + lean_ctor_release(x_85, 1); + x_121 = x_85; +} else { + lean_dec_ref(x_85); + x_121 = lean_box(0); +} +if (lean_is_scalar(x_121)) { + x_122 = lean_alloc_ctor(1, 2, 0); +} else { + x_122 = x_121; +} +lean_ctor_set(x_122, 0, x_119); +lean_ctor_set(x_122, 1, x_120); +return x_122; +} +} +else +{ +lean_object* x_123; lean_object* x_124; +lean_dec(x_79); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_123 = l_Lean_Elab_Tactic_elabTactic___main___closed__3; +x_124 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_123, x_2, x_4); +return x_124; +} +} +} +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; +x_125 = lean_ctor_get(x_4, 0); +x_126 = lean_ctor_get(x_4, 1); +lean_inc(x_126); +lean_inc(x_125); +lean_dec(x_4); +x_127 = lean_ctor_get(x_125, 0); +lean_inc(x_127); +x_128 = lean_ctor_get(x_125, 1); +lean_inc(x_128); +x_129 = lean_ctor_get(x_125, 2); +lean_inc(x_129); +x_130 = lean_ctor_get(x_125, 3); +lean_inc(x_130); +x_131 = lean_ctor_get(x_125, 4); +lean_inc(x_131); +x_132 = lean_ctor_get(x_125, 5); +lean_inc(x_132); +if (lean_is_exclusive(x_125)) { + lean_ctor_release(x_125, 0); + lean_ctor_release(x_125, 1); + lean_ctor_release(x_125, 2); + lean_ctor_release(x_125, 3); + lean_ctor_release(x_125, 4); + lean_ctor_release(x_125, 5); + x_133 = x_125; +} else { + lean_dec_ref(x_125); + x_133 = lean_box(0); +} +x_134 = lean_nat_add(x_132, x_24); +if (lean_is_scalar(x_133)) { + x_135 = lean_alloc_ctor(0, 6, 0); +} else { + x_135 = x_133; +} +lean_ctor_set(x_135, 0, x_127); +lean_ctor_set(x_135, 1, x_128); +lean_ctor_set(x_135, 2, x_129); +lean_ctor_set(x_135, 3, x_130); +lean_ctor_set(x_135, 4, x_131); +lean_ctor_set(x_135, 5, x_134); +x_136 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_136, 0, x_135); +lean_ctor_set(x_136, 1, x_126); +lean_inc(x_132); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_6); +lean_ctor_set(x_5, 9, x_132); +lean_inc(x_8); +if (lean_obj_tag(x_1) == 1) +{ +lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; +lean_inc(x_1); +x_137 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_elabTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_137, 0, x_1); +x_138 = l_Lean_Elab_Tactic_elabTactic___main___closed__4; +lean_inc(x_1); +x_139 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_139, 0, x_138); +lean_closure_set(x_139, 1, x_1); +lean_closure_set(x_139, 2, x_137); +lean_inc(x_2); +x_140 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_139, x_2, x_136); +if (lean_obj_tag(x_140) == 0) +{ +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; +x_141 = lean_ctor_get(x_140, 1); +lean_inc(x_141); +lean_dec(x_140); +x_142 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_143 = lean_ctor_get(x_142, 1); +lean_inc(x_143); +x_144 = lean_ctor_get(x_141, 0); +lean_inc(x_144); +x_145 = lean_ctor_get(x_144, 0); +lean_inc(x_145); +lean_dec(x_144); +x_146 = lean_ctor_get(x_145, 0); +lean_inc(x_146); +lean_dec(x_145); +x_147 = l_Lean_PersistentEnvExtension_getState___rarg(x_143, x_146); +lean_dec(x_146); +lean_dec(x_143); +x_148 = lean_ctor_get(x_147, 1); +lean_inc(x_148); +lean_dec(x_147); +lean_inc(x_1); +x_149 = l_Lean_Syntax_getKind(x_1); +x_150 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(x_148, x_149); +if (lean_obj_tag(x_150) == 0) +{ +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; +x_151 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_141); +x_152 = lean_ctor_get(x_151, 0); +lean_inc(x_152); +x_153 = lean_ctor_get(x_151, 1); +lean_inc(x_153); +lean_dec(x_151); +x_154 = l_Lean_Elab_Tactic_getEnv___rarg(x_153); +x_155 = lean_ctor_get(x_154, 0); +lean_inc(x_155); +x_156 = lean_ctor_get(x_154, 1); +lean_inc(x_156); +lean_dec(x_154); +lean_inc(x_1); +x_157 = l_Lean_Elab_expandMacro(x_155, x_1, x_152); +lean_dec(x_155); +if (lean_obj_tag(x_157) == 0) +{ +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_dec(x_132); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_158 = l_Lean_Name_toString___closed__1; +x_159 = l_Lean_Name_toStringWithSep___main(x_158, x_149); +x_160 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_160, 0, x_159); +x_161 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_161, 0, x_160); +x_162 = l_Lean_Elab_Tactic_elabTactic___main___closed__7; +x_163 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_163, 0, x_162); +lean_ctor_set(x_163, 1, x_161); +x_164 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_165 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_165, 0, x_163); +lean_ctor_set(x_165, 1, x_164); +x_166 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_165, x_2, x_156); +return x_166; +} +else +{ +lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; +lean_dec(x_149); +lean_dec(x_2); +x_167 = lean_ctor_get(x_157, 0); +lean_inc(x_167); +lean_dec(x_157); +x_168 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_168, 0, x_1); +lean_ctor_set(x_168, 1, x_18); +x_169 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_169, 0, x_6); +lean_ctor_set(x_169, 1, x_11); +lean_ctor_set(x_169, 2, x_12); +lean_ctor_set(x_169, 3, x_13); +lean_ctor_set(x_169, 4, x_14); +lean_ctor_set(x_169, 5, x_15); +lean_ctor_set(x_169, 6, x_16); +lean_ctor_set(x_169, 7, x_17); +lean_ctor_set(x_169, 8, x_168); +lean_ctor_set(x_169, 9, x_132); +lean_ctor_set_uint8(x_169, sizeof(void*)*10, x_19); +x_170 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_170, 0, x_169); +lean_ctor_set(x_170, 1, x_8); +x_1 = x_167; +x_2 = x_170; +x_3 = x_156; +goto _start; +} +} +else +{ +lean_object* x_172; lean_object* x_173; +lean_dec(x_149); +lean_dec(x_132); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_172 = lean_ctor_get(x_150, 0); +lean_inc(x_172); +lean_dec(x_150); +lean_inc(x_141); +x_173 = l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(x_141, x_1, x_172, x_2, x_141); +return x_173; +} +} +else +{ +lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; +lean_dec(x_2); +lean_dec(x_132); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +lean_dec(x_1); +x_174 = lean_ctor_get(x_140, 0); +lean_inc(x_174); +x_175 = lean_ctor_get(x_140, 1); +lean_inc(x_175); +if (lean_is_exclusive(x_140)) { + lean_ctor_release(x_140, 0); + lean_ctor_release(x_140, 1); + x_176 = x_140; +} else { + lean_dec_ref(x_140); + x_176 = lean_box(0); +} +if (lean_is_scalar(x_176)) { + x_177 = lean_alloc_ctor(1, 2, 0); +} else { + x_177 = x_176; +} +lean_ctor_set(x_177, 0, x_174); +lean_ctor_set(x_177, 1, x_175); +return x_177; +} +} +else +{ +lean_object* x_178; lean_object* x_179; +lean_dec(x_132); +lean_dec(x_6); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_178 = l_Lean_Elab_Tactic_elabTactic___main___closed__3; +x_179 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_178, x_2, x_136); +return x_179; +} +} +} +else +{ +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; +x_180 = lean_ctor_get(x_6, 0); +x_181 = lean_ctor_get(x_6, 1); +x_182 = lean_ctor_get(x_6, 2); +x_183 = lean_ctor_get(x_6, 3); +x_184 = lean_ctor_get(x_6, 4); +lean_inc(x_184); +lean_inc(x_183); +lean_inc(x_182); +lean_inc(x_181); +lean_inc(x_180); +lean_dec(x_6); +x_185 = lean_unsigned_to_nat(1u); +x_186 = lean_nat_add(x_183, x_185); +lean_dec(x_183); +x_187 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_187, 0, x_180); +lean_ctor_set(x_187, 1, x_181); +lean_ctor_set(x_187, 2, x_182); +lean_ctor_set(x_187, 3, x_186); +lean_ctor_set(x_187, 4, x_184); +x_188 = lean_ctor_get(x_4, 0); +lean_inc(x_188); +x_189 = lean_ctor_get(x_4, 1); +lean_inc(x_189); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_190 = x_4; +} else { + lean_dec_ref(x_4); + x_190 = lean_box(0); +} +x_191 = lean_ctor_get(x_188, 0); +lean_inc(x_191); +x_192 = lean_ctor_get(x_188, 1); +lean_inc(x_192); +x_193 = lean_ctor_get(x_188, 2); +lean_inc(x_193); +x_194 = lean_ctor_get(x_188, 3); +lean_inc(x_194); +x_195 = lean_ctor_get(x_188, 4); +lean_inc(x_195); +x_196 = lean_ctor_get(x_188, 5); +lean_inc(x_196); +if (lean_is_exclusive(x_188)) { + lean_ctor_release(x_188, 0); + lean_ctor_release(x_188, 1); + lean_ctor_release(x_188, 2); + lean_ctor_release(x_188, 3); + lean_ctor_release(x_188, 4); + lean_ctor_release(x_188, 5); + x_197 = x_188; +} else { + lean_dec_ref(x_188); + x_197 = lean_box(0); +} +x_198 = lean_nat_add(x_196, x_185); +if (lean_is_scalar(x_197)) { + x_199 = lean_alloc_ctor(0, 6, 0); +} else { + x_199 = x_197; +} +lean_ctor_set(x_199, 0, x_191); +lean_ctor_set(x_199, 1, x_192); +lean_ctor_set(x_199, 2, x_193); +lean_ctor_set(x_199, 3, x_194); +lean_ctor_set(x_199, 4, x_195); +lean_ctor_set(x_199, 5, x_198); +if (lean_is_scalar(x_190)) { + x_200 = lean_alloc_ctor(0, 2, 0); +} else { + x_200 = x_190; +} +lean_ctor_set(x_200, 0, x_199); +lean_ctor_set(x_200, 1, x_189); +lean_inc(x_196); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_187); +lean_ctor_set(x_5, 9, x_196); +lean_ctor_set(x_5, 0, x_187); +lean_inc(x_8); +if (lean_obj_tag(x_1) == 1) +{ +lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; +lean_inc(x_1); +x_201 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_elabTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_201, 0, x_1); +x_202 = l_Lean_Elab_Tactic_elabTactic___main___closed__4; +lean_inc(x_1); +x_203 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_203, 0, x_202); +lean_closure_set(x_203, 1, x_1); +lean_closure_set(x_203, 2, x_201); +lean_inc(x_2); +x_204 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_203, x_2, x_200); +if (lean_obj_tag(x_204) == 0) +{ +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; +x_205 = lean_ctor_get(x_204, 1); +lean_inc(x_205); +lean_dec(x_204); +x_206 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_207 = lean_ctor_get(x_206, 1); +lean_inc(x_207); +x_208 = lean_ctor_get(x_205, 0); +lean_inc(x_208); +x_209 = lean_ctor_get(x_208, 0); +lean_inc(x_209); +lean_dec(x_208); +x_210 = lean_ctor_get(x_209, 0); +lean_inc(x_210); +lean_dec(x_209); +x_211 = l_Lean_PersistentEnvExtension_getState___rarg(x_207, x_210); +lean_dec(x_210); +lean_dec(x_207); +x_212 = lean_ctor_get(x_211, 1); +lean_inc(x_212); +lean_dec(x_211); +lean_inc(x_1); +x_213 = l_Lean_Syntax_getKind(x_1); +x_214 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(x_212, x_213); +if (lean_obj_tag(x_214) == 0) +{ +lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; +x_215 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_205); +x_216 = lean_ctor_get(x_215, 0); +lean_inc(x_216); +x_217 = lean_ctor_get(x_215, 1); +lean_inc(x_217); +lean_dec(x_215); +x_218 = l_Lean_Elab_Tactic_getEnv___rarg(x_217); +x_219 = lean_ctor_get(x_218, 0); +lean_inc(x_219); +x_220 = lean_ctor_get(x_218, 1); +lean_inc(x_220); +lean_dec(x_218); +lean_inc(x_1); +x_221 = l_Lean_Elab_expandMacro(x_219, x_1, x_216); +lean_dec(x_219); +if (lean_obj_tag(x_221) == 0) +{ +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_dec(x_196); +lean_dec(x_187); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_222 = l_Lean_Name_toString___closed__1; +x_223 = l_Lean_Name_toStringWithSep___main(x_222, x_213); +x_224 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_224, 0, x_223); +x_225 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_225, 0, x_224); +x_226 = l_Lean_Elab_Tactic_elabTactic___main___closed__7; +x_227 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_227, 0, x_226); +lean_ctor_set(x_227, 1, x_225); +x_228 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_229 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_229, 0, x_227); +lean_ctor_set(x_229, 1, x_228); +x_230 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_229, x_2, x_220); +return x_230; +} +else +{ +lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; +lean_dec(x_213); +lean_dec(x_2); +x_231 = lean_ctor_get(x_221, 0); +lean_inc(x_231); +lean_dec(x_221); +x_232 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_232, 0, x_1); +lean_ctor_set(x_232, 1, x_18); +x_233 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_233, 0, x_187); +lean_ctor_set(x_233, 1, x_11); +lean_ctor_set(x_233, 2, x_12); +lean_ctor_set(x_233, 3, x_13); +lean_ctor_set(x_233, 4, x_14); +lean_ctor_set(x_233, 5, x_15); +lean_ctor_set(x_233, 6, x_16); +lean_ctor_set(x_233, 7, x_17); +lean_ctor_set(x_233, 8, x_232); +lean_ctor_set(x_233, 9, x_196); +lean_ctor_set_uint8(x_233, sizeof(void*)*10, x_19); +x_234 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_234, 0, x_233); +lean_ctor_set(x_234, 1, x_8); +x_1 = x_231; +x_2 = x_234; +x_3 = x_220; +goto _start; +} +} +else +{ +lean_object* x_236; lean_object* x_237; +lean_dec(x_213); +lean_dec(x_196); +lean_dec(x_187); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_236 = lean_ctor_get(x_214, 0); +lean_inc(x_236); +lean_dec(x_214); +lean_inc(x_205); +x_237 = l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(x_205, x_1, x_236, x_2, x_205); +return x_237; +} +} +else +{ +lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; +lean_dec(x_2); +lean_dec(x_196); +lean_dec(x_187); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +lean_dec(x_1); +x_238 = lean_ctor_get(x_204, 0); +lean_inc(x_238); +x_239 = lean_ctor_get(x_204, 1); +lean_inc(x_239); +if (lean_is_exclusive(x_204)) { + lean_ctor_release(x_204, 0); + lean_ctor_release(x_204, 1); + x_240 = x_204; +} else { + lean_dec_ref(x_204); + x_240 = lean_box(0); +} +if (lean_is_scalar(x_240)) { + x_241 = lean_alloc_ctor(1, 2, 0); +} else { + x_241 = x_240; +} +lean_ctor_set(x_241, 0, x_238); +lean_ctor_set(x_241, 1, x_239); +return x_241; +} +} +else +{ +lean_object* x_242; lean_object* x_243; +lean_dec(x_196); +lean_dec(x_187); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_8); +x_242 = l_Lean_Elab_Tactic_elabTactic___main___closed__3; +x_243 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_242, x_2, x_200); +return x_243; +} +} +} +else +{ +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; uint8_t x_252; 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; +x_244 = lean_ctor_get(x_5, 1); +x_245 = lean_ctor_get(x_5, 2); +x_246 = lean_ctor_get(x_5, 3); +x_247 = lean_ctor_get(x_5, 4); +x_248 = lean_ctor_get(x_5, 5); +x_249 = lean_ctor_get(x_5, 6); +x_250 = lean_ctor_get(x_5, 7); +x_251 = lean_ctor_get(x_5, 8); +x_252 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); +lean_inc(x_251); +lean_inc(x_250); +lean_inc(x_249); +lean_inc(x_248); +lean_inc(x_247); +lean_inc(x_246); +lean_inc(x_245); +lean_inc(x_244); +lean_dec(x_5); +x_253 = lean_ctor_get(x_6, 0); +lean_inc(x_253); +x_254 = lean_ctor_get(x_6, 1); +lean_inc(x_254); +x_255 = lean_ctor_get(x_6, 2); +lean_inc(x_255); +x_256 = lean_ctor_get(x_6, 3); +lean_inc(x_256); +x_257 = lean_ctor_get(x_6, 4); +lean_inc(x_257); +if (lean_is_exclusive(x_6)) { + lean_ctor_release(x_6, 0); + lean_ctor_release(x_6, 1); + lean_ctor_release(x_6, 2); + lean_ctor_release(x_6, 3); + lean_ctor_release(x_6, 4); + x_258 = x_6; +} else { + lean_dec_ref(x_6); + x_258 = lean_box(0); +} +x_259 = lean_unsigned_to_nat(1u); +x_260 = lean_nat_add(x_256, x_259); +lean_dec(x_256); +if (lean_is_scalar(x_258)) { + x_261 = lean_alloc_ctor(0, 5, 0); +} else { + x_261 = x_258; +} +lean_ctor_set(x_261, 0, x_253); +lean_ctor_set(x_261, 1, x_254); +lean_ctor_set(x_261, 2, x_255); +lean_ctor_set(x_261, 3, x_260); +lean_ctor_set(x_261, 4, x_257); +x_262 = lean_ctor_get(x_4, 0); +lean_inc(x_262); +x_263 = lean_ctor_get(x_4, 1); +lean_inc(x_263); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_264 = x_4; +} else { + lean_dec_ref(x_4); + x_264 = lean_box(0); +} +x_265 = lean_ctor_get(x_262, 0); +lean_inc(x_265); +x_266 = lean_ctor_get(x_262, 1); +lean_inc(x_266); +x_267 = lean_ctor_get(x_262, 2); +lean_inc(x_267); +x_268 = lean_ctor_get(x_262, 3); +lean_inc(x_268); +x_269 = lean_ctor_get(x_262, 4); +lean_inc(x_269); +x_270 = lean_ctor_get(x_262, 5); +lean_inc(x_270); +if (lean_is_exclusive(x_262)) { + lean_ctor_release(x_262, 0); + lean_ctor_release(x_262, 1); + lean_ctor_release(x_262, 2); + lean_ctor_release(x_262, 3); + lean_ctor_release(x_262, 4); + lean_ctor_release(x_262, 5); + x_271 = x_262; +} else { + lean_dec_ref(x_262); + x_271 = lean_box(0); +} +x_272 = lean_nat_add(x_270, x_259); +if (lean_is_scalar(x_271)) { + x_273 = lean_alloc_ctor(0, 6, 0); +} else { + x_273 = x_271; +} +lean_ctor_set(x_273, 0, x_265); +lean_ctor_set(x_273, 1, x_266); +lean_ctor_set(x_273, 2, x_267); +lean_ctor_set(x_273, 3, x_268); +lean_ctor_set(x_273, 4, x_269); +lean_ctor_set(x_273, 5, x_272); +if (lean_is_scalar(x_264)) { + x_274 = lean_alloc_ctor(0, 2, 0); +} else { + x_274 = x_264; +} +lean_ctor_set(x_274, 0, x_273); +lean_ctor_set(x_274, 1, x_263); +lean_inc(x_270); +lean_inc(x_251); +lean_inc(x_250); +lean_inc(x_249); +lean_inc(x_248); +lean_inc(x_247); +lean_inc(x_246); +lean_inc(x_245); +lean_inc(x_244); +lean_inc(x_261); +x_275 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_275, 0, x_261); +lean_ctor_set(x_275, 1, x_244); +lean_ctor_set(x_275, 2, x_245); +lean_ctor_set(x_275, 3, x_246); +lean_ctor_set(x_275, 4, x_247); +lean_ctor_set(x_275, 5, x_248); +lean_ctor_set(x_275, 6, x_249); +lean_ctor_set(x_275, 7, x_250); +lean_ctor_set(x_275, 8, x_251); +lean_ctor_set(x_275, 9, x_270); +lean_ctor_set_uint8(x_275, sizeof(void*)*10, x_252); +lean_inc(x_8); +lean_ctor_set(x_2, 0, x_275); +if (lean_obj_tag(x_1) == 1) +{ +lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; +lean_inc(x_1); +x_276 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_elabTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_276, 0, x_1); +x_277 = l_Lean_Elab_Tactic_elabTactic___main___closed__4; +lean_inc(x_1); +x_278 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_278, 0, x_277); +lean_closure_set(x_278, 1, x_1); +lean_closure_set(x_278, 2, x_276); +lean_inc(x_2); +x_279 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_278, x_2, x_274); +if (lean_obj_tag(x_279) == 0) +{ +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; lean_object* x_289; +x_280 = lean_ctor_get(x_279, 1); +lean_inc(x_280); +lean_dec(x_279); +x_281 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_282 = lean_ctor_get(x_281, 1); +lean_inc(x_282); +x_283 = lean_ctor_get(x_280, 0); +lean_inc(x_283); +x_284 = lean_ctor_get(x_283, 0); +lean_inc(x_284); +lean_dec(x_283); +x_285 = lean_ctor_get(x_284, 0); +lean_inc(x_285); +lean_dec(x_284); +x_286 = l_Lean_PersistentEnvExtension_getState___rarg(x_282, x_285); +lean_dec(x_285); +lean_dec(x_282); +x_287 = lean_ctor_get(x_286, 1); +lean_inc(x_287); +lean_dec(x_286); +lean_inc(x_1); +x_288 = l_Lean_Syntax_getKind(x_1); +x_289 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(x_287, x_288); +if (lean_obj_tag(x_289) == 0) +{ +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; +x_290 = l_Lean_Elab_Tactic_getCurrMacroScope(x_2, x_280); +x_291 = lean_ctor_get(x_290, 0); +lean_inc(x_291); +x_292 = lean_ctor_get(x_290, 1); +lean_inc(x_292); +lean_dec(x_290); +x_293 = l_Lean_Elab_Tactic_getEnv___rarg(x_292); +x_294 = lean_ctor_get(x_293, 0); +lean_inc(x_294); +x_295 = lean_ctor_get(x_293, 1); +lean_inc(x_295); +lean_dec(x_293); +lean_inc(x_1); +x_296 = l_Lean_Elab_expandMacro(x_294, x_1, x_291); +lean_dec(x_294); +if (lean_obj_tag(x_296) == 0) +{ +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_dec(x_270); +lean_dec(x_261); +lean_dec(x_251); +lean_dec(x_250); +lean_dec(x_249); +lean_dec(x_248); +lean_dec(x_247); +lean_dec(x_246); +lean_dec(x_245); +lean_dec(x_244); +lean_dec(x_8); +x_297 = l_Lean_Name_toString___closed__1; +x_298 = l_Lean_Name_toStringWithSep___main(x_297, x_288); +x_299 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_299, 0, x_298); +x_300 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_300, 0, x_299); +x_301 = l_Lean_Elab_Tactic_elabTactic___main___closed__7; +x_302 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_302, 0, x_301); +lean_ctor_set(x_302, 1, x_300); +x_303 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_304 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_304, 0, x_302); +lean_ctor_set(x_304, 1, x_303); +x_305 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_304, x_2, x_295); +return x_305; +} +else +{ +lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; +lean_dec(x_288); +lean_dec(x_2); +x_306 = lean_ctor_get(x_296, 0); +lean_inc(x_306); +lean_dec(x_296); +x_307 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_307, 0, x_1); +lean_ctor_set(x_307, 1, x_251); +x_308 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_308, 0, x_261); +lean_ctor_set(x_308, 1, x_244); +lean_ctor_set(x_308, 2, x_245); +lean_ctor_set(x_308, 3, x_246); +lean_ctor_set(x_308, 4, x_247); +lean_ctor_set(x_308, 5, x_248); +lean_ctor_set(x_308, 6, x_249); +lean_ctor_set(x_308, 7, x_250); +lean_ctor_set(x_308, 8, x_307); +lean_ctor_set(x_308, 9, x_270); +lean_ctor_set_uint8(x_308, sizeof(void*)*10, x_252); +x_309 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_309, 0, x_308); +lean_ctor_set(x_309, 1, x_8); +x_1 = x_306; +x_2 = x_309; +x_3 = x_295; +goto _start; +} +} +else +{ +lean_object* x_311; lean_object* x_312; +lean_dec(x_288); +lean_dec(x_270); +lean_dec(x_261); +lean_dec(x_251); +lean_dec(x_250); +lean_dec(x_249); +lean_dec(x_248); +lean_dec(x_247); +lean_dec(x_246); +lean_dec(x_245); +lean_dec(x_244); +lean_dec(x_8); +x_311 = lean_ctor_get(x_289, 0); +lean_inc(x_311); +lean_dec(x_289); +lean_inc(x_280); +x_312 = l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(x_280, x_1, x_311, x_2, x_280); +return x_312; +} +} +else +{ +lean_object* x_313; lean_object* x_314; lean_object* x_315; lean_object* x_316; +lean_dec(x_2); +lean_dec(x_270); +lean_dec(x_261); +lean_dec(x_251); +lean_dec(x_250); +lean_dec(x_249); +lean_dec(x_248); +lean_dec(x_247); +lean_dec(x_246); +lean_dec(x_245); +lean_dec(x_244); +lean_dec(x_8); +lean_dec(x_1); +x_313 = lean_ctor_get(x_279, 0); +lean_inc(x_313); +x_314 = lean_ctor_get(x_279, 1); +lean_inc(x_314); +if (lean_is_exclusive(x_279)) { + lean_ctor_release(x_279, 0); + lean_ctor_release(x_279, 1); + x_315 = x_279; +} else { + lean_dec_ref(x_279); + x_315 = lean_box(0); +} +if (lean_is_scalar(x_315)) { + x_316 = lean_alloc_ctor(1, 2, 0); +} else { + x_316 = x_315; +} +lean_ctor_set(x_316, 0, x_313); +lean_ctor_set(x_316, 1, x_314); +return x_316; +} +} +else +{ +lean_object* x_317; lean_object* x_318; +lean_dec(x_270); +lean_dec(x_261); +lean_dec(x_251); +lean_dec(x_250); +lean_dec(x_249); +lean_dec(x_248); +lean_dec(x_247); +lean_dec(x_246); +lean_dec(x_245); +lean_dec(x_244); +lean_dec(x_8); +x_317 = l_Lean_Elab_Tactic_elabTactic___main___closed__3; +x_318 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_317, x_2, x_274); +return x_318; +} +} +} +else +{ +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; uint8_t 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; +x_319 = lean_ctor_get(x_2, 1); +lean_inc(x_319); +lean_dec(x_2); +x_320 = lean_ctor_get(x_5, 1); +lean_inc(x_320); +x_321 = lean_ctor_get(x_5, 2); +lean_inc(x_321); +x_322 = lean_ctor_get(x_5, 3); +lean_inc(x_322); +x_323 = lean_ctor_get(x_5, 4); +lean_inc(x_323); +x_324 = lean_ctor_get(x_5, 5); +lean_inc(x_324); +x_325 = lean_ctor_get(x_5, 6); +lean_inc(x_325); +x_326 = lean_ctor_get(x_5, 7); +lean_inc(x_326); +x_327 = lean_ctor_get(x_5, 8); +lean_inc(x_327); +x_328 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); +if (lean_is_exclusive(x_5)) { + lean_ctor_release(x_5, 0); + lean_ctor_release(x_5, 1); + lean_ctor_release(x_5, 2); + lean_ctor_release(x_5, 3); + lean_ctor_release(x_5, 4); + lean_ctor_release(x_5, 5); + lean_ctor_release(x_5, 6); + lean_ctor_release(x_5, 7); + lean_ctor_release(x_5, 8); + lean_ctor_release(x_5, 9); + x_329 = x_5; +} else { + lean_dec_ref(x_5); + x_329 = lean_box(0); +} +x_330 = lean_ctor_get(x_6, 0); +lean_inc(x_330); +x_331 = lean_ctor_get(x_6, 1); +lean_inc(x_331); +x_332 = lean_ctor_get(x_6, 2); +lean_inc(x_332); +x_333 = lean_ctor_get(x_6, 3); +lean_inc(x_333); +x_334 = lean_ctor_get(x_6, 4); +lean_inc(x_334); +if (lean_is_exclusive(x_6)) { + lean_ctor_release(x_6, 0); + lean_ctor_release(x_6, 1); + lean_ctor_release(x_6, 2); + lean_ctor_release(x_6, 3); + lean_ctor_release(x_6, 4); + x_335 = x_6; +} else { + lean_dec_ref(x_6); + x_335 = lean_box(0); +} +x_336 = lean_unsigned_to_nat(1u); +x_337 = lean_nat_add(x_333, x_336); +lean_dec(x_333); +if (lean_is_scalar(x_335)) { + x_338 = lean_alloc_ctor(0, 5, 0); +} else { + x_338 = x_335; +} +lean_ctor_set(x_338, 0, x_330); +lean_ctor_set(x_338, 1, x_331); +lean_ctor_set(x_338, 2, x_332); +lean_ctor_set(x_338, 3, x_337); +lean_ctor_set(x_338, 4, x_334); +x_339 = lean_ctor_get(x_4, 0); +lean_inc(x_339); +x_340 = lean_ctor_get(x_4, 1); +lean_inc(x_340); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_341 = x_4; +} else { + lean_dec_ref(x_4); + x_341 = lean_box(0); +} +x_342 = lean_ctor_get(x_339, 0); +lean_inc(x_342); +x_343 = lean_ctor_get(x_339, 1); +lean_inc(x_343); +x_344 = lean_ctor_get(x_339, 2); +lean_inc(x_344); +x_345 = lean_ctor_get(x_339, 3); +lean_inc(x_345); +x_346 = lean_ctor_get(x_339, 4); +lean_inc(x_346); +x_347 = lean_ctor_get(x_339, 5); +lean_inc(x_347); +if (lean_is_exclusive(x_339)) { + lean_ctor_release(x_339, 0); + lean_ctor_release(x_339, 1); + lean_ctor_release(x_339, 2); + lean_ctor_release(x_339, 3); + lean_ctor_release(x_339, 4); + lean_ctor_release(x_339, 5); + x_348 = x_339; +} else { + lean_dec_ref(x_339); + x_348 = lean_box(0); +} +x_349 = lean_nat_add(x_347, x_336); +if (lean_is_scalar(x_348)) { + x_350 = lean_alloc_ctor(0, 6, 0); +} else { + x_350 = x_348; +} +lean_ctor_set(x_350, 0, x_342); +lean_ctor_set(x_350, 1, x_343); +lean_ctor_set(x_350, 2, x_344); +lean_ctor_set(x_350, 3, x_345); +lean_ctor_set(x_350, 4, x_346); +lean_ctor_set(x_350, 5, x_349); +if (lean_is_scalar(x_341)) { + x_351 = lean_alloc_ctor(0, 2, 0); +} else { + x_351 = x_341; +} +lean_ctor_set(x_351, 0, x_350); +lean_ctor_set(x_351, 1, x_340); +lean_inc(x_347); +lean_inc(x_327); +lean_inc(x_326); +lean_inc(x_325); +lean_inc(x_324); +lean_inc(x_323); +lean_inc(x_322); +lean_inc(x_321); +lean_inc(x_320); +lean_inc(x_338); +if (lean_is_scalar(x_329)) { + x_352 = lean_alloc_ctor(0, 10, 1); +} else { + x_352 = x_329; +} +lean_ctor_set(x_352, 0, x_338); +lean_ctor_set(x_352, 1, x_320); +lean_ctor_set(x_352, 2, x_321); +lean_ctor_set(x_352, 3, x_322); +lean_ctor_set(x_352, 4, x_323); +lean_ctor_set(x_352, 5, x_324); +lean_ctor_set(x_352, 6, x_325); +lean_ctor_set(x_352, 7, x_326); +lean_ctor_set(x_352, 8, x_327); +lean_ctor_set(x_352, 9, x_347); +lean_ctor_set_uint8(x_352, sizeof(void*)*10, x_328); +lean_inc(x_319); +x_353 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_353, 0, x_352); +lean_ctor_set(x_353, 1, x_319); +if (lean_obj_tag(x_1) == 1) +{ +lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; +lean_inc(x_1); +x_354 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_elabTactic___main___lambda__1___boxed), 2, 1); +lean_closure_set(x_354, 0, x_1); +x_355 = l_Lean_Elab_Tactic_elabTactic___main___closed__4; +lean_inc(x_1); +x_356 = lean_alloc_closure((void*)(l_Lean_Elab_Term_trace___boxed), 5, 3); +lean_closure_set(x_356, 0, x_355); +lean_closure_set(x_356, 1, x_1); +lean_closure_set(x_356, 2, x_354); +lean_inc(x_353); +x_357 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_356, x_353, x_351); +if (lean_obj_tag(x_357) == 0) +{ +lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; +x_358 = lean_ctor_get(x_357, 1); +lean_inc(x_358); +lean_dec(x_357); +x_359 = l_Lean_Elab_Tactic_tacticElabAttribute; +x_360 = lean_ctor_get(x_359, 1); +lean_inc(x_360); +x_361 = lean_ctor_get(x_358, 0); +lean_inc(x_361); +x_362 = lean_ctor_get(x_361, 0); +lean_inc(x_362); +lean_dec(x_361); +x_363 = lean_ctor_get(x_362, 0); +lean_inc(x_363); +lean_dec(x_362); +x_364 = l_Lean_PersistentEnvExtension_getState___rarg(x_360, x_363); +lean_dec(x_363); +lean_dec(x_360); +x_365 = lean_ctor_get(x_364, 1); +lean_inc(x_365); +lean_dec(x_364); +lean_inc(x_1); +x_366 = l_Lean_Syntax_getKind(x_1); +x_367 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(x_365, x_366); +if (lean_obj_tag(x_367) == 0) +{ +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; +x_368 = l_Lean_Elab_Tactic_getCurrMacroScope(x_353, x_358); +x_369 = lean_ctor_get(x_368, 0); +lean_inc(x_369); +x_370 = lean_ctor_get(x_368, 1); +lean_inc(x_370); +lean_dec(x_368); +x_371 = l_Lean_Elab_Tactic_getEnv___rarg(x_370); +x_372 = lean_ctor_get(x_371, 0); +lean_inc(x_372); +x_373 = lean_ctor_get(x_371, 1); +lean_inc(x_373); +lean_dec(x_371); +lean_inc(x_1); +x_374 = l_Lean_Elab_expandMacro(x_372, x_1, x_369); +lean_dec(x_372); +if (lean_obj_tag(x_374) == 0) +{ +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_dec(x_347); +lean_dec(x_338); +lean_dec(x_327); +lean_dec(x_326); +lean_dec(x_325); +lean_dec(x_324); +lean_dec(x_323); +lean_dec(x_322); +lean_dec(x_321); +lean_dec(x_320); +lean_dec(x_319); +x_375 = l_Lean_Name_toString___closed__1; +x_376 = l_Lean_Name_toStringWithSep___main(x_375, x_366); +x_377 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_377, 0, x_376); +x_378 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_378, 0, x_377); +x_379 = l_Lean_Elab_Tactic_elabTactic___main___closed__7; +x_380 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_380, 0, x_379); +lean_ctor_set(x_380, 1, x_378); +x_381 = l_Lean_Elab_Term_elabTermAux___main___closed__6; +x_382 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_382, 0, x_380); +lean_ctor_set(x_382, 1, x_381); +x_383 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_382, x_353, x_373); +return x_383; +} +else +{ +lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; +lean_dec(x_366); +lean_dec(x_353); +x_384 = lean_ctor_get(x_374, 0); +lean_inc(x_384); +lean_dec(x_374); +x_385 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_385, 0, x_1); +lean_ctor_set(x_385, 1, x_327); +x_386 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_386, 0, x_338); +lean_ctor_set(x_386, 1, x_320); +lean_ctor_set(x_386, 2, x_321); +lean_ctor_set(x_386, 3, x_322); +lean_ctor_set(x_386, 4, x_323); +lean_ctor_set(x_386, 5, x_324); +lean_ctor_set(x_386, 6, x_325); +lean_ctor_set(x_386, 7, x_326); +lean_ctor_set(x_386, 8, x_385); +lean_ctor_set(x_386, 9, x_347); +lean_ctor_set_uint8(x_386, sizeof(void*)*10, x_328); +x_387 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_387, 0, x_386); +lean_ctor_set(x_387, 1, x_319); +x_1 = x_384; +x_2 = x_387; +x_3 = x_373; +goto _start; +} +} +else +{ +lean_object* x_389; lean_object* x_390; +lean_dec(x_366); +lean_dec(x_347); +lean_dec(x_338); +lean_dec(x_327); +lean_dec(x_326); +lean_dec(x_325); +lean_dec(x_324); +lean_dec(x_323); +lean_dec(x_322); +lean_dec(x_321); +lean_dec(x_320); +lean_dec(x_319); +x_389 = lean_ctor_get(x_367, 0); +lean_inc(x_389); +lean_dec(x_367); +lean_inc(x_358); +x_390 = l___private_Init_Lean_Elab_Tactic_Basic_1__elabTacticUsing___main(x_358, x_1, x_389, x_353, x_358); +return x_390; +} +} +else +{ +lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; +lean_dec(x_353); +lean_dec(x_347); +lean_dec(x_338); +lean_dec(x_327); +lean_dec(x_326); +lean_dec(x_325); +lean_dec(x_324); +lean_dec(x_323); +lean_dec(x_322); +lean_dec(x_321); +lean_dec(x_320); +lean_dec(x_319); +lean_dec(x_1); +x_391 = lean_ctor_get(x_357, 0); +lean_inc(x_391); +x_392 = lean_ctor_get(x_357, 1); +lean_inc(x_392); +if (lean_is_exclusive(x_357)) { + lean_ctor_release(x_357, 0); + lean_ctor_release(x_357, 1); + x_393 = x_357; +} else { + lean_dec_ref(x_357); + x_393 = lean_box(0); +} +if (lean_is_scalar(x_393)) { + x_394 = lean_alloc_ctor(1, 2, 0); +} else { + x_394 = x_393; +} +lean_ctor_set(x_394, 0, x_391); +lean_ctor_set(x_394, 1, x_392); +return x_394; +} +} +else +{ +lean_object* x_395; lean_object* x_396; +lean_dec(x_347); +lean_dec(x_338); +lean_dec(x_327); +lean_dec(x_326); +lean_dec(x_325); +lean_dec(x_324); +lean_dec(x_323); +lean_dec(x_322); +lean_dec(x_321); +lean_dec(x_320); +lean_dec(x_319); +x_395 = l_Lean_Elab_Tactic_elabTactic___main___closed__3; +x_396 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_395, x_353, x_351); +return x_396; +} +} +} +} +} +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__4(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_6; +} +} +lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; lean_object* x_5; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = l_PersistentHashMap_findAux___main___at_Lean_Elab_Tactic_elabTactic___main___spec__3(x_1, x_4, x_3); +lean_dec(x_3); +return x_5; +} +} +lean_object* l_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__2(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_AssocList_find___main___at_Lean_Elab_Tactic_elabTactic___main___spec__6___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_AssocList_find___main___at_Lean_Elab_Tactic_elabTactic___main___spec__6(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__5___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__5(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_elabTactic___main___spec__1(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_elabTactic___main___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Tactic_elabTactic___main___lambda__1(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_elabTactic(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Tactic_elabTactic___main(x_1, x_2, x_3); +return x_4; +} +} +lean_object* initialize_Init_Lean_Elab_Util(lean_object*); +lean_object* initialize_Init_Lean_Elab_Term(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Init_Lean_Elab_Tactic_Basic(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_mk_io_result(lean_box(0)); +_G_initialized = true; +res = initialize_Init_Lean_Elab_Util(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Init_Lean_Elab_Term(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Tactic_State_inhabited___closed__1 = _init_l_Lean_Elab_Tactic_State_inhabited___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_State_inhabited___closed__1); +l_Lean_Elab_Tactic_State_inhabited = _init_l_Lean_Elab_Tactic_State_inhabited(); +lean_mark_persistent(l_Lean_Elab_Tactic_State_inhabited); +l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1 = _init_l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1); +l_Lean_Elab_Tactic_monadLog___closed__1 = _init_l_Lean_Elab_Tactic_monadLog___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__1); +l_Lean_Elab_Tactic_monadLog___closed__2 = _init_l_Lean_Elab_Tactic_monadLog___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__2); +l_Lean_Elab_Tactic_monadLog___closed__3 = _init_l_Lean_Elab_Tactic_monadLog___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__3); +l_Lean_Elab_Tactic_monadLog___closed__4 = _init_l_Lean_Elab_Tactic_monadLog___closed__4(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__4); +l_Lean_Elab_Tactic_monadLog___closed__5 = _init_l_Lean_Elab_Tactic_monadLog___closed__5(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__5); +l_Lean_Elab_Tactic_monadLog___closed__6 = _init_l_Lean_Elab_Tactic_monadLog___closed__6(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__6); +l_Lean_Elab_Tactic_monadLog___closed__7 = _init_l_Lean_Elab_Tactic_monadLog___closed__7(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__7); +l_Lean_Elab_Tactic_monadLog___closed__8 = _init_l_Lean_Elab_Tactic_monadLog___closed__8(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__8); +l_Lean_Elab_Tactic_monadLog___closed__9 = _init_l_Lean_Elab_Tactic_monadLog___closed__9(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__9); +l_Lean_Elab_Tactic_monadLog___closed__10 = _init_l_Lean_Elab_Tactic_monadLog___closed__10(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__10); +l_Lean_Elab_Tactic_monadLog___closed__11 = _init_l_Lean_Elab_Tactic_monadLog___closed__11(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__11); +l_Lean_Elab_Tactic_monadLog = _init_l_Lean_Elab_Tactic_monadLog(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadLog); +l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg___closed__1 = _init_l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg___closed__1); +l_Lean_Elab_Tactic_monadQuotation___closed__1 = _init_l_Lean_Elab_Tactic_monadQuotation___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadQuotation___closed__1); +l_Lean_Elab_Tactic_monadQuotation___closed__2 = _init_l_Lean_Elab_Tactic_monadQuotation___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadQuotation___closed__2); +l_Lean_Elab_Tactic_monadQuotation___closed__3 = _init_l_Lean_Elab_Tactic_monadQuotation___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadQuotation___closed__3); +l_Lean_Elab_Tactic_monadQuotation = _init_l_Lean_Elab_Tactic_monadQuotation(); +lean_mark_persistent(l_Lean_Elab_Tactic_monadQuotation); +l_PersistentHashMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__3 = _init_l_PersistentHashMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__3(); +lean_mark_persistent(l_PersistentHashMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__3); +l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__1 = _init_l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__1(); +lean_mark_persistent(l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__1); +l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__2 = _init_l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__2(); +lean_mark_persistent(l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1___closed__2); +l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1 = _init_l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1(); +lean_mark_persistent(l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticElabTable___spec__1); +res = l_Lean_Elab_Tactic_mkBuiltinTacticElabTable(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +l_Lean_Elab_Tactic_builtinTacticElabTable = lean_io_result_get_value(res); +lean_mark_persistent(l_Lean_Elab_Tactic_builtinTacticElabTable); +lean_dec_ref(res); +l_Lean_Elab_Tactic_addBuiltinTacticElab___closed__1 = _init_l_Lean_Elab_Tactic_addBuiltinTacticElab___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_addBuiltinTacticElab___closed__1); +l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__1 = _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__1); +l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__2 = _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__2); +l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__3 = _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__3); +l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__4 = _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__4(); +lean_mark_persistent(l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__4); +l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__5 = _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__5(); +lean_mark_persistent(l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__5); +l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__6 = _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__6(); +lean_mark_persistent(l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__6); +l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__7 = _init_l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__7(); +lean_mark_persistent(l_Lean_Elab_Tactic_declareBuiltinTacticElab___closed__7); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__1 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__1); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__2 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__2); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__3 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__3); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__4 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__4); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__5 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__5(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__5); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__6 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__6(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___lambda__1___closed__6); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__1 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__1); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__2 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__2); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__3 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__3); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__4 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__4(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__4); +l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__5 = _init_l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__5(); +lean_mark_persistent(l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr___closed__5); +res = l_Lean_Elab_Tactic_registerBuiltinTacticElabAttr(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__1 = _init_l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__1); +l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__2 = _init_l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__2); +l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__3 = _init_l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_mkTacticElabAttribute___closed__3); +l_Lean_Elab_Tactic_tacticElabAttribute___closed__1 = _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_tacticElabAttribute___closed__1); +l_Lean_Elab_Tactic_tacticElabAttribute___closed__2 = _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_tacticElabAttribute___closed__2); +l_Lean_Elab_Tactic_tacticElabAttribute___closed__3 = _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_tacticElabAttribute___closed__3); +l_Lean_Elab_Tactic_tacticElabAttribute___closed__4 = _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__4(); +lean_mark_persistent(l_Lean_Elab_Tactic_tacticElabAttribute___closed__4); +l_Lean_Elab_Tactic_tacticElabAttribute___closed__5 = _init_l_Lean_Elab_Tactic_tacticElabAttribute___closed__5(); +lean_mark_persistent(l_Lean_Elab_Tactic_tacticElabAttribute___closed__5); +res = l_Lean_Elab_Tactic_mkTacticElabAttribute(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +l_Lean_Elab_Tactic_tacticElabAttribute = lean_io_result_get_value(res); +lean_mark_persistent(l_Lean_Elab_Tactic_tacticElabAttribute); +lean_dec_ref(res); +l_Lean_Elab_Tactic_elabTactic___main___closed__1 = _init_l_Lean_Elab_Tactic_elabTactic___main___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_elabTactic___main___closed__1); +l_Lean_Elab_Tactic_elabTactic___main___closed__2 = _init_l_Lean_Elab_Tactic_elabTactic___main___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_elabTactic___main___closed__2); +l_Lean_Elab_Tactic_elabTactic___main___closed__3 = _init_l_Lean_Elab_Tactic_elabTactic___main___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_elabTactic___main___closed__3); +l_Lean_Elab_Tactic_elabTactic___main___closed__4 = _init_l_Lean_Elab_Tactic_elabTactic___main___closed__4(); +lean_mark_persistent(l_Lean_Elab_Tactic_elabTactic___main___closed__4); +l_Lean_Elab_Tactic_elabTactic___main___closed__5 = _init_l_Lean_Elab_Tactic_elabTactic___main___closed__5(); +lean_mark_persistent(l_Lean_Elab_Tactic_elabTactic___main___closed__5); +l_Lean_Elab_Tactic_elabTactic___main___closed__6 = _init_l_Lean_Elab_Tactic_elabTactic___main___closed__6(); +lean_mark_persistent(l_Lean_Elab_Tactic_elabTactic___main___closed__6); +l_Lean_Elab_Tactic_elabTactic___main___closed__7 = _init_l_Lean_Elab_Tactic_elabTactic___main___closed__7(); +lean_mark_persistent(l_Lean_Elab_Tactic_elabTactic___main___closed__7); +return lean_mk_io_result(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Init/Lean/Elab/Term.c b/stage0/stdlib/Init/Lean/Elab/Term.c index 3cb59ec8db..80c3e7a44c 100644 --- a/stage0/stdlib/Init/Lean/Elab/Term.c +++ b/stage0/stdlib/Init/Lean/Elab/Term.c @@ -26,7 +26,7 @@ extern lean_object* l_Lean_Name_toString___closed__1; lean_object* l___private_Init_Lean_Elab_Term_6__expandCDotInApp(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkForall(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__1; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__6; +lean_object* l_Lean_Elab_Term_monadQuotation; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__8; lean_object* l___private_Init_Lean_Elab_Term_7__exceptionToSorry___closed__3; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNum(lean_object*); @@ -58,8 +58,8 @@ extern lean_object* l_Lean_nullKind; lean_object* l_Lean_Meta_whnfForall(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__8; lean_object* l_Lean_Elab_Term_elabTermAux___main___closed__6; +lean_object* l_Lean_Elab_Term_monadLog___lambda__3___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_7__exceptionToSorry(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadQuotation; extern lean_object* l_Lean_MessageData_ofList___closed__3; lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__2; lean_object* lean_array_uget(lean_object*, size_t); @@ -73,12 +73,12 @@ lean_object* l_Lean_Elab_Term_ensureHasType___closed__2; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__2; extern lean_object* l_IO_Prim_fopenFlags___closed__12; lean_object* l_Lean_Elab_Term_resettingSynthInstanceCacheWhen(lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___closed__3; lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabChar___closed__3; lean_object* l_Lean_Elab_Term_getDeclName_x3f(lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_14__synthesizeSyntheticMVar___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabChar___closed__2; -lean_object* l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__3; lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___closed__3; lean_object* l_Lean_SMap_empty___at_Lean_Elab_Term_mkBuiltinTermElabTable___spec__1___closed__1; lean_object* l_Lean_Meta_mkForall(lean_object*, lean_object*, lean_object*, lean_object*); @@ -88,6 +88,7 @@ extern lean_object* l_Option_get_x21___rarg___closed__3; lean_object* l_Lean_Meta_mkAppM(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_levelMVarToParam___closed__1; lean_object* l_Lean_Elab_Term_elabParen(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_ReaderT_read___at_Lean_Elab_Term_monadLog___spec__1(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNum___closed__2; extern lean_object* l_Lean_maxRecDepthErrorMessage; extern lean_object* l_Lean_nameToExprAux___main___closed__4; @@ -105,7 +106,6 @@ lean_object* l___private_Init_Lean_Elab_Term_14__synthesizeSyntheticMVar___close lean_object* l_Lean_Meta_Exception_toMessageData(lean_object*); lean_object* l___private_Init_Lean_Elab_Term_21__resolveLocalName___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_18__mkPairsAux___main___closed__1; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog; lean_object* l_Lean_mkMVar(lean_object*); extern lean_object* l_Array_empty___closed__1; lean_object* lean_environment_find(lean_object*, lean_object*); @@ -135,6 +135,7 @@ lean_object* l_Lean_Elab_Term_mkForallUsedOnly___boxed(lean_object*, lean_object lean_object* lean_io_ref_get(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__5; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__6; +lean_object* l_Lean_Elab_Term_monadQuotation___closed__2; lean_object* l___private_Init_Lean_Elab_Term_18__mkPairsAux___main___closed__9; lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHole(lean_object*); @@ -144,11 +145,9 @@ lean_object* l_Lean_Elab_Term_decLevel(lean_object*, lean_object*, lean_object*, uint8_t l_PersistentHashMap_containsAtAux___main___at_Lean_Parser_mkFreshKindAux___main___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabParen___closed__3; lean_object* lean_local_ctx_find_from_user_name(lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__2; lean_object* l_Lean_Elab_Term_getMVarDecl(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabListLit___closed__1; lean_object* l_Lean_Elab_Term_mkLambda(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__1; extern lean_object* l_Lean_Literal_type___closed__3; lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); @@ -157,6 +156,7 @@ lean_object* l___private_Init_Lean_Elab_Term_17__synthesizeSyntheticMVarsAux___m lean_object* l_Lean_Elab_Term_resetSynthInstanceCache(lean_object*); lean_object* l_Lean_Elab_Term_mkForallUsedOnly(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_inferType___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___closed__7; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabListLit___closed__2; lean_object* lean_string_append(lean_object*, lean_object*); extern lean_object* l_Lean_Meta_Exception_toStr___closed__1; @@ -165,7 +165,6 @@ lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lea lean_object* l_Lean_Elab_Term_ensureType(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabBadCDot___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn___main(lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__3; lean_object* l_PersistentArray_push___rarg(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabTypeStx___closed__2; extern lean_object* l_String_splitAux___main___closed__1; @@ -188,6 +187,7 @@ size_t l_USize_shiftRight(size_t, size_t); lean_object* l_Lean_Elab_Term_withLCtx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_11__resumePostponed___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabArrayLit___closed__6; +lean_object* l_Lean_Elab_Term_monadLog___closed__10; lean_object* l_Lean_Elab_Term_resolveName___closed__6; lean_object* l_Lean_Elab_Term_synthesizeSyntheticMVars(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTypeStx___rarg(lean_object*); @@ -197,14 +197,12 @@ lean_object* l_Lean_Elab_Term_elabParen___closed__6; extern lean_object* l_Lean_Parser_Term_tupleTail___elambda__1___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabTypeStx___closed__1; extern lean_object* l_Lean_Parser_Term_cons___elambda__1___closed__1; -lean_object* l_ReaderT_read___at_Lean_Elab_Term_TermElabM_MonadLog___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_dbgTrace___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_sort___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_adaptMacro___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_MetaHasEval___rarg___closed__4; lean_object* l_Lean_Elab_Term_assignExprMVar(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_13__checkWithDefault___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_Exception_hasToString(lean_object*); extern lean_object* l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1; lean_object* l_Lean_Elab_Term_elabParen___closed__5; @@ -232,7 +230,6 @@ lean_object* l___private_Init_Lean_Elab_Term_9__elabTermUsing___main___closed__1 lean_object* l_IO_ofExcept___at_Lean_registerClassAttr___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_getTraceState(lean_object*); lean_object* l_Lean_Elab_Term_mkFreshTypeMVar(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__7; lean_object* l_Lean_Elab_Term_elabTermAux___main___closed__1; lean_object* l___private_Init_Lean_Elab_Term_21__resolveLocalName(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkFreshAnonymousIdent(lean_object*, lean_object*, lean_object*); @@ -242,6 +239,7 @@ lean_object* l_Lean_Elab_Term_elabTermAux___main___boxed(lean_object*, lean_obje lean_object* l_Lean_Elab_Term_whnf(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabArrayLit(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_getOptions(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabParen___closed__1; lean_object* l___private_Init_Lean_Elab_Term_10__resumeElabTerm___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabListLit___closed__1; @@ -261,13 +259,13 @@ lean_object* l_HashMapImp_find_x3f___at_Lean_Elab_Term_elabTermAux___main___spec lean_object* l_ReaderT_lift___at___private_Init_Lean_Elab_Term_11__resumePostponed___spec__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_synthesizeUsingDefault(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__11; lean_object* l_Lean_Elab_Term_elabListLit___closed__2; extern lean_object* l_Lean_Parser_Term_typeAscription___elambda__1___closed__5; lean_object* l___private_Init_Lean_Elab_Term_18__mkPairsAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkFreshAnonymousName___boxed(lean_object*); extern lean_object* l_Lean_Meta_dbgTrace___rarg___closed__1; lean_object* l_Lean_Elab_Term_mkConst___closed__6; +lean_object* l_Lean_Elab_Term_monadLog___closed__5; lean_object* l___private_Init_Lean_Elab_Term_2__fromMetaException(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_20__resolveLocalNameAux(lean_object*, lean_object*, lean_object*); @@ -278,6 +276,7 @@ lean_object* l_Lean_Elab_Term_elabParen___closed__4; lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; lean_object* l_Lean_Elab_Term_elabLevel(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_15__synthesizeSyntheticMVarsStep___closed__9; +lean_object* l_Lean_Elab_Term_monadLog___closed__1; lean_object* l_List_forM___main___at___private_Init_Lean_Elab_Term_16__reportStuckSyntheticMVars___spec__1___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isCharLit_x3f(lean_object*); lean_object* l_Array_isEqvAux___main___at_Lean_Elab_Term_withMVarContext___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -301,8 +300,6 @@ lean_object* l_Lean_Elab_Term_levelMVarToParam(lean_object*, lean_object*, lean_ lean_object* l___private_Init_Lean_Elab_Term_15__synthesizeSyntheticMVarsStep___closed__4; lean_object* l_Lean_Elab_Term_observing(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkLet___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__4(lean_object*, lean_object*, lean_object*); -lean_object* l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_declareBuiltinTermElab(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_withMacroExpansion(lean_object*); lean_object* l_Lean_Elab_Term_getTraceState___rarg(lean_object*); @@ -328,6 +325,7 @@ lean_object* l_Lean_Elab_Term_getCurrNamespace(lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_23__mkConsts(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSort___closed__3; +lean_object* l_Lean_Elab_Term_monadLog___closed__8; extern lean_object* l_Lean_Expr_isSyntheticSorry___closed__1; lean_object* l___private_Init_Lean_Elab_Term_9__elabTermUsing___main(lean_object*, lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_isExprMVarAssigned___boxed(lean_object*, lean_object*, lean_object*); @@ -353,10 +351,8 @@ lean_object* l_Lean_Elab_Term_mkConst___closed__2; lean_object* l___private_Init_Lean_Elab_Term_8__postponeElabTerm___closed__4; lean_object* l_Lean_Elab_Term_elabTerm(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabStr___closed__1; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__10; lean_object* l___private_Init_Lean_Elab_Term_16__reportStuckSyntheticMVars(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_TermElabM_inhabited(lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__3___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkInstMVar(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__6; lean_object* l___private_Init_Lean_Elab_Term_15__synthesizeSyntheticMVarsStep___closed__10; @@ -377,10 +373,12 @@ lean_object* l_Lean_Name_appendIndexAfter(lean_object*, lean_object*); lean_object* l_List_filterAuxM___main___at___private_Init_Lean_Elab_Term_15__synthesizeSyntheticMVarsStep___spec__2___closed__8; lean_object* l_List_filterAuxM___main___at___private_Init_Lean_Elab_Term_15__synthesizeSyntheticMVarsStep___spec__2___closed__9; lean_object* l___private_Init_Lean_Elab_Term_1__mkMessageAux(lean_object*, lean_object*, lean_object*, uint8_t); +lean_object* l_Lean_Elab_Term_monadQuotation___closed__1; lean_object* l_List_filterAuxM___main___at___private_Init_Lean_Elab_Term_15__synthesizeSyntheticMVarsStep___spec__2___closed__4; lean_object* l_Lean_Elab_Term_withNode___rarg___closed__1; lean_object* l___private_Init_Lean_Elab_Term_9__elabTermUsing___main___closed__2; lean_object* l_Lean_Elab_Term_elabTypeStx(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___closed__6; lean_object* l_Lean_Elab_Term_withFreshMacroScope(lean_object*); lean_object* l_Lean_Elab_Term_resolveName___closed__7; size_t l_Lean_Name_hash(lean_object*); @@ -416,6 +414,7 @@ lean_object* l_Lean_Elab_Term_throwError___rarg(lean_object*, lean_object*, lean lean_object* l_Lean_Elab_Term_adaptMacro(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_log___at_Lean_Elab_Term_logTrace___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkExplicitBinder___closed__5; +lean_object* l_Lean_Elab_Term_monadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_elabTypeStx___rarg___closed__1; extern lean_object* l_Lean_Elab_Exception_hasToString___closed__1; @@ -441,6 +440,7 @@ lean_object* l___private_Init_Lean_Elab_Term_8__postponeElabTerm___closed__2; uint8_t l_PersistentHashMap_contains___at_Lean_Elab_Term_addBuiltinTermElab___spec__4(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__1; extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__7; +lean_object* l_Lean_Elab_Term_monadLog___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_14__synthesizeSyntheticMVar___closed__3; lean_object* l_Lean_Elab_Term_mkAppM___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_getCurrMacroScope___boxed(lean_object*, lean_object*); @@ -492,14 +492,13 @@ lean_object* l_Lean_Meta_whnf(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_17__synthesizeSyntheticMVarsAux___main(uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSort___closed__2; lean_object* l_Lean_Elab_Term_isClass(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_TermElabResult_inhabited; lean_object* l_Lean_Elab_Term_withMVarContext___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabArrayLit___closed__4; lean_object* l_List_filterAuxM___main___at___private_Init_Lean_Elab_Term_15__synthesizeSyntheticMVarsStep___spec__2___closed__2; lean_object* l_Lean_Elab_Term_TermElabM_inhabited___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkFreshAnonymousIdent___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTermAux___main___closed__3; extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__3; @@ -517,13 +516,13 @@ lean_object* l_Lean_Elab_Term_mkConst___closed__3; lean_object* l_Lean_Elab_Term_resolveName___closed__4; lean_object* l_Lean_Elab_Term_withNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_nullKind___closed__2; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParametricAttribute_setParam___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_termElabAttribute; lean_object* l_Lean_Elab_Term_expandCDot_x3f___closed__1; lean_object* l_fix1___rarg___lambda__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabArrayLit___closed__10; lean_object* l_List_filterAuxM___main___at___private_Init_Lean_Elab_Term_15__synthesizeSyntheticMVarsStep___spec__2___closed__1; +lean_object* l_Lean_Elab_Term_monadLog___closed__2; lean_object* l_Lean_Elab_Term_mkTermIdFromIdent(lean_object*); extern lean_object* l_Lean_Meta_Exception_toStr___closed__7; lean_object* l_Lean_mkAtomFrom(lean_object*, lean_object*); @@ -531,7 +530,6 @@ lean_object* l_Lean_Elab_Term_getDeclName_x3f___boxed(lean_object*, lean_object* lean_object* l_Lean_Elab_Term_isDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_18__mkPairsAux___main___closed__7; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__10; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ConstantInfo_lparams(lean_object*); lean_object* l_Lean_Elab_Term_mkFreshAnonymousName(lean_object*); uint8_t l___private_Init_Lean_Elab_Term_4__hasCDot(lean_object*); @@ -577,6 +575,7 @@ lean_object* l_PersistentHashMap_contains___at_Lean_Elab_Term_addBuiltinTermElab lean_object* l_Lean_Elab_Term_TermElabM_inhabited___rarg(lean_object*); uint8_t l_Lean_Expr_isMVar(lean_object*); lean_object* l_Lean_Elab_Term_mkHole(lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___closed__9; lean_object* l_Lean_Elab_Term_termElabAttribute___closed__6; lean_object* l_Lean_Meta_mkFreshExprMVar(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_5__expandCDot___closed__1; @@ -594,13 +593,13 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabArrayLit___closed__2; extern lean_object* l_Bool_HasRepr___closed__2; lean_object* l_Lean_Elab_Term_ensureType___closed__2; lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1___closed__2; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__1; lean_object* l_Lean_Environment_addAndCompile(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_registerSyntheticMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getKind(lean_object*); lean_object* l_PersistentHashMap_find_x3f___at_Lean_Elab_Term_elabTermAux___main___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr(lean_object*); +lean_object* l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_decLevel___closed__3; extern lean_object* l_Lean_Parser_Term_paren___elambda__1___closed__1; @@ -619,9 +618,9 @@ lean_object* l_Lean_Elab_Term_elabTerm___boxed(lean_object*, lean_object*, lean_ extern lean_object* l_Lean_Parser_Term_app___elambda__1___closed__2; extern lean_object* l_Lean_EnvExtension_setState___closed__1; lean_object* l_Lean_Elab_Term_liftLevelM___rarg___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__9; lean_object* l_Lean_Elab_Term_tryPostponeIfMVar___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_whnfCore(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___lambda__4___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Util_1__mkPanicMessage___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabParen___closed__2; lean_object* l_Lean_Elab_Term_resettingSynthInstanceCacheWhen___rarg(uint8_t, lean_object*, lean_object*, lean_object*); @@ -668,26 +667,24 @@ lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1___closed__ lean_object* lean_io_ref_set(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabStr___closed__3; lean_object* l_Lean_Elab_resolveGlobalName(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__8; lean_object* l_Lean_Elab_Term_getEnv(lean_object*); lean_object* l_Lean_Elab_Term_getOpenDecls(lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabListLit(lean_object*); lean_object* l_Lean_Elab_Term_elabArrayLit___closed__3; extern lean_object* l_Lean_mkOptionalNode___closed__1; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__5; lean_object* l_Lean_Elab_Term_tryEnsureHasType_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_decLevel___closed__4; lean_object* l_Lean_Elab_Term_elabChar___closed__3; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__12; lean_object* l_Lean_Meta_mkLambda(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_KernelException_toMessageData___closed__12; +lean_object* l_Lean_Elab_Term_monadLog___closed__11; extern lean_object* l_Lean_Expr_Inhabited; lean_object* l_Lean_Meta_instantiateMVars(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_addBuiltinTermElab(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkExplicitBinder___closed__1; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabStr(lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__2; uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHole___closed__3; @@ -714,14 +711,17 @@ lean_object* l_Lean_Elab_Term_mkFreshLevelMVar___boxed(lean_object*, lean_object lean_object* l_Lean_Elab_Term_setTraceState(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_tryPostpone(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkPairs(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___lambda__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_tryEnsureHasType_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Term_3__fromMetaState___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadQuotation___closed__3; extern lean_object* l___private_Init_Lean_Elab_Util_8__regTraceClasses___closed__4; lean_object* l_Lean_Meta_mkFreshLevelMVar___rarg(lean_object*); lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); extern lean_object* l_Lean_MetavarContext_Inhabited___closed__1; lean_object* l___private_Init_Lean_Elab_Term_18__mkPairsAux___main___closed__6; uint8_t l_Lean_SMap_contains___at_Lean_Elab_Term_addBuiltinTermElab___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___lambda__4(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabNum(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_3__fromMetaState(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabListLit___closed__3; @@ -767,10 +767,8 @@ lean_object* l_List_forM___main___at___private_Init_Lean_Elab_Term_16__reportStu lean_object* l_Lean_Message_toString(lean_object*); lean_object* l_Lean_mkAppB(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_char___elambda__1___closed__2; -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_Elab_Term_expandCDot_x3f___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_indentExpr(lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___closed__4; lean_object* l_Lean_Elab_Term_trace(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_AssocList_contains___main___at_Lean_Elab_Term_addBuiltinTermElab___spec__3___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkFreshInstanceName___boxed(lean_object*); @@ -808,11 +806,12 @@ lean_object* lean_name_mk_numeral(lean_object*, lean_object*); lean_object* l_Lean_Elab_syntaxNodeKindOfAttrParam(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_6__expandCDotInApp___main(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkForall___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog; lean_object* l_Lean_Elab_Term_getMCtx___rarg(lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Term_3__fromMetaState___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_foldlM___at___private_Init_Lean_Elab_Term_3__fromMetaState___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___closed__4; lean_object* l___private_Init_Lean_Elab_Term_9__elabTermUsing___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_23__mkConsts___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_liftMetaM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabArrayLit___closed__7; @@ -821,6 +820,7 @@ lean_object* l_Lean_Elab_Term_mkFreshInstanceName___rarg___closed__2; lean_object* l_Lean_mkApp3(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isSort(lean_object*); lean_object* l_Lean_Meta_decLevel_x3f(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_monadLog___lambda__2(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Parser_Parser_18__BuiltinParserAttribute_add___closed__2; lean_object* l_Lean_Elab_Term_expandCDot_x3f(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_NameGenerator_Inhabited___closed__3; @@ -1376,7 +1376,7 @@ lean_dec(x_2); return x_4; } } -lean_object* l_ReaderT_read___at_Lean_Elab_Term_TermElabM_MonadLog___spec__1(lean_object* x_1, lean_object* x_2) { +lean_object* l_ReaderT_read___at_Lean_Elab_Term_monadLog___spec__1(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; @@ -1386,7 +1386,7 @@ lean_ctor_set(x_3, 1, x_2); return x_3; } } -lean_object* l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; @@ -1429,15 +1429,15 @@ return x_12; } } } -lean_object* l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2(lean_object* x_1, lean_object* x_2) { +lean_object* l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 0); +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 0); return x_3; } } -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Elab_Term_monadLog___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; lean_object* x_5; @@ -1449,7 +1449,7 @@ lean_ctor_set(x_5, 1, x_3); return x_5; } } -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Elab_Term_monadLog___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; lean_object* x_5; @@ -1461,7 +1461,7 @@ lean_ctor_set(x_5, 1, x_3); return x_5; } } -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Elab_Term_monadLog___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; lean_object* x_5; @@ -1473,7 +1473,7 @@ lean_ctor_set(x_5, 1, x_3); return x_5; } } -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Elab_Term_monadLog___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { uint8_t x_4; @@ -1522,75 +1522,75 @@ return x_18; } } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__1() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_ReaderT_read___at_Lean_Elab_Term_TermElabM_MonadLog___spec__1), 2, 0); +x_1 = lean_alloc_closure((void*)(l_ReaderT_read___at_Lean_Elab_Term_monadLog___spec__1), 2, 0); return x_1; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__2() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__2() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_TermElabM_MonadLog___lambda__1___boxed), 3, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_monadLog___lambda__1___boxed), 3, 0); return x_1; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__3() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__1; -x_2 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__2; -x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_1 = l_Lean_Elab_Term_monadLog___closed__1; +x_2 = l_Lean_Elab_Term_monadLog___closed__2; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__4() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__4() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_TermElabM_MonadLog___lambda__2___boxed), 3, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_monadLog___lambda__2___boxed), 3, 0); return x_1; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__5() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__1; -x_2 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__4; -x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_1 = l_Lean_Elab_Term_monadLog___closed__1; +x_2 = l_Lean_Elab_Term_monadLog___closed__4; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__6() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__6() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_TermElabM_MonadLog___lambda__3___boxed), 3, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_monadLog___lambda__3___boxed), 3, 0); return x_1; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__7() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__7() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__1; -x_2 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__6; -x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_1 = l_Lean_Elab_Term_monadLog___closed__1; +x_2 = l_Lean_Elab_Term_monadLog___closed__6; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__8() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__8() { _start: { lean_object* x_1; @@ -1598,14 +1598,14 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_addContext___boxed), 3, 0); return x_1; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__9() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__9() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_1 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__3; -x_2 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__5; -x_3 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__7; -x_4 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__8; +x_1 = l_Lean_Elab_Term_monadLog___closed__3; +x_2 = l_Lean_Elab_Term_monadLog___closed__5; +x_3 = l_Lean_Elab_Term_monadLog___closed__7; +x_4 = l_Lean_Elab_Term_monadLog___closed__8; x_5 = lean_alloc_ctor(0, 4, 0); lean_ctor_set(x_5, 0, x_1); lean_ctor_set(x_5, 1, x_2); @@ -1614,69 +1614,69 @@ lean_ctor_set(x_5, 3, x_4); return x_5; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__10() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__10() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_TermElabM_MonadLog___lambda__4___boxed), 3, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_monadLog___lambda__4___boxed), 3, 0); return x_1; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__11() { +lean_object* _init_l_Lean_Elab_Term_monadLog___closed__11() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__9; -x_2 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__10; +x_1 = l_Lean_Elab_Term_monadLog___closed__9; +x_2 = l_Lean_Elab_Term_monadLog___closed__10; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadLog() { +lean_object* _init_l_Lean_Elab_Term_monadLog() { _start: { lean_object* x_1; -x_1 = l_Lean_Elab_Term_TermElabM_MonadLog___closed__11; +x_1 = l_Lean_Elab_Term_monadLog___closed__11; return x_1; } } -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Elab_Term_monadLog___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_Lean_Elab_Term_TermElabM_MonadLog___lambda__1(x_1, x_2, x_3); +x_4 = l_Lean_Elab_Term_monadLog___lambda__1(x_1, x_2, x_3); lean_dec(x_2); lean_dec(x_1); return x_4; } } -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Elab_Term_monadLog___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_Lean_Elab_Term_TermElabM_MonadLog___lambda__2(x_1, x_2, x_3); +x_4 = l_Lean_Elab_Term_monadLog___lambda__2(x_1, x_2, x_3); lean_dec(x_2); lean_dec(x_1); return x_4; } } -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Elab_Term_monadLog___lambda__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_Lean_Elab_Term_TermElabM_MonadLog___lambda__3(x_1, x_2, x_3); +x_4 = l_Lean_Elab_Term_monadLog___lambda__3(x_1, x_2, x_3); lean_dec(x_2); lean_dec(x_1); return x_4; } } -lean_object* l_Lean_Elab_Term_TermElabM_MonadLog___lambda__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Elab_Term_monadLog___lambda__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_Lean_Elab_Term_TermElabM_MonadLog___lambda__4(x_1, x_2, x_3); +x_4 = l_Lean_Elab_Term_monadLog___lambda__4(x_1, x_2, x_3); lean_dec(x_2); return x_4; } @@ -2414,7 +2414,7 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Term_withFreshMacroScope___rarg), 3 return x_2; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__1() { +lean_object* _init_l_Lean_Elab_Term_monadQuotation___closed__1() { _start: { lean_object* x_1; @@ -2422,7 +2422,7 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_getCurrMacroScope___boxed), 2, return x_1; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__2() { +lean_object* _init_l_Lean_Elab_Term_monadQuotation___closed__2() { _start: { lean_object* x_1; @@ -2430,23 +2430,23 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_withFreshMacroScope), 1, 0); return x_1; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__3() { +lean_object* _init_l_Lean_Elab_Term_monadQuotation___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__1; -x_2 = l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__2; +x_1 = l_Lean_Elab_Term_monadQuotation___closed__1; +x_2 = l_Lean_Elab_Term_monadQuotation___closed__2; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l_Lean_Elab_Term_TermElabM_MonadQuotation() { +lean_object* _init_l_Lean_Elab_Term_monadQuotation() { _start: { lean_object* x_1; -x_1 = l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__3; +x_1 = l_Lean_Elab_Term_monadQuotation___closed__3; return x_1; } } @@ -11422,13 +11422,15 @@ return x_29; } else { -lean_object* x_30; lean_dec(x_21); -x_30 = lean_ctor_get(x_20, 1); -lean_inc(x_30); lean_dec(x_20); -x_6 = x_19; -x_8 = x_30; +lean_inc(x_1); +{ +lean_object* _tmp_5 = x_19; +lean_object* _tmp_7 = x_1; +x_6 = _tmp_5; +x_8 = _tmp_7; +} goto _start; } } @@ -11437,37 +11439,37 @@ else lean_dec(x_19); if (x_5 == 0) { -uint8_t x_32; +uint8_t x_31; lean_dec(x_7); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_32 = !lean_is_exclusive(x_20); -if (x_32 == 0) +x_31 = !lean_is_exclusive(x_20); +if (x_31 == 0) { -lean_object* x_33; -x_33 = lean_ctor_get(x_20, 0); -lean_dec(x_33); +lean_object* x_32; +x_32 = lean_ctor_get(x_20, 0); +lean_dec(x_32); return x_20; } else { -lean_object* x_34; lean_object* x_35; -x_34 = lean_ctor_get(x_20, 1); -lean_inc(x_34); +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_20, 1); +lean_inc(x_33); lean_dec(x_20); -x_35 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_35, 0, x_21); -lean_ctor_set(x_35, 1, x_34); -return x_35; +x_34 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_34, 0, x_21); +lean_ctor_set(x_34, 1, x_33); +return x_34; } } else { -lean_object* x_36; +lean_object* x_35; lean_dec(x_20); -x_36 = l___private_Init_Lean_Elab_Term_8__postponeElabTerm(x_2, x_3, x_7, x_1); -return x_36; +x_35 = l___private_Init_Lean_Elab_Term_8__postponeElabTerm(x_2, x_3, x_7, x_1); +return x_35; } } } @@ -16672,7 +16674,7 @@ lean_closure_set(x_8, 1, x_1); lean_closure_set(x_8, 2, x_3); lean_closure_set(x_8, 3, x_2); x_9 = l___private_Init_Lean_Elab_Term_11__resumePostponed___closed__1; -x_10 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_10 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_10, 0, x_9); lean_closure_set(x_10, 1, x_8); x_11 = l_Lean_Elab_Term_withMVarContext___rarg(x_3, x_10, x_5, x_6); @@ -18524,7 +18526,7 @@ lean_closure_set(x_15, 1, x_14); x_16 = lean_alloc_closure((void*)(l_List_filterAuxM___main___at_Lean_Elab_Term_synthesizeUsingDefault___spec__1___lambda__1___boxed), 5, 2); lean_closure_set(x_16, 0, x_13); lean_closure_set(x_16, 1, x_11); -x_17 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_17 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_17, 0, x_15); lean_closure_set(x_17, 1, x_16); lean_inc(x_3); @@ -18617,7 +18619,7 @@ lean_closure_set(x_34, 1, x_33); x_35 = lean_alloc_closure((void*)(l_List_filterAuxM___main___at_Lean_Elab_Term_synthesizeUsingDefault___spec__1___lambda__1___boxed), 5, 2); lean_closure_set(x_35, 0, x_32); lean_closure_set(x_35, 1, x_30); -x_36 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_36 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_36, 0, x_34); lean_closure_set(x_36, 1, x_35); lean_inc(x_3); @@ -19004,7 +19006,7 @@ x_10 = lean_alloc_closure((void*)(l_Lean_Elab_Term_getMVarDecl___boxed), 3, 1); lean_closure_set(x_10, 0, x_9); x_11 = lean_alloc_closure((void*)(l_List_forM___main___at___private_Init_Lean_Elab_Term_16__reportStuckSyntheticMVars___spec__1___lambda__1___boxed), 4, 1); lean_closure_set(x_11, 0, x_6); -x_12 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_MonadLog___spec__2___rarg), 4, 2); +x_12 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2___rarg), 4, 2); lean_closure_set(x_12, 0, x_10); lean_closure_set(x_12, 1, x_11); lean_inc(x_2); @@ -23296,44 +23298,44 @@ l_Lean_Elab_Term_TermElabResult_inhabited___closed__1 = _init_l_Lean_Elab_Term_T lean_mark_persistent(l_Lean_Elab_Term_TermElabResult_inhabited___closed__1); l_Lean_Elab_Term_TermElabResult_inhabited = _init_l_Lean_Elab_Term_TermElabResult_inhabited(); lean_mark_persistent(l_Lean_Elab_Term_TermElabResult_inhabited); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__1 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__1(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__1); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__2 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__2(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__2); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__3 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__3(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__3); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__4 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__4(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__4); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__5 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__5(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__5); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__6 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__6(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__6); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__7 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__7(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__7); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__8 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__8(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__8); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__9 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__9(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__9); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__10 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__10(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__10); -l_Lean_Elab_Term_TermElabM_MonadLog___closed__11 = _init_l_Lean_Elab_Term_TermElabM_MonadLog___closed__11(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog___closed__11); -l_Lean_Elab_Term_TermElabM_MonadLog = _init_l_Lean_Elab_Term_TermElabM_MonadLog(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadLog); +l_Lean_Elab_Term_monadLog___closed__1 = _init_l_Lean_Elab_Term_monadLog___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__1); +l_Lean_Elab_Term_monadLog___closed__2 = _init_l_Lean_Elab_Term_monadLog___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__2); +l_Lean_Elab_Term_monadLog___closed__3 = _init_l_Lean_Elab_Term_monadLog___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__3); +l_Lean_Elab_Term_monadLog___closed__4 = _init_l_Lean_Elab_Term_monadLog___closed__4(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__4); +l_Lean_Elab_Term_monadLog___closed__5 = _init_l_Lean_Elab_Term_monadLog___closed__5(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__5); +l_Lean_Elab_Term_monadLog___closed__6 = _init_l_Lean_Elab_Term_monadLog___closed__6(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__6); +l_Lean_Elab_Term_monadLog___closed__7 = _init_l_Lean_Elab_Term_monadLog___closed__7(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__7); +l_Lean_Elab_Term_monadLog___closed__8 = _init_l_Lean_Elab_Term_monadLog___closed__8(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__8); +l_Lean_Elab_Term_monadLog___closed__9 = _init_l_Lean_Elab_Term_monadLog___closed__9(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__9); +l_Lean_Elab_Term_monadLog___closed__10 = _init_l_Lean_Elab_Term_monadLog___closed__10(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__10); +l_Lean_Elab_Term_monadLog___closed__11 = _init_l_Lean_Elab_Term_monadLog___closed__11(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog___closed__11); +l_Lean_Elab_Term_monadLog = _init_l_Lean_Elab_Term_monadLog(); +lean_mark_persistent(l_Lean_Elab_Term_monadLog); l_Lean_Elab_Term_throwUnsupportedSyntax___rarg___closed__1 = _init_l_Lean_Elab_Term_throwUnsupportedSyntax___rarg___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_throwUnsupportedSyntax___rarg___closed__1); l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1 = _init_l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1); l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2 = _init_l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2(); lean_mark_persistent(l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2); -l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__1 = _init_l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__1(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__1); -l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__2 = _init_l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__2(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__2); -l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__3 = _init_l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__3(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadQuotation___closed__3); -l_Lean_Elab_Term_TermElabM_MonadQuotation = _init_l_Lean_Elab_Term_TermElabM_MonadQuotation(); -lean_mark_persistent(l_Lean_Elab_Term_TermElabM_MonadQuotation); +l_Lean_Elab_Term_monadQuotation___closed__1 = _init_l_Lean_Elab_Term_monadQuotation___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_monadQuotation___closed__1); +l_Lean_Elab_Term_monadQuotation___closed__2 = _init_l_Lean_Elab_Term_monadQuotation___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_monadQuotation___closed__2); +l_Lean_Elab_Term_monadQuotation___closed__3 = _init_l_Lean_Elab_Term_monadQuotation___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_monadQuotation___closed__3); +l_Lean_Elab_Term_monadQuotation = _init_l_Lean_Elab_Term_monadQuotation(); +lean_mark_persistent(l_Lean_Elab_Term_monadQuotation); l_PersistentHashMap_empty___at_Lean_Elab_Term_mkBuiltinTermElabTable___spec__3 = _init_l_PersistentHashMap_empty___at_Lean_Elab_Term_mkBuiltinTermElabTable___spec__3(); lean_mark_persistent(l_PersistentHashMap_empty___at_Lean_Elab_Term_mkBuiltinTermElabTable___spec__3); l_Lean_SMap_empty___at_Lean_Elab_Term_mkBuiltinTermElabTable___spec__1___closed__1 = _init_l_Lean_SMap_empty___at_Lean_Elab_Term_mkBuiltinTermElabTable___spec__1___closed__1(); diff --git a/stage0/stdlib/Init/Lean/Parser/Syntax.c b/stage0/stdlib/Init/Lean/Parser/Syntax.c index 27e38e0037..926952ad22 100644 --- a/stage0/stdlib/Init/Lean/Parser/Syntax.c +++ b/stage0/stdlib/Init/Lean/Parser/Syntax.c @@ -170,6 +170,7 @@ lean_object* l_Lean_Parser_Command_prefix___closed__4; lean_object* l_Lean_Parser_Command_infixl___closed__3; lean_object* l_Lean_Parser_Syntax_lookahead___elambda__1___closed__4; lean_object* l_Lean_Parser_Command_infix___elambda__1___closed__1; +lean_object* l_Lean_Parser_Syntax_precedence___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_macro___closed__3; lean_object* l_Lean_Parser_Syntax_cat___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Syntax_orelse(lean_object*); @@ -233,6 +234,7 @@ lean_object* l_Lean_Parser_Syntax_try___elambda__1(lean_object*, lean_object*, l lean_object* l_Lean_Parser_Command_notation; lean_object* l___regBuiltinParser_Lean_Parser_Command_notation(lean_object*); lean_object* l_Lean_Parser_Syntax_ident___elambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Syntax_precedence___closed__6; lean_object* l_Lean_Parser_Syntax_paren___elambda__1___closed__1; lean_object* l_Lean_Parser_Command_postfix___closed__5; lean_object* l_Lean_Parser_Command_postfix___elambda__1___closed__3; @@ -309,6 +311,7 @@ lean_object* l_Lean_Parser_Command_reserve___closed__1; lean_object* l_Lean_Parser_Syntax_precedence___closed__2; lean_object* l_Lean_Parser_Command_reserve___closed__2; lean_object* l_Lean_Parser_Syntax_sepBy___elambda__1___closed__1; +lean_object* l_Lean_Parser_Syntax_precedence___elambda__1___closed__6; lean_object* l_Lean_Parser_Syntax_maxPrec___elambda__1___closed__4; extern lean_object* l_Lean_Parser_Term_haveAssign___elambda__1___closed__8; lean_object* l_Lean_Parser_Syntax_sepBy___closed__2; @@ -389,6 +392,7 @@ lean_object* l_Lean_Parser_Command_notation___closed__2; lean_object* l_Lean_Parser_Syntax_str___elambda__1___closed__4; lean_object* l_Lean_Parser_Syntax_sepBy1___elambda__1___closed__1; lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Syntax_precedence___elambda__1___closed__5; lean_object* l_Lean_Parser_Syntax_cat___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Command_reserve___closed__6; lean_object* l_Lean_Parser_Syntax_maxPrec___closed__5; @@ -418,6 +422,7 @@ lean_object* l_Lean_Parser_Syntax_lookahead___elambda__1(lean_object*, lean_obje lean_object* l_Lean_Parser_symbolInfo(lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Command_mixfix(lean_object*); lean_object* l_Lean_Parser_Command_mixfix___closed__3; +extern lean_object* l___private_Init_Util_1__mkPanicMessage___closed__2; lean_object* l_Lean_Parser_Command_notation___closed__8; extern lean_object* l_Lean_Parser_epsilonInfo; lean_object* l_Lean_Parser_Command_mixfix___closed__6; @@ -443,6 +448,7 @@ lean_object* l_Lean_Parser_Command_mixfixSymbol; lean_object* l_Lean_Parser_Command_quotedSymbolPrec___elambda__1___closed__4; lean_object* l_Lean_Parser_Syntax_sepBy1___closed__3; lean_object* l_Lean_Parser_Syntax_sepBy1___closed__5; +lean_object* l_Lean_Parser_Syntax_precedence___elambda__1___closed__8; lean_object* l_Lean_Parser_Command_notation___closed__9; lean_object* l_Lean_Parser_Syntax_lookahead___elambda__1___closed__7; lean_object* l_Lean_Parser_Command_macro___elambda__1___closed__4; @@ -990,6 +996,47 @@ x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); return x_5; } } +lean_object* _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Init_Util_1__mkPanicMessage___closed__2; +x_2 = l_String_trim(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__5; +x_3 = lean_string_append(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__6; +x_2 = l_Char_HasRepr___closed__1; +x_3 = lean_string_append(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__7; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} lean_object* l_Lean_Parser_Syntax_precedence___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -1062,13 +1109,13 @@ lean_object* x_31; lean_object* x_32; uint8_t x_33; x_31 = lean_ctor_get(x_30, 1); lean_inc(x_31); lean_dec(x_30); -x_32 = l_Lean_Parser_Term_typeAscription___elambda__1___closed__6; +x_32 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__5; x_33 = lean_string_dec_eq(x_31, x_32); lean_dec(x_31); if (x_33 == 0) { lean_object* x_34; lean_object* x_35; -x_34 = l_Lean_Parser_Term_typeAscription___elambda__1___closed__9; +x_34 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__8; lean_inc(x_8); x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_27, x_34, x_8); x_17 = x_35; @@ -1084,7 +1131,7 @@ else { lean_object* x_36; lean_object* x_37; lean_dec(x_30); -x_36 = l_Lean_Parser_Term_typeAscription___elambda__1___closed__9; +x_36 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__8; lean_inc(x_8); x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_27, x_36, x_8); x_17 = x_37; @@ -1095,7 +1142,7 @@ else { lean_object* x_38; lean_object* x_39; lean_dec(x_28); -x_38 = l_Lean_Parser_Term_typeAscription___elambda__1___closed__9; +x_38 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__8; lean_inc(x_8); x_39 = l_Lean_Parser_ParserState_mkErrorsAt(x_27, x_38, x_8); x_17 = x_39; @@ -1136,38 +1183,48 @@ return x_25; lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__1() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Syntax_precedenceLit; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -x_3 = l_Lean_Parser_Term_typeAscription___closed__1; -x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); -return x_4; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__5; +x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); +return x_3; } } lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__2() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Lean_Parser_Syntax_precedenceLit; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Syntax_precedence___closed__1; +x_4 = l_Lean_Parser_andthenInfo(x_3, x_2); +return x_4; +} +} +lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__3() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__2; -x_2 = l_Lean_Parser_Syntax_precedence___closed__1; +x_2 = l_Lean_Parser_Syntax_precedence___closed__2; x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__3() { +lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Parser_Syntax_precedence___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Syntax_precedence___closed__2; +x_3 = l_Lean_Parser_Syntax_precedence___closed__3; x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); return x_4; } } -lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__4() { +lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__5() { _start: { lean_object* x_1; @@ -1175,12 +1232,12 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Syntax_precedence___elambda__1), return x_1; } } -lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__5() { +lean_object* _init_l_Lean_Parser_Syntax_precedence___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Syntax_precedence___closed__3; -x_2 = l_Lean_Parser_Syntax_precedence___closed__4; +x_1 = l_Lean_Parser_Syntax_precedence___closed__4; +x_2 = l_Lean_Parser_Syntax_precedence___closed__5; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -1191,7 +1248,7 @@ lean_object* _init_l_Lean_Parser_Syntax_precedence() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Syntax_precedence___closed__5; +x_1 = l_Lean_Parser_Syntax_precedence___closed__6; return x_1; } } @@ -10447,6 +10504,14 @@ l_Lean_Parser_Syntax_precedence___elambda__1___closed__3 = _init_l_Lean_Parser_S lean_mark_persistent(l_Lean_Parser_Syntax_precedence___elambda__1___closed__3); l_Lean_Parser_Syntax_precedence___elambda__1___closed__4 = _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__4(); lean_mark_persistent(l_Lean_Parser_Syntax_precedence___elambda__1___closed__4); +l_Lean_Parser_Syntax_precedence___elambda__1___closed__5 = _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__5(); +lean_mark_persistent(l_Lean_Parser_Syntax_precedence___elambda__1___closed__5); +l_Lean_Parser_Syntax_precedence___elambda__1___closed__6 = _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__6(); +lean_mark_persistent(l_Lean_Parser_Syntax_precedence___elambda__1___closed__6); +l_Lean_Parser_Syntax_precedence___elambda__1___closed__7 = _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__7(); +lean_mark_persistent(l_Lean_Parser_Syntax_precedence___elambda__1___closed__7); +l_Lean_Parser_Syntax_precedence___elambda__1___closed__8 = _init_l_Lean_Parser_Syntax_precedence___elambda__1___closed__8(); +lean_mark_persistent(l_Lean_Parser_Syntax_precedence___elambda__1___closed__8); l_Lean_Parser_Syntax_precedence___closed__1 = _init_l_Lean_Parser_Syntax_precedence___closed__1(); lean_mark_persistent(l_Lean_Parser_Syntax_precedence___closed__1); l_Lean_Parser_Syntax_precedence___closed__2 = _init_l_Lean_Parser_Syntax_precedence___closed__2(); @@ -10457,6 +10522,8 @@ l_Lean_Parser_Syntax_precedence___closed__4 = _init_l_Lean_Parser_Syntax_precede lean_mark_persistent(l_Lean_Parser_Syntax_precedence___closed__4); l_Lean_Parser_Syntax_precedence___closed__5 = _init_l_Lean_Parser_Syntax_precedence___closed__5(); lean_mark_persistent(l_Lean_Parser_Syntax_precedence___closed__5); +l_Lean_Parser_Syntax_precedence___closed__6 = _init_l_Lean_Parser_Syntax_precedence___closed__6(); +lean_mark_persistent(l_Lean_Parser_Syntax_precedence___closed__6); l_Lean_Parser_Syntax_precedence = _init_l_Lean_Parser_Syntax_precedence(); lean_mark_persistent(l_Lean_Parser_Syntax_precedence); l_Lean_Parser_Syntax_paren___elambda__1___closed__1 = _init_l_Lean_Parser_Syntax_paren___elambda__1___closed__1(); diff --git a/stage0/stdlib/Init/Lean/Parser/Tactic.c b/stage0/stdlib/Init/Lean/Parser/Tactic.c index e214b8f123..bf66370bd5 100644 --- a/stage0/stdlib/Init/Lean/Parser/Tactic.c +++ b/stage0/stdlib/Init/Lean/Parser/Tactic.c @@ -18,7 +18,6 @@ lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__7; lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_intro(lean_object*); lean_object* l_Lean_Parser_Tactic_orelse___closed__2; -lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15; lean_object* l_Lean_Parser_Tactic_intros___closed__7; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__1; extern lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; @@ -33,6 +32,10 @@ lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__2; lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_orelse___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__5; +lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__2; +extern lean_object* l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_object* l_Lean_Parser_Tactic_seq; +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_intro___closed__4; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__3; lean_object* l_Lean_Parser_regTacticParserAttribute___closed__2; @@ -45,9 +48,9 @@ extern lean_object* l_Lean_Parser_Term_have___closed__3; lean_object* l_Lean_Parser_ParserState_pushSyntax(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly; extern lean_object* l_Lean_Parser_Term_subtype___closed__1; -lean_object* l_Lean_Parser_tacticSeq___closed__2; lean_object* l_Lean_Parser_ParserState_mkNode(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_apply___closed__4; +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__7; lean_object* l_Lean_Parser_Term_tacticBlock___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_orelse___closed__7; @@ -66,12 +69,13 @@ lean_object* l___regBuiltinParser_Lean_Parser_Tactic_nestedTacticBlockCurly(lean lean_object* l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; lean_object* l_Lean_Parser_Tactic_intros___closed__5; lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__2; +lean_object* l_Lean_Parser_Tactic_seq___closed__6; +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_orelse___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__8; lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__5; lean_object* l_Lean_Parser_ParserState_mkErrorsAt(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_orelse___closed__5; -lean_object* l_Lean_Parser_symbolFn___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_intros___closed__3; lean_object* l_Lean_Parser_Tactic_apply___closed__5; lean_object* l_Lean_Parser_Tactic_assumption___closed__4; @@ -89,19 +93,19 @@ lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__4; lean_object* l_Lean_Parser_manyAux___main(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_orelse___elambda__1___closed__3; -lean_object* l_Lean_Parser_tacticSeq___elambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolFnAux(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__1; +lean_object* l_Lean_Parser_Tactic_seq___closed__5; lean_object* l_Lean_Parser_nodeInfo(lean_object*, lean_object*); -lean_object* l_Lean_Parser_tacticSeq___boxed(lean_object*); +lean_object* l_Lean_Parser_Tactic_seq___closed__3; lean_object* l_Lean_Parser_Tactic_assumption___closed__1; -lean_object* l_Lean_Parser_tacticSeq___closed__1; lean_object* l_Lean_Parser_Tactic_apply___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; lean_object* l_Lean_Parser_noFirstTokenInfo(lean_object*); lean_object* l_Lean_Parser_nonReservedSymbolInfo(lean_object*, uint8_t); lean_object* l___regBuiltinParser_Lean_Parser_Tactic_intros(lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12; +lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__6; lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_intros___closed__2; @@ -125,6 +129,7 @@ lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__6; lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__7; extern lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__2; +lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_assumption___closed__2; lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__8; lean_object* l_Lean_Parser_Tactic_intro___closed__7; @@ -140,17 +145,16 @@ lean_object* l_Lean_Parser_Tactic_apply; lean_object* l_Lean_Parser_Tactic_assumption___closed__5; lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(lean_object*); lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_seq___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__9; lean_object* l_Lean_Parser_Tactic_orelse___elambda__1___closed__2; lean_object* l_Lean_Parser_Tactic_orelse; lean_object* l_Lean_Parser_categoryParserFn(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_tacticSeq(uint8_t); lean_object* l_Lean_Parser_Tactic_intros___closed__4; lean_object* l_Lean_Parser_sepBy1Info(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__5; extern lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__4; -lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__9; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__2; lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__1; lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_object*); @@ -159,7 +163,6 @@ lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__4; lean_object* l_Lean_Parser_regTacticParserAttribute(lean_object*); lean_object* l_Lean_Parser_symbolInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__6; -lean_object* l_Lean_Parser_sepBy1Fn(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_epsilonInfo; lean_object* l_Lean_Parser_Tactic_orelse___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__4; @@ -168,11 +171,12 @@ lean_object* l_Lean_Parser_Term_tacticBlock___closed__4; lean_object* l_Lean_Parser_Term_tacticBlock___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__8; lean_object* l_Lean_Parser_Term_tacticBlock; -lean_object* l_Lean_Parser_tacticSeq___elambda__1(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__4; lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__3; lean_object* l_Lean_Parser_Tactic_intro___closed__6; +lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__4; +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_intros; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__5; @@ -180,8 +184,10 @@ lean_object* l_String_trim(lean_object*); lean_object* l_Lean_Parser_Tactic_apply___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_assumption(lean_object*); extern lean_object* l_Lean_Parser_Term_typeAscription___closed__2; +lean_object* l_Lean_Parser_Tactic_seq___closed__2; lean_object* l_Lean_Parser_Tactic_apply___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__2; +lean_object* l_Lean_Parser_Tactic_seq___closed__1; lean_object* l_Lean_Parser_Term_tacticBlock___closed__6; lean_object* l_Lean_Parser_Tactic_intro___closed__2; lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__3; @@ -198,6 +204,7 @@ lean_object* l_Lean_Parser_Tactic_orelse___closed__6; lean_object* l_Lean_Parser_Tactic_intro___closed__5; lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__7; +lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_orelse___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__8; lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__8; @@ -205,17 +212,17 @@ lean_object* l_Lean_Parser_Tactic_assumption___elambda__1(lean_object*, lean_obj lean_object* l_Lean_Parser_Tactic_orelse___elambda__1___closed__5; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_orelse(lean_object*); lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Parser_categoryParser___elambda__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_tacticBlock___closed__5; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_intro; lean_object* l_Lean_Parser_tacticParser___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_orelse___elambda__1___closed__1; +lean_object* l_Lean_Parser_Tactic_seq___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; +lean_object* l_Lean_Parser_Tactic_seq___closed__4; extern lean_object* l_Lean_Parser_Level_paren___closed__1; -lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__10; uint8_t lean_string_dec_eq(lean_object*, lean_object*); lean_object* _init_l_Lean_Parser_regBuiltinTacticParserAttr___closed__1() { _start: @@ -311,83 +318,160 @@ x_4 = l_Lean_Parser_tacticParser(x_3, x_2); return x_4; } } -lean_object* l_Lean_Parser_tacticSeq___elambda__1(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(uint8_t x_1, uint8_t x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -uint8_t x_7; lean_object* x_8; -x_7 = 1; -x_8 = l_Lean_Parser_sepBy1Fn(x_1, x_7, x_3, x_2, x_4, x_5, x_6); -return x_8; +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_array_get_size(x_8); +lean_dec(x_8); +x_10 = lean_ctor_get(x_7, 1); +lean_inc(x_10); +x_11 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; +x_12 = lean_unsigned_to_nat(0u); +lean_inc(x_6); +x_13 = l_Lean_Parser_categoryParserFn(x_11, x_12, x_6, x_7); +x_14 = lean_ctor_get(x_13, 3); +lean_inc(x_14); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_25; lean_object* x_26; +lean_dec(x_10); +lean_dec(x_9); +x_15 = lean_ctor_get(x_13, 0); +lean_inc(x_15); +x_16 = lean_array_get_size(x_15); +lean_dec(x_15); +x_17 = lean_ctor_get(x_13, 1); +lean_inc(x_17); +lean_inc(x_6); +x_25 = l_Lean_Parser_tokenFn(x_6, x_13); +x_26 = lean_ctor_get(x_25, 3); +lean_inc(x_26); +if (lean_obj_tag(x_26) == 0) +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_ctor_get(x_25, 0); +lean_inc(x_27); +x_28 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_27); +lean_dec(x_27); +if (lean_obj_tag(x_28) == 2) +{ +lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_29 = lean_ctor_get(x_28, 1); +lean_inc(x_29); +lean_dec(x_28); +x_30 = l_Lean_Parser_Term_have___elambda__1___closed__7; +x_31 = lean_string_dec_eq(x_29, x_30); +lean_dec(x_29); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; +x_32 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_17); +x_33 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_32, x_17); +x_18 = x_33; +goto block_24; +} +else +{ +x_18 = x_25; +goto block_24; } } -lean_object* _init_l_Lean_Parser_tacticSeq___closed__1() { +else +{ +lean_object* x_34; lean_object* x_35; +lean_dec(x_28); +x_34 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_17); +x_35 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_34, x_17); +x_18 = x_35; +goto block_24; +} +} +else +{ +lean_object* x_36; lean_object* x_37; +lean_dec(x_26); +x_36 = l_Lean_Parser_Term_have___elambda__1___closed__10; +lean_inc(x_17); +x_37 = l_Lean_Parser_ParserState_mkErrorsAt(x_25, x_36, x_17); +x_18 = x_37; +goto block_24; +} +block_24: +{ +lean_object* x_19; +x_19 = lean_ctor_get(x_18, 3); +lean_inc(x_19); +if (lean_obj_tag(x_19) == 0) +{ +lean_dec(x_17); +lean_dec(x_16); +{ +uint8_t _tmp_3 = x_2; +lean_object* _tmp_6 = x_18; +x_4 = _tmp_3; +x_7 = _tmp_6; +} +goto _start; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_dec(x_19); +lean_dec(x_6); +x_21 = l_Lean_Parser_ParserState_restore(x_18, x_16, x_17); +lean_dec(x_16); +x_22 = l_Lean_nullKind; +x_23 = l_Lean_Parser_ParserState_mkNode(x_21, x_22, x_3); +return x_23; +} +} +} +else +{ +lean_dec(x_14); +lean_dec(x_6); +if (x_4 == 0) +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +lean_dec(x_10); +lean_dec(x_9); +x_38 = lean_box(0); +x_39 = l_Lean_Parser_ParserState_pushSyntax(x_13, x_38); +x_40 = l_Lean_nullKind; +x_41 = l_Lean_Parser_ParserState_mkNode(x_39, x_40, x_3); +return x_41; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = l_Lean_Parser_ParserState_restore(x_13, x_9, x_10); +lean_dec(x_9); +x_43 = l_Lean_nullKind; +x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_3); +return x_44; +} +} +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Term_have___elambda__1___closed__7; -x_2 = lean_alloc_closure((void*)(l_Lean_Parser_symbolFn___rarg___boxed), 4, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; +lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_array_get_size(x_6); +lean_dec(x_6); +x_8 = 0; +x_9 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(x_1, x_2, x_7, x_8, x_3, x_4, x_5); +return x_9; } } -lean_object* _init_l_Lean_Parser_tacticSeq___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; -x_2 = lean_unsigned_to_nat(0u); -x_3 = lean_alloc_closure((void*)(l_Lean_Parser_categoryParser___elambda__1___rarg___boxed), 5, 2); -lean_closure_set(x_3, 0, x_1); -lean_closure_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* l_Lean_Parser_tacticSeq(uint8_t x_1) { -_start: -{ -lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_2 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; -x_3 = lean_unsigned_to_nat(0u); -x_4 = l_Lean_Parser_categoryParser(x_1, x_2, x_3); -x_5 = lean_ctor_get(x_4, 0); -lean_inc(x_5); -lean_dec(x_4); -x_6 = l_Lean_Parser_Term_have___closed__3; -x_7 = l_Lean_Parser_sepBy1Info(x_5, x_6); -x_8 = l_Lean_Parser_tacticSeq___closed__1; -x_9 = l_Lean_Parser_tacticSeq___closed__2; -x_10 = lean_box(x_1); -x_11 = lean_alloc_closure((void*)(l_Lean_Parser_tacticSeq___elambda__1___boxed), 6, 3); -lean_closure_set(x_11, 0, x_10); -lean_closure_set(x_11, 1, x_8); -lean_closure_set(x_11, 2, x_9); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_7); -lean_ctor_set(x_12, 1, x_11); -return x_12; -} -} -lean_object* l_Lean_Parser_tacticSeq___elambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -uint8_t x_7; lean_object* x_8; -x_7 = lean_unbox(x_1); -lean_dec(x_1); -x_8 = l_Lean_Parser_tacticSeq___elambda__1(x_7, x_2, x_3, x_4, x_5, x_6); -return x_8; -} -} -lean_object* l_Lean_Parser_tacticSeq___boxed(lean_object* x_1) { -_start: -{ -uint8_t x_2; lean_object* x_3; -x_2 = lean_unbox(x_1); -lean_dec(x_1); -x_3 = l_Lean_Parser_tacticSeq(x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__1() { +lean_object* _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__1() { _start: { lean_object* x_1; @@ -395,11 +479,230 @@ x_1 = lean_mk_string("Tactic"); return x_1; } } -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__2() { +lean_object* _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_declareLeadingBuiltinParser___closed__1; +x_2 = l_Lean_Parser_Tactic_seq___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; +x_2 = l_Lean_Parser_Term_seq___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__3; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__5() { +_start: +{ +uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; +x_1 = 0; +x_2 = l_Lean_Parser_Term_seq___elambda__1___closed__1; +x_3 = l_Lean_Parser_Tactic_seq___elambda__1___closed__4; +x_4 = 1; +x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); +return x_5; +} +} +lean_object* l_Lean_Parser_Tactic_seq___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_4 = l_Lean_Parser_Tactic_seq___elambda__1___closed__5; +x_5 = lean_ctor_get(x_4, 1); +lean_inc(x_5); +x_6 = lean_ctor_get(x_3, 0); +lean_inc(x_6); +x_7 = lean_array_get_size(x_6); +lean_dec(x_6); +x_8 = lean_ctor_get(x_3, 1); +lean_inc(x_8); +lean_inc(x_2); +lean_inc(x_1); +x_9 = lean_apply_3(x_5, x_1, x_2, x_3); +x_10 = lean_ctor_get(x_9, 3); +lean_inc(x_10); +if (lean_obj_tag(x_10) == 0) +{ +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = lean_ctor_get(x_9, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_12, x_8); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_dec(x_11); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; uint8_t x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_inc(x_8); +x_14 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); +lean_dec(x_7); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_array_get_size(x_15); +lean_dec(x_15); +x_17 = 0; +x_18 = 1; +x_19 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1(x_17, x_18, x_1, x_2, x_14); +lean_dec(x_1); +x_20 = l_Lean_Parser_Tactic_seq___elambda__1___closed__3; +x_21 = l_Lean_Parser_ParserState_mkNode(x_19, x_20, x_16); +x_22 = l_Lean_Parser_mergeOrElseErrors(x_21, x_11, x_8); +lean_dec(x_8); +return x_22; +} +} +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___closed__1() { +_start: +{ +uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = 0; +x_2 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; +x_3 = lean_unsigned_to_nat(0u); +x_4 = l_Lean_Parser_categoryParser(x_1, x_2, x_3); +return x_4; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Lean_Parser_Tactic_seq___closed__1; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Term_have___closed__3; +x_4 = l_Lean_Parser_sepBy1Info(x_2, x_3); +return x_4; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__3; +x_2 = l_Lean_Parser_Tactic_seq___closed__2; +x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__5; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Tactic_seq___closed__3; +x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); +return x_4; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_seq___elambda__1), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_seq___closed__4; +x_2 = l_Lean_Parser_Tactic_seq___closed__5; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_seq() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Parser_Tactic_seq___closed__6; +return x_1; +} +} +lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +uint8_t x_8; uint8_t x_9; uint8_t x_10; lean_object* x_11; +x_8 = lean_unbox(x_1); +lean_dec(x_1); +x_9 = lean_unbox(x_2); +lean_dec(x_2); +x_10 = lean_unbox(x_4); +lean_dec(x_4); +x_11 = l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Tactic_seq___elambda__1___spec__2(x_8, x_9, x_3, x_10, x_5, x_6, x_7); +lean_dec(x_5); +return x_11; +} +} +lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +uint8_t x_6; uint8_t x_7; lean_object* x_8; +x_6 = lean_unbox(x_1); +lean_dec(x_1); +x_7 = lean_unbox(x_2); +lean_dec(x_2); +x_8 = l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Tactic_seq___elambda__1___spec__1(x_6, x_7, x_3, x_4, x_5); +lean_dec(x_3); +return x_8; +} +} +lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("intro"); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_intro___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -408,44 +711,26 @@ return x_3; lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("intro"); -return x_1; -} -} -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; -x_2 = l_Lean_Parser_Tactic_intro___elambda__1___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__5() { -_start: -{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; +x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__6() { +lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__4() { _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; x_1 = 0; -x_2 = l_Lean_Parser_Tactic_intro___elambda__1___closed__3; -x_3 = l_Lean_Parser_Tactic_intro___elambda__1___closed__5; +x_2 = l_Lean_Parser_Tactic_intro___elambda__1___closed__1; +x_3 = l_Lean_Parser_Tactic_intro___elambda__1___closed__3; x_4 = 1; x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); return x_5; } } -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__7() { +lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__5() { _start: { lean_object* x_1; @@ -453,30 +738,30 @@ x_1 = lean_mk_string("intro "); return x_1; } } -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__8() { +lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__7; +x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__5; x_2 = l_String_trim(x_1); return x_2; } } -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__9() { +lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__7() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Char_HasRepr___closed__1; -x_2 = l_Lean_Parser_Tactic_intro___elambda__1___closed__8; +x_2 = l_Lean_Parser_Tactic_intro___elambda__1___closed__6; x_3 = lean_string_append(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__10() { +lean_object* _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__9; +x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__7; x_2 = l_Char_HasRepr___closed__1; x_3 = lean_string_append(x_1, x_2); return x_3; @@ -489,7 +774,7 @@ lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_obj x_4 = l_Lean_Parser_Level_ident___elambda__1___closed__4; x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); -x_6 = l_Lean_Parser_Tactic_intro___elambda__1___closed__6; +x_6 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; x_7 = lean_ctor_get(x_6, 1); lean_inc(x_7); x_8 = lean_ctor_get(x_3, 0); @@ -542,8 +827,8 @@ x_17 = lean_ctor_get(x_16, 0); lean_inc(x_17); x_18 = lean_array_get_size(x_17); lean_dec(x_17); -x_19 = l_Lean_Parser_Tactic_intro___elambda__1___closed__8; -x_20 = l_Lean_Parser_Tactic_intro___elambda__1___closed__10; +x_19 = l_Lean_Parser_Tactic_intro___elambda__1___closed__6; +x_20 = l_Lean_Parser_Tactic_intro___elambda__1___closed__8; lean_inc(x_2); x_21 = l_Lean_Parser_nonReservedSymbolFnAux(x_19, x_20, x_2, x_16); x_22 = lean_ctor_get(x_21, 3); @@ -566,7 +851,7 @@ lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean lean_dec(x_25); x_28 = l_Lean_nullKind; x_29 = l_Lean_Parser_ParserState_mkNode(x_26, x_28, x_24); -x_30 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; +x_30 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_31 = l_Lean_Parser_ParserState_mkNode(x_29, x_30, x_18); x_32 = l_Lean_Parser_mergeOrElseErrors(x_31, x_13, x_10); lean_dec(x_10); @@ -586,7 +871,7 @@ lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean lean_dec(x_25); x_35 = l_Lean_nullKind; x_36 = l_Lean_Parser_ParserState_mkNode(x_26, x_35, x_24); -x_37 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; +x_37 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_38 = l_Lean_Parser_ParserState_mkNode(x_36, x_37, x_18); x_39 = l_Lean_Parser_mergeOrElseErrors(x_38, x_13, x_10); lean_dec(x_10); @@ -598,7 +883,7 @@ lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean x_40 = l_Lean_Parser_ParserState_restore(x_26, x_24, x_25); x_41 = l_Lean_nullKind; x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_24); -x_43 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; +x_43 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_44 = l_Lean_Parser_ParserState_mkNode(x_42, x_43, x_18); x_45 = l_Lean_Parser_mergeOrElseErrors(x_44, x_13, x_10); lean_dec(x_10); @@ -613,7 +898,7 @@ lean_dec(x_22); lean_dec(x_5); lean_dec(x_2); lean_dec(x_1); -x_46 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; +x_46 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_47 = l_Lean_Parser_ParserState_mkNode(x_21, x_46, x_18); x_48 = l_Lean_Parser_mergeOrElseErrors(x_47, x_13, x_10); lean_dec(x_10); @@ -627,7 +912,7 @@ lean_object* _init_l_Lean_Parser_Tactic_intro___closed__1() { _start: { lean_object* x_1; uint8_t x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__8; +x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__6; x_2 = 0; x_3 = l_Lean_Parser_nonReservedSymbolInfo(x_1, x_2); return x_3; @@ -658,7 +943,7 @@ lean_object* _init_l_Lean_Parser_Tactic_intro___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; +x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_intro___closed__3; x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); return x_3; @@ -668,7 +953,7 @@ lean_object* _init_l_Lean_Parser_Tactic_intro___closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__6; +x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); x_3 = l_Lean_Parser_Tactic_intro___closed__4; @@ -710,7 +995,7 @@ _start: uint8_t x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_2 = 0; x_3 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; -x_4 = l_Lean_Parser_Tactic_intro___elambda__1___closed__4; +x_4 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; x_5 = l_Lean_Parser_Tactic_intro; x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); return x_6; @@ -728,7 +1013,7 @@ lean_object* _init_l_Lean_Parser_Tactic_intros___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_intros___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -998,7 +1283,7 @@ lean_object* _init_l_Lean_Parser_Tactic_assumption___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_assumption___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -1203,7 +1488,7 @@ lean_object* _init_l_Lean_Parser_Tactic_apply___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_apply___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -1449,7 +1734,7 @@ lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -1497,35 +1782,36 @@ return x_2; lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__7() { _start: { -uint8_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = l_Lean_Parser_tacticSeq(x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__8() { -_start: -{ lean_object* x_1; x_1 = lean_mk_string("end"); return x_1; } } -lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__9() { +lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__8() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__8; +x_1 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__7; x_2 = l_String_trim(x_1); return x_2; } } +lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__9() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__8; +x_3 = lean_string_append(x_1, x_2); +return x_3; +} +} lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Char_HasRepr___closed__1; -x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__9; +x_1 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__9; +x_2 = l_Char_HasRepr___closed__1; x_3 = lean_string_append(x_1, x_2); return x_3; } @@ -1534,25 +1820,15 @@ lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__10; -x_2 = l_Char_HasRepr___closed__1; -x_3 = lean_string_append(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__11; +x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__10; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); return x_3; } } -lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__13() { +lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -1562,22 +1838,22 @@ x_3 = lean_string_append(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14() { +lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__13() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__13; +x_1 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12; x_2 = l_Char_HasRepr___closed__1; x_3 = lean_string_append(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15() { +lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14; +x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__13; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); @@ -1587,227 +1863,221 @@ return x_3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_4 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__7; +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_4 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__4; x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); -x_6 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__4; -x_7 = lean_ctor_get(x_6, 1); -lean_inc(x_7); -x_8 = lean_ctor_get(x_3, 0); +x_6 = lean_ctor_get(x_3, 0); +lean_inc(x_6); +x_7 = lean_array_get_size(x_6); +lean_dec(x_6); +x_8 = lean_ctor_get(x_3, 1); lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_3, 1); -lean_inc(x_10); lean_inc(x_2); lean_inc(x_1); -x_11 = lean_apply_3(x_7, x_1, x_2, x_3); -x_12 = lean_ctor_get(x_11, 3); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) -{ -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -return x_11; -} -else -{ -lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -lean_dec(x_12); -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -x_15 = lean_nat_dec_eq(x_14, x_10); -lean_dec(x_14); -if (x_15 == 0) -{ -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -return x_11; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_56; lean_object* x_57; +x_9 = lean_apply_3(x_5, x_1, x_2, x_3); +x_10 = lean_ctor_get(x_9, 3); lean_inc(x_10); -x_16 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); -lean_dec(x_9); -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_array_get_size(x_17); -lean_dec(x_17); +if (lean_obj_tag(x_10) == 0) +{ +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = lean_ctor_get(x_9, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_12, x_8); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_dec(x_11); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_54; lean_object* x_55; +lean_inc(x_8); +x_14 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); +lean_dec(x_7); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_array_get_size(x_15); +lean_dec(x_15); lean_inc(x_2); -x_56 = l_Lean_Parser_tokenFn(x_2, x_16); -x_57 = lean_ctor_get(x_56, 3); -lean_inc(x_57); -if (lean_obj_tag(x_57) == 0) +x_54 = l_Lean_Parser_tokenFn(x_2, x_14); +x_55 = lean_ctor_get(x_54, 3); +lean_inc(x_55); +if (lean_obj_tag(x_55) == 0) { -lean_object* x_58; lean_object* x_59; -x_58 = lean_ctor_get(x_56, 0); +lean_object* x_56; lean_object* x_57; +x_56 = lean_ctor_get(x_54, 0); +lean_inc(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +lean_dec(x_56); +if (lean_obj_tag(x_57) == 2) +{ +lean_object* x_58; lean_object* x_59; uint8_t x_60; +x_58 = lean_ctor_get(x_57, 1); lean_inc(x_58); -x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_58); +lean_dec(x_57); +x_59 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__6; +x_60 = lean_string_dec_eq(x_58, x_59); lean_dec(x_58); -if (lean_obj_tag(x_59) == 2) +if (x_60 == 0) { -lean_object* x_60; lean_object* x_61; uint8_t x_62; -x_60 = lean_ctor_get(x_59, 1); -lean_inc(x_60); -lean_dec(x_59); -x_61 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__6; -x_62 = lean_string_dec_eq(x_60, x_61); -lean_dec(x_60); -if (x_62 == 0) +lean_object* x_61; lean_object* x_62; +x_61 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14; +lean_inc(x_8); +x_62 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_61, x_8); +x_17 = x_62; +goto block_53; +} +else +{ +x_17 = x_54; +goto block_53; +} +} +else { lean_object* x_63; lean_object* x_64; -x_63 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15; -lean_inc(x_10); -x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_63, x_10); -x_19 = x_64; -goto block_55; -} -else -{ -x_19 = x_56; -goto block_55; +lean_dec(x_57); +x_63 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14; +lean_inc(x_8); +x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_63, x_8); +x_17 = x_64; +goto block_53; } } else { lean_object* x_65; lean_object* x_66; -lean_dec(x_59); -x_65 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15; -lean_inc(x_10); -x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_65, x_10); -x_19 = x_66; -goto block_55; +lean_dec(x_55); +x_65 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14; +lean_inc(x_8); +x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_65, x_8); +x_17 = x_66; +goto block_53; } -} -else +block_53: { -lean_object* x_67; lean_object* x_68; -lean_dec(x_57); -x_67 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15; -lean_inc(x_10); -x_68 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_67, x_10); -x_19 = x_68; -goto block_55; -} -block_55: +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) { -lean_object* x_20; +lean_object* x_19; lean_object* x_20; +lean_inc(x_2); +x_19 = l_Lean_Parser_Tactic_seq___elambda__1(x_1, x_2, x_17); x_20 = lean_ctor_get(x_19, 3); lean_inc(x_20); if (lean_obj_tag(x_20) == 0) { -lean_object* x_21; lean_object* x_22; -lean_inc(x_2); -x_21 = lean_apply_3(x_5, x_1, x_2, x_19); -x_22 = lean_ctor_get(x_21, 3); -lean_inc(x_22); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_21, 1); +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +x_22 = l_Lean_Parser_tokenFn(x_2, x_19); +x_23 = lean_ctor_get(x_22, 3); lean_inc(x_23); -x_24 = l_Lean_Parser_tokenFn(x_2, x_21); -x_25 = lean_ctor_get(x_24, 3); -lean_inc(x_25); -if (lean_obj_tag(x_25) == 0) +if (lean_obj_tag(x_23) == 0) { -lean_object* x_26; lean_object* x_27; -x_26 = lean_ctor_get(x_24, 0); +lean_object* x_24; lean_object* x_25; +x_24 = lean_ctor_get(x_22, 0); +lean_inc(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +lean_dec(x_24); +if (lean_obj_tag(x_25) == 2) +{ +lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_26 = lean_ctor_get(x_25, 1); lean_inc(x_26); -x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_26); -lean_dec(x_26); -if (lean_obj_tag(x_27) == 2) -{ -lean_object* x_28; lean_object* x_29; uint8_t x_30; -x_28 = lean_ctor_get(x_27, 1); -lean_inc(x_28); -lean_dec(x_27); -x_29 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__9; -x_30 = lean_string_dec_eq(x_28, x_29); -lean_dec(x_28); -if (x_30 == 0) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_31 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12; -x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_31, x_23); -x_33 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_18); -x_35 = l_Lean_Parser_mergeOrElseErrors(x_34, x_13, x_10); -lean_dec(x_10); -return x_35; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -lean_dec(x_23); -x_36 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; -x_37 = l_Lean_Parser_ParserState_mkNode(x_24, x_36, x_18); -x_38 = l_Lean_Parser_mergeOrElseErrors(x_37, x_13, x_10); -lean_dec(x_10); -return x_38; -} -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -lean_dec(x_27); -x_39 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12; -x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_39, x_23); -x_41 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; -x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_18); -x_43 = l_Lean_Parser_mergeOrElseErrors(x_42, x_13, x_10); -lean_dec(x_10); -return x_43; -} -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_dec(x_25); -x_44 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12; -x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_44, x_23); -x_46 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_18); -x_48 = l_Lean_Parser_mergeOrElseErrors(x_47, x_13, x_10); -lean_dec(x_10); -return x_48; +x_27 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__8; +x_28 = lean_string_dec_eq(x_26, x_27); +lean_dec(x_26); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_29 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__11; +x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_29, x_21); +x_31 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_16); +x_33 = l_Lean_Parser_mergeOrElseErrors(x_32, x_11, x_8); +lean_dec(x_8); +return x_33; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_21); +x_34 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_22, x_34, x_16); +x_36 = l_Lean_Parser_mergeOrElseErrors(x_35, x_11, x_8); +lean_dec(x_8); +return x_36; } } else { -lean_object* x_49; lean_object* x_50; lean_object* x_51; -lean_dec(x_22); -lean_dec(x_2); -x_49 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; -x_50 = l_Lean_Parser_ParserState_mkNode(x_21, x_49, x_18); -x_51 = l_Lean_Parser_mergeOrElseErrors(x_50, x_13, x_10); -lean_dec(x_10); -return x_51; +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +lean_dec(x_25); +x_37 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__11; +x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_37, x_21); +x_39 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_16); +x_41 = l_Lean_Parser_mergeOrElseErrors(x_40, x_11, x_8); +lean_dec(x_8); +return x_41; } } else { -lean_object* x_52; lean_object* x_53; lean_object* x_54; +lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +lean_dec(x_23); +x_42 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__11; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_42, x_21); +x_44 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; +x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_16); +x_46 = l_Lean_Parser_mergeOrElseErrors(x_45, x_11, x_8); +lean_dec(x_8); +return x_46; +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_dec(x_20); -lean_dec(x_5); +lean_dec(x_2); +x_47 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; +x_48 = l_Lean_Parser_ParserState_mkNode(x_19, x_47, x_16); +x_49 = l_Lean_Parser_mergeOrElseErrors(x_48, x_11, x_8); +lean_dec(x_8); +return x_49; +} +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; +lean_dec(x_18); lean_dec(x_2); lean_dec(x_1); -x_52 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; -x_53 = l_Lean_Parser_ParserState_mkNode(x_19, x_52, x_18); -x_54 = l_Lean_Parser_mergeOrElseErrors(x_53, x_13, x_10); -lean_dec(x_10); -return x_54; +x_50 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; +x_51 = l_Lean_Parser_ParserState_mkNode(x_17, x_50, x_16); +x_52 = l_Lean_Parser_mergeOrElseErrors(x_51, x_11, x_8); +lean_dec(x_8); +return x_52; } } } @@ -1829,7 +2099,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__9; +x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__8; x_3 = l_Lean_Parser_symbolInfo(x_2, x_1); return x_3; } @@ -1838,7 +2108,7 @@ lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__7; +x_1 = l_Lean_Parser_Tactic_seq; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); x_3 = l_Lean_Parser_Tactic_nestedTacticBlock___closed__2; @@ -1930,7 +2200,7 @@ lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; x_2 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -1961,227 +2231,221 @@ return x_5; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_4 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__7; +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_4 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__4; x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); -x_6 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__4; -x_7 = lean_ctor_get(x_6, 1); -lean_inc(x_7); -x_8 = lean_ctor_get(x_3, 0); +x_6 = lean_ctor_get(x_3, 0); +lean_inc(x_6); +x_7 = lean_array_get_size(x_6); +lean_dec(x_6); +x_8 = lean_ctor_get(x_3, 1); lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_3, 1); -lean_inc(x_10); lean_inc(x_2); lean_inc(x_1); -x_11 = lean_apply_3(x_7, x_1, x_2, x_3); -x_12 = lean_ctor_get(x_11, 3); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) -{ -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -return x_11; -} -else -{ -lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -lean_dec(x_12); -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -x_15 = lean_nat_dec_eq(x_14, x_10); -lean_dec(x_14); -if (x_15 == 0) -{ -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -return x_11; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_56; lean_object* x_57; +x_9 = lean_apply_3(x_5, x_1, x_2, x_3); +x_10 = lean_ctor_get(x_9, 3); lean_inc(x_10); -x_16 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); -lean_dec(x_9); -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_array_get_size(x_17); -lean_dec(x_17); +if (lean_obj_tag(x_10) == 0) +{ +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = lean_ctor_get(x_9, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_12, x_8); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_dec(x_11); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_54; lean_object* x_55; +lean_inc(x_8); +x_14 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); +lean_dec(x_7); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_array_get_size(x_15); +lean_dec(x_15); lean_inc(x_2); -x_56 = l_Lean_Parser_tokenFn(x_2, x_16); -x_57 = lean_ctor_get(x_56, 3); -lean_inc(x_57); -if (lean_obj_tag(x_57) == 0) +x_54 = l_Lean_Parser_tokenFn(x_2, x_14); +x_55 = lean_ctor_get(x_54, 3); +lean_inc(x_55); +if (lean_obj_tag(x_55) == 0) { -lean_object* x_58; lean_object* x_59; -x_58 = lean_ctor_get(x_56, 0); +lean_object* x_56; lean_object* x_57; +x_56 = lean_ctor_get(x_54, 0); +lean_inc(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +lean_dec(x_56); +if (lean_obj_tag(x_57) == 2) +{ +lean_object* x_58; lean_object* x_59; uint8_t x_60; +x_58 = lean_ctor_get(x_57, 1); lean_inc(x_58); -x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_58); +lean_dec(x_57); +x_59 = l_Lean_Parser_Term_structInst___elambda__1___closed__5; +x_60 = lean_string_dec_eq(x_58, x_59); lean_dec(x_58); -if (lean_obj_tag(x_59) == 2) +if (x_60 == 0) { -lean_object* x_60; lean_object* x_61; uint8_t x_62; -x_60 = lean_ctor_get(x_59, 1); -lean_inc(x_60); -lean_dec(x_59); -x_61 = l_Lean_Parser_Term_structInst___elambda__1___closed__5; -x_62 = lean_string_dec_eq(x_60, x_61); -lean_dec(x_60); -if (x_62 == 0) +lean_object* x_61; lean_object* x_62; +x_61 = l_Lean_Parser_Term_structInst___elambda__1___closed__13; +lean_inc(x_8); +x_62 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_61, x_8); +x_17 = x_62; +goto block_53; +} +else +{ +x_17 = x_54; +goto block_53; +} +} +else { lean_object* x_63; lean_object* x_64; +lean_dec(x_57); x_63 = l_Lean_Parser_Term_structInst___elambda__1___closed__13; -lean_inc(x_10); -x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_63, x_10); -x_19 = x_64; -goto block_55; -} -else -{ -x_19 = x_56; -goto block_55; +lean_inc(x_8); +x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_63, x_8); +x_17 = x_64; +goto block_53; } } else { lean_object* x_65; lean_object* x_66; -lean_dec(x_59); +lean_dec(x_55); x_65 = l_Lean_Parser_Term_structInst___elambda__1___closed__13; -lean_inc(x_10); -x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_65, x_10); -x_19 = x_66; -goto block_55; +lean_inc(x_8); +x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_65, x_8); +x_17 = x_66; +goto block_53; } -} -else +block_53: { -lean_object* x_67; lean_object* x_68; -lean_dec(x_57); -x_67 = l_Lean_Parser_Term_structInst___elambda__1___closed__13; -lean_inc(x_10); -x_68 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_67, x_10); -x_19 = x_68; -goto block_55; -} -block_55: +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) { -lean_object* x_20; +lean_object* x_19; lean_object* x_20; +lean_inc(x_2); +x_19 = l_Lean_Parser_Tactic_seq___elambda__1(x_1, x_2, x_17); x_20 = lean_ctor_get(x_19, 3); lean_inc(x_20); if (lean_obj_tag(x_20) == 0) { -lean_object* x_21; lean_object* x_22; -lean_inc(x_2); -x_21 = lean_apply_3(x_5, x_1, x_2, x_19); -x_22 = lean_ctor_get(x_21, 3); -lean_inc(x_22); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_21, 1); +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +x_22 = l_Lean_Parser_tokenFn(x_2, x_19); +x_23 = lean_ctor_get(x_22, 3); lean_inc(x_23); -x_24 = l_Lean_Parser_tokenFn(x_2, x_21); -x_25 = lean_ctor_get(x_24, 3); -lean_inc(x_25); -if (lean_obj_tag(x_25) == 0) +if (lean_obj_tag(x_23) == 0) { -lean_object* x_26; lean_object* x_27; -x_26 = lean_ctor_get(x_24, 0); +lean_object* x_24; lean_object* x_25; +x_24 = lean_ctor_get(x_22, 0); +lean_inc(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +lean_dec(x_24); +if (lean_obj_tag(x_25) == 2) +{ +lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_26 = lean_ctor_get(x_25, 1); lean_inc(x_26); -x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_26); -lean_dec(x_26); -if (lean_obj_tag(x_27) == 2) -{ -lean_object* x_28; lean_object* x_29; uint8_t x_30; -x_28 = lean_ctor_get(x_27, 1); -lean_inc(x_28); -lean_dec(x_27); -x_29 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__9; -x_30 = lean_string_dec_eq(x_28, x_29); -lean_dec(x_28); -if (x_30 == 0) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_31 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__13; -x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_31, x_23); -x_33 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_18); -x_35 = l_Lean_Parser_mergeOrElseErrors(x_34, x_13, x_10); -lean_dec(x_10); -return x_35; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -lean_dec(x_23); -x_36 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; -x_37 = l_Lean_Parser_ParserState_mkNode(x_24, x_36, x_18); -x_38 = l_Lean_Parser_mergeOrElseErrors(x_37, x_13, x_10); -lean_dec(x_10); -return x_38; -} -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -lean_dec(x_27); -x_39 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__13; -x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_39, x_23); -x_41 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; -x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_18); -x_43 = l_Lean_Parser_mergeOrElseErrors(x_42, x_13, x_10); -lean_dec(x_10); -return x_43; -} -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_dec(x_25); -x_44 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__13; -x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_44, x_23); -x_46 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_18); -x_48 = l_Lean_Parser_mergeOrElseErrors(x_47, x_13, x_10); -lean_dec(x_10); -return x_48; +x_27 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__9; +x_28 = lean_string_dec_eq(x_26, x_27); +lean_dec(x_26); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_29 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__13; +x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_29, x_21); +x_31 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_16); +x_33 = l_Lean_Parser_mergeOrElseErrors(x_32, x_11, x_8); +lean_dec(x_8); +return x_33; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_21); +x_34 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_22, x_34, x_16); +x_36 = l_Lean_Parser_mergeOrElseErrors(x_35, x_11, x_8); +lean_dec(x_8); +return x_36; } } else { -lean_object* x_49; lean_object* x_50; lean_object* x_51; -lean_dec(x_22); -lean_dec(x_2); -x_49 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; -x_50 = l_Lean_Parser_ParserState_mkNode(x_21, x_49, x_18); -x_51 = l_Lean_Parser_mergeOrElseErrors(x_50, x_13, x_10); -lean_dec(x_10); -return x_51; +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +lean_dec(x_25); +x_37 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__13; +x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_37, x_21); +x_39 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_16); +x_41 = l_Lean_Parser_mergeOrElseErrors(x_40, x_11, x_8); +lean_dec(x_8); +return x_41; } } else { -lean_object* x_52; lean_object* x_53; lean_object* x_54; +lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +lean_dec(x_23); +x_42 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__13; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_42, x_21); +x_44 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; +x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_16); +x_46 = l_Lean_Parser_mergeOrElseErrors(x_45, x_11, x_8); +lean_dec(x_8); +return x_46; +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_dec(x_20); -lean_dec(x_5); +lean_dec(x_2); +x_47 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; +x_48 = l_Lean_Parser_ParserState_mkNode(x_19, x_47, x_16); +x_49 = l_Lean_Parser_mergeOrElseErrors(x_48, x_11, x_8); +lean_dec(x_8); +return x_49; +} +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; +lean_dec(x_18); lean_dec(x_2); lean_dec(x_1); -x_52 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; -x_53 = l_Lean_Parser_ParserState_mkNode(x_19, x_52, x_18); -x_54 = l_Lean_Parser_mergeOrElseErrors(x_53, x_13, x_10); -lean_dec(x_10); -return x_54; +x_50 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__2; +x_51 = l_Lean_Parser_ParserState_mkNode(x_17, x_50, x_16); +x_52 = l_Lean_Parser_mergeOrElseErrors(x_51, x_11, x_8); +lean_dec(x_8); +return x_52; } } } @@ -2192,7 +2456,7 @@ lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__7; +x_1 = l_Lean_Parser_Tactic_seq; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); x_3 = l_Lean_Parser_Term_explicitUniv___closed__4; @@ -2276,7 +2540,7 @@ lean_object* _init_l_Lean_Parser_Tactic_orelse___elambda__1___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Tactic_intro___elambda__1___closed__2; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; x_2 = l_Lean_Parser_Term_orelse___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -2555,227 +2819,221 @@ return x_5; lean_object* l_Lean_Parser_Term_tacticBlock___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_4 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__7; +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_4 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__4; x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); -x_6 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__4; -x_7 = lean_ctor_get(x_6, 1); -lean_inc(x_7); -x_8 = lean_ctor_get(x_3, 0); +x_6 = lean_ctor_get(x_3, 0); +lean_inc(x_6); +x_7 = lean_array_get_size(x_6); +lean_dec(x_6); +x_8 = lean_ctor_get(x_3, 1); lean_inc(x_8); -x_9 = lean_array_get_size(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_3, 1); -lean_inc(x_10); lean_inc(x_2); lean_inc(x_1); -x_11 = lean_apply_3(x_7, x_1, x_2, x_3); -x_12 = lean_ctor_get(x_11, 3); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) -{ -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -return x_11; -} -else -{ -lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -lean_dec(x_12); -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -x_15 = lean_nat_dec_eq(x_14, x_10); -lean_dec(x_14); -if (x_15 == 0) -{ -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -return x_11; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_56; lean_object* x_57; +x_9 = lean_apply_3(x_5, x_1, x_2, x_3); +x_10 = lean_ctor_get(x_9, 3); lean_inc(x_10); -x_16 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); -lean_dec(x_9); -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_array_get_size(x_17); -lean_dec(x_17); +if (lean_obj_tag(x_10) == 0) +{ +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = lean_ctor_get(x_9, 1); +lean_inc(x_12); +x_13 = lean_nat_dec_eq(x_12, x_8); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_dec(x_11); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_54; lean_object* x_55; +lean_inc(x_8); +x_14 = l_Lean_Parser_ParserState_restore(x_9, x_7, x_8); +lean_dec(x_7); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_array_get_size(x_15); +lean_dec(x_15); lean_inc(x_2); -x_56 = l_Lean_Parser_tokenFn(x_2, x_16); -x_57 = lean_ctor_get(x_56, 3); -lean_inc(x_57); -if (lean_obj_tag(x_57) == 0) +x_54 = l_Lean_Parser_tokenFn(x_2, x_14); +x_55 = lean_ctor_get(x_54, 3); +lean_inc(x_55); +if (lean_obj_tag(x_55) == 0) { -lean_object* x_58; lean_object* x_59; -x_58 = lean_ctor_get(x_56, 0); +lean_object* x_56; lean_object* x_57; +x_56 = lean_ctor_get(x_54, 0); +lean_inc(x_56); +x_57 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_56); +lean_dec(x_56); +if (lean_obj_tag(x_57) == 2) +{ +lean_object* x_58; lean_object* x_59; uint8_t x_60; +x_58 = lean_ctor_get(x_57, 1); lean_inc(x_58); -x_59 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_58); +lean_dec(x_57); +x_59 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__6; +x_60 = lean_string_dec_eq(x_58, x_59); lean_dec(x_58); -if (lean_obj_tag(x_59) == 2) +if (x_60 == 0) { -lean_object* x_60; lean_object* x_61; uint8_t x_62; -x_60 = lean_ctor_get(x_59, 1); -lean_inc(x_60); -lean_dec(x_59); -x_61 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__6; -x_62 = lean_string_dec_eq(x_60, x_61); -lean_dec(x_60); -if (x_62 == 0) +lean_object* x_61; lean_object* x_62; +x_61 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14; +lean_inc(x_8); +x_62 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_61, x_8); +x_17 = x_62; +goto block_53; +} +else +{ +x_17 = x_54; +goto block_53; +} +} +else { lean_object* x_63; lean_object* x_64; -x_63 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15; -lean_inc(x_10); -x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_63, x_10); -x_19 = x_64; -goto block_55; -} -else -{ -x_19 = x_56; -goto block_55; +lean_dec(x_57); +x_63 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14; +lean_inc(x_8); +x_64 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_63, x_8); +x_17 = x_64; +goto block_53; } } else { lean_object* x_65; lean_object* x_66; -lean_dec(x_59); -x_65 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15; -lean_inc(x_10); -x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_65, x_10); -x_19 = x_66; -goto block_55; +lean_dec(x_55); +x_65 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14; +lean_inc(x_8); +x_66 = l_Lean_Parser_ParserState_mkErrorsAt(x_54, x_65, x_8); +x_17 = x_66; +goto block_53; } -} -else +block_53: { -lean_object* x_67; lean_object* x_68; -lean_dec(x_57); -x_67 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15; -lean_inc(x_10); -x_68 = l_Lean_Parser_ParserState_mkErrorsAt(x_56, x_67, x_10); -x_19 = x_68; -goto block_55; -} -block_55: +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) { -lean_object* x_20; +lean_object* x_19; lean_object* x_20; +lean_inc(x_2); +x_19 = l_Lean_Parser_Tactic_seq___elambda__1(x_1, x_2, x_17); x_20 = lean_ctor_get(x_19, 3); lean_inc(x_20); if (lean_obj_tag(x_20) == 0) { -lean_object* x_21; lean_object* x_22; -lean_inc(x_2); -x_21 = lean_apply_3(x_5, x_1, x_2, x_19); -x_22 = lean_ctor_get(x_21, 3); -lean_inc(x_22); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_21, 1); +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +x_22 = l_Lean_Parser_tokenFn(x_2, x_19); +x_23 = lean_ctor_get(x_22, 3); lean_inc(x_23); -x_24 = l_Lean_Parser_tokenFn(x_2, x_21); -x_25 = lean_ctor_get(x_24, 3); -lean_inc(x_25); -if (lean_obj_tag(x_25) == 0) +if (lean_obj_tag(x_23) == 0) { -lean_object* x_26; lean_object* x_27; -x_26 = lean_ctor_get(x_24, 0); +lean_object* x_24; lean_object* x_25; +x_24 = lean_ctor_get(x_22, 0); +lean_inc(x_24); +x_25 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_24); +lean_dec(x_24); +if (lean_obj_tag(x_25) == 2) +{ +lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_26 = lean_ctor_get(x_25, 1); lean_inc(x_26); -x_27 = l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache___spec__1(x_26); -lean_dec(x_26); -if (lean_obj_tag(x_27) == 2) -{ -lean_object* x_28; lean_object* x_29; uint8_t x_30; -x_28 = lean_ctor_get(x_27, 1); -lean_inc(x_28); -lean_dec(x_27); -x_29 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__9; -x_30 = lean_string_dec_eq(x_28, x_29); -lean_dec(x_28); -if (x_30 == 0) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_31 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12; -x_32 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_31, x_23); -x_33 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; -x_34 = l_Lean_Parser_ParserState_mkNode(x_32, x_33, x_18); -x_35 = l_Lean_Parser_mergeOrElseErrors(x_34, x_13, x_10); -lean_dec(x_10); -return x_35; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -lean_dec(x_23); -x_36 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; -x_37 = l_Lean_Parser_ParserState_mkNode(x_24, x_36, x_18); -x_38 = l_Lean_Parser_mergeOrElseErrors(x_37, x_13, x_10); -lean_dec(x_10); -return x_38; -} -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -lean_dec(x_27); -x_39 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12; -x_40 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_39, x_23); -x_41 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; -x_42 = l_Lean_Parser_ParserState_mkNode(x_40, x_41, x_18); -x_43 = l_Lean_Parser_mergeOrElseErrors(x_42, x_13, x_10); -lean_dec(x_10); -return x_43; -} -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_dec(x_25); -x_44 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__12; -x_45 = l_Lean_Parser_ParserState_mkErrorsAt(x_24, x_44, x_23); -x_46 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; -x_47 = l_Lean_Parser_ParserState_mkNode(x_45, x_46, x_18); -x_48 = l_Lean_Parser_mergeOrElseErrors(x_47, x_13, x_10); -lean_dec(x_10); -return x_48; +x_27 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__8; +x_28 = lean_string_dec_eq(x_26, x_27); +lean_dec(x_26); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_29 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__11; +x_30 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_29, x_21); +x_31 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_30, x_31, x_16); +x_33 = l_Lean_Parser_mergeOrElseErrors(x_32, x_11, x_8); +lean_dec(x_8); +return x_33; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_21); +x_34 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_22, x_34, x_16); +x_36 = l_Lean_Parser_mergeOrElseErrors(x_35, x_11, x_8); +lean_dec(x_8); +return x_36; } } else { -lean_object* x_49; lean_object* x_50; lean_object* x_51; -lean_dec(x_22); -lean_dec(x_2); -x_49 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; -x_50 = l_Lean_Parser_ParserState_mkNode(x_21, x_49, x_18); -x_51 = l_Lean_Parser_mergeOrElseErrors(x_50, x_13, x_10); -lean_dec(x_10); -return x_51; +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +lean_dec(x_25); +x_37 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__11; +x_38 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_37, x_21); +x_39 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; +x_40 = l_Lean_Parser_ParserState_mkNode(x_38, x_39, x_16); +x_41 = l_Lean_Parser_mergeOrElseErrors(x_40, x_11, x_8); +lean_dec(x_8); +return x_41; } } else { -lean_object* x_52; lean_object* x_53; lean_object* x_54; +lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +lean_dec(x_23); +x_42 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__11; +x_43 = l_Lean_Parser_ParserState_mkErrorsAt(x_22, x_42, x_21); +x_44 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; +x_45 = l_Lean_Parser_ParserState_mkNode(x_43, x_44, x_16); +x_46 = l_Lean_Parser_mergeOrElseErrors(x_45, x_11, x_8); +lean_dec(x_8); +return x_46; +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_dec(x_20); -lean_dec(x_5); +lean_dec(x_2); +x_47 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; +x_48 = l_Lean_Parser_ParserState_mkNode(x_19, x_47, x_16); +x_49 = l_Lean_Parser_mergeOrElseErrors(x_48, x_11, x_8); +lean_dec(x_8); +return x_49; +} +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; +lean_dec(x_18); lean_dec(x_2); lean_dec(x_1); -x_52 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; -x_53 = l_Lean_Parser_ParserState_mkNode(x_19, x_52, x_18); -x_54 = l_Lean_Parser_mergeOrElseErrors(x_53, x_13, x_10); -lean_dec(x_10); -return x_54; +x_50 = l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; +x_51 = l_Lean_Parser_ParserState_mkNode(x_17, x_50, x_16); +x_52 = l_Lean_Parser_mergeOrElseErrors(x_51, x_11, x_8); +lean_dec(x_8); +return x_52; } } } @@ -2891,10 +3149,30 @@ lean_mark_persistent(l_Lean_Parser_regTacticParserAttribute___closed__2); res = l_Lean_Parser_regTacticParserAttribute(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -l_Lean_Parser_tacticSeq___closed__1 = _init_l_Lean_Parser_tacticSeq___closed__1(); -lean_mark_persistent(l_Lean_Parser_tacticSeq___closed__1); -l_Lean_Parser_tacticSeq___closed__2 = _init_l_Lean_Parser_tacticSeq___closed__2(); -lean_mark_persistent(l_Lean_Parser_tacticSeq___closed__2); +l_Lean_Parser_Tactic_seq___elambda__1___closed__1 = _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__1(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___elambda__1___closed__1); +l_Lean_Parser_Tactic_seq___elambda__1___closed__2 = _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__2(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___elambda__1___closed__2); +l_Lean_Parser_Tactic_seq___elambda__1___closed__3 = _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__3(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___elambda__1___closed__3); +l_Lean_Parser_Tactic_seq___elambda__1___closed__4 = _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__4(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___elambda__1___closed__4); +l_Lean_Parser_Tactic_seq___elambda__1___closed__5 = _init_l_Lean_Parser_Tactic_seq___elambda__1___closed__5(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___elambda__1___closed__5); +l_Lean_Parser_Tactic_seq___closed__1 = _init_l_Lean_Parser_Tactic_seq___closed__1(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___closed__1); +l_Lean_Parser_Tactic_seq___closed__2 = _init_l_Lean_Parser_Tactic_seq___closed__2(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___closed__2); +l_Lean_Parser_Tactic_seq___closed__3 = _init_l_Lean_Parser_Tactic_seq___closed__3(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___closed__3); +l_Lean_Parser_Tactic_seq___closed__4 = _init_l_Lean_Parser_Tactic_seq___closed__4(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___closed__4); +l_Lean_Parser_Tactic_seq___closed__5 = _init_l_Lean_Parser_Tactic_seq___closed__5(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___closed__5); +l_Lean_Parser_Tactic_seq___closed__6 = _init_l_Lean_Parser_Tactic_seq___closed__6(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq___closed__6); +l_Lean_Parser_Tactic_seq = _init_l_Lean_Parser_Tactic_seq(); +lean_mark_persistent(l_Lean_Parser_Tactic_seq); l_Lean_Parser_Tactic_intro___elambda__1___closed__1 = _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_intro___elambda__1___closed__1); l_Lean_Parser_Tactic_intro___elambda__1___closed__2 = _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__2(); @@ -2911,10 +3189,6 @@ l_Lean_Parser_Tactic_intro___elambda__1___closed__7 = _init_l_Lean_Parser_Tactic lean_mark_persistent(l_Lean_Parser_Tactic_intro___elambda__1___closed__7); l_Lean_Parser_Tactic_intro___elambda__1___closed__8 = _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__8(); lean_mark_persistent(l_Lean_Parser_Tactic_intro___elambda__1___closed__8); -l_Lean_Parser_Tactic_intro___elambda__1___closed__9 = _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__9(); -lean_mark_persistent(l_Lean_Parser_Tactic_intro___elambda__1___closed__9); -l_Lean_Parser_Tactic_intro___elambda__1___closed__10 = _init_l_Lean_Parser_Tactic_intro___elambda__1___closed__10(); -lean_mark_persistent(l_Lean_Parser_Tactic_intro___elambda__1___closed__10); l_Lean_Parser_Tactic_intro___closed__1 = _init_l_Lean_Parser_Tactic_intro___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_intro___closed__1); l_Lean_Parser_Tactic_intro___closed__2 = _init_l_Lean_Parser_Tactic_intro___closed__2(); @@ -3059,8 +3333,6 @@ l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__13 = _init_l_Lean_ lean_mark_persistent(l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__13); l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14 = _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14(); lean_mark_persistent(l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__14); -l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15 = _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15(); -lean_mark_persistent(l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__15); l_Lean_Parser_Tactic_nestedTacticBlock___closed__1 = _init_l_Lean_Parser_Tactic_nestedTacticBlock___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_nestedTacticBlock___closed__1); l_Lean_Parser_Tactic_nestedTacticBlock___closed__2 = _init_l_Lean_Parser_Tactic_nestedTacticBlock___closed__2();