diff --git a/stage0/src/Init/Data/Array/Basic.lean b/stage0/src/Init/Data/Array/Basic.lean index 08e867222b..7bfb6bc285 100644 --- a/stage0/src/Init/Data/Array/Basic.lean +++ b/stage0/src/Init/Data/Array/Basic.lean @@ -45,6 +45,9 @@ def back [Inhabited α] (a : Array α) : α := def get? (a : Array α) (i : Nat) : Option α := if h : i < a.size then some (a.get ⟨i, h⟩) else none +def back? (a : Array α) : Option α := + a.get? (a.size - 1) + -- auxiliary declaration used in the equation compiler when pattern matching array literals. abbrev getLit {α : Type u} {n : Nat} (a : Array α) (i : Nat) (h₁ : a.size = n) (h₂ : i < n) : α := a.get ⟨i, h₁.symm ▸ h₂⟩ diff --git a/stage0/src/Lean/ParserCompiler.lean b/stage0/src/Lean/ParserCompiler.lean index d70e3c3f7b..6e1c483c5e 100644 --- a/stage0/src/Lean/ParserCompiler.lean +++ b/stage0/src/Lean/ParserCompiler.lean @@ -24,9 +24,12 @@ structure Context (α : Type) where def Context.tyName {α} (ctx : Context α) : Name := ctx.categoryAttr.defn.valueTypeName --- replace all references of `Parser` with `tyName` as a first approximation -def preprocessParserBody {α} (ctx : Context α) (e : Expr) : Expr := - e.replace fun e => if e.isConstOf `Lean.Parser.Parser then mkConst ctx.tyName else none +-- replace all references of `Parser` with `tyName` +def replaceParserTy {α} (ctx : Context α) (e : Expr) : Expr := + e.replace fun e => + -- strip `optParam` + let e := if e.isOptParam then e.appFn!.appArg! else e + if e.isConstOf `Lean.Parser.Parser then mkConst ctx.tyName else none section open Meta @@ -73,13 +76,10 @@ partial def compileParserExpr (e : Expr) : MetaM Expr := do | throwError! "don't know how to generate {ctx.varName} for non-definition '{e}'" unless (env.getModuleIdxFor? c).isNone || force do throwError! "refusing to generate code for imported parser declaration '{c}'; use `@[runParserAttributeHooks]` on its definition instead." - let value ← compileParserExpr $ preprocessParserBody ctx value + let value ← compileParserExpr $ replaceParserTy ctx value let ty ← forallTelescope cinfo.type fun params _ => params.foldrM (init := mkConst ctx.tyName) fun param ty => do - let paramTy ← inferType param; - let paramTy ← forallTelescope paramTy fun _ b => pure $ - if b.isConstOf `Lean.Parser.Parser then mkConst ctx.tyName - else b + let paramTy ← replaceParserTy ctx <$> inferType param pure $ mkForall `_ BinderInfo.default paramTy ty let decl := Declaration.defnDecl { name := c', lparams := [], diff --git a/stage0/src/Lean/Syntax.lean b/stage0/src/Lean/Syntax.lean index 2ee505b8fc..0dc554e4ec 100644 --- a/stage0/src/Lean/Syntax.lean +++ b/stage0/src/Lean/Syntax.lean @@ -257,10 +257,6 @@ structure Traverser where namespace Traverser --- TODO(Kha): check this -def idxsBack (t : Traverser) : Nat := - if t.idxs.isEmpty then 0 else t.idxs.back - def fromSyntax (stx : Syntax) : Traverser := ⟨stx, #[], #[]⟩ @@ -277,7 +273,7 @@ def down (t : Traverser) (idx : Nat) : Traverser := /-- Advance to the parent of the current node, if any. -/ def up (t : Traverser) : Traverser := if t.parents.size > 0 then - let cur := if t.idxsBack < t.parents.back.getNumArgs then t.parents.back.setArg t.idxsBack t.cur else t.parents.back + let cur := if t.idxs.back < t.parents.back.getNumArgs then t.parents.back.setArg t.idxs.back t.cur else t.parents.back { cur := cur, parents := t.parents.pop, idxs := t.idxs.pop } else t @@ -285,14 +281,14 @@ def up (t : Traverser) : Traverser := /-- Advance to the left sibling of the current node, if any. -/ def left (t : Traverser) : Traverser := if t.parents.size > 0 then - t.up.down (t.idxsBack - 1) + t.up.down (t.idxs.back - 1) else t /-- Advance to the right sibling of the current node, if any. -/ def right (t : Traverser) : Traverser := if t.parents.size > 0 then - t.up.down (t.idxsBack + 1) + t.up.down (t.idxs.back + 1) else t @@ -315,7 +311,7 @@ def goRight : m Unit := @modify _ _ t.st (fun t => t.right) def getIdx : m Nat := do let st ← t.st.get - pure st.idxsBack + st.idxs.back?.getD 0 end MonadTraverser end Syntax diff --git a/stage0/stdlib/CMakeLists.txt b/stage0/stdlib/CMakeLists.txt index f7755c84da..fde4a62baa 100644 --- a/stage0/stdlib/CMakeLists.txt +++ b/stage0/stdlib/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT ./Init.c ./Init/Classical.c ./Init/Coe.c ./Init/Control.c ./Init/Control/Basic.c ./Init/Control/EState.c ./Init/Control/Except.c ./Init/Control/Id.c ./Init/Control/Option.c ./Init/Control/Reader.c ./Init/Control/State.c ./Init/Control/StateRef.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/Array/Subarray.c ./Init/Data/Basic.c ./Init/Data/ByteArray.c ./Init/Data/ByteArray/Basic.c ./Init/Data/Char.c ./Init/Data/Char/Basic.c ./Init/Data/Fin.c ./Init/Data/Fin/Basic.c ./Init/Data/Float.c ./Init/Data/FloatArray.c ./Init/Data/FloatArray/Basic.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/Nat.c ./Init/Data/Nat/Basic.c ./Init/Data/Nat/Bitwise.c ./Init/Data/Nat/Control.c ./Init/Data/Nat/Div.c ./Init/Data/OfScientific.c ./Init/Data/Option.c ./Init/Data/Option/Basic.c ./Init/Data/Option/BasicAux.c ./Init/Data/Option/Instances.c ./Init/Data/Random.c ./Init/Data/Range.c ./Init/Data/Repr.c ./Init/Data/String.c ./Init/Data/String/Basic.c ./Init/Data/String/Extra.c ./Init/Data/ToString.c ./Init/Data/ToString/Basic.c ./Init/Data/ToString/Macro.c ./Init/Data/UInt.c ./Init/Fix.c ./Init/Meta.c ./Init/Notation.c ./Init/NotationExtra.c ./Init/Prelude.c ./Init/SizeOf.c ./Init/System.c ./Init/System/FilePath.c ./Init/System/IO.c ./Init/System/IOError.c ./Init/System/Platform.c ./Init/System/ST.c ./Init/Util.c ./Init/WF.c ./Lean.c ./Lean/Attributes.c ./Lean/AuxRecursor.c ./Lean/Class.c ./Lean/Compiler.c ./Lean/Compiler/BorrowedAnnotation.c ./Lean/Compiler/ClosedTermCache.c ./Lean/Compiler/ConstFolding.c ./Lean/Compiler/ExportAttr.c ./Lean/Compiler/ExternAttr.c ./Lean/Compiler/IR.c ./Lean/Compiler/IR/Basic.c ./Lean/Compiler/IR/Borrow.c ./Lean/Compiler/IR/Boxing.c ./Lean/Compiler/IR/Checker.c ./Lean/Compiler/IR/CompilerM.c ./Lean/Compiler/IR/CtorLayout.c ./Lean/Compiler/IR/ElimDeadBranches.c ./Lean/Compiler/IR/ElimDeadVars.c ./Lean/Compiler/IR/EmitC.c ./Lean/Compiler/IR/EmitUtil.c ./Lean/Compiler/IR/ExpandResetReuse.c ./Lean/Compiler/IR/Format.c ./Lean/Compiler/IR/FreeVars.c ./Lean/Compiler/IR/LiveVars.c ./Lean/Compiler/IR/NormIds.c ./Lean/Compiler/IR/PushProj.c ./Lean/Compiler/IR/RC.c ./Lean/Compiler/IR/ResetReuse.c ./Lean/Compiler/IR/SimpCase.c ./Lean/Compiler/IR/UnboxResult.c ./Lean/Compiler/ImplementedByAttr.c ./Lean/Compiler/InitAttr.c ./Lean/Compiler/InlineAttrs.c ./Lean/Compiler/NameMangling.c ./Lean/Compiler/NeverExtractAttr.c ./Lean/Compiler/Specialize.c ./Lean/Compiler/Util.c ./Lean/CoreM.c ./Lean/Data.c ./Lean/Data/Format.c ./Lean/Data/Json.c ./Lean/Data/Json/Basic.c ./Lean/Data/Json/FromToJson.c ./Lean/Data/Json/Parser.c ./Lean/Data/Json/Printer.c ./Lean/Data/Json/Stream.c ./Lean/Data/JsonRpc.c ./Lean/Data/KVMap.c ./Lean/Data/LBool.c ./Lean/Data/LOption.c ./Lean/Data/Lsp.c ./Lean/Data/Lsp/Basic.c ./Lean/Data/Lsp/Capabilities.c ./Lean/Data/Lsp/Communication.c ./Lean/Data/Lsp/Diagnostics.c ./Lean/Data/Lsp/Hover.c ./Lean/Data/Lsp/InitShutdown.c ./Lean/Data/Lsp/TextSync.c ./Lean/Data/Lsp/Utf16.c ./Lean/Data/Lsp/Workspace.c ./Lean/Data/Name.c ./Lean/Data/NameTrie.c ./Lean/Data/Occurrences.c ./Lean/Data/OpenDecl.c ./Lean/Data/Options.c ./Lean/Data/Position.c ./Lean/Data/PrefixTree.c ./Lean/Data/SMap.c ./Lean/Data/Trie.c ./Lean/Declaration.c ./Lean/Elab.c ./Lean/Elab/App.c ./Lean/Elab/Attributes.c ./Lean/Elab/Binders.c ./Lean/Elab/BuiltinNotation.c ./Lean/Elab/CollectFVars.c ./Lean/Elab/Command.c ./Lean/Elab/DeclModifiers.c ./Lean/Elab/DeclUtil.c ./Lean/Elab/Declaration.c ./Lean/Elab/DefView.c ./Lean/Elab/Do.c ./Lean/Elab/Exception.c ./Lean/Elab/Frontend.c ./Lean/Elab/Import.c ./Lean/Elab/Inductive.c ./Lean/Elab/LetRec.c ./Lean/Elab/Level.c ./Lean/Elab/Log.c ./Lean/Elab/Match.c ./Lean/Elab/MutualDef.c ./Lean/Elab/PreDefinition.c ./Lean/Elab/PreDefinition/Basic.c ./Lean/Elab/PreDefinition/Main.c ./Lean/Elab/PreDefinition/MkInhabitant.c ./Lean/Elab/PreDefinition/Structural.c ./Lean/Elab/PreDefinition/WF.c ./Lean/Elab/Print.c ./Lean/Elab/Quotation.c ./Lean/Elab/Quotation/Util.c ./Lean/Elab/StructInst.c ./Lean/Elab/Structure.c ./Lean/Elab/Syntax.c ./Lean/Elab/SyntheticMVars.c ./Lean/Elab/Tactic.c ./Lean/Elab/Tactic/Basic.c ./Lean/Elab/Tactic/Binders.c ./Lean/Elab/Tactic/ElabTerm.c ./Lean/Elab/Tactic/Generalize.c ./Lean/Elab/Tactic/Induction.c ./Lean/Elab/Tactic/Injection.c ./Lean/Elab/Tactic/Location.c ./Lean/Elab/Tactic/Match.c ./Lean/Elab/Tactic/Rewrite.c ./Lean/Elab/Term.c ./Lean/Elab/Util.c ./Lean/Environment.c ./Lean/Eval.c ./Lean/Exception.c ./Lean/Expr.c ./Lean/HeadIndex.c ./Lean/Hygiene.c ./Lean/InternalExceptionId.c ./Lean/KeyedDeclsAttribute.c ./Lean/Level.c ./Lean/LocalContext.c ./Lean/Message.c ./Lean/Meta.c ./Lean/Meta/AbstractMVars.c ./Lean/Meta/AbstractNestedProofs.c ./Lean/Meta/AppBuilder.c ./Lean/Meta/Basic.c ./Lean/Meta/Check.c ./Lean/Meta/Closure.c ./Lean/Meta/CollectMVars.c ./Lean/Meta/DiscrTree.c ./Lean/Meta/DiscrTreeTypes.c ./Lean/Meta/ExprDefEq.c ./Lean/Meta/ForEachExpr.c ./Lean/Meta/FunInfo.c ./Lean/Meta/GeneralizeTelescope.c ./Lean/Meta/GetConst.c ./Lean/Meta/InferType.c ./Lean/Meta/Instances.c ./Lean/Meta/KAbstract.c ./Lean/Meta/LevelDefEq.c ./Lean/Meta/Match.c ./Lean/Meta/Match/Basic.c ./Lean/Meta/Match/CaseArraySizes.c ./Lean/Meta/Match/CaseValues.c ./Lean/Meta/Match/MVarRenaming.c ./Lean/Meta/Match/Match.c ./Lean/Meta/Match/MatchPatternAttr.c ./Lean/Meta/Match/MatcherInfo.c ./Lean/Meta/MatchUtil.c ./Lean/Meta/Offset.c ./Lean/Meta/PPGoal.c ./Lean/Meta/RecursorInfo.c ./Lean/Meta/Reduce.c ./Lean/Meta/ReduceEval.c ./Lean/Meta/SynthInstance.c ./Lean/Meta/Tactic.c ./Lean/Meta/Tactic/Apply.c ./Lean/Meta/Tactic/Assert.c ./Lean/Meta/Tactic/Assumption.c ./Lean/Meta/Tactic/Cases.c ./Lean/Meta/Tactic/Clear.c ./Lean/Meta/Tactic/Constructor.c ./Lean/Meta/Tactic/Delta.c ./Lean/Meta/Tactic/ElimInfo.c ./Lean/Meta/Tactic/FVarSubst.c ./Lean/Meta/Tactic/Generalize.c ./Lean/Meta/Tactic/Induction.c ./Lean/Meta/Tactic/Injection.c ./Lean/Meta/Tactic/Intro.c ./Lean/Meta/Tactic/Replace.c ./Lean/Meta/Tactic/Revert.c ./Lean/Meta/Tactic/Rewrite.c ./Lean/Meta/Tactic/Subst.c ./Lean/Meta/Tactic/Util.c ./Lean/Meta/Transform.c ./Lean/Meta/TransparencyMode.c ./Lean/Meta/UnificationHint.c ./Lean/Meta/WHNF.c ./Lean/MetavarContext.c ./Lean/Modifiers.c ./Lean/MonadEnv.c ./Lean/Parser.c ./Lean/Parser/Basic.c ./Lean/Parser/Command.c ./Lean/Parser/Do.c ./Lean/Parser/Extension.c ./Lean/Parser/Extra.c ./Lean/Parser/Level.c ./Lean/Parser/Module.c ./Lean/Parser/StrInterpolation.c ./Lean/Parser/Syntax.c ./Lean/Parser/Tactic.c ./Lean/Parser/Term.c ./Lean/Parser/Transform.c ./Lean/ParserCompiler.c ./Lean/ParserCompiler/Attribute.c ./Lean/PrettyPrinter.c ./Lean/PrettyPrinter/Basic.c ./Lean/PrettyPrinter/Delaborator.c ./Lean/PrettyPrinter/Delaborator/Basic.c ./Lean/PrettyPrinter/Delaborator/Builtins.c ./Lean/PrettyPrinter/Formatter.c ./Lean/PrettyPrinter/Parenthesizer.c ./Lean/ProjFns.c ./Lean/ReducibilityAttrs.c ./Lean/ResolveName.c ./Lean/Runtime.c ./Lean/ScopedEnvExtension.c ./Lean/Server.c ./Lean/Server/ServerBin.c ./Lean/Server/Snapshots.c ./Lean/Structure.c ./Lean/Syntax.c ./Lean/ToExpr.c ./Lean/Util.c ./Lean/Util/CollectFVars.c ./Lean/Util/CollectLevelParams.c ./Lean/Util/CollectMVars.c ./Lean/Util/Constructions.c ./Lean/Util/FindExpr.c ./Lean/Util/FindMVar.c ./Lean/Util/FoldConsts.c ./Lean/Util/ForEachExpr.c ./Lean/Util/MonadCache.c ./Lean/Util/PPExt.c ./Lean/Util/Path.c ./Lean/Util/Profile.c ./Lean/Util/RecDepth.c ./Lean/Util/Recognizers.c ./Lean/Util/ReplaceExpr.c ./Lean/Util/ReplaceLevel.c ./Lean/Util/SCC.c ./Lean/Util/Sorry.c ./Lean/Util/Trace.c ./Std.c ./Std/Data.c ./Std/Data/AssocList.c ./Std/Data/BinomialHeap.c ./Std/Data/DList.c ./Std/Data/HashMap.c ./Std/Data/HashSet.c ./Std/Data/PersistentArray.c ./Std/Data/PersistentHashMap.c ./Std/Data/PersistentHashSet.c ./Std/Data/Queue.c ./Std/Data/RBMap.c ./Std/Data/RBTree.c ./Std/Data/Stack.c ./Std/ShareCommon.c ) +add_library (stage0 OBJECT ./Init.c ./Init/Classical.c ./Init/Coe.c ./Init/Control.c ./Init/Control/Basic.c ./Init/Control/EState.c ./Init/Control/Except.c ./Init/Control/Id.c ./Init/Control/Option.c ./Init/Control/Reader.c ./Init/Control/State.c ./Init/Control/StateRef.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/Array/Subarray.c ./Init/Data/Basic.c ./Init/Data/ByteArray.c ./Init/Data/ByteArray/Basic.c ./Init/Data/Char.c ./Init/Data/Char/Basic.c ./Init/Data/Fin.c ./Init/Data/Fin/Basic.c ./Init/Data/Float.c ./Init/Data/FloatArray.c ./Init/Data/FloatArray/Basic.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/Nat.c ./Init/Data/Nat/Basic.c ./Init/Data/Nat/Bitwise.c ./Init/Data/Nat/Control.c ./Init/Data/Nat/Div.c ./Init/Data/OfScientific.c ./Init/Data/Option.c ./Init/Data/Option/Basic.c ./Init/Data/Option/BasicAux.c ./Init/Data/Option/Instances.c ./Init/Data/Random.c ./Init/Data/Range.c ./Init/Data/Repr.c ./Init/Data/String.c ./Init/Data/String/Basic.c ./Init/Data/String/Extra.c ./Init/Data/ToString.c ./Init/Data/ToString/Basic.c ./Init/Data/ToString/Macro.c ./Init/Data/UInt.c ./Init/Fix.c ./Init/Meta.c ./Init/Notation.c ./Init/NotationExtra.c ./Init/Prelude.c ./Init/SizeOf.c ./Init/System.c ./Init/System/FilePath.c ./Init/System/IO.c ./Init/System/IOError.c ./Init/System/Platform.c ./Init/System/ST.c ./Init/Util.c ./Init/WF.c ./Lean.c ./Lean/Attributes.c ./Lean/AuxRecursor.c ./Lean/Class.c ./Lean/Compiler.c ./Lean/Compiler/BorrowedAnnotation.c ./Lean/Compiler/ClosedTermCache.c ./Lean/Compiler/ConstFolding.c ./Lean/Compiler/ExportAttr.c ./Lean/Compiler/ExternAttr.c ./Lean/Compiler/IR.c ./Lean/Compiler/IR/Basic.c ./Lean/Compiler/IR/Borrow.c ./Lean/Compiler/IR/Boxing.c ./Lean/Compiler/IR/Checker.c ./Lean/Compiler/IR/CompilerM.c ./Lean/Compiler/IR/CtorLayout.c ./Lean/Compiler/IR/ElimDeadBranches.c ./Lean/Compiler/IR/ElimDeadVars.c ./Lean/Compiler/IR/EmitC.c ./Lean/Compiler/IR/EmitUtil.c ./Lean/Compiler/IR/ExpandResetReuse.c ./Lean/Compiler/IR/Format.c ./Lean/Compiler/IR/FreeVars.c ./Lean/Compiler/IR/LiveVars.c ./Lean/Compiler/IR/NormIds.c ./Lean/Compiler/IR/PushProj.c ./Lean/Compiler/IR/RC.c ./Lean/Compiler/IR/ResetReuse.c ./Lean/Compiler/IR/SimpCase.c ./Lean/Compiler/IR/UnboxResult.c ./Lean/Compiler/ImplementedByAttr.c ./Lean/Compiler/InitAttr.c ./Lean/Compiler/InlineAttrs.c ./Lean/Compiler/NameMangling.c ./Lean/Compiler/NeverExtractAttr.c ./Lean/Compiler/Specialize.c ./Lean/Compiler/Util.c ./Lean/CoreM.c ./Lean/Data.c ./Lean/Data/Format.c ./Lean/Data/Json.c ./Lean/Data/Json/Basic.c ./Lean/Data/Json/FromToJson.c ./Lean/Data/Json/Parser.c ./Lean/Data/Json/Printer.c ./Lean/Data/Json/Stream.c ./Lean/Data/JsonRpc.c ./Lean/Data/KVMap.c ./Lean/Data/LBool.c ./Lean/Data/LOption.c ./Lean/Data/Lsp.c ./Lean/Data/Lsp/Basic.c ./Lean/Data/Lsp/Capabilities.c ./Lean/Data/Lsp/Communication.c ./Lean/Data/Lsp/Diagnostics.c ./Lean/Data/Lsp/Hover.c ./Lean/Data/Lsp/InitShutdown.c ./Lean/Data/Lsp/TextSync.c ./Lean/Data/Lsp/Utf16.c ./Lean/Data/Lsp/Workspace.c ./Lean/Data/Name.c ./Lean/Data/NameTrie.c ./Lean/Data/Occurrences.c ./Lean/Data/OpenDecl.c ./Lean/Data/Options.c ./Lean/Data/Position.c ./Lean/Data/PrefixTree.c ./Lean/Data/SMap.c ./Lean/Data/Trie.c ./Lean/Declaration.c ./Lean/Elab.c ./Lean/Elab/App.c ./Lean/Elab/Attributes.c ./Lean/Elab/Binders.c ./Lean/Elab/BuiltinNotation.c ./Lean/Elab/CollectFVars.c ./Lean/Elab/Command.c ./Lean/Elab/DeclModifiers.c ./Lean/Elab/DeclUtil.c ./Lean/Elab/Declaration.c ./Lean/Elab/DefView.c ./Lean/Elab/Do.c ./Lean/Elab/Exception.c ./Lean/Elab/Frontend.c ./Lean/Elab/Import.c ./Lean/Elab/Inductive.c ./Lean/Elab/LetRec.c ./Lean/Elab/Level.c ./Lean/Elab/Log.c ./Lean/Elab/Match.c ./Lean/Elab/MutualDef.c ./Lean/Elab/PreDefinition.c ./Lean/Elab/PreDefinition/Basic.c ./Lean/Elab/PreDefinition/Main.c ./Lean/Elab/PreDefinition/MkInhabitant.c ./Lean/Elab/PreDefinition/Structural.c ./Lean/Elab/PreDefinition/WF.c ./Lean/Elab/Print.c ./Lean/Elab/Quotation.c ./Lean/Elab/Quotation/Util.c ./Lean/Elab/StructInst.c ./Lean/Elab/Structure.c ./Lean/Elab/Syntax.c ./Lean/Elab/SyntheticMVars.c ./Lean/Elab/Tactic.c ./Lean/Elab/Tactic/Basic.c ./Lean/Elab/Tactic/Binders.c ./Lean/Elab/Tactic/ElabTerm.c ./Lean/Elab/Tactic/Generalize.c ./Lean/Elab/Tactic/Induction.c ./Lean/Elab/Tactic/Injection.c ./Lean/Elab/Tactic/Location.c ./Lean/Elab/Tactic/Match.c ./Lean/Elab/Tactic/Rewrite.c ./Lean/Elab/Term.c ./Lean/Elab/Util.c ./Lean/Environment.c ./Lean/Eval.c ./Lean/Exception.c ./Lean/Expr.c ./Lean/HeadIndex.c ./Lean/Hygiene.c ./Lean/InternalExceptionId.c ./Lean/KeyedDeclsAttribute.c ./Lean/Level.c ./Lean/LocalContext.c ./Lean/Message.c ./Lean/Meta.c ./Lean/Meta/AbstractMVars.c ./Lean/Meta/AbstractNestedProofs.c ./Lean/Meta/AppBuilder.c ./Lean/Meta/Basic.c ./Lean/Meta/Check.c ./Lean/Meta/Closure.c ./Lean/Meta/CollectMVars.c ./Lean/Meta/DiscrTree.c ./Lean/Meta/DiscrTreeTypes.c ./Lean/Meta/ExprDefEq.c ./Lean/Meta/ForEachExpr.c ./Lean/Meta/FunInfo.c ./Lean/Meta/GeneralizeTelescope.c ./Lean/Meta/GetConst.c ./Lean/Meta/InferType.c ./Lean/Meta/Instances.c ./Lean/Meta/KAbstract.c ./Lean/Meta/LevelDefEq.c ./Lean/Meta/Match.c ./Lean/Meta/Match/Basic.c ./Lean/Meta/Match/CaseArraySizes.c ./Lean/Meta/Match/CaseValues.c ./Lean/Meta/Match/MVarRenaming.c ./Lean/Meta/Match/Match.c ./Lean/Meta/Match/MatchPatternAttr.c ./Lean/Meta/Match/MatcherInfo.c ./Lean/Meta/MatchUtil.c ./Lean/Meta/Offset.c ./Lean/Meta/PPGoal.c ./Lean/Meta/RecursorInfo.c ./Lean/Meta/Reduce.c ./Lean/Meta/ReduceEval.c ./Lean/Meta/SynthInstance.c ./Lean/Meta/Tactic.c ./Lean/Meta/Tactic/Apply.c ./Lean/Meta/Tactic/Assert.c ./Lean/Meta/Tactic/Assumption.c ./Lean/Meta/Tactic/Cases.c ./Lean/Meta/Tactic/Clear.c ./Lean/Meta/Tactic/Constructor.c ./Lean/Meta/Tactic/Delta.c ./Lean/Meta/Tactic/ElimInfo.c ./Lean/Meta/Tactic/FVarSubst.c ./Lean/Meta/Tactic/Generalize.c ./Lean/Meta/Tactic/Induction.c ./Lean/Meta/Tactic/Injection.c ./Lean/Meta/Tactic/Intro.c ./Lean/Meta/Tactic/Replace.c ./Lean/Meta/Tactic/Revert.c ./Lean/Meta/Tactic/Rewrite.c ./Lean/Meta/Tactic/Subst.c ./Lean/Meta/Tactic/Util.c ./Lean/Meta/Transform.c ./Lean/Meta/TransparencyMode.c ./Lean/Meta/UnificationHint.c ./Lean/Meta/WHNF.c ./Lean/MetavarContext.c ./Lean/Modifiers.c ./Lean/MonadEnv.c ./Lean/Parser.c ./Lean/Parser/Basic.c ./Lean/Parser/Command.c ./Lean/Parser/Do.c ./Lean/Parser/Extension.c ./Lean/Parser/Extra.c ./Lean/Parser/Level.c ./Lean/Parser/Module.c ./Lean/Parser/StrInterpolation.c ./Lean/Parser/Syntax.c ./Lean/Parser/Tactic.c ./Lean/Parser/Term.c ./Lean/ParserCompiler.c ./Lean/ParserCompiler/Attribute.c ./Lean/PrettyPrinter.c ./Lean/PrettyPrinter/Basic.c ./Lean/PrettyPrinter/Delaborator.c ./Lean/PrettyPrinter/Delaborator/Basic.c ./Lean/PrettyPrinter/Delaborator/Builtins.c ./Lean/PrettyPrinter/Formatter.c ./Lean/PrettyPrinter/Parenthesizer.c ./Lean/ProjFns.c ./Lean/ReducibilityAttrs.c ./Lean/ResolveName.c ./Lean/Runtime.c ./Lean/ScopedEnvExtension.c ./Lean/Server.c ./Lean/Server/Snapshots.c ./Lean/Structure.c ./Lean/Syntax.c ./Lean/ToExpr.c ./Lean/Util.c ./Lean/Util/CollectFVars.c ./Lean/Util/CollectLevelParams.c ./Lean/Util/CollectMVars.c ./Lean/Util/Constructions.c ./Lean/Util/FindExpr.c ./Lean/Util/FindMVar.c ./Lean/Util/FoldConsts.c ./Lean/Util/ForEachExpr.c ./Lean/Util/MonadCache.c ./Lean/Util/PPExt.c ./Lean/Util/Path.c ./Lean/Util/Profile.c ./Lean/Util/RecDepth.c ./Lean/Util/Recognizers.c ./Lean/Util/ReplaceExpr.c ./Lean/Util/ReplaceLevel.c ./Lean/Util/SCC.c ./Lean/Util/Sorry.c ./Lean/Util/Trace.c ./Std.c ./Std/Data.c ./Std/Data/AssocList.c ./Std/Data/BinomialHeap.c ./Std/Data/DList.c ./Std/Data/HashMap.c ./Std/Data/HashSet.c ./Std/Data/PersistentArray.c ./Std/Data/PersistentHashMap.c ./Std/Data/PersistentHashSet.c ./Std/Data/Queue.c ./Std/Data/RBMap.c ./Std/Data/RBTree.c ./Std/Data/Stack.c ./Std/ShareCommon.c ) diff --git a/stage0/stdlib/Init/Data/Array/Basic.c b/stage0/stdlib/Init/Data/Array/Basic.c index 41aa11bf61..3c40fd7bc6 100644 --- a/stage0/stdlib/Init/Data/Array/Basic.c +++ b/stage0/stdlib/Init/Data/Array/Basic.c @@ -34,6 +34,7 @@ lean_object* l_Array_indexOfAux___rarg(lean_object*, lean_object*, lean_object*, lean_object* l_term_x23_x5b___x2c_x5d___closed__3; lean_object* l_Array_filterMapM___at_Array_filterMap___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_filterMapM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back_x3f(lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Array_forM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_div(lean_object*, lean_object*); @@ -152,6 +153,7 @@ lean_object* l_Array_forM___rarg___boxed(lean_object*, lean_object*, lean_object lean_object* l_Array_mapM(lean_object*, lean_object*, lean_object*); lean_object* l_Array_mapIdxM_map_match__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_term_x23_x5b___x2c_x5d___closed__2; +lean_object* l_Array_back_x3f___rarg(lean_object*); lean_object* l_Array_getIdx_x3f(lean_object*); extern lean_object* l_term_x5b___x2c_x5d___closed__2; lean_object* l_Array_foldrMUnsafe___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -163,7 +165,6 @@ lean_object* l_Array_allM(lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Array_map___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_allM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyMUnsafe_any___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; lean_object* l_Array_isEqvAux(lean_object*); lean_object* l_Array_forIn(lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyM_loop___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); @@ -175,6 +176,7 @@ lean_object* l_Array_mapIdx___rarg(lean_object*, lean_object*); lean_object* l_Array_getMax_x3f___rarg___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_List_redLength_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_swap___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; lean_object* l_Array_foldrMUnsafe_fold___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mapIdxM_map___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -196,6 +198,7 @@ lean_object* l_Array_foldrM___rarg___boxed(lean_object*, lean_object*, lean_obje lean_object* l_Array_getLit(lean_object*, lean_object*); uint8_t l_Array_isPrefixOf___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertAtAux_match__1(lean_object*, lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__1; lean_object* l_Array_forIn_loop_match__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Array_foldr___spec__1(lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); @@ -212,7 +215,6 @@ lean_object* l_Array_mapMUnsafe_map___rarg___lambda__1___boxed(lean_object*, lea uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Array_findIdx_x3f_loop_match__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forIn___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__1; lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux(lean_object*); lean_object* l_Array_eraseIdxAux_match__1(lean_object*, lean_object*); lean_object* l_Array_forInUnsafe(lean_object*, lean_object*, lean_object*); @@ -228,13 +230,13 @@ lean_object* l_Array_forInUnsafe_loop_match__1(lean_object*, lean_object*); lean_object* l_Array_filter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_eraseIdx_x27___rarg___boxed(lean_object*, lean_object*); lean_object* lean_array_swap(lean_object*, lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__4; lean_object* l_Array_getIdx_x3f___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyMUnsafe_any___at_Array_all___spec__1(lean_object*); lean_object* l_Array_get_x3f___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_findIdx_x3f___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_mapM___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertAtAux_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__2; lean_object* l_Array_findRev_x3f(lean_object*); lean_object* l_Array_mapMUnsafe_map(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlMUnsafe_fold___at_Array_filter___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -256,11 +258,10 @@ lean_object* l_Array_forInUnsafe_loop___at_Array_findM_x3f___spec__1___rarg___la lean_object* l_Array_forInUnsafe_loop___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_instReprArray___rarg(lean_object*, lean_object*); lean_object* l_Array_append___rarg___boxed(lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__8; +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__8; lean_object* l_Array_feraseIdx(lean_object*); lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlMUnsafe_fold___at_Array_filterM___spec__1___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__2; lean_object* l_Array_forIn_loop_match__2(lean_object*, lean_object*, lean_object*); lean_object* l_Array_forIn_loop_match__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlMUnsafe_fold___at_Array_filter___spec__1___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*); @@ -305,9 +306,11 @@ lean_object* l_Array_back___rarg(lean_object*, lean_object*); lean_object* l_Array_anyMUnsafe_any___at_Array_allM___spec__1___rarg___lambda__1___boxed(lean_object*, lean_object*); lean_object* l_Array_findSomeRevM_x3f_find___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_filterMap(lean_object*, lean_object*); +lean_object* l_Array_back_x3f___rarg___boxed(lean_object*); lean_object* l_Array_anyMUnsafe_any___at_Array_allM___spec__1___rarg___lambda__1(lean_object*, uint8_t); lean_object* l_Array_findSomeM_x3f___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_array_to_list(lean_object*, lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__4; lean_object* l_Array_eraseIdxSzAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_eraseIdxSzAux(lean_object*); lean_object* l_Array_modify___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -326,7 +329,6 @@ uint8_t l_Array_anyMUnsafe_any___at_Array_any___spec__1___rarg(lean_object*, lea extern lean_object* l_myMacro____x40_Init_Notation___hyg_38____closed__8; lean_object* l_Array_findRevM_x3f(lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__6; lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_reverse___rarg(lean_object*); @@ -363,6 +365,7 @@ lean_object* l_Array_mapMUnsafe_map___at_Array_map___spec__1(lean_object*, lean_ lean_object* l_Array_findSome_x21___rarg___closed__1; lean_object* l_Array_insertAt___rarg___closed__2; lean_object* l_Lean_addMacroScope(lean_object*, lean_object*, lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__6; lean_object* l_Array_anyMUnsafe___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_term_x5b___x2c_x5d___closed__3; lean_object* l_Array_foldlMUnsafe_fold___rarg___lambda__1(size_t, lean_object*, lean_object*, lean_object*, size_t, lean_object*); @@ -407,7 +410,6 @@ lean_object* l_Array_zip(lean_object*, lean_object*); lean_object* l_ReaderT_instMonadReaderT___rarg___lambda__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlM_loop(lean_object*, lean_object*, lean_object*); lean_object* l_Array_forIn_loop___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; lean_object* l_Array_shrink_loop___rarg(lean_object*, lean_object*); lean_object* l_Array_mapIdxM_map___at_Array_mapIdx___spec__1(lean_object*, lean_object*); lean_object* l_Array_findSomeRevM_x3f_find_match__1(lean_object*, lean_object*); @@ -427,6 +429,7 @@ lean_object* l_Array_partition___rarg___closed__1; lean_object* l_Array_getLit___boxed(lean_object*, lean_object*); lean_object* l_Array_foldlMUnsafe_fold___at_Array_filterM___spec__1___rarg___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t); lean_object* l_Array_modify(lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; lean_object* lean_list_to_array(lean_object*, lean_object*); extern lean_object* l_Id_instMonadId; uint8_t lean_nat_dec_le(lean_object*, lean_object*); @@ -439,6 +442,7 @@ lean_object* l_Array_shrink(lean_object*); lean_object* l_Array_isEmpty(lean_object*); uint8_t l_Array_any___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldr___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__3; lean_object* lean_panic_fn(lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop(lean_object*, lean_object*, lean_object*); lean_object* l_List_redLength(lean_object*); @@ -461,7 +465,6 @@ lean_object* l_Array_findSomeRevM_x3f_find_match__2___rarg(lean_object*, lean_ob lean_object* l_Array_isPrefixOf___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlMUnsafe(lean_object*, lean_object*, lean_object*); lean_object* l_Array_reverse_rev___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__3; lean_object* l_Array_zipWithAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlMUnsafe_fold___at_Array_filter___spec__1(lean_object*); extern lean_object* l_myMacro____x40_Init_Notation___hyg_7116____closed__5; @@ -485,7 +488,6 @@ lean_object* l_Array_foldlMUnsafe_fold___at_Array_append___spec__1___rarg___boxe lean_object* l_Array_mapIdx___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_findSomeRev_x3f___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_findSomeRevM_x3f_find___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__7; lean_object* l_Array_forRevM(lean_object*, lean_object*); lean_object* l_List_toArrayAux___rarg(lean_object*, lean_object*); lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux_match__1(lean_object*, lean_object*, lean_object*); @@ -520,6 +522,7 @@ lean_object* l_Array_anyM_loop_match__1(lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Array_findIdxM_x3f___spec__1___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_filterMapM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_eraseIdxSzAuxInstance(lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__7; lean_object* l_Array_instReprArray___rarg___closed__1; lean_object* l_Array_foldlM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_erase_match__1___boxed(lean_object*, lean_object*, lean_object*); @@ -550,6 +553,7 @@ lean_object* l_Array_isEqvAux_match__1___rarg___boxed(lean_object*, lean_object* lean_object* l_Array_contains(lean_object*); lean_object* l_Array_insertAtAux___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; lean_object* l_Array_forInUnsafe_loop___at_Array_find_x3f___spec__1___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); lean_object* l_Array_foldlMUnsafe_fold___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_redLength_match__1(lean_object*, lean_object*); @@ -575,7 +579,6 @@ lean_object* l_ReaderT_instMonadExceptOfReaderT___rarg___lambda__2(lean_object*, lean_object* l_Array_forInUnsafe_loop___at_Array_findIdxM_x3f___spec__1___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertAt(lean_object*); lean_object* l_Array_elem(lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; lean_object* l_Array_zipWithAux___at_Array_zip___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_filter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_findSome_x21_match__1___rarg(lean_object*, lean_object*, lean_object*); @@ -585,7 +588,7 @@ lean_object* l_Array_foldrM_fold(lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertAt___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_findIdxM_x3f_match__2(lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Array_map___spec__1___rarg(lean_object*, size_t, size_t, lean_object*); -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393_(lean_object*, lean_object*, lean_object*); +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405_(lean_object*, lean_object*, lean_object*); lean_object* l_Array_contains___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_eraseIdxSzAux_match__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Array_toList___spec__1___rarg(lean_object*, size_t, size_t, lean_object*); @@ -768,6 +771,36 @@ lean_dec(x_1); return x_3; } } +lean_object* l_Array_back_x3f___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_array_get_size(x_1); +x_3 = lean_unsigned_to_nat(1u); +x_4 = lean_nat_sub(x_2, x_3); +lean_dec(x_2); +x_5 = l_Array_get_x3f___rarg(x_1, x_4); +lean_dec(x_4); +return x_5; +} +} +lean_object* l_Array_back_x3f(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_back_x3f___rarg___boxed), 1, 0); +return x_2; +} +} +lean_object* l_Array_back_x3f___rarg___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_back_x3f___rarg(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_Array_getLit___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -917,7 +950,7 @@ x_11 = l_Array_swapAt_x21___rarg___closed__2; x_12 = lean_string_append(x_10, x_11); x_13 = l_Array_swapAt_x21___rarg___closed__3; x_14 = l_Array_swapAt_x21___rarg___closed__4; -x_15 = lean_unsigned_to_nat(90u); +x_15 = lean_unsigned_to_nat(93u); x_16 = lean_unsigned_to_nat(4u); x_17 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_13, x_14, x_15, x_16, x_12); lean_dec(x_12); @@ -5935,7 +5968,7 @@ _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; x_1 = l_Array_swapAt_x21___rarg___closed__3; x_2 = l_Array_findSome_x21___rarg___closed__1; -x_3 = lean_unsigned_to_nat(384u); +x_3 = lean_unsigned_to_nat(387u); x_4 = lean_unsigned_to_nat(14u); x_5 = l_Array_findSome_x21___rarg___closed__2; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -7533,7 +7566,7 @@ x_1 = l_term_x23_x5b___x2c_x5d___closed__6; return x_1; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__1() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__1() { _start: { lean_object* x_1; @@ -7541,22 +7574,22 @@ x_1 = lean_mk_string("List.toArray"); return x_1; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__2() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__1; +x_1 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__1; x_2 = lean_string_utf8_byte_size(x_1); return x_2; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__3() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__1; +x_1 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__1; x_2 = lean_unsigned_to_nat(0u); -x_3 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__2; +x_3 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____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); @@ -7564,7 +7597,7 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__4() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__4() { _start: { lean_object* x_1; @@ -7572,41 +7605,41 @@ x_1 = lean_mk_string("toArray"); return x_1; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_myMacro____x40_Init_Notation___hyg_7116____closed__5; -x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__4; +x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__4; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__6() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; 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; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__7() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__7() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__6; +x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__6; 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; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__8() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -7618,17 +7651,17 @@ lean_ctor_set(x_3, 1, x_2); return x_3; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_empty___closed__1; -x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__8; +x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__8; x_3 = lean_array_push(x_1, x_2); return x_3; } } -static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10() { +static lean_object* _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -7640,7 +7673,7 @@ lean_ctor_set(x_3, 1, x_2); return x_3; } } -lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393_(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405_(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; uint8_t x_5; @@ -7671,11 +7704,11 @@ lean_inc(x_11); x_12 = lean_ctor_get(x_2, 1); lean_inc(x_12); lean_dec(x_2); -x_13 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_13 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_14 = l_Lean_addMacroScope(x_12, x_13, x_11); x_15 = l_Lean_instInhabitedSourceInfo___closed__1; -x_16 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__3; -x_17 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__7; +x_16 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__3; +x_17 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__7; x_18 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_18, 0, x_15); lean_ctor_set(x_18, 1, x_16); @@ -7689,9 +7722,9 @@ x_22 = l_Lean_nullKind___closed__2; x_23 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_23, 0, x_22); lean_ctor_set(x_23, 1, x_21); -x_24 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_24 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_25 = lean_array_push(x_24, x_23); -x_26 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_26 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_27 = lean_array_push(x_25, x_26); x_28 = l_term_x5b___x2c_x5d___closed__2; x_29 = lean_alloc_ctor(1, 2, 0); @@ -9281,7 +9314,7 @@ _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; x_1 = l_Array_swapAt_x21___rarg___closed__3; x_2 = l_Array_insertAt___rarg___closed__1; -x_3 = lean_unsigned_to_nat(666u); +x_3 = lean_unsigned_to_nat(669u); x_4 = lean_unsigned_to_nat(22u); x_5 = l_Array_insertAt___rarg___closed__2; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -10031,26 +10064,26 @@ l_term_x23_x5b___x2c_x5d___closed__6 = _init_l_term_x23_x5b___x2c_x5d___closed__ lean_mark_persistent(l_term_x23_x5b___x2c_x5d___closed__6); l_term_x23_x5b___x2c_x5d = _init_l_term_x23_x5b___x2c_x5d(); lean_mark_persistent(l_term_x23_x5b___x2c_x5d); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__1 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__1(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__1); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__2 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__2(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__2); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__3 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__3(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__3); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__4 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__4(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__4); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__6 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__6(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__6); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__7 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__7(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__7); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__8 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__8(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__8); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9); -l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10(); -lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__1 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__1(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__1); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__2 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__2(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__2); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__3 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__3(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__3); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__4 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__4(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__4); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__6 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__6(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__6); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__7 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__7(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__7); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__8 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__8(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__8); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9); +l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10 = _init_l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10(); +lean_mark_persistent(l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10); l_Array_partition___rarg___closed__1 = _init_l_Array_partition___rarg___closed__1(); lean_mark_persistent(l_Array_partition___rarg___closed__1); l_Array_insertAt___rarg___closed__1 = _init_l_Array_insertAt___rarg___closed__1(); diff --git a/stage0/stdlib/Init/Meta.c b/stage0/stdlib/Init/Meta.c index 4787079c75..788a63cd69 100644 --- a/stage0/stdlib/Init/Meta.c +++ b/stage0/stdlib/Init/Meta.c @@ -356,7 +356,6 @@ lean_object* l_ReaderT_instMonadReaderT___rarg___lambda__4___boxed(lean_object*, lean_object* l_Lean_Syntax_mkApp___closed__1; uint8_t l_UInt32_decEq(uint32_t, uint32_t); lean_object* l_Lean_Syntax_decodeQuotedChar_match__6(lean_object*); -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; lean_object* l___private_Init_Meta_0__Lean_quoteName_match__1(lean_object*); lean_object* l_Lean_Name_appendAfter(lean_object*, lean_object*); lean_object* l_Lean_Syntax_getSepArgs(lean_object*); @@ -369,6 +368,7 @@ lean_object* l_Lean_instQuoteString___boxed(lean_object*); lean_object* l_Lean_Syntax_expandInterpolatedStrChunks___closed__1; lean_object* l_Lean_instQuoteBool___closed__2; lean_object* l_Lean_Syntax_expandInterpolatedStrChunks_match__3___rarg(lean_object*, lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; lean_object* l_Lean_Syntax_expandInterpolatedStrChunks___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Syntax_hasArgs(lean_object*); lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Syntax_getSepArgs___spec__1(lean_object*, size_t, size_t, lean_object*); @@ -9292,7 +9292,7 @@ x_3 = lean_array_to_list(lean_box(0), x_2); x_4 = l___private_Init_Meta_0__Lean_quoteList___rarg(x_1, x_3); x_5 = l_Lean_mkOptionalNode___closed__2; x_6 = lean_array_push(x_5, x_4); -x_7 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_7 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_8 = l_Lean_Syntax_mkCApp(x_7, x_6); return x_8; } diff --git a/stage0/stdlib/Init/NotationExtra.c b/stage0/stdlib/Init/NotationExtra.c index 50d65fd621..5b1ab6a6be 100644 --- a/stage0/stdlib/Init/NotationExtra.c +++ b/stage0/stdlib/Init/NotationExtra.c @@ -307,6 +307,7 @@ lean_object* l_Lean_expandExplicitBindersAux_loop___closed__4; lean_object* l_Lean_command__Unif__hint______Where___x7c_x2d_u22a2_____closed__9; lean_object* l_myMacro____x40_Init_NotationExtra___hyg_2140____closed__2; extern lean_object* l_Lean_Parser_Tactic_intro___closed__3; +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; lean_object* l_Lean_unbracktedExplicitBinders___closed__3; lean_object* l_myMacro____x40_Init_NotationExtra___hyg_2656____closed__1; lean_object* l_myMacro____x40_Init_NotationExtra___hyg_2492____boxed(lean_object*, lean_object*, lean_object*); @@ -318,7 +319,6 @@ lean_object* l_Lean_command__Unif__hint______Where___x7c_x2d_u22a2_____closed__8 lean_object* l_Lean_command__Unif__hint______Where___x7c_x2d_u22a2_____closed__17; lean_object* l_myMacro____x40_Init_NotationExtra___hyg_2656____closed__8; extern lean_object* l_Lean_Parser_Tactic_intro___closed__15; -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; lean_object* l_Lean_command__Unif__hint______Where___x7c_x2d_u22a2_____closed__1; lean_object* l_term_u2203___x2c_____closed__6; lean_object* l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__39; @@ -2693,7 +2693,7 @@ lean_ctor_set(x_199, 0, x_165); lean_ctor_set(x_199, 1, x_198); x_200 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_201 = lean_array_push(x_200, x_199); -x_202 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_202 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_203 = lean_array_push(x_201, x_202); x_204 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_205 = lean_alloc_ctor(1, 2, 0); @@ -2803,7 +2803,7 @@ lean_ctor_set(x_264, 0, x_165); lean_ctor_set(x_264, 1, x_263); x_265 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_266 = lean_array_push(x_265, x_264); -x_267 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_267 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_268 = lean_array_push(x_266, x_267); x_269 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_270 = lean_alloc_ctor(1, 2, 0); @@ -2991,7 +2991,7 @@ lean_ctor_set(x_59, 0, x_17); lean_ctor_set(x_59, 1, x_58); x_60 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_61 = lean_array_push(x_60, x_59); -x_62 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_62 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_63 = lean_array_push(x_61, x_62); x_64 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_65 = lean_alloc_ctor(1, 2, 0); @@ -3091,7 +3091,7 @@ lean_ctor_set(x_120, 0, x_17); lean_ctor_set(x_120, 1, x_119); x_121 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_122 = lean_array_push(x_121, x_120); -x_123 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_123 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_124 = lean_array_push(x_122, x_123); x_125 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_126 = lean_alloc_ctor(1, 2, 0); diff --git a/stage0/stdlib/Lean/Compiler/IR/Basic.c b/stage0/stdlib/Lean/Compiler/IR/Basic.c index cdb07edffb..4b49b0cd57 100644 --- a/stage0/stdlib/Lean/Compiler/IR/Basic.c +++ b/stage0/stdlib/Lean/Compiler/IR/Basic.c @@ -4076,7 +4076,7 @@ x_13 = l_Array_swapAt_x21___rarg___closed__2; x_14 = lean_string_append(x_12, x_13); x_15 = l_Array_swapAt_x21___rarg___closed__3; x_16 = l_Array_swapAt_x21___rarg___closed__4; -x_17 = lean_unsigned_to_nat(90u); +x_17 = lean_unsigned_to_nat(93u); x_18 = lean_unsigned_to_nat(4u); x_19 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_15, x_16, x_17, x_18, x_14); lean_dec(x_14); diff --git a/stage0/stdlib/Lean/Elab/App.c b/stage0/stdlib/Lean/Elab/App.c index ccfc24b3e7..c038051de0 100644 --- a/stage0/stdlib/Lean/Elab/App.c +++ b/stage0/stdlib/Lean/Elab/App.c @@ -627,7 +627,6 @@ lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_mergeFailures_match__1_ lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_elabAppLValsAux_loop_match__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_whnf___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_resolveLValAux___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_consumeImplicits___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_ElabAppArgs_propagateExpectedType___closed__1; lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_resolveLValAux_match__3(lean_object*); @@ -698,6 +697,7 @@ uint8_t l_Lean_isStructureLike(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_elabAppFn___closed__4; lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_ElabAppArgs_processExplictArg_match__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_mkBaseProjections___closed__2; +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_indentExpr(lean_object*); lean_object* l___private_Lean_Elab_App_0__Lean_Elab_Term_ElabAppArgs_propagateExpectedType___closed__6; lean_object* l_Lean_Elab_Term_expandPipeProj(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -33436,7 +33436,7 @@ x_90 = l_Array_isEmpty___rarg(x_89); if (x_90 == 0) { lean_object* x_91; lean_object* x_92; uint8_t x_93; -x_91 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_89); +x_91 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_89); x_92 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Term_expandApp___spec__1___closed__4; x_93 = l_Lean_Syntax_isOfKind(x_91, x_92); if (x_93 == 0) diff --git a/stage0/stdlib/Lean/Elab/BuiltinNotation.c b/stage0/stdlib/Lean/Elab/BuiltinNotation.c index 8f680f35dd..08a20aff90 100644 --- a/stage0/stdlib/Lean/Elab/BuiltinNotation.c +++ b/stage0/stdlib/Lean/Elab/BuiltinNotation.c @@ -509,7 +509,6 @@ lean_object* lean_expr_abstract(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_BuiltinNotation_0__Lean_Elab_Term_getPropToDecide_match__1(lean_object*); extern lean_object* l_Lean_Syntax_expandInterpolatedStr___lambda__1___closed__2; lean_object* l___private_Lean_Elab_BuiltinNotation_0__Lean_Elab_Term_elabParserMacroAux___closed__2; -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* l_Lean_Elab_Term_elabBorrowed___closed__1; lean_object* l_Lean_Elab_Term_mkPairs___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabNativeRefl___lambda__1___closed__7; @@ -580,6 +579,7 @@ lean_object* l___private_Lean_Elab_BuiltinNotation_0__Lean_Elab_Term_elabTParser lean_object* l_Lean_Elab_Term_elabSubst___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Term_expandAssert(lean_object*); lean_object* l___private_Lean_Elab_BuiltinNotation_0__Lean_Elab_Term_elabCDot_match__1(lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_Elab_Term_expandSorry(lean_object*); lean_object* l_Lean_indentExpr(lean_object*); lean_object* l___private_Lean_Elab_BuiltinNotation_0__Lean_Elab_Term_elabTParserMacroAux___closed__2; @@ -8575,7 +8575,7 @@ x_4 = lean_array_get_size(x_1); x_5 = lean_unsigned_to_nat(1u); x_6 = lean_nat_sub(x_4, x_5); lean_dec(x_4); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_1); +x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_1); x_8 = l_Lean_Elab_Term_mkPairs_loop(x_1, x_6, x_7, x_2, x_3); return x_8; } diff --git a/stage0/stdlib/Lean/Elab/Declaration.c b/stage0/stdlib/Lean/Elab/Declaration.c index 6b745573dd..fcc50dcdd3 100644 --- a/stage0/stdlib/Lean/Elab/Declaration.c +++ b/stage0/stdlib/Lean/Elab/Declaration.c @@ -349,6 +349,7 @@ lean_object* l_Lean_Elab_Command_checkValidCtorModifier___at___private_Lean_Elab lean_object* l_Lean_Elab_Command_expandInitCmd___closed__25; lean_object* l_Lean_Meta_mkForallUsedOnlyImp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; lean_object* l_Lean_Elab_Command_elabDeclaration___closed__5; lean_object* l_Lean_Elab_Command_elabInductive(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_List_isEmpty___rarg(lean_object*); @@ -367,7 +368,6 @@ lean_object* l_Lean_Meta_mkForallUsedOnly___at_Lean_Elab_Command_elabAxiom___spe lean_object* l_Lean_Elab_Command_expandMutualElement_match__2___rarg(lean_object*, lean_object*); uint8_t l___private_Lean_Elab_Declaration_0__Lean_Elab_Command_isMutualInductive(lean_object*); lean_object* l_Lean_throwError___at_Lean_Elab_Term_throwErrorIfErrors___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; lean_object* l_Lean_Elab_Command_expandMutualNamespace_match__3___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Command_expandInCmd___closed__2; @@ -7654,7 +7654,7 @@ lean_ctor_set(x_79, 0, x_39); lean_ctor_set(x_79, 1, x_78); x_80 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_81 = lean_array_push(x_80, x_79); -x_82 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_82 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_83 = lean_array_push(x_81, x_82); x_84 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_85 = lean_alloc_ctor(1, 2, 0); @@ -7729,7 +7729,7 @@ lean_ctor_set(x_123, 0, x_122); lean_ctor_set(x_123, 1, x_121); x_124 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_125 = lean_array_push(x_124, x_123); -x_126 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_126 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_127 = lean_array_push(x_125, x_126); x_128 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_129 = lean_alloc_ctor(1, 2, 0); diff --git a/stage0/stdlib/Lean/Elab/Do.c b/stage0/stdlib/Lean/Elab/Do.c index 0a872e254c..b35f13e50d 100644 --- a/stage0/stdlib/Lean/Elab/Do.c +++ b/stage0/stdlib/Lean/Elab/Do.c @@ -1017,7 +1017,6 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Elab_Term_Do_attachJPs___spec__ lean_object* l_Lean_Elab_Term_Do_ToTerm_matchNestedTermResult___closed__34; uint8_t l_Array_anyMUnsafe_any___at_Lean_Elab_Term_Do_hasBreakContinueReturn___spec__2(lean_object*, size_t, size_t); lean_object* l___private_Lean_Elab_Do_0__Lean_Elab_Term_extractBind_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* l_Lean_Elab_Term_Do_mkAuxDeclFor___rarg___lambda__3___closed__8; lean_object* l___regBuiltin_Lean_Elab_Term_Do_elabDo___closed__1; lean_object* l_Lean_Elab_Term_Do_mkIte_match__1(lean_object*); @@ -1123,6 +1122,7 @@ lean_object* l_Lean_Elab_Term_Do_getDoLetArrowVars___closed__2; lean_object* l_Lean_Elab_Term_Do_ToTerm_returnToTermCore___closed__12; lean_object* l_Lean_Elab_Term_Do_ToTerm_seqToTerm(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at___private_Lean_Elab_Do_0__Lean_Elab_Term_Do_mkTuple___spec__2(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_Elab_Term_Do_ToTerm_returnToTermCore___closed__11; lean_object* l_Lean_throwError___at_Lean_Elab_Term_Do_mkJmp___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_Do_ToTerm_continueToTermCore___closed__22; @@ -18205,7 +18205,7 @@ x_9 = lean_nat_dec_eq(x_5, x_8); if (x_9 == 0) { lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_2); +x_10 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_2); x_11 = lean_nat_sub(x_5, x_8); lean_dec(x_5); x_12 = l_Array_extract___rarg(x_2, x_6, x_11); diff --git a/stage0/stdlib/Lean/Elab/Level.c b/stage0/stdlib/Lean/Elab/Level.c index 28fa38e2f4..c177011cce 100644 --- a/stage0/stdlib/Lean/Elab/Level.c +++ b/stage0/stdlib/Lean/Elab/Level.c @@ -99,7 +99,6 @@ lean_object* l_Lean_Elab_Level_instMonadRefLevelElabM___closed__2; lean_object* l_Lean_mkFreshId___at_Lean_Elab_Level_mkFreshLevelMVar___spec__1___rarg(lean_object*); lean_object* l_Lean_Elab_Level_instAddMessageContextLevelElabM___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Level_instMonadNameGeneratorLevelElabM___closed__1; -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* l_Lean_throwError___at_Lean_Elab_Level_elabLevel___spec__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_string_length(lean_object*); lean_object* l_Lean_Elab_Level_instMonadRefLevelElabM___closed__1; @@ -107,6 +106,7 @@ lean_object* l_Lean_Level_ofNat(lean_object*); lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Level_elabLevel___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkLevelParam(lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_Elab_Level_instMonadNameGeneratorLevelElabM___closed__4; lean_object* l_Lean_Elab_Level_instMonadRefLevelElabM___closed__3; lean_object* l_Lean_Elab_Level_instMonadNameGeneratorLevelElabM___lambda__2(lean_object*, lean_object*, lean_object*); @@ -1449,7 +1449,7 @@ x_96 = l_Lean_Syntax_getArg(x_1, x_95); lean_dec(x_1); x_97 = l_Lean_Syntax_getArgs(x_96); lean_dec(x_96); -x_98 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_97); +x_98 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_97); lean_inc(x_2); x_99 = l_Lean_Elab_Level_elabLevel(x_98, x_2, x_3); if (lean_obj_tag(x_99) == 0) @@ -1555,7 +1555,7 @@ x_124 = l_Lean_Syntax_getArg(x_1, x_123); lean_dec(x_1); x_125 = l_Lean_Syntax_getArgs(x_124); lean_dec(x_124); -x_126 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_125); +x_126 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_125); lean_inc(x_2); x_127 = l_Lean_Elab_Level_elabLevel(x_126, x_2, x_3); if (lean_obj_tag(x_127) == 0) @@ -1987,7 +1987,7 @@ x_229 = l_Lean_Syntax_getArg(x_1, x_228); lean_dec(x_1); x_230 = l_Lean_Syntax_getArgs(x_229); lean_dec(x_229); -x_231 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_230); +x_231 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_230); lean_inc(x_157); x_232 = l_Lean_Elab_Level_elabLevel(x_231, x_157, x_3); if (lean_obj_tag(x_232) == 0) @@ -2099,7 +2099,7 @@ x_257 = l_Lean_Syntax_getArg(x_1, x_256); lean_dec(x_1); x_258 = l_Lean_Syntax_getArgs(x_257); lean_dec(x_257); -x_259 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_258); +x_259 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_258); lean_inc(x_157); x_260 = l_Lean_Elab_Level_elabLevel(x_259, x_157, x_3); if (lean_obj_tag(x_260) == 0) diff --git a/stage0/stdlib/Lean/Elab/Quotation.c b/stage0/stdlib/Lean/Elab/Quotation.c index ca070d07d2..c11334e8ba 100644 --- a/stage0/stdlib/Lean/Elab/Quotation.c +++ b/stage0/stdlib/Lean/Elab/Quotation.c @@ -455,7 +455,6 @@ lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_letBind lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__4___closed__24; extern lean_object* l_Lean_Parser_Tactic_match___closed__3; lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_floatOutAntiquotTerms___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; lean_object* l_List_redLength___rarg(lean_object*); lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); lean_object* l_Lean_addTrace___at_Lean_Elab_Term_Quotation_match__syntax_expand___spec__9___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -477,6 +476,7 @@ lean_object* l_Lean_Syntax_setArg(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Tactic_match___closed__5; lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_compileStxMatch_match__1(lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___closed__18; lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__4___lambda__2___closed__6; lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_compileStxMatch___lambda__9___closed__17; @@ -3394,7 +3394,7 @@ x_268 = lean_array_to_list(lean_box(0), x_107); x_269 = l___private_Init_Meta_0__Lean_quoteList___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__3(x_268); x_270 = l_Lean_mkOptionalNode___closed__2; x_271 = lean_array_push(x_270, x_269); -x_272 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_272 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_273 = l_Lean_Syntax_mkCApp(x_272, x_271); x_274 = lean_array_push(x_267, x_273); x_275 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__4___closed__18; @@ -4016,7 +4016,7 @@ x_535 = lean_array_to_list(lean_box(0), x_107); x_536 = l___private_Init_Meta_0__Lean_quoteList___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__3(x_535); x_537 = l_Lean_mkOptionalNode___closed__2; x_538 = lean_array_push(x_537, x_536); -x_539 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_539 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_540 = l_Lean_Syntax_mkCApp(x_539, x_538); x_541 = lean_array_push(x_534, x_540); x_542 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__4___closed__18; @@ -4868,7 +4868,7 @@ x_863 = lean_array_to_list(lean_box(0), x_699); x_864 = l___private_Init_Meta_0__Lean_quoteList___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__3(x_863); x_865 = l_Lean_mkOptionalNode___closed__2; x_866 = lean_array_push(x_865, x_864); -x_867 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_867 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_868 = l_Lean_Syntax_mkCApp(x_867, x_866); x_869 = lean_array_push(x_862, x_868); x_870 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__4___closed__18; @@ -5495,7 +5495,7 @@ x_1135 = lean_array_to_list(lean_box(0), x_699); x_1136 = l___private_Init_Meta_0__Lean_quoteList___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__3(x_1135); x_1137 = l_Lean_mkOptionalNode___closed__2; x_1138 = lean_array_push(x_1137, x_1136); -x_1139 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_1139 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_1140 = l_Lean_Syntax_mkCApp(x_1139, x_1138); x_1141 = lean_array_push(x_1134, x_1140); x_1142 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__4___closed__18; diff --git a/stage0/stdlib/Lean/Elab/Syntax.c b/stage0/stdlib/Lean/Elab/Syntax.c index fb5ad1d788..35d8477d84 100644 --- a/stage0/stdlib/Lean/Elab/Syntax.c +++ b/stage0/stdlib/Lean/Elab/Syntax.c @@ -261,7 +261,6 @@ lean_object* l_Lean_Elab_Command_mkNameFromParserSyntax_visit(lean_object*, lean lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed__2; extern lean_object* l_Lean_throwUnknownConstant___rarg___closed__2; -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; lean_object* l_Array_filterSepElemsM___at_Lean_Elab_Command_elabNoKindMacroRulesAux___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__4; lean_object* l_Lean_resolveGlobalName___at_Lean_Elab_Term_toParserDescrAux___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -284,6 +283,7 @@ uint8_t l_Lean_Parser_leadingIdentAsSymbol(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___closed__53; lean_object* l_Lean_Elab_mkUnusedBaseName___at_Lean_Elab_Command_mkNameFromParserSyntax___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_string_utf8_next(lean_object*, lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; lean_object* l_Lean_throwError___at_Lean_Elab_Term_checkLeftRec___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_expandMixfix___closed__1; lean_object* l_Lean_Elab_Command_expandElab___closed__3; @@ -838,6 +838,7 @@ extern lean_object* l_Lean_expandExplicitBindersAux_loop___closed__4; lean_object* l_Lean_Elab_Command_expandMixfix___lambda__1___closed__24; lean_object* l_Array_mapSepElemsM___at_Lean_Elab_Command_elabMacroRulesAux___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; lean_object* l_Lean_Elab_Command_expandMixfix___lambda__1___closed__20; lean_object* l_Lean_Elab_Command_elabSyntax_match__1(lean_object*); lean_object* l_Lean_Elab_Command_expandMacroHeadIntoSyntaxItem(lean_object*, lean_object*, lean_object*); @@ -884,7 +885,6 @@ lean_object* l_Lean_throwError___at_Lean_Elab_Term_throwErrorIfErrors___spec__1_ lean_object* l_Lean_Elab_Command_inferMacroRulesAltKind___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Term_expandFunBinders_loop___closed__9; lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_Syntax_0__Lean_Elab_Command_expandNotationAux___spec__3___boxed(lean_object*, lean_object*, lean_object*); -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; extern lean_object* l_Lean_Elab_toAttributeKind___rarg___lambda__2___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux_match__4___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabMacroRulesAux___closed__2; @@ -10160,7 +10160,7 @@ lean_ctor_set(x_33, 0, x_32); lean_ctor_set(x_33, 1, x_31); x_34 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_35 = lean_array_push(x_34, x_33); -x_36 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_36 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_37 = lean_array_push(x_35, x_36); x_38 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_39 = lean_alloc_ctor(1, 2, 0); @@ -12563,7 +12563,7 @@ lean_ctor_set(x_57, 0, x_51); lean_ctor_set(x_57, 1, x_56); x_58 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_59 = lean_array_push(x_58, x_57); -x_60 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_60 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_61 = lean_array_push(x_59, x_60); x_62 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_63 = lean_alloc_ctor(1, 2, 0); @@ -12696,7 +12696,7 @@ lean_ctor_set(x_141, 0, x_135); lean_ctor_set(x_141, 1, x_140); x_142 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_143 = lean_array_push(x_142, x_141); -x_144 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_144 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_145 = lean_array_push(x_143, x_144); x_146 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_147 = lean_alloc_ctor(1, 2, 0); @@ -12829,7 +12829,7 @@ lean_ctor_set(x_225, 0, x_219); lean_ctor_set(x_225, 1, x_224); x_226 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_227 = lean_array_push(x_226, x_225); -x_228 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_228 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_229 = lean_array_push(x_227, x_228); x_230 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_231 = lean_alloc_ctor(1, 2, 0); @@ -12967,7 +12967,7 @@ lean_ctor_set(x_309, 0, x_303); lean_ctor_set(x_309, 1, x_308); x_310 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_311 = lean_array_push(x_310, x_309); -x_312 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_312 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_313 = lean_array_push(x_311, x_312); x_314 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_315 = lean_alloc_ctor(1, 2, 0); @@ -13100,7 +13100,7 @@ lean_ctor_set(x_393, 0, x_387); lean_ctor_set(x_393, 1, x_392); x_394 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_395 = lean_array_push(x_394, x_393); -x_396 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_396 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_397 = lean_array_push(x_395, x_396); x_398 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_399 = lean_alloc_ctor(1, 2, 0); @@ -13233,7 +13233,7 @@ lean_ctor_set(x_477, 0, x_471); lean_ctor_set(x_477, 1, x_476); x_478 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_479 = lean_array_push(x_478, x_477); -x_480 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_480 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_481 = lean_array_push(x_479, x_480); x_482 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_483 = lean_alloc_ctor(1, 2, 0); @@ -15138,7 +15138,7 @@ lean_ctor_set(x_33, 0, x_27); lean_ctor_set(x_33, 1, x_32); x_34 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_35 = lean_array_push(x_34, x_33); -x_36 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_36 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_37 = lean_array_push(x_35, x_36); x_38 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_39 = lean_alloc_ctor(1, 2, 0); @@ -15321,7 +15321,7 @@ lean_ctor_set(x_140, 0, x_134); lean_ctor_set(x_140, 1, x_139); x_141 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_142 = lean_array_push(x_141, x_140); -x_143 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_143 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_144 = lean_array_push(x_142, x_143); x_145 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_146 = lean_alloc_ctor(1, 2, 0); @@ -17545,9 +17545,9 @@ lean_ctor_set(x_77, 0, x_15); lean_ctor_set(x_77, 1, x_76); x_78 = l_Lean_Elab_Command_expandMixfix___lambda__1___closed__20; x_79 = lean_array_push(x_78, x_77); -x_80 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_80 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_81 = lean_array_push(x_80, x_65); -x_82 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_82 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_83 = lean_array_push(x_81, x_82); x_84 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_84, 0, x_15); @@ -17838,9 +17838,9 @@ lean_ctor_set(x_199, 1, x_198); x_200 = l_Lean_Elab_Command_expandMixfix___lambda__1___closed__20; lean_inc(x_199); x_201 = lean_array_push(x_200, x_199); -x_202 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_202 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_203 = lean_array_push(x_202, x_187); -x_204 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_204 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_205 = lean_array_push(x_203, x_204); x_206 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_206, 0, x_15); @@ -18167,9 +18167,9 @@ lean_ctor_set(x_326, 0, x_15); lean_ctor_set(x_326, 1, x_325); x_327 = l_Lean_Elab_Command_expandMixfix___lambda__1___closed__20; x_328 = lean_array_push(x_327, x_326); -x_329 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_329 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_330 = lean_array_push(x_329, x_308); -x_331 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_331 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_332 = lean_array_push(x_330, x_331); x_333 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_333, 0, x_15); @@ -18503,9 +18503,9 @@ lean_ctor_set(x_478, 1, x_477); x_479 = l_Lean_Elab_Command_expandMixfix___lambda__1___closed__20; lean_inc(x_478); x_480 = lean_array_push(x_479, x_478); -x_481 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_481 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_482 = lean_array_push(x_481, x_466); -x_483 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_483 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_484 = lean_array_push(x_482, x_483); x_485 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_485, 0, x_15); @@ -18766,9 +18766,9 @@ lean_ctor_set(x_616, 0, x_15); lean_ctor_set(x_616, 1, x_615); x_617 = l_Lean_Elab_Command_expandMixfix___lambda__1___closed__38; x_618 = lean_array_push(x_617, x_616); -x_619 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_619 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_620 = lean_array_push(x_619, x_606); -x_621 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_621 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_622 = lean_array_push(x_620, x_621); x_623 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_623, 0, x_15); @@ -20069,7 +20069,7 @@ lean_ctor_set(x_63, 0, x_36); lean_ctor_set(x_63, 1, x_62); x_64 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_65 = lean_array_push(x_64, x_63); -x_66 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_66 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_67 = lean_array_push(x_65, x_66); x_68 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_69 = lean_alloc_ctor(1, 2, 0); @@ -20259,7 +20259,7 @@ lean_ctor_set(x_177, 0, x_36); lean_ctor_set(x_177, 1, x_176); x_178 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_179 = lean_array_push(x_178, x_177); -x_180 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_180 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_181 = lean_array_push(x_179, x_180); x_182 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_183 = lean_alloc_ctor(1, 2, 0); @@ -20500,7 +20500,7 @@ lean_ctor_set(x_311, 0, x_284); lean_ctor_set(x_311, 1, x_310); x_312 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_313 = lean_array_push(x_312, x_311); -x_314 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_314 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_315 = lean_array_push(x_313, x_314); x_316 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_317 = lean_alloc_ctor(1, 2, 0); @@ -20690,7 +20690,7 @@ lean_ctor_set(x_425, 0, x_284); lean_ctor_set(x_425, 1, x_424); x_426 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_427 = lean_array_push(x_426, x_425); -x_428 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_428 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_429 = lean_array_push(x_427, x_428); x_430 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_431 = lean_alloc_ctor(1, 2, 0); @@ -20933,7 +20933,7 @@ lean_ctor_set(x_561, 0, x_534); lean_ctor_set(x_561, 1, x_560); x_562 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_563 = lean_array_push(x_562, x_561); -x_564 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_564 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_565 = lean_array_push(x_563, x_564); x_566 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_567 = lean_alloc_ctor(1, 2, 0); @@ -21123,7 +21123,7 @@ lean_ctor_set(x_675, 0, x_534); lean_ctor_set(x_675, 1, x_674); x_676 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_677 = lean_array_push(x_676, x_675); -x_678 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_678 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_679 = lean_array_push(x_677, x_678); x_680 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_681 = lean_alloc_ctor(1, 2, 0); @@ -21393,7 +21393,7 @@ lean_ctor_set(x_816, 0, x_788); lean_ctor_set(x_816, 1, x_815); x_817 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_818 = lean_array_push(x_817, x_816); -x_819 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_819 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_820 = lean_array_push(x_818, x_819); x_821 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_822 = lean_alloc_ctor(1, 2, 0); @@ -21645,7 +21645,7 @@ lean_ctor_set(x_952, 0, x_924); lean_ctor_set(x_952, 1, x_951); x_953 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_954 = lean_array_push(x_953, x_952); -x_955 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_955 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_956 = lean_array_push(x_954, x_955); x_957 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_958 = lean_alloc_ctor(1, 2, 0); @@ -21899,7 +21899,7 @@ lean_ctor_set(x_1090, 0, x_1062); lean_ctor_set(x_1090, 1, x_1089); x_1091 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_1092 = lean_array_push(x_1091, x_1090); -x_1093 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_1093 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_1094 = lean_array_push(x_1092, x_1093); x_1095 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_1096 = lean_alloc_ctor(1, 2, 0); @@ -22293,7 +22293,7 @@ lean_ctor_set(x_1253, 0, x_1225); lean_ctor_set(x_1253, 1, x_1252); x_1254 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_1255 = lean_array_push(x_1254, x_1253); -x_1256 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_1256 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_1257 = lean_array_push(x_1255, x_1256); x_1258 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_1259 = lean_alloc_ctor(1, 2, 0); @@ -22550,7 +22550,7 @@ lean_ctor_set(x_1390, 0, x_1362); lean_ctor_set(x_1390, 1, x_1389); x_1391 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_1392 = lean_array_push(x_1391, x_1390); -x_1393 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_1393 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_1394 = lean_array_push(x_1392, x_1393); x_1395 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_1396 = lean_alloc_ctor(1, 2, 0); @@ -22809,7 +22809,7 @@ lean_ctor_set(x_1529, 0, x_1501); lean_ctor_set(x_1529, 1, x_1528); x_1530 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__13; x_1531 = lean_array_push(x_1530, x_1529); -x_1532 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_1532 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_1533 = lean_array_push(x_1531, x_1532); x_1534 = l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__10; x_1535 = lean_alloc_ctor(1, 2, 0); @@ -23929,9 +23929,9 @@ x_61 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed__ x_62 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_62, 0, x_61); lean_ctor_set(x_62, 1, x_60); -x_63 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_63 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_64 = lean_array_push(x_63, x_62); -x_65 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_65 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_66 = lean_array_push(x_64, x_65); x_67 = l_Lean_nullKind___closed__2; x_68 = lean_alloc_ctor(1, 2, 0); @@ -23982,9 +23982,9 @@ x_94 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed__ x_95 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_95, 0, x_94); lean_ctor_set(x_95, 1, x_93); -x_96 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_96 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_97 = lean_array_push(x_96, x_95); -x_98 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_98 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_99 = lean_array_push(x_97, x_98); x_100 = l_Lean_nullKind___closed__2; x_101 = lean_alloc_ctor(1, 2, 0); @@ -24035,9 +24035,9 @@ x_127 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_128 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_128, 0, x_127); lean_ctor_set(x_128, 1, x_126); -x_129 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_129 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_130 = lean_array_push(x_129, x_128); -x_131 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_131 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_132 = lean_array_push(x_130, x_131); x_133 = l_Lean_nullKind___closed__2; x_134 = lean_alloc_ctor(1, 2, 0); @@ -24109,9 +24109,9 @@ x_170 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_171 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_171, 0, x_170); lean_ctor_set(x_171, 1, x_169); -x_172 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_172 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_173 = lean_array_push(x_172, x_171); -x_174 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_174 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_175 = lean_array_push(x_173, x_174); x_176 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_176, 0, x_157); @@ -24176,9 +24176,9 @@ x_211 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_212 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_212, 0, x_211); lean_ctor_set(x_212, 1, x_210); -x_213 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_213 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_214 = lean_array_push(x_213, x_212); -x_215 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_215 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_216 = lean_array_push(x_214, x_215); x_217 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_217, 0, x_198); @@ -24243,9 +24243,9 @@ x_252 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_253 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_253, 0, x_252); lean_ctor_set(x_253, 1, x_251); -x_254 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_254 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_255 = lean_array_push(x_254, x_253); -x_256 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_256 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_257 = lean_array_push(x_255, x_256); x_258 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_258, 0, x_239); @@ -26222,9 +26222,9 @@ x_65 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed__ x_66 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_66, 0, x_65); lean_ctor_set(x_66, 1, x_64); -x_67 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_67 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_68 = lean_array_push(x_67, x_66); -x_69 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_69 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_70 = lean_array_push(x_68, x_69); x_71 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_71, 0, x_52); @@ -26320,9 +26320,9 @@ x_127 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_128 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_128, 0, x_127); lean_ctor_set(x_128, 1, x_126); -x_129 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_129 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_130 = lean_array_push(x_129, x_128); -x_131 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_131 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_132 = lean_array_push(x_130, x_131); x_133 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_133, 0, x_114); @@ -26432,9 +26432,9 @@ x_196 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_197 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_197, 0, x_196); lean_ctor_set(x_197, 1, x_195); -x_198 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_198 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_199 = lean_array_push(x_198, x_197); -x_200 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_200 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_201 = lean_array_push(x_199, x_200); x_202 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_202, 0, x_183); @@ -26525,9 +26525,9 @@ x_255 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_256 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_256, 0, x_255); lean_ctor_set(x_256, 1, x_254); -x_257 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_257 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_258 = lean_array_push(x_257, x_256); -x_259 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_259 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_260 = lean_array_push(x_258, x_259); x_261 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_261, 0, x_242); @@ -28341,9 +28341,9 @@ x_78 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed__ x_79 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_79, 0, x_78); lean_ctor_set(x_79, 1, x_77); -x_80 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_80 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_81 = lean_array_push(x_80, x_79); -x_82 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_82 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_83 = lean_array_push(x_81, x_82); x_84 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_84, 0, x_66); @@ -28562,9 +28562,9 @@ x_213 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_214 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_214, 0, x_213); lean_ctor_set(x_214, 1, x_212); -x_215 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_215 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_216 = lean_array_push(x_215, x_214); -x_217 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_217 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_218 = lean_array_push(x_216, x_217); x_219 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_219, 0, x_201); @@ -28796,9 +28796,9 @@ x_353 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_354 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_354, 0, x_353); lean_ctor_set(x_354, 1, x_352); -x_355 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_355 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_356 = lean_array_push(x_355, x_354); -x_357 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_357 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_358 = lean_array_push(x_356, x_357); x_359 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_359, 0, x_341); @@ -29018,9 +29018,9 @@ x_489 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_490 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_490, 0, x_489); lean_ctor_set(x_490, 1, x_488); -x_491 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_491 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_492 = lean_array_push(x_491, x_490); -x_493 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_493 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_494 = lean_array_push(x_492, x_493); x_495 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_495, 0, x_477); @@ -29253,9 +29253,9 @@ x_630 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_631 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_631, 0, x_630); lean_ctor_set(x_631, 1, x_629); -x_632 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_632 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_633 = lean_array_push(x_632, x_631); -x_634 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_634 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_635 = lean_array_push(x_633, x_634); x_636 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_636, 0, x_618); @@ -29518,9 +29518,9 @@ x_792 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_793 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_793, 0, x_792); lean_ctor_set(x_793, 1, x_791); -x_794 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_794 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_795 = lean_array_push(x_794, x_793); -x_796 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_796 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_797 = lean_array_push(x_795, x_796); x_798 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_798, 0, x_780); @@ -29827,9 +29827,9 @@ x_968 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed_ x_969 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_969, 0, x_968); lean_ctor_set(x_969, 1, x_967); -x_970 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_970 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_971 = lean_array_push(x_970, x_969); -x_972 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_972 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_973 = lean_array_push(x_971, x_972); x_974 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_974, 0, x_956); @@ -30138,9 +30138,9 @@ x_1153 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_elabKindPrio___closed x_1154 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_1154, 0, x_1153); lean_ctor_set(x_1154, 1, x_1152); -x_1155 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_1155 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_1156 = lean_array_push(x_1155, x_1154); -x_1157 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_1157 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_1158 = lean_array_push(x_1156, x_1157); x_1159 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_1159, 0, x_1141); diff --git a/stage0/stdlib/Lean/Meta/AppBuilder.c b/stage0/stdlib/Lean/Meta/AppBuilder.c index 8861ec0c1b..842b180fa3 100644 --- a/stage0/stdlib/Lean/Meta/AppBuilder.c +++ b/stage0/stdlib/Lean/Meta/AppBuilder.c @@ -312,7 +312,6 @@ lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkCongrFunImp___close lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkEqOfHEqImp___lambda__1___closed__2; lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppOptMAux_match__3___rarg(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Syntax_mkApp___closed__1; -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; lean_object* l_Lean_Meta_mkAppM_match__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqTrans___rarg(lean_object*, lean_object*, lean_object*); @@ -320,6 +319,7 @@ lean_object* l_Lean_setEnv___at_Lean_Meta_setInlineAttribute___spec__1(lean_obje lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkEqOfHEqImp___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkCongrImp_match__1(lean_object*); lean_object* l_List_map___at_Lean_MessageData_instCoeListExprMessageData___spec__1(lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkProjectionImp_match__5___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkCongrArgImp_match__1(lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); @@ -10981,7 +10981,7 @@ x_12 = lean_box(0); x_13 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_13, 0, x_3); lean_ctor_set(x_13, 1, x_12); -x_14 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_14 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_15 = l_Lean_mkConst(x_14, x_13); x_16 = l_Lean_mkApp(x_15, x_1); x_17 = l_Lean_mkApp(x_16, x_11); @@ -11000,7 +11000,7 @@ x_20 = lean_box(0); x_21 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_21, 0, x_3); lean_ctor_set(x_21, 1, x_20); -x_22 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_22 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_23 = l_Lean_mkConst(x_22, x_21); x_24 = l_Lean_mkApp(x_23, x_1); x_25 = l_Lean_mkApp(x_24, x_18); diff --git a/stage0/stdlib/Lean/Meta/Match/CaseArraySizes.c b/stage0/stdlib/Lean/Meta/Match/CaseArraySizes.c index 7b1619eb34..0d314c6b54 100644 --- a/stage0/stdlib/Lean/Meta/Match/CaseArraySizes.c +++ b/stage0/stdlib/Lean/Meta/Match/CaseArraySizes.c @@ -95,11 +95,11 @@ lean_object* l_Lean_Meta_FVarSubst_get(lean_object*, lean_object*); lean_object* l_Lean_Meta_getArrayArgType___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Syntax_mkApp___closed__1; lean_object* l___private_Lean_Meta_Match_CaseArraySizes_0__Lean_Meta_introArrayLit_loop___closed__2; -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; lean_object* l_Lean_Meta_assertExt(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_caseArraySizes_match__6(lean_object*); lean_object* l_Lean_Meta_instInhabitedCaseArraySizesSubgoal___closed__1; lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_caseArraySizes___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; lean_object* l_Lean_mkApp(lean_object*, lean_object*); lean_object* l_Lean_Meta_caseArraySizes_match__2(lean_object*); extern lean_object* l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; @@ -728,7 +728,7 @@ x_14 = lean_box(0); x_15 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_15, 0, x_9); lean_ctor_set(x_15, 1, x_14); -x_16 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_16 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_17 = l_Lean_mkConst(x_16, x_15); x_18 = l_Lean_mkApp(x_17, x_1); x_19 = l_Lean_mkApp(x_18, x_13); @@ -747,7 +747,7 @@ x_22 = lean_box(0); x_23 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_23, 0, x_9); lean_ctor_set(x_23, 1, x_22); -x_24 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_24 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_25 = l_Lean_mkConst(x_24, x_23); x_26 = l_Lean_mkApp(x_25, x_1); x_27 = l_Lean_mkApp(x_26, x_20); diff --git a/stage0/stdlib/Lean/Parser/Basic.c b/stage0/stdlib/Lean/Parser/Basic.c index fd1244e41f..bd36b9a4e1 100644 --- a/stage0/stdlib/Lean/Parser/Basic.c +++ b/stage0/stdlib/Lean/Parser/Basic.c @@ -799,7 +799,6 @@ uint8_t l_Lean_isIdFirst(uint32_t); uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_Parser_takeWhile1Fn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_instInhabitedParserFn___rarg___boxed(lean_object*); -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* l_Lean_Parser_errorFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_identEqFn_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_many1Unbox(lean_object*); @@ -884,6 +883,7 @@ lean_object* l_Lean_Parser_ParserState_mkEOIError(lean_object*); lean_object* l_Lean_Parser_checkLineEqFn_match__1(lean_object*); lean_object* l_Lean_Parser_unicodeSymbolFnAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___rarg(lean_object*, lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_Parser_indexed___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParserOfStackFn(lean_object*, lean_object*, lean_object*); @@ -4686,7 +4686,7 @@ _start: lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; x_5 = lean_ctor_get(x_4, 0); lean_inc(x_5); -x_6 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_5); +x_6 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_5); lean_dec(x_5); x_7 = lean_apply_1(x_1, x_6); x_8 = lean_unbox(x_7); @@ -7392,7 +7392,7 @@ if (lean_obj_tag(x_6) == 0) lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; x_7 = lean_ctor_get(x_5, 0); lean_inc(x_7); -x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_7); +x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_7); lean_dec(x_7); x_9 = l_Lean_Parser_ParserState_popSyntax(x_5); x_10 = lean_apply_1(x_2, x_8); @@ -10372,7 +10372,7 @@ lean_object* x_11; lean_object* x_12; lean_dec(x_1); x_11 = lean_ctor_get(x_9, 0); lean_inc(x_11); -x_12 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_11); +x_12 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_11); lean_dec(x_11); if (lean_obj_tag(x_12) == 3) { @@ -10615,7 +10615,7 @@ x_12 = lean_ctor_get(x_2, 1); lean_dec(x_12); x_13 = lean_ctor_get(x_2, 0); lean_dec(x_13); -x_14 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_4); +x_14 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_4); lean_inc(x_5); x_15 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_15, 0, x_1); @@ -10630,7 +10630,7 @@ else { lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_dec(x_2); -x_17 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_4); +x_17 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_4); lean_inc(x_5); x_18 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_18, 0, x_1); @@ -10735,7 +10735,7 @@ if (lean_obj_tag(x_7) == 0) lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_8 = lean_ctor_get(x_6, 0); lean_inc(x_8); -x_9 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_8); +x_9 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_8); lean_dec(x_8); x_10 = l_Lean_Parser_ParserState_restore(x_6, x_4, x_5); lean_dec(x_4); @@ -10874,7 +10874,7 @@ if (lean_obj_tag(x_7) == 0) lean_object* x_8; lean_object* x_9; x_8 = lean_ctor_get(x_6, 0); lean_inc(x_8); -x_9 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_8); +x_9 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_8); lean_dec(x_8); if (lean_obj_tag(x_9) == 2) { @@ -10935,7 +10935,7 @@ if (lean_obj_tag(x_9) == 0) lean_object* x_10; lean_object* x_11; x_10 = lean_ctor_get(x_8, 0); lean_inc(x_10); -x_11 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_10); +x_11 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_10); lean_dec(x_10); if (lean_obj_tag(x_11) == 2) { @@ -11150,7 +11150,7 @@ if (lean_obj_tag(x_7) == 0) lean_object* x_8; lean_object* x_9; x_8 = lean_ctor_get(x_6, 0); lean_inc(x_8); -x_9 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_8); +x_9 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_8); lean_dec(x_8); switch (lean_obj_tag(x_9)) { case 2: @@ -11580,7 +11580,7 @@ _start: lean_object* x_4; lean_object* x_5; uint8_t x_6; x_4 = lean_ctor_get(x_3, 0); lean_inc(x_4); -x_5 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_4); +x_5 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_4); lean_dec(x_4); x_6 = l_Lean_Parser_checkTailWs(x_5); lean_dec(x_5); @@ -11929,7 +11929,7 @@ if (lean_obj_tag(x_8) == 0) lean_object* x_9; lean_object* x_10; x_9 = lean_ctor_get(x_7, 0); lean_inc(x_9); -x_10 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_9); +x_10 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_9); lean_dec(x_9); if (lean_obj_tag(x_10) == 2) { @@ -12199,7 +12199,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); +x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_6); lean_dec(x_6); x_8 = l_Lean_numLitKind; x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); @@ -12285,7 +12285,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); +x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_6); lean_dec(x_6); x_8 = l_Lean_scientificLitKind; x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); @@ -12371,7 +12371,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); +x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_6); lean_dec(x_6); x_8 = l_Lean_strLitKind; x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); @@ -12457,7 +12457,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); +x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_6); lean_dec(x_6); x_8 = l_Lean_charLitKind; x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); @@ -12543,7 +12543,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); +x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_6); lean_dec(x_6); x_8 = l_Lean_nameLitKind; x_9 = l_Lean_Syntax_isOfKind(x_7, x_8); @@ -12629,7 +12629,7 @@ if (lean_obj_tag(x_5) == 0) lean_object* x_6; lean_object* x_7; uint8_t x_8; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); +x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_6); lean_dec(x_6); x_8 = l_Lean_Syntax_isIdent(x_7); lean_dec(x_7); @@ -12779,7 +12779,7 @@ if (lean_obj_tag(x_6) == 0) lean_object* x_7; lean_object* x_8; x_7 = lean_ctor_get(x_5, 0); lean_inc(x_7); -x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_7); +x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_7); lean_dec(x_7); if (lean_obj_tag(x_8) == 3) { @@ -13213,7 +13213,7 @@ lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_obj x_4 = lean_ctor_get(x_1, 0); x_5 = lean_ctor_get(x_1, 3); lean_dec(x_5); -x_6 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_4); +x_6 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_4); x_7 = l_Array_shrink___rarg(x_4, x_2); x_8 = lean_array_push(x_7, x_6); x_9 = lean_box(0); @@ -13231,7 +13231,7 @@ lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_dec(x_1); -x_13 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_10); +x_13 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_10); x_14 = l_Array_shrink___rarg(x_10, x_2); x_15 = lean_array_push(x_14, x_13); x_16 = lean_box(0); @@ -13397,7 +13397,7 @@ return x_26; else { lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_20); +x_27 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_20); lean_dec(x_20); x_28 = l_Lean_Parser_ParserState_shrinkStack(x_18, x_6); lean_dec(x_6); @@ -13643,7 +13643,7 @@ lean_dec(x_9); lean_dec(x_4); x_40 = lean_ctor_get(x_14, 0); lean_inc(x_40); -x_41 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_40); +x_41 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_40); lean_dec(x_40); x_42 = l_Lean_Parser_ParserState_shrinkStack(x_14, x_2); x_43 = l_Lean_Parser_ParserState_pushSyntax(x_42, x_41); @@ -26817,7 +26817,7 @@ _start: lean_object* x_3; lean_object* x_4; uint8_t x_5; x_3 = lean_ctor_get(x_2, 0); lean_inc(x_3); -x_4 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_3); +x_4 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_3); lean_dec(x_3); x_5 = l_Lean_Parser_checkTailNoWs(x_4); lean_dec(x_4); @@ -29463,7 +29463,7 @@ lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_obj x_3 = l___private_Lean_Parser_Basic_0__Lean_Parser_mkResult(x_1, x_2); x_4 = lean_ctor_get(x_3, 0); lean_inc(x_4); -x_5 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_4); +x_5 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_4); lean_dec(x_4); x_6 = l_Lean_Parser_ParserState_popSyntax(x_3); x_7 = l_Lean_Parser_ParserState_popSyntax(x_6); @@ -29513,7 +29513,7 @@ if (x_9 == 0) lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; x_10 = lean_ctor_get(x_7, 0); lean_inc(x_10); -x_11 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_10); +x_11 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_10); x_12 = lean_array_get_size(x_10); lean_dec(x_10); x_13 = lean_ctor_get(x_7, 1); @@ -29568,7 +29568,7 @@ if (x_22 == 0) lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; x_23 = lean_ctor_get(x_7, 0); lean_inc(x_23); -x_24 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_23); +x_24 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_23); x_25 = lean_array_get_size(x_23); lean_dec(x_23); x_26 = lean_ctor_get(x_7, 1); diff --git a/stage0/stdlib/Lean/Parser/Extension.c b/stage0/stdlib/Lean/Parser/Extension.c index f46d49a7f3..e17e2447a0 100644 --- a/stage0/stdlib/Lean/Parser/Extension.c +++ b/stage0/stdlib/Lean/Parser/Extension.c @@ -496,7 +496,6 @@ lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_ob lean_object* l___private_Lean_Parser_Extension_0__Lean_Parser_throwParserCategoryAlreadyDefined___rarg___closed__1; lean_object* l_Lean_Parser_mkParserOfConstant(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Extension_0__Lean_Parser_addTrailingParserAux(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* lean_io_initializing(lean_object*); lean_object* l_Lean_Parser_getConstAlias___rarg___closed__3; lean_object* l_Lean_ScopedEnvExtension_add___at___private_Lean_Parser_Extension_0__Lean_Parser_ParserAttribute_add___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -537,6 +536,7 @@ lean_object* l_Lean_registerAttributeImplBuilder(lean_object*, lean_object*, lea lean_object* l_Lean_Parser_ParserState_mkUnexpectedError(lean_object*, lean_object*); lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extension___hyg_3652____closed__2; lean_object* l_Lean_Parser_getSyntaxNodeKinds___boxed(lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l___private_Lean_Parser_Extension_0__Lean_Parser_ParserExtension_OLeanEntry_toEntry_match__2(lean_object*); lean_object* l_IO_ofExcept___at_Lean_KeyedDeclsAttribute_declareBuiltin___spec__1(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_containsAux___at_Lean_Parser_isValidSyntaxNodeKind___spec__2___boxed(lean_object*, lean_object*, lean_object*); @@ -10099,7 +10099,7 @@ lean_dec(x_9); x_20 = lean_ctor_get(x_12, 0); lean_inc(x_20); lean_dec(x_12); -x_21 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_20); +x_21 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_20); lean_dec(x_20); x_22 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_22, 0, x_21); diff --git a/stage0/stdlib/Lean/Parser/Module.c b/stage0/stdlib/Lean/Parser/Module.c index 6a7288474e..9e81ecb1ec 100644 --- a/stage0/stdlib/Lean/Parser/Module.c +++ b/stage0/stdlib/Lean/Parser/Module.c @@ -275,7 +275,6 @@ uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_import___closed__5; lean_object* l_Lean_Parser_Module_module_parenthesizer___closed__3; lean_object* l_Lean_Parser_Module_header_formatter___closed__3; -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* l_Lean_Parser_errorFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_module___elambda__1___closed__7; lean_object* l_Lean_Parser_Module_prelude___elambda__1(lean_object*, lean_object*); @@ -302,6 +301,7 @@ lean_object* l_Lean_Parser_Module_import_formatter___closed__1; extern lean_object* l_Lean_initFn____x40_Lean_Parser_Extra___hyg_1069____closed__11; lean_object* l_Lean_Message_toString(lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_prelude___elambda__1___closed__8; +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_Parser_Module_import___elambda__1___closed__3; lean_object* l_Lean_Parser_Module_updateTokens_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_header_formatter___closed__10; @@ -2419,7 +2419,7 @@ lean_inc(x_11); x_16 = l_Lean_Parser_Module_header___elambda__1(x_11, x_15); x_17 = lean_ctor_get(x_16, 0); lean_inc(x_17); -x_18 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_17); +x_18 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_17); lean_dec(x_17); x_19 = lean_ctor_get(x_16, 3); lean_inc(x_19); @@ -2501,7 +2501,7 @@ lean_inc(x_42); x_47 = l_Lean_Parser_Module_header___elambda__1(x_42, x_46); x_48 = lean_ctor_get(x_47, 0); lean_inc(x_48); -x_49 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_48); +x_49 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_48); lean_dec(x_48); x_50 = lean_ctor_get(x_47, 3); lean_inc(x_50); @@ -2886,7 +2886,7 @@ lean_dec(x_2); lean_dec(x_1); x_19 = lean_ctor_get(x_17, 0); lean_inc(x_19); -x_20 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_19); +x_20 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_19); lean_dec(x_19); x_21 = lean_ctor_get(x_17, 1); lean_inc(x_21); @@ -3004,7 +3004,7 @@ lean_dec(x_2); lean_dec(x_1); x_51 = lean_ctor_get(x_49, 0); lean_inc(x_51); -x_52 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_51); +x_52 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_51); lean_dec(x_51); x_53 = lean_ctor_get(x_49, 1); lean_inc(x_53); diff --git a/stage0/stdlib/Lean/Parser/Term.c b/stage0/stdlib/Lean/Parser/Term.c index 6cb0553dd2..3b071887bd 100644 --- a/stage0/stdlib/Lean/Parser/Term.c +++ b/stage0/stdlib/Lean/Parser/Term.c @@ -3094,7 +3094,6 @@ lean_object* l_Lean_Parser_Term_matchAlt_formatter___closed__2; lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__13; lean_object* l_Lean_Parser_Term_namedPattern___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_structInst_formatter___closed__20; -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* l_Lean_Parser_Term_structInstField_parenthesizer___closed__4; lean_object* l_Lean_Parser_Term_whereDecls_formatter___closed__12; lean_object* l_Lean_Parser_Term_sort_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -3450,6 +3449,7 @@ lean_object* l_Lean_Parser_Term_ensureExpectedType___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_let_x21___elambda__1___closed__2; lean_object* l_Lean_Parser_Tactic_quot___elambda__1___closed__11; lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__4; +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_Parser_Term_bracketedBinder_formatter(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_matchDiscr___elambda__1___closed__15; lean_object* l_Lean_Parser_Term_let_x21_formatter___closed__2; @@ -36684,7 +36684,7 @@ lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_35; uint8_ x_8 = lean_ctor_get(x_6, 0); lean_inc(x_8); x_9 = lean_array_get_size(x_8); -x_35 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_8); +x_35 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_8); lean_dec(x_8); x_36 = l_Lean_Parser_Term_isIdent(x_35); lean_dec(x_35); @@ -37181,7 +37181,7 @@ lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; x_6 = lean_ctor_get(x_4, 0); lean_inc(x_6); x_7 = lean_array_get_size(x_6); -x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); +x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_6); lean_dec(x_6); x_9 = l_Lean_Parser_Term_isIdent(x_8); lean_dec(x_8); diff --git a/stage0/stdlib/Lean/Parser/Transform.c b/stage0/stdlib/Lean/Parser/Transform.c deleted file mode 100644 index 20fdad9442..0000000000 --- a/stage0/stdlib/Lean/Parser/Transform.c +++ /dev/null @@ -1,1586 +0,0 @@ -// Lean compiler output -// Module: Lean.Parser.Transform -// Imports: Init Lean.Parser.Basic -#include -#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* lean_array_set(lean_object*, lean_object*, lean_object*); -lean_object* l_Std_Range_forIn_loop___at_Lean_Syntax_manyToSepBy___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -uint8_t lean_name_eq(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_Syntax_setTailInfo(lean_object*, lean_object*); -lean_object* lean_string_utf8_extract(lean_object*, lean_object*, lean_object*); -extern lean_object* l_myMacro____x40_Init_Notation___hyg_9203____closed__8; -lean_object* lean_string_utf8_byte_size(lean_object*); -lean_object* lean_nat_add(lean_object*, lean_object*); -lean_object* l_Lean_Syntax_removeParen_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Syntax_manyToSepBy_match__1(lean_object*); -uint8_t lean_nat_dec_eq(lean_object*, lean_object*); -lean_object* lean_nat_sub(lean_object*, lean_object*); -lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_instInhabitedSourceInfo___closed__1; -lean_object* l_Std_Range_forIn_loop___at_Lean_Syntax_manyToSepBy___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_instInhabitedSyntax; -lean_object* l_Lean_Syntax_manyToSepBy(lean_object*, lean_object*); -lean_object* l_Lean_Syntax_getNumArgs(lean_object*); -uint8_t lean_nat_dec_le(lean_object*, lean_object*); -lean_object* l_Lean_Syntax_manyToSepBy_match__2(lean_object*); -extern lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Environment_displayStats___spec__8___closed__3; -lean_object* l_Lean_Syntax_removeParen(lean_object*); -uint8_t l_Lean_Syntax_isNone(lean_object*); -lean_object* l_Lean_Syntax_getTailInfo(lean_object*); -extern lean_object* l_myMacro____x40_Init_Notation___hyg_9203____closed__21; -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); -lean_object* l_Lean_Syntax_manyToSepBy_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); -extern lean_object* l_Lean_mkOptionalNode___closed__2; -lean_object* l_Lean_Syntax_removeParen_match__1(lean_object*); -lean_object* l_Lean_Syntax_manyToSepBy_match__2___rarg(lean_object*, lean_object*, lean_object*); -uint8_t lean_string_dec_eq(lean_object*, lean_object*); -lean_object* l_Lean_Syntax_manyToSepBy_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; lean_object* x_5; -lean_dec(x_2); -x_4 = lean_box(0); -x_5 = lean_apply_1(x_3, x_4); -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; -lean_dec(x_3); -x_6 = lean_ctor_get(x_1, 0); -lean_inc(x_6); -lean_dec(x_1); -x_7 = lean_apply_1(x_2, x_6); -return x_7; -} -} -} -lean_object* l_Lean_Syntax_manyToSepBy_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_manyToSepBy_match__1___rarg), 3, 0); -return x_2; -} -} -lean_object* l_Lean_Syntax_manyToSepBy_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 1) -{ -lean_object* x_4; lean_object* x_5; lean_object* x_6; -lean_dec(x_3); -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 = lean_apply_2(x_2, x_4, x_5); -return x_6; -} -else -{ -lean_object* x_7; -lean_dec(x_2); -x_7 = lean_apply_1(x_3, x_1); -return x_7; -} -} -} -lean_object* l_Lean_Syntax_manyToSepBy_match__2(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_manyToSepBy_match__2___rarg), 3, 0); -return x_2; -} -} -lean_object* l_Std_Range_forIn_loop___at_Lean_Syntax_manyToSepBy___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; uint8_t x_8; -x_7 = lean_ctor_get(x_3, 1); -x_8 = lean_nat_dec_le(x_7, x_5); -if (x_8 == 0) -{ -lean_object* x_9; uint8_t x_10; -x_9 = lean_unsigned_to_nat(0u); -x_10 = lean_nat_dec_eq(x_4, x_9); -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; -x_11 = lean_unsigned_to_nat(1u); -x_12 = lean_nat_sub(x_4, x_11); -lean_dec(x_4); -x_13 = l_Lean_instInhabitedSyntax; -x_14 = lean_array_get(x_13, x_2, x_5); -x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); -x_16 = l_Lean_Syntax_getTailInfo(x_15); -if (lean_obj_tag(x_16) == 0) -{ -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_15); -x_17 = l_Lean_instInhabitedSourceInfo___closed__1; -lean_inc(x_1); -x_18 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_1); -x_19 = lean_array_push(x_6, x_18); -x_20 = lean_array_push(x_19, x_14); -x_21 = lean_ctor_get(x_3, 2); -x_22 = lean_nat_add(x_5, x_21); -lean_dec(x_5); -x_4 = x_12; -x_5 = x_22; -x_6 = x_20; -goto _start; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_24 = lean_ctor_get(x_16, 0); -lean_inc(x_24); -lean_dec(x_16); -x_25 = lean_array_get_size(x_6); -x_26 = lean_nat_sub(x_25, x_11); -lean_dec(x_25); -x_27 = lean_array_set(x_6, x_26, x_15); -lean_dec(x_26); -lean_inc(x_1); -x_28 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_28, 0, x_24); -lean_ctor_set(x_28, 1, x_1); -x_29 = lean_array_push(x_27, x_28); -x_30 = lean_array_push(x_29, x_14); -x_31 = lean_ctor_get(x_3, 2); -x_32 = lean_nat_add(x_5, x_31); -lean_dec(x_5); -x_4 = x_12; -x_5 = x_32; -x_6 = x_30; -goto _start; -} -} -else -{ -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -return x_6; -} -} -else -{ -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -return x_6; -} -} -} -lean_object* l_Lean_Syntax_manyToSepBy(lean_object* x_1, lean_object* x_2) { -_start: -{ -if (lean_obj_tag(x_1) == 1) -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; -x_3 = lean_ctor_get(x_1, 0); -lean_inc(x_3); -x_4 = lean_ctor_get(x_1, 1); -lean_inc(x_4); -x_5 = lean_array_get_size(x_4); -x_6 = lean_unsigned_to_nat(0u); -x_7 = lean_nat_dec_eq(x_5, x_6); -if (x_7 == 0) -{ -uint8_t x_8; -x_8 = !lean_is_exclusive(x_1); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_9 = lean_ctor_get(x_1, 1); -lean_dec(x_9); -x_10 = lean_ctor_get(x_1, 0); -lean_dec(x_10); -x_11 = l_Lean_instInhabitedSyntax; -x_12 = lean_array_get(x_11, x_4, x_6); -x_13 = l_Lean_mkOptionalNode___closed__2; -x_14 = lean_array_push(x_13, x_12); -x_15 = lean_unsigned_to_nat(1u); -lean_inc(x_5); -x_16 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_5); -lean_ctor_set(x_16, 2, x_15); -x_17 = l_Std_Range_forIn_loop___at_Lean_Syntax_manyToSepBy___spec__1(x_2, x_4, x_16, x_5, x_15, x_14); -lean_dec(x_16); -lean_dec(x_4); -lean_ctor_set(x_1, 1, x_17); -return x_1; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -lean_dec(x_1); -x_18 = l_Lean_instInhabitedSyntax; -x_19 = lean_array_get(x_18, x_4, x_6); -x_20 = l_Lean_mkOptionalNode___closed__2; -x_21 = lean_array_push(x_20, x_19); -x_22 = lean_unsigned_to_nat(1u); -lean_inc(x_5); -x_23 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_5); -lean_ctor_set(x_23, 2, x_22); -x_24 = l_Std_Range_forIn_loop___at_Lean_Syntax_manyToSepBy___spec__1(x_2, x_4, x_23, x_5, x_22, x_21); -lean_dec(x_23); -lean_dec(x_4); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_3); -lean_ctor_set(x_25, 1, x_24); -return x_25; -} -} -else -{ -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_1; -} -} -else -{ -lean_dec(x_2); -return x_1; -} -} -} -lean_object* l_Std_Range_forIn_loop___at_Lean_Syntax_manyToSepBy___spec__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_Std_Range_forIn_loop___at_Lean_Syntax_manyToSepBy___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_3); -lean_dec(x_2); -return x_7; -} -} -lean_object* l_Lean_Syntax_removeParen_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -if (lean_obj_tag(x_1) == 2) -{ -lean_object* x_5; lean_object* x_6; -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -if (lean_obj_tag(x_6) == 0) -{ -lean_object* x_7; -x_7 = lean_ctor_get(x_5, 1); -lean_inc(x_7); -if (lean_obj_tag(x_7) == 0) -{ -lean_object* x_8; -x_8 = lean_ctor_get(x_5, 2); -lean_inc(x_8); -if (lean_obj_tag(x_8) == 0) -{ -uint8_t x_9; -lean_dec(x_3); -x_9 = !lean_is_exclusive(x_5); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; -x_10 = lean_ctor_get(x_5, 2); -lean_dec(x_10); -x_11 = lean_ctor_get(x_5, 1); -lean_dec(x_11); -x_12 = lean_ctor_get(x_5, 0); -lean_dec(x_12); -x_13 = !lean_is_exclusive(x_1); -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_1, 0); -lean_dec(x_14); -lean_ctor_set(x_5, 0, x_8); -x_15 = lean_apply_2(x_4, x_1, x_2); -return x_15; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_16 = lean_ctor_get(x_1, 1); -lean_inc(x_16); -lean_dec(x_1); -lean_ctor_set(x_5, 0, x_8); -x_17 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_17, 0, x_5); -lean_ctor_set(x_17, 1, x_16); -x_18 = lean_apply_2(x_4, x_17, x_2); -return x_18; -} -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_5); -x_19 = lean_ctor_get(x_1, 1); -lean_inc(x_19); -if (lean_is_exclusive(x_1)) { - lean_ctor_release(x_1, 0); - lean_ctor_release(x_1, 1); - x_20 = x_1; -} else { - lean_dec_ref(x_1); - x_20 = lean_box(0); -} -x_21 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_21, 0, x_8); -lean_ctor_set(x_21, 1, x_7); -lean_ctor_set(x_21, 2, x_8); -if (lean_is_scalar(x_20)) { - x_22 = lean_alloc_ctor(2, 2, 0); -} else { - x_22 = x_20; -} -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_22, 1, x_19); -x_23 = lean_apply_2(x_4, x_22, x_2); -return x_23; -} -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; -x_24 = lean_ctor_get(x_1, 1); -lean_inc(x_24); -x_25 = lean_ctor_get(x_8, 0); -lean_inc(x_25); -x_26 = l_myMacro____x40_Init_Notation___hyg_9203____closed__21; -x_27 = lean_string_dec_eq(x_24, x_26); -lean_dec(x_24); -if (x_27 == 0) -{ -lean_object* x_28; -lean_dec(x_25); -lean_dec(x_8); -lean_dec(x_5); -lean_dec(x_3); -x_28 = lean_apply_2(x_4, x_1, x_2); -return x_28; -} -else -{ -uint8_t x_29; -x_29 = !lean_is_exclusive(x_1); -if (x_29 == 0) -{ -lean_object* x_30; lean_object* x_31; -x_30 = lean_ctor_get(x_1, 1); -lean_dec(x_30); -x_31 = lean_ctor_get(x_1, 0); -lean_dec(x_31); -if (lean_obj_tag(x_2) == 0) -{ -lean_object* x_32; -lean_dec(x_25); -lean_dec(x_8); -lean_dec(x_3); -lean_ctor_set(x_1, 1, x_26); -x_32 = lean_apply_2(x_4, x_1, x_2); -return x_32; -} -else -{ -lean_object* x_33; lean_object* x_34; -x_33 = lean_ctor_get(x_2, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_33, 0); -lean_inc(x_34); -if (lean_obj_tag(x_34) == 0) -{ -uint8_t x_35; -x_35 = !lean_is_exclusive(x_5); -if (x_35 == 0) -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_5, 2); -lean_dec(x_36); -x_37 = lean_ctor_get(x_5, 1); -lean_dec(x_37); -x_38 = lean_ctor_get(x_5, 0); -lean_dec(x_38); -x_39 = lean_ctor_get(x_33, 1); -lean_inc(x_39); -if (lean_obj_tag(x_39) == 0) -{ -uint8_t x_40; -x_40 = !lean_is_exclusive(x_2); -if (x_40 == 0) -{ -lean_object* x_41; lean_object* x_42; -x_41 = lean_ctor_get(x_2, 0); -lean_dec(x_41); -x_42 = lean_ctor_get(x_33, 2); -lean_inc(x_42); -if (lean_obj_tag(x_42) == 0) -{ -uint8_t x_43; -lean_dec(x_25); -lean_dec(x_3); -x_43 = !lean_is_exclusive(x_33); -if (x_43 == 0) -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_44 = lean_ctor_get(x_33, 2); -lean_dec(x_44); -x_45 = lean_ctor_get(x_33, 1); -lean_dec(x_45); -x_46 = lean_ctor_get(x_33, 0); -lean_dec(x_46); -lean_ctor_set(x_33, 2, x_8); -lean_ctor_set(x_33, 0, x_42); -lean_ctor_set(x_1, 1, x_26); -lean_ctor_set(x_1, 0, x_33); -lean_ctor_set(x_5, 2, x_42); -lean_ctor_set(x_5, 1, x_39); -lean_ctor_set(x_5, 0, x_42); -lean_ctor_set(x_2, 0, x_5); -x_47 = lean_apply_2(x_4, x_1, x_2); -return x_47; -} -else -{ -lean_object* x_48; lean_object* x_49; -lean_dec(x_33); -x_48 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_48, 0, x_42); -lean_ctor_set(x_48, 1, x_39); -lean_ctor_set(x_48, 2, x_8); -lean_ctor_set(x_1, 1, x_26); -lean_ctor_set(x_1, 0, x_48); -lean_ctor_set(x_5, 2, x_42); -lean_ctor_set(x_5, 1, x_39); -lean_ctor_set(x_5, 0, x_42); -lean_ctor_set(x_2, 0, x_5); -x_49 = lean_apply_2(x_4, x_1, x_2); -return x_49; -} -} -else -{ -lean_object* x_50; lean_object* x_51; -lean_free_object(x_2); -lean_free_object(x_5); -lean_free_object(x_1); -lean_dec(x_8); -lean_dec(x_4); -x_50 = lean_ctor_get(x_42, 0); -lean_inc(x_50); -lean_dec(x_42); -x_51 = lean_apply_3(x_3, x_25, x_33, x_50); -return x_51; -} -} -else -{ -lean_object* x_52; -lean_dec(x_2); -x_52 = lean_ctor_get(x_33, 2); -lean_inc(x_52); -if (lean_obj_tag(x_52) == 0) -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -lean_dec(x_25); -lean_dec(x_3); -if (lean_is_exclusive(x_33)) { - lean_ctor_release(x_33, 0); - lean_ctor_release(x_33, 1); - lean_ctor_release(x_33, 2); - x_53 = x_33; -} else { - lean_dec_ref(x_33); - x_53 = lean_box(0); -} -if (lean_is_scalar(x_53)) { - x_54 = lean_alloc_ctor(0, 3, 0); -} else { - x_54 = x_53; -} -lean_ctor_set(x_54, 0, x_52); -lean_ctor_set(x_54, 1, x_39); -lean_ctor_set(x_54, 2, x_8); -lean_ctor_set(x_1, 1, x_26); -lean_ctor_set(x_1, 0, x_54); -lean_ctor_set(x_5, 2, x_52); -lean_ctor_set(x_5, 1, x_39); -lean_ctor_set(x_5, 0, x_52); -x_55 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_55, 0, x_5); -x_56 = lean_apply_2(x_4, x_1, x_55); -return x_56; -} -else -{ -lean_object* x_57; lean_object* x_58; -lean_free_object(x_5); -lean_free_object(x_1); -lean_dec(x_8); -lean_dec(x_4); -x_57 = lean_ctor_get(x_52, 0); -lean_inc(x_57); -lean_dec(x_52); -x_58 = lean_apply_3(x_3, x_25, x_33, x_57); -return x_58; -} -} -} -else -{ -uint8_t x_59; -lean_dec(x_39); -lean_free_object(x_5); -lean_dec(x_25); -lean_dec(x_3); -x_59 = !lean_is_exclusive(x_33); -if (x_59 == 0) -{ -lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_60 = lean_ctor_get(x_33, 2); -lean_dec(x_60); -x_61 = lean_ctor_get(x_33, 1); -lean_dec(x_61); -x_62 = lean_ctor_get(x_33, 0); -lean_dec(x_62); -lean_ctor_set(x_33, 2, x_8); -lean_ctor_set(x_33, 1, x_7); -lean_ctor_set(x_1, 1, x_26); -lean_ctor_set(x_1, 0, x_33); -x_63 = lean_apply_2(x_4, x_1, x_2); -return x_63; -} -else -{ -lean_object* x_64; lean_object* x_65; -lean_dec(x_33); -x_64 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_64, 0, x_34); -lean_ctor_set(x_64, 1, x_7); -lean_ctor_set(x_64, 2, x_8); -lean_ctor_set(x_1, 1, x_26); -lean_ctor_set(x_1, 0, x_64); -x_65 = lean_apply_2(x_4, x_1, x_2); -return x_65; -} -} -} -else -{ -lean_object* x_66; -lean_dec(x_5); -x_66 = lean_ctor_get(x_33, 1); -lean_inc(x_66); -if (lean_obj_tag(x_66) == 0) -{ -lean_object* x_67; lean_object* x_68; -if (lean_is_exclusive(x_2)) { - lean_ctor_release(x_2, 0); - x_67 = x_2; -} else { - lean_dec_ref(x_2); - x_67 = lean_box(0); -} -x_68 = lean_ctor_get(x_33, 2); -lean_inc(x_68); -if (lean_obj_tag(x_68) == 0) -{ -lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; -lean_dec(x_25); -lean_dec(x_3); -if (lean_is_exclusive(x_33)) { - lean_ctor_release(x_33, 0); - lean_ctor_release(x_33, 1); - lean_ctor_release(x_33, 2); - x_69 = x_33; -} else { - lean_dec_ref(x_33); - x_69 = lean_box(0); -} -if (lean_is_scalar(x_69)) { - x_70 = lean_alloc_ctor(0, 3, 0); -} else { - x_70 = x_69; -} -lean_ctor_set(x_70, 0, x_68); -lean_ctor_set(x_70, 1, x_66); -lean_ctor_set(x_70, 2, x_8); -lean_ctor_set(x_1, 1, x_26); -lean_ctor_set(x_1, 0, x_70); -x_71 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_71, 0, x_68); -lean_ctor_set(x_71, 1, x_66); -lean_ctor_set(x_71, 2, x_68); -if (lean_is_scalar(x_67)) { - x_72 = lean_alloc_ctor(1, 1, 0); -} else { - x_72 = x_67; -} -lean_ctor_set(x_72, 0, x_71); -x_73 = lean_apply_2(x_4, x_1, x_72); -return x_73; -} -else -{ -lean_object* x_74; lean_object* x_75; -lean_dec(x_67); -lean_free_object(x_1); -lean_dec(x_8); -lean_dec(x_4); -x_74 = lean_ctor_get(x_68, 0); -lean_inc(x_74); -lean_dec(x_68); -x_75 = lean_apply_3(x_3, x_25, x_33, x_74); -return x_75; -} -} -else -{ -lean_object* x_76; lean_object* x_77; lean_object* x_78; -lean_dec(x_66); -lean_dec(x_25); -lean_dec(x_3); -if (lean_is_exclusive(x_33)) { - lean_ctor_release(x_33, 0); - lean_ctor_release(x_33, 1); - lean_ctor_release(x_33, 2); - x_76 = x_33; -} else { - lean_dec_ref(x_33); - x_76 = lean_box(0); -} -if (lean_is_scalar(x_76)) { - x_77 = lean_alloc_ctor(0, 3, 0); -} else { - x_77 = x_76; -} -lean_ctor_set(x_77, 0, x_34); -lean_ctor_set(x_77, 1, x_7); -lean_ctor_set(x_77, 2, x_8); -lean_ctor_set(x_1, 1, x_26); -lean_ctor_set(x_1, 0, x_77); -x_78 = lean_apply_2(x_4, x_1, x_2); -return x_78; -} -} -} -else -{ -lean_object* x_79; -lean_dec(x_34); -lean_dec(x_33); -lean_dec(x_25); -lean_dec(x_8); -lean_dec(x_3); -lean_ctor_set(x_1, 1, x_26); -x_79 = lean_apply_2(x_4, x_1, x_2); -return x_79; -} -} -} -else -{ -lean_dec(x_1); -if (lean_obj_tag(x_2) == 0) -{ -lean_object* x_80; lean_object* x_81; -lean_dec(x_25); -lean_dec(x_8); -lean_dec(x_3); -x_80 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_80, 0, x_5); -lean_ctor_set(x_80, 1, x_26); -x_81 = lean_apply_2(x_4, x_80, x_2); -return x_81; -} -else -{ -lean_object* x_82; lean_object* x_83; -x_82 = lean_ctor_get(x_2, 0); -lean_inc(x_82); -x_83 = lean_ctor_get(x_82, 0); -lean_inc(x_83); -if (lean_obj_tag(x_83) == 0) -{ -lean_object* x_84; lean_object* x_85; -if (lean_is_exclusive(x_5)) { - lean_ctor_release(x_5, 0); - lean_ctor_release(x_5, 1); - lean_ctor_release(x_5, 2); - x_84 = x_5; -} else { - lean_dec_ref(x_5); - x_84 = lean_box(0); -} -x_85 = lean_ctor_get(x_82, 1); -lean_inc(x_85); -if (lean_obj_tag(x_85) == 0) -{ -lean_object* x_86; lean_object* x_87; -if (lean_is_exclusive(x_2)) { - lean_ctor_release(x_2, 0); - x_86 = x_2; -} else { - lean_dec_ref(x_2); - x_86 = lean_box(0); -} -x_87 = lean_ctor_get(x_82, 2); -lean_inc(x_87); -if (lean_obj_tag(x_87) == 0) -{ -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_dec(x_25); -lean_dec(x_3); -if (lean_is_exclusive(x_82)) { - lean_ctor_release(x_82, 0); - lean_ctor_release(x_82, 1); - lean_ctor_release(x_82, 2); - x_88 = x_82; -} else { - lean_dec_ref(x_82); - x_88 = lean_box(0); -} -if (lean_is_scalar(x_88)) { - x_89 = lean_alloc_ctor(0, 3, 0); -} else { - x_89 = x_88; -} -lean_ctor_set(x_89, 0, x_87); -lean_ctor_set(x_89, 1, x_85); -lean_ctor_set(x_89, 2, x_8); -x_90 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_90, 0, x_89); -lean_ctor_set(x_90, 1, x_26); -if (lean_is_scalar(x_84)) { - x_91 = lean_alloc_ctor(0, 3, 0); -} else { - x_91 = x_84; -} -lean_ctor_set(x_91, 0, x_87); -lean_ctor_set(x_91, 1, x_85); -lean_ctor_set(x_91, 2, x_87); -if (lean_is_scalar(x_86)) { - x_92 = lean_alloc_ctor(1, 1, 0); -} else { - x_92 = x_86; -} -lean_ctor_set(x_92, 0, x_91); -x_93 = lean_apply_2(x_4, x_90, x_92); -return x_93; -} -else -{ -lean_object* x_94; lean_object* x_95; -lean_dec(x_86); -lean_dec(x_84); -lean_dec(x_8); -lean_dec(x_4); -x_94 = lean_ctor_get(x_87, 0); -lean_inc(x_94); -lean_dec(x_87); -x_95 = lean_apply_3(x_3, x_25, x_82, x_94); -return x_95; -} -} -else -{ -lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; -lean_dec(x_85); -lean_dec(x_84); -lean_dec(x_25); -lean_dec(x_3); -if (lean_is_exclusive(x_82)) { - lean_ctor_release(x_82, 0); - lean_ctor_release(x_82, 1); - lean_ctor_release(x_82, 2); - x_96 = x_82; -} else { - lean_dec_ref(x_82); - x_96 = lean_box(0); -} -if (lean_is_scalar(x_96)) { - x_97 = lean_alloc_ctor(0, 3, 0); -} else { - x_97 = x_96; -} -lean_ctor_set(x_97, 0, x_83); -lean_ctor_set(x_97, 1, x_7); -lean_ctor_set(x_97, 2, x_8); -x_98 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_98, 0, x_97); -lean_ctor_set(x_98, 1, x_26); -x_99 = lean_apply_2(x_4, x_98, x_2); -return x_99; -} -} -else -{ -lean_object* x_100; lean_object* x_101; -lean_dec(x_83); -lean_dec(x_82); -lean_dec(x_25); -lean_dec(x_8); -lean_dec(x_3); -x_100 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_100, 0, x_5); -lean_ctor_set(x_100, 1, x_26); -x_101 = lean_apply_2(x_4, x_100, x_2); -return x_101; -} -} -} -} -} -} -else -{ -lean_object* x_102; -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -x_102 = lean_apply_2(x_4, x_1, x_2); -return x_102; -} -} -else -{ -lean_object* x_103; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_103 = lean_apply_2(x_4, x_1, x_2); -return x_103; -} -} -else -{ -lean_object* x_104; -lean_dec(x_3); -x_104 = lean_apply_2(x_4, x_1, x_2); -return x_104; -} -} -} -lean_object* l_Lean_Syntax_removeParen_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_removeParen_match__1___rarg), 4, 0); -return x_2; -} -} -lean_object* l_Lean_Syntax_removeParen(lean_object* x_1) { -_start: -{ -if (lean_obj_tag(x_1) == 1) -{ -lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -x_3 = lean_ctor_get(x_1, 1); -lean_inc(x_3); -x_4 = l_myMacro____x40_Init_Notation___hyg_9203____closed__8; -x_5 = lean_name_eq(x_2, x_4); -if (x_5 == 0) -{ -lean_dec(x_3); -lean_dec(x_2); -return x_1; -} -else -{ -uint8_t x_6; -x_6 = !lean_is_exclusive(x_1); -if (x_6 == 0) -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_7 = lean_ctor_get(x_1, 1); -lean_dec(x_7); -x_8 = lean_ctor_get(x_1, 0); -lean_dec(x_8); -lean_inc(x_3); -x_9 = l_Lean_instInhabitedSyntax; -x_10 = lean_unsigned_to_nat(1u); -x_11 = lean_array_get(x_9, x_3, x_10); -x_12 = l_Lean_Syntax_getNumArgs(x_11); -x_13 = lean_unsigned_to_nat(2u); -x_14 = lean_nat_dec_eq(x_12, x_13); -lean_dec(x_12); -if (x_14 == 0) -{ -lean_dec(x_11); -lean_dec(x_3); -return x_1; -} -else -{ -lean_object* x_15; uint8_t x_16; -x_15 = l_Lean_Syntax_getArg(x_11, x_10); -x_16 = l_Lean_Syntax_isNone(x_15); -lean_dec(x_15); -if (x_16 == 0) -{ -lean_dec(x_11); -lean_dec(x_3); -return x_1; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_unsigned_to_nat(0u); -x_18 = l_Lean_Syntax_getArg(x_11, x_17); -lean_dec(x_11); -x_19 = lean_array_get(x_9, x_3, x_13); -lean_dec(x_3); -if (lean_obj_tag(x_19) == 2) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); -lean_dec(x_19); -x_22 = l_Lean_Syntax_getTailInfo(x_18); -x_23 = lean_ctor_get(x_20, 0); -lean_inc(x_23); -if (lean_obj_tag(x_23) == 0) -{ -lean_object* x_24; -x_24 = lean_ctor_get(x_20, 1); -lean_inc(x_24); -if (lean_obj_tag(x_24) == 0) -{ -lean_object* x_25; -x_25 = lean_ctor_get(x_20, 2); -lean_inc(x_25); -lean_dec(x_20); -if (lean_obj_tag(x_25) == 0) -{ -lean_dec(x_22); -lean_dec(x_21); -lean_dec(x_18); -return x_1; -} -else -{ -lean_object* x_26; lean_object* x_27; uint8_t x_28; -x_26 = lean_ctor_get(x_25, 0); -lean_inc(x_26); -lean_dec(x_25); -x_27 = l_myMacro____x40_Init_Notation___hyg_9203____closed__21; -x_28 = lean_string_dec_eq(x_21, x_27); -lean_dec(x_21); -if (x_28 == 0) -{ -lean_dec(x_26); -lean_dec(x_22); -lean_dec(x_18); -return x_1; -} -else -{ -if (lean_obj_tag(x_22) == 0) -{ -lean_dec(x_26); -lean_dec(x_18); -return x_1; -} -else -{ -lean_object* x_29; lean_object* x_30; -x_29 = lean_ctor_get(x_22, 0); -lean_inc(x_29); -lean_dec(x_22); -x_30 = lean_ctor_get(x_29, 0); -lean_inc(x_30); -if (lean_obj_tag(x_30) == 0) -{ -lean_object* x_31; -x_31 = lean_ctor_get(x_29, 1); -lean_inc(x_31); -if (lean_obj_tag(x_31) == 0) -{ -uint8_t x_32; -x_32 = !lean_is_exclusive(x_29); -if (x_32 == 0) -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_33 = lean_ctor_get(x_29, 2); -x_34 = lean_ctor_get(x_29, 1); -lean_dec(x_34); -x_35 = lean_ctor_get(x_29, 0); -lean_dec(x_35); -if (lean_obj_tag(x_33) == 0) -{ -lean_free_object(x_29); -lean_dec(x_26); -lean_dec(x_18); -return x_1; -} -else -{ -uint8_t x_36; -lean_dec(x_1); -x_36 = !lean_is_exclusive(x_33); -if (x_36 == 0) -{ -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; uint8_t x_44; -x_37 = lean_ctor_get(x_33, 0); -x_38 = lean_ctor_get(x_37, 0); -lean_inc(x_38); -x_39 = lean_ctor_get(x_37, 1); -lean_inc(x_39); -x_40 = lean_ctor_get(x_37, 2); -lean_inc(x_40); -lean_dec(x_37); -x_41 = lean_string_utf8_extract(x_38, x_39, x_40); -lean_dec(x_40); -lean_dec(x_39); -lean_dec(x_38); -x_42 = l_Array_foldlMUnsafe_fold___at_Lean_Environment_displayStats___spec__8___closed__3; -x_43 = lean_string_append(x_41, x_42); -x_44 = !lean_is_exclusive(x_26); -if (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 = lean_ctor_get(x_26, 0); -x_46 = lean_ctor_get(x_26, 1); -x_47 = lean_ctor_get(x_26, 2); -x_48 = lean_string_utf8_extract(x_45, x_46, x_47); -lean_dec(x_47); -lean_dec(x_46); -lean_dec(x_45); -x_49 = lean_string_append(x_43, x_48); -lean_dec(x_48); -x_50 = lean_string_utf8_byte_size(x_49); -lean_ctor_set(x_26, 2, x_50); -lean_ctor_set(x_26, 1, x_17); -lean_ctor_set(x_26, 0, x_49); -lean_ctor_set(x_33, 0, x_26); -x_51 = l_Lean_Syntax_setTailInfo(x_18, x_29); -return x_51; -} -else -{ -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; -x_52 = lean_ctor_get(x_26, 0); -x_53 = lean_ctor_get(x_26, 1); -x_54 = lean_ctor_get(x_26, 2); -lean_inc(x_54); -lean_inc(x_53); -lean_inc(x_52); -lean_dec(x_26); -x_55 = lean_string_utf8_extract(x_52, x_53, x_54); -lean_dec(x_54); -lean_dec(x_53); -lean_dec(x_52); -x_56 = lean_string_append(x_43, x_55); -lean_dec(x_55); -x_57 = lean_string_utf8_byte_size(x_56); -x_58 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_58, 0, x_56); -lean_ctor_set(x_58, 1, x_17); -lean_ctor_set(x_58, 2, x_57); -lean_ctor_set(x_33, 0, x_58); -x_59 = l_Lean_Syntax_setTailInfo(x_18, x_29); -return x_59; -} -} -else -{ -lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; 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; -x_60 = lean_ctor_get(x_33, 0); -lean_inc(x_60); -lean_dec(x_33); -x_61 = lean_ctor_get(x_60, 0); -lean_inc(x_61); -x_62 = lean_ctor_get(x_60, 1); -lean_inc(x_62); -x_63 = lean_ctor_get(x_60, 2); -lean_inc(x_63); -lean_dec(x_60); -x_64 = lean_string_utf8_extract(x_61, x_62, x_63); -lean_dec(x_63); -lean_dec(x_62); -lean_dec(x_61); -x_65 = l_Array_foldlMUnsafe_fold___at_Lean_Environment_displayStats___spec__8___closed__3; -x_66 = lean_string_append(x_64, x_65); -x_67 = lean_ctor_get(x_26, 0); -lean_inc(x_67); -x_68 = lean_ctor_get(x_26, 1); -lean_inc(x_68); -x_69 = lean_ctor_get(x_26, 2); -lean_inc(x_69); -if (lean_is_exclusive(x_26)) { - lean_ctor_release(x_26, 0); - lean_ctor_release(x_26, 1); - lean_ctor_release(x_26, 2); - x_70 = x_26; -} else { - lean_dec_ref(x_26); - x_70 = lean_box(0); -} -x_71 = lean_string_utf8_extract(x_67, x_68, x_69); -lean_dec(x_69); -lean_dec(x_68); -lean_dec(x_67); -x_72 = lean_string_append(x_66, x_71); -lean_dec(x_71); -x_73 = lean_string_utf8_byte_size(x_72); -if (lean_is_scalar(x_70)) { - x_74 = lean_alloc_ctor(0, 3, 0); -} else { - x_74 = x_70; -} -lean_ctor_set(x_74, 0, x_72); -lean_ctor_set(x_74, 1, x_17); -lean_ctor_set(x_74, 2, x_73); -x_75 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_75, 0, x_74); -lean_ctor_set(x_29, 2, x_75); -x_76 = l_Lean_Syntax_setTailInfo(x_18, x_29); -return x_76; -} -} -} -else -{ -lean_object* x_77; -x_77 = lean_ctor_get(x_29, 2); -lean_inc(x_77); -lean_dec(x_29); -if (lean_obj_tag(x_77) == 0) -{ -lean_dec(x_26); -lean_dec(x_18); -return x_1; -} -else -{ -lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; -lean_dec(x_1); -x_78 = lean_ctor_get(x_77, 0); -lean_inc(x_78); -if (lean_is_exclusive(x_77)) { - lean_ctor_release(x_77, 0); - x_79 = x_77; -} else { - lean_dec_ref(x_77); - x_79 = lean_box(0); -} -x_80 = lean_ctor_get(x_78, 0); -lean_inc(x_80); -x_81 = lean_ctor_get(x_78, 1); -lean_inc(x_81); -x_82 = lean_ctor_get(x_78, 2); -lean_inc(x_82); -lean_dec(x_78); -x_83 = lean_string_utf8_extract(x_80, x_81, x_82); -lean_dec(x_82); -lean_dec(x_81); -lean_dec(x_80); -x_84 = l_Array_foldlMUnsafe_fold___at_Lean_Environment_displayStats___spec__8___closed__3; -x_85 = lean_string_append(x_83, x_84); -x_86 = lean_ctor_get(x_26, 0); -lean_inc(x_86); -x_87 = lean_ctor_get(x_26, 1); -lean_inc(x_87); -x_88 = lean_ctor_get(x_26, 2); -lean_inc(x_88); -if (lean_is_exclusive(x_26)) { - lean_ctor_release(x_26, 0); - lean_ctor_release(x_26, 1); - lean_ctor_release(x_26, 2); - x_89 = x_26; -} else { - lean_dec_ref(x_26); - x_89 = lean_box(0); -} -x_90 = lean_string_utf8_extract(x_86, x_87, x_88); -lean_dec(x_88); -lean_dec(x_87); -lean_dec(x_86); -x_91 = lean_string_append(x_85, x_90); -lean_dec(x_90); -x_92 = lean_string_utf8_byte_size(x_91); -if (lean_is_scalar(x_89)) { - x_93 = lean_alloc_ctor(0, 3, 0); -} else { - x_93 = x_89; -} -lean_ctor_set(x_93, 0, x_91); -lean_ctor_set(x_93, 1, x_17); -lean_ctor_set(x_93, 2, x_92); -if (lean_is_scalar(x_79)) { - x_94 = lean_alloc_ctor(1, 1, 0); -} else { - x_94 = x_79; -} -lean_ctor_set(x_94, 0, x_93); -x_95 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_95, 0, x_30); -lean_ctor_set(x_95, 1, x_31); -lean_ctor_set(x_95, 2, x_94); -x_96 = l_Lean_Syntax_setTailInfo(x_18, x_95); -return x_96; -} -} -} -else -{ -lean_dec(x_31); -lean_dec(x_29); -lean_dec(x_26); -lean_dec(x_18); -return x_1; -} -} -else -{ -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_26); -lean_dec(x_18); -return x_1; -} -} -} -} -} -else -{ -lean_dec(x_24); -lean_dec(x_22); -lean_dec(x_21); -lean_dec(x_20); -lean_dec(x_18); -return x_1; -} -} -else -{ -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_21); -lean_dec(x_20); -lean_dec(x_18); -return x_1; -} -} -else -{ -lean_dec(x_19); -lean_dec(x_18); -return x_1; -} -} -} -} -else -{ -lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; uint8_t x_103; -lean_dec(x_1); -lean_inc(x_3); -x_97 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_97, 0, x_2); -lean_ctor_set(x_97, 1, x_3); -x_98 = l_Lean_instInhabitedSyntax; -x_99 = lean_unsigned_to_nat(1u); -x_100 = lean_array_get(x_98, x_3, x_99); -x_101 = l_Lean_Syntax_getNumArgs(x_100); -x_102 = lean_unsigned_to_nat(2u); -x_103 = lean_nat_dec_eq(x_101, x_102); -lean_dec(x_101); -if (x_103 == 0) -{ -lean_dec(x_100); -lean_dec(x_3); -return x_97; -} -else -{ -lean_object* x_104; uint8_t x_105; -x_104 = l_Lean_Syntax_getArg(x_100, x_99); -x_105 = l_Lean_Syntax_isNone(x_104); -lean_dec(x_104); -if (x_105 == 0) -{ -lean_dec(x_100); -lean_dec(x_3); -return x_97; -} -else -{ -lean_object* x_106; lean_object* x_107; lean_object* x_108; -x_106 = lean_unsigned_to_nat(0u); -x_107 = l_Lean_Syntax_getArg(x_100, x_106); -lean_dec(x_100); -x_108 = lean_array_get(x_98, x_3, x_102); -lean_dec(x_3); -if (lean_obj_tag(x_108) == 2) -{ -lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; -x_109 = lean_ctor_get(x_108, 0); -lean_inc(x_109); -x_110 = lean_ctor_get(x_108, 1); -lean_inc(x_110); -lean_dec(x_108); -x_111 = l_Lean_Syntax_getTailInfo(x_107); -x_112 = lean_ctor_get(x_109, 0); -lean_inc(x_112); -if (lean_obj_tag(x_112) == 0) -{ -lean_object* x_113; -x_113 = lean_ctor_get(x_109, 1); -lean_inc(x_113); -if (lean_obj_tag(x_113) == 0) -{ -lean_object* x_114; -x_114 = lean_ctor_get(x_109, 2); -lean_inc(x_114); -lean_dec(x_109); -if (lean_obj_tag(x_114) == 0) -{ -lean_dec(x_111); -lean_dec(x_110); -lean_dec(x_107); -return x_97; -} -else -{ -lean_object* x_115; lean_object* x_116; uint8_t x_117; -x_115 = lean_ctor_get(x_114, 0); -lean_inc(x_115); -lean_dec(x_114); -x_116 = l_myMacro____x40_Init_Notation___hyg_9203____closed__21; -x_117 = lean_string_dec_eq(x_110, x_116); -lean_dec(x_110); -if (x_117 == 0) -{ -lean_dec(x_115); -lean_dec(x_111); -lean_dec(x_107); -return x_97; -} -else -{ -if (lean_obj_tag(x_111) == 0) -{ -lean_dec(x_115); -lean_dec(x_107); -return x_97; -} -else -{ -lean_object* x_118; lean_object* x_119; -x_118 = lean_ctor_get(x_111, 0); -lean_inc(x_118); -lean_dec(x_111); -x_119 = lean_ctor_get(x_118, 0); -lean_inc(x_119); -if (lean_obj_tag(x_119) == 0) -{ -lean_object* x_120; -x_120 = lean_ctor_get(x_118, 1); -lean_inc(x_120); -if (lean_obj_tag(x_120) == 0) -{ -lean_object* x_121; lean_object* x_122; -x_121 = lean_ctor_get(x_118, 2); -lean_inc(x_121); -if (lean_is_exclusive(x_118)) { - lean_ctor_release(x_118, 0); - lean_ctor_release(x_118, 1); - lean_ctor_release(x_118, 2); - x_122 = x_118; -} else { - lean_dec_ref(x_118); - x_122 = lean_box(0); -} -if (lean_obj_tag(x_121) == 0) -{ -lean_dec(x_122); -lean_dec(x_115); -lean_dec(x_107); -return x_97; -} -else -{ -lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; -lean_dec(x_97); -x_123 = lean_ctor_get(x_121, 0); -lean_inc(x_123); -if (lean_is_exclusive(x_121)) { - lean_ctor_release(x_121, 0); - x_124 = x_121; -} else { - lean_dec_ref(x_121); - x_124 = lean_box(0); -} -x_125 = lean_ctor_get(x_123, 0); -lean_inc(x_125); -x_126 = lean_ctor_get(x_123, 1); -lean_inc(x_126); -x_127 = lean_ctor_get(x_123, 2); -lean_inc(x_127); -lean_dec(x_123); -x_128 = lean_string_utf8_extract(x_125, x_126, x_127); -lean_dec(x_127); -lean_dec(x_126); -lean_dec(x_125); -x_129 = l_Array_foldlMUnsafe_fold___at_Lean_Environment_displayStats___spec__8___closed__3; -x_130 = lean_string_append(x_128, x_129); -x_131 = lean_ctor_get(x_115, 0); -lean_inc(x_131); -x_132 = lean_ctor_get(x_115, 1); -lean_inc(x_132); -x_133 = lean_ctor_get(x_115, 2); -lean_inc(x_133); -if (lean_is_exclusive(x_115)) { - lean_ctor_release(x_115, 0); - lean_ctor_release(x_115, 1); - lean_ctor_release(x_115, 2); - x_134 = x_115; -} else { - lean_dec_ref(x_115); - x_134 = lean_box(0); -} -x_135 = lean_string_utf8_extract(x_131, x_132, x_133); -lean_dec(x_133); -lean_dec(x_132); -lean_dec(x_131); -x_136 = lean_string_append(x_130, x_135); -lean_dec(x_135); -x_137 = lean_string_utf8_byte_size(x_136); -if (lean_is_scalar(x_134)) { - x_138 = lean_alloc_ctor(0, 3, 0); -} else { - x_138 = x_134; -} -lean_ctor_set(x_138, 0, x_136); -lean_ctor_set(x_138, 1, x_106); -lean_ctor_set(x_138, 2, x_137); -if (lean_is_scalar(x_124)) { - x_139 = lean_alloc_ctor(1, 1, 0); -} else { - x_139 = x_124; -} -lean_ctor_set(x_139, 0, x_138); -if (lean_is_scalar(x_122)) { - x_140 = lean_alloc_ctor(0, 3, 0); -} else { - x_140 = x_122; -} -lean_ctor_set(x_140, 0, x_119); -lean_ctor_set(x_140, 1, x_120); -lean_ctor_set(x_140, 2, x_139); -x_141 = l_Lean_Syntax_setTailInfo(x_107, x_140); -return x_141; -} -} -else -{ -lean_dec(x_120); -lean_dec(x_118); -lean_dec(x_115); -lean_dec(x_107); -return x_97; -} -} -else -{ -lean_dec(x_119); -lean_dec(x_118); -lean_dec(x_115); -lean_dec(x_107); -return x_97; -} -} -} -} -} -else -{ -lean_dec(x_113); -lean_dec(x_111); -lean_dec(x_110); -lean_dec(x_109); -lean_dec(x_107); -return x_97; -} -} -else -{ -lean_dec(x_112); -lean_dec(x_111); -lean_dec(x_110); -lean_dec(x_109); -lean_dec(x_107); -return x_97; -} -} -else -{ -lean_dec(x_108); -lean_dec(x_107); -return x_97; -} -} -} -} -} -} -else -{ -return x_1; -} -} -} -lean_object* initialize_Init(lean_object*); -lean_object* initialize_Lean_Parser_Basic(lean_object*); -static bool _G_initialized = false; -lean_object* initialize_Lean_Parser_Transform(lean_object* w) { -lean_object * res; -if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); -_G_initialized = true; -res = initialize_Init(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Lean_Parser_Basic(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -return lean_io_result_mk_ok(lean_box(0)); -} -#ifdef __cplusplus -} -#endif diff --git a/stage0/stdlib/Lean/ParserCompiler.c b/stage0/stdlib/Lean/ParserCompiler.c index c41fa6010d..be9f4dfbf4 100644 --- a/stage0/stdlib/Lean/ParserCompiler.c +++ b/stage0/stdlib/Lean/ParserCompiler.c @@ -13,18 +13,20 @@ #ifdef __cplusplus extern "C" { #endif +lean_object* l_Lean_ParserCompiler_replaceParserTy___rarg___boxed(lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__19___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr_match__3(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_forall(lean_object*, uint8_t, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__5___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAuxAux___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileCategoryParser___rarg(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr_match__3___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__5___rarg___closed__1; extern lean_object* l_Lean_Syntax_strLitToAtom___closed__3; lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; @@ -37,17 +39,17 @@ lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr__ extern lean_object* l_Lean_withIncRecDepth___rarg___lambda__2___closed__2; extern lean_object* l_Lean_nullKind; lean_object* l_Lean_ParserCompiler_compileCategoryParser_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); uint8_t l_USize_decEq(size_t, size_t); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_uget(lean_object*, size_t); lean_object* lean_io_error_to_string(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_mdata(lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__44(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_mkParserOfConstantUnsafe_match__1___rarg___closed__3; lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__36(lean_object*); lean_object* l_Lean_Parser_registerParserAttributeHook(lean_object*, lean_object*); @@ -58,16 +60,17 @@ lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr__ lean_object* lean_array_uset(lean_object*, size_t, lean_object*); lean_object* l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__20(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__18___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__9; -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t l_USize_sub(size_t, size_t); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_replaceParserTy(lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_registerParserCompiler___rarg___lambda__1___closed__2; -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_myMacro____x40_Init_Notation___hyg_38____closed__3; +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_Context_tyName___rarg(lean_object*); lean_object* l_Lean_ParserCompiler_compileCategoryParser_match__1(lean_object*); @@ -79,12 +82,13 @@ lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__29(lean_ob lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__36___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__38___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9(lean_object*); +lean_object* l_Lean_Expr_appFn_x21(lean_object*); lean_object* l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfEasyCases___at___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCoreImp___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_getConstInfo___at_Lean_registerInitAttrUnsafe___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_registerParserCompiler___rarg___lambda__1___closed__1; lean_object* l_Lean_Meta_mkLambdaFVarsImp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(lean_object*, 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*); @@ -93,11 +97,12 @@ lean_object* l_Lean_ParserCompiler_compileParserExpr_match__4(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_getAppArgs___closed__1; lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__51___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_instInhabitedCoreM___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_appArg_x21(lean_object*); extern lean_object* l_Lean_Parser_mkParserOfConstantUnsafe_match__1___rarg___closed__2; -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__44___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__18(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__14(lean_object*); @@ -107,23 +112,22 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__11(lean_object*); lean_object* l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__11___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileEmbeddedParsers___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34(lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_preprocessParserBody___rarg___boxed(lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileCategoryParser___rarg___closed__1; -lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__12___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileCategoryParser___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__34(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__32___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__3; lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__22___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -133,37 +137,36 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__28(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__18___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileCategoryParser___rarg___closed__2; -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__14___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__44___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__13(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MessageData_toString(lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__29___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__33(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__23___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_Context_tyName(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__35___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__28___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2(lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(lean_object*, size_t, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_CombinatorAttribute_setDeclFor(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_KernelException_toMessageData(lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr_match__5___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_instMetaEvalMetaM___rarg___closed__2; -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__39___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12(lean_object*); @@ -171,19 +174,19 @@ lean_object* l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(lea lean_object* l_Lean_ParserCompiler_compileParserExpr_match__2___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__43___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_instMetaEvalMetaM___rarg___closed__1; -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__1; -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__43(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__35(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_preprocessParserBody___rarg(lean_object*, lean_object*); lean_object* lean_st_mk_ref(lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__15(lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_parserOfStackFnUnsafe___closed__3; lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26(lean_object*); lean_object* l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -193,39 +196,37 @@ lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__17___boxed lean_object* l_Lean_ParserCompiler_compileParserExpr_match__6___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__5; lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__15___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__39(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__27___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_mkParserOfConstantUnsafe_match__1___rarg___closed__1; lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkSimpleThunk___closed__1; lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__44___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__20___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__33___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr_match__6(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__23(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__8___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__11___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__25(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_let(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__36___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_preprocessParserBody(lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30(lean_object*); uint8_t l_Lean_Expr_Data_binderInfo(uint64_t); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4(lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_KernelException_toMessageData___closed__3; size_t lean_usize_of_nat(lean_object*); lean_object* l_Lean_ConstantInfo_type(lean_object*); @@ -233,14 +234,14 @@ lean_object* l_Lean_Meta_mkLambdaFVars___at_Lean_ParserCompiler_compileParserExp lean_object* l_Lean_ConstantInfo_value_x3f(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__22(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr_match__2(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_proj(lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__40___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__23___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__7; lean_object* l_Lean_Attribute_add(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); @@ -253,7 +254,7 @@ lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr__ lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__44(lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__48(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_ptr_addr(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__7(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -261,18 +262,18 @@ lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__28___boxed lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__27(lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_setEnv___at_Lean_Meta_addDefaultInstance___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__10___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__28(lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__18___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkApp(lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__22___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__34___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_append(lean_object*, lean_object*); @@ -283,7 +284,7 @@ lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr__ lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Name_isAnonymous(lean_object*); lean_object* l_Lean_ParserCompiler_compileCategoryParser(lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_panic_fn(lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__36(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__23___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -293,17 +294,16 @@ lean_object* l_Lean_ParserCompiler_compileCategoryParser___rarg___closed__4; lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__15___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__31___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_myMacro____x40_Init_Notation___hyg_38____closed__4; lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__36___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__48___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_Context_tyName___rarg___boxed(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__17(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileEmbeddedParsers_match__1(lean_object*); @@ -311,9 +311,8 @@ lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr__ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17(lean_object*); lean_object* l_Lean_evalConstCheck___at_Lean_KeyedDeclsAttribute_init___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__32(lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__19___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(lean_object*, size_t, lean_object*, lean_object*); lean_object* l_Lean_mkForall(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__38(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -321,33 +320,33 @@ lean_object* l_Lean_Environment_getModuleIdxFor_x3f(lean_object*, lean_object*); lean_object* lean_expr_update_lambda(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; lean_object* l_Lean_ParserCompiler_compileParserExpr_match__5(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_replaceParserTy___rarg(lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkLambdaFVars___at_Lean_ParserCompiler_compileParserExpr___spec__24___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__23(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__2(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__31(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__46(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__15___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_mk_array(lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__39___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__27___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_registerParserCompiler___rarg(lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33(lean_object*); +uint8_t l_Lean_Expr_isOptParam(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__14___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__40(lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__25___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_inferType___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__49(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__26(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__15(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__5(lean_object*); lean_object* lean_mk_syntax_ident(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__39(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -356,10 +355,10 @@ lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__13___boxed lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__5___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkOptionalNode___closed__2; lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr_match__1(lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr_match__4___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; @@ -369,24 +368,25 @@ lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr__ lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__43___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_registerParserCompiler___rarg___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_app(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_registerParserCompiler(lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__26___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25(lean_object*); -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__43(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__10___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__39___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1(lean_object*); lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__31(lean_object*); lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__5(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_ReplaceImpl_initCache; +lean_object* l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4(lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38(lean_object*); lean_object* l_Lean_ParserCompiler_compileEmbeddedParsers(lean_object*); @@ -419,831 +419,882 @@ lean_dec(x_1); return x_2; } } -lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(lean_object* x_1, size_t x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(lean_object* x_1, size_t x_2, lean_object* x_3, lean_object* x_4) { _start: { -size_t x_5; size_t x_6; lean_object* x_7; lean_object* x_8; size_t x_9; uint8_t x_10; +size_t x_5; size_t x_6; lean_object* x_7; lean_object* x_233; lean_object* x_234; size_t x_235; uint8_t x_236; x_5 = lean_ptr_addr(x_3); x_6 = x_2 == 0 ? 0 : x_5 % x_2; -x_7 = lean_ctor_get(x_4, 0); -lean_inc(x_7); -x_8 = lean_array_uget(x_7, x_6); -x_9 = lean_ptr_addr(x_8); -lean_dec(x_8); -x_10 = x_9 == x_5; -if (x_10 == 0) +x_233 = lean_ctor_get(x_4, 0); +lean_inc(x_233); +x_234 = lean_array_uget(x_233, x_6); +x_235 = lean_ptr_addr(x_234); +lean_dec(x_234); +x_236 = x_235 == x_5; +if (x_236 == 0) { -lean_object* x_11; uint8_t x_12; -x_11 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_12 = l_Lean_Expr_isConstOf(x_3, x_11); -if (x_12 == 0) +uint8_t x_237; +x_237 = l_Lean_Expr_isOptParam(x_3); +if (x_237 == 0) +{ +lean_object* x_238; uint8_t x_239; +x_238 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_239 = l_Lean_Expr_isConstOf(x_3, x_238); +if (x_239 == 0) +{ +lean_object* x_240; +lean_dec(x_233); +x_240 = lean_box(0); +x_7 = x_240; +goto block_232; +} +else +{ +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; +x_241 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_242 = lean_box(0); +x_243 = l_Lean_mkConst(x_241, x_242); +x_244 = lean_array_uset(x_233, x_6, x_3); +x_245 = lean_ctor_get(x_4, 1); +lean_inc(x_245); +lean_dec(x_4); +lean_inc(x_243); +x_246 = lean_array_uset(x_245, x_6, x_243); +x_247 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_247, 0, x_244); +lean_ctor_set(x_247, 1, x_246); +x_248 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_248, 0, x_243); +lean_ctor_set(x_248, 1, x_247); +return x_248; +} +} +else +{ +lean_object* x_249; lean_object* x_250; lean_object* x_251; uint8_t x_252; +x_249 = l_Lean_Expr_appFn_x21(x_3); +x_250 = l_Lean_Expr_appArg_x21(x_249); +lean_dec(x_249); +x_251 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_252 = l_Lean_Expr_isConstOf(x_250, x_251); +lean_dec(x_250); +if (x_252 == 0) +{ +lean_object* x_253; +lean_dec(x_233); +x_253 = lean_box(0); +x_7 = x_253; +goto block_232; +} +else +{ +lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; +x_254 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_255 = lean_box(0); +x_256 = l_Lean_mkConst(x_254, x_255); +x_257 = lean_array_uset(x_233, x_6, x_3); +x_258 = lean_ctor_get(x_4, 1); +lean_inc(x_258); +lean_dec(x_4); +lean_inc(x_256); +x_259 = lean_array_uset(x_258, x_6, x_256); +x_260 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_260, 0, x_257); +lean_ctor_set(x_260, 1, x_259); +x_261 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_261, 0, x_256); +lean_ctor_set(x_261, 1, x_260); +return x_261; +} +} +} +else +{ +lean_object* x_262; lean_object* x_263; lean_object* x_264; +lean_dec(x_233); +lean_dec(x_3); +x_262 = lean_ctor_get(x_4, 1); +lean_inc(x_262); +x_263 = lean_array_uget(x_262, x_6); +lean_dec(x_262); +x_264 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_264, 0, x_263); +lean_ctor_set(x_264, 1, x_4); +return x_264; +} +block_232: { lean_dec(x_7); switch (lean_obj_tag(x_3)) { case 5: { -lean_object* x_13; lean_object* x_14; uint64_t x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; -x_13 = lean_ctor_get(x_3, 0); +lean_object* x_8; lean_object* x_9; uint64_t x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; +x_8 = lean_ctor_get(x_3, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_3, 1); +lean_inc(x_9); +x_10 = lean_ctor_get_uint64(x_3, sizeof(void*)*2); +lean_inc(x_8); +x_11 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_8, x_4); +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_11, 1); lean_inc(x_13); -x_14 = lean_ctor_get(x_3, 1); -lean_inc(x_14); -x_15 = lean_ctor_get_uint64(x_3, sizeof(void*)*2); -lean_inc(x_13); -x_16 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_13, x_4); -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); +lean_dec(x_11); +lean_inc(x_9); +x_14 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_9, x_13); +x_15 = !lean_is_exclusive(x_14); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; +x_16 = lean_ctor_get(x_14, 0); +x_17 = lean_ctor_get(x_14, 1); +x_18 = lean_ctor_get(x_17, 0); lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_14); -x_19 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_14, x_18); -x_20 = !lean_is_exclusive(x_19); +lean_inc(x_3); +x_19 = lean_array_uset(x_18, x_6, x_3); +x_20 = !lean_is_exclusive(x_3); if (x_20 == 0) { -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; -x_21 = lean_ctor_get(x_19, 0); -x_22 = lean_ctor_get(x_19, 1); -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_21 = lean_ctor_get(x_3, 1); +lean_dec(x_21); +x_22 = lean_ctor_get(x_3, 0); +lean_dec(x_22); +x_23 = lean_ctor_get(x_17, 1); lean_inc(x_23); -lean_inc(x_3); -x_24 = lean_array_uset(x_23, x_6, x_3); -x_25 = !lean_is_exclusive(x_3); -if (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; -x_26 = lean_ctor_get(x_3, 1); -lean_dec(x_26); -x_27 = lean_ctor_get(x_3, 0); -lean_dec(x_27); -x_28 = lean_ctor_get(x_22, 1); -lean_inc(x_28); -lean_dec(x_22); -x_29 = lean_expr_update_app(x_3, x_17, x_21); -lean_inc(x_29); -x_30 = lean_array_uset(x_28, x_6, x_29); -x_31 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_31, 0, x_24); -lean_ctor_set(x_31, 1, x_30); -lean_ctor_set(x_19, 1, x_31); -lean_ctor_set(x_19, 0, x_29); -return x_19; +lean_dec(x_17); +x_24 = lean_expr_update_app(x_3, x_12, x_16); +lean_inc(x_24); +x_25 = lean_array_uset(x_23, x_6, x_24); +x_26 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_26, 0, x_19); +lean_ctor_set(x_26, 1, x_25); +lean_ctor_set(x_14, 1, x_26); +lean_ctor_set(x_14, 0, x_24); +return x_14; } else { -lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_dec(x_3); -x_32 = lean_ctor_get(x_22, 1); -lean_inc(x_32); -lean_dec(x_22); -x_33 = lean_alloc_ctor(5, 2, 8); -lean_ctor_set(x_33, 0, x_13); -lean_ctor_set(x_33, 1, x_14); -lean_ctor_set_uint64(x_33, sizeof(void*)*2, x_15); -x_34 = lean_expr_update_app(x_33, x_17, x_21); -lean_inc(x_34); -x_35 = lean_array_uset(x_32, x_6, x_34); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_24); -lean_ctor_set(x_36, 1, x_35); -lean_ctor_set(x_19, 1, x_36); -lean_ctor_set(x_19, 0, x_34); -return x_19; +x_27 = lean_ctor_get(x_17, 1); +lean_inc(x_27); +lean_dec(x_17); +x_28 = lean_alloc_ctor(5, 2, 8); +lean_ctor_set(x_28, 0, x_8); +lean_ctor_set(x_28, 1, x_9); +lean_ctor_set_uint64(x_28, sizeof(void*)*2, x_10); +x_29 = lean_expr_update_app(x_28, x_12, x_16); +lean_inc(x_29); +x_30 = lean_array_uset(x_27, x_6, x_29); +x_31 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_31, 0, x_19); +lean_ctor_set(x_31, 1, x_30); +lean_ctor_set(x_14, 1, x_31); +lean_ctor_set(x_14, 0, x_29); +return x_14; } } else { -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; -x_37 = lean_ctor_get(x_19, 0); -x_38 = lean_ctor_get(x_19, 1); -lean_inc(x_38); -lean_inc(x_37); -lean_dec(x_19); -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); +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_object* x_42; +x_32 = lean_ctor_get(x_14, 0); +x_33 = lean_ctor_get(x_14, 1); +lean_inc(x_33); +lean_inc(x_32); +lean_dec(x_14); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); lean_inc(x_3); -x_40 = lean_array_uset(x_39, x_6, x_3); +x_35 = lean_array_uset(x_34, x_6, x_3); if (lean_is_exclusive(x_3)) { lean_ctor_release(x_3, 0); lean_ctor_release(x_3, 1); - x_41 = x_3; + x_36 = x_3; } else { lean_dec_ref(x_3); - x_41 = lean_box(0); + x_36 = lean_box(0); } -x_42 = lean_ctor_get(x_38, 1); -lean_inc(x_42); -lean_dec(x_38); -if (lean_is_scalar(x_41)) { - x_43 = lean_alloc_ctor(5, 2, 8); +x_37 = lean_ctor_get(x_33, 1); +lean_inc(x_37); +lean_dec(x_33); +if (lean_is_scalar(x_36)) { + x_38 = lean_alloc_ctor(5, 2, 8); } else { - x_43 = x_41; + x_38 = x_36; } -lean_ctor_set(x_43, 0, x_13); -lean_ctor_set(x_43, 1, x_14); -lean_ctor_set_uint64(x_43, sizeof(void*)*2, x_15); -x_44 = lean_expr_update_app(x_43, x_17, x_37); -lean_inc(x_44); -x_45 = lean_array_uset(x_42, x_6, x_44); -x_46 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_46, 0, x_40); -lean_ctor_set(x_46, 1, x_45); -x_47 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_47, 0, x_44); -lean_ctor_set(x_47, 1, x_46); -return x_47; +lean_ctor_set(x_38, 0, x_8); +lean_ctor_set(x_38, 1, x_9); +lean_ctor_set_uint64(x_38, sizeof(void*)*2, x_10); +x_39 = lean_expr_update_app(x_38, x_12, x_32); +lean_inc(x_39); +x_40 = lean_array_uset(x_37, x_6, x_39); +x_41 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_41, 0, x_35); +lean_ctor_set(x_41, 1, x_40); +x_42 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_42, 0, x_39); +lean_ctor_set(x_42, 1, x_41); +return x_42; } } case 6: { -lean_object* x_48; lean_object* x_49; lean_object* x_50; uint64_t x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; uint8_t x_56; -x_48 = lean_ctor_get(x_3, 0); +lean_object* x_43; lean_object* x_44; lean_object* x_45; uint64_t x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; +x_43 = lean_ctor_get(x_3, 0); +lean_inc(x_43); +x_44 = lean_ctor_get(x_3, 1); +lean_inc(x_44); +x_45 = lean_ctor_get(x_3, 2); +lean_inc(x_45); +x_46 = lean_ctor_get_uint64(x_3, sizeof(void*)*3); +lean_inc(x_44); +x_47 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_44, x_4); +x_48 = lean_ctor_get(x_47, 0); lean_inc(x_48); -x_49 = lean_ctor_get(x_3, 1); +x_49 = lean_ctor_get(x_47, 1); lean_inc(x_49); -x_50 = lean_ctor_get(x_3, 2); -lean_inc(x_50); -x_51 = lean_ctor_get_uint64(x_3, sizeof(void*)*3); -lean_inc(x_49); -x_52 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_49, x_4); -x_53 = lean_ctor_get(x_52, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_52, 1); +lean_dec(x_47); +lean_inc(x_45); +x_50 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_45, x_49); +x_51 = !lean_is_exclusive(x_50); +if (x_51 == 0) +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; uint8_t x_56; +x_52 = lean_ctor_get(x_50, 0); +x_53 = lean_ctor_get(x_50, 1); +x_54 = lean_ctor_get(x_53, 0); lean_inc(x_54); -lean_dec(x_52); -lean_inc(x_50); -x_55 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_50, x_54); -x_56 = !lean_is_exclusive(x_55); +lean_inc(x_3); +x_55 = lean_array_uset(x_54, x_6, x_3); +x_56 = !lean_is_exclusive(x_3); if (x_56 == 0) { -lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; uint8_t x_61; -x_57 = lean_ctor_get(x_55, 0); -x_58 = lean_ctor_get(x_55, 1); -x_59 = lean_ctor_get(x_58, 0); -lean_inc(x_59); -lean_inc(x_3); -x_60 = lean_array_uset(x_59, x_6, x_3); -x_61 = !lean_is_exclusive(x_3); -if (x_61 == 0) -{ -lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_62 = lean_ctor_get(x_3, 2); -lean_dec(x_62); -x_63 = lean_ctor_get(x_3, 1); -lean_dec(x_63); -x_64 = lean_ctor_get(x_3, 0); -lean_dec(x_64); -x_65 = lean_ctor_get(x_58, 1); -lean_inc(x_65); +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; uint8_t x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_57 = lean_ctor_get(x_3, 2); +lean_dec(x_57); +x_58 = lean_ctor_get(x_3, 1); lean_dec(x_58); -x_66 = (uint8_t)((x_51 << 24) >> 61); -x_67 = lean_expr_update_lambda(x_3, x_66, x_53, x_57); -lean_inc(x_67); -x_68 = lean_array_uset(x_65, x_6, x_67); -x_69 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_69, 0, x_60); -lean_ctor_set(x_69, 1, x_68); -lean_ctor_set(x_55, 1, x_69); -lean_ctor_set(x_55, 0, x_67); -return x_55; +x_59 = lean_ctor_get(x_3, 0); +lean_dec(x_59); +x_60 = lean_ctor_get(x_53, 1); +lean_inc(x_60); +lean_dec(x_53); +x_61 = (uint8_t)((x_46 << 24) >> 61); +x_62 = lean_expr_update_lambda(x_3, x_61, x_48, x_52); +lean_inc(x_62); +x_63 = lean_array_uset(x_60, x_6, x_62); +x_64 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_64, 0, x_55); +lean_ctor_set(x_64, 1, x_63); +lean_ctor_set(x_50, 1, x_64); +lean_ctor_set(x_50, 0, x_62); +return x_50; } else { -lean_object* x_70; lean_object* x_71; uint8_t x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +lean_object* x_65; lean_object* x_66; uint8_t x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_dec(x_3); -x_70 = lean_ctor_get(x_58, 1); -lean_inc(x_70); -lean_dec(x_58); -x_71 = lean_alloc_ctor(6, 3, 8); -lean_ctor_set(x_71, 0, x_48); -lean_ctor_set(x_71, 1, x_49); -lean_ctor_set(x_71, 2, x_50); -lean_ctor_set_uint64(x_71, sizeof(void*)*3, x_51); -x_72 = (uint8_t)((x_51 << 24) >> 61); -x_73 = lean_expr_update_lambda(x_71, x_72, x_53, x_57); -lean_inc(x_73); -x_74 = lean_array_uset(x_70, x_6, x_73); -x_75 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_75, 0, x_60); -lean_ctor_set(x_75, 1, x_74); -lean_ctor_set(x_55, 1, x_75); -lean_ctor_set(x_55, 0, x_73); -return x_55; +x_65 = lean_ctor_get(x_53, 1); +lean_inc(x_65); +lean_dec(x_53); +x_66 = lean_alloc_ctor(6, 3, 8); +lean_ctor_set(x_66, 0, x_43); +lean_ctor_set(x_66, 1, x_44); +lean_ctor_set(x_66, 2, x_45); +lean_ctor_set_uint64(x_66, sizeof(void*)*3, x_46); +x_67 = (uint8_t)((x_46 << 24) >> 61); +x_68 = lean_expr_update_lambda(x_66, x_67, x_48, x_52); +lean_inc(x_68); +x_69 = lean_array_uset(x_65, x_6, x_68); +x_70 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_70, 0, x_55); +lean_ctor_set(x_70, 1, x_69); +lean_ctor_set(x_50, 1, x_70); +lean_ctor_set(x_50, 0, x_68); +return x_50; } } else { -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; uint8_t x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; -x_76 = lean_ctor_get(x_55, 0); -x_77 = lean_ctor_get(x_55, 1); -lean_inc(x_77); -lean_inc(x_76); -lean_dec(x_55); -x_78 = lean_ctor_get(x_77, 0); -lean_inc(x_78); +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; uint8_t x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_71 = lean_ctor_get(x_50, 0); +x_72 = lean_ctor_get(x_50, 1); +lean_inc(x_72); +lean_inc(x_71); +lean_dec(x_50); +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); lean_inc(x_3); -x_79 = lean_array_uset(x_78, x_6, x_3); +x_74 = lean_array_uset(x_73, x_6, x_3); if (lean_is_exclusive(x_3)) { lean_ctor_release(x_3, 0); lean_ctor_release(x_3, 1); lean_ctor_release(x_3, 2); - x_80 = x_3; + x_75 = x_3; } else { lean_dec_ref(x_3); - x_80 = lean_box(0); + x_75 = lean_box(0); } -x_81 = lean_ctor_get(x_77, 1); -lean_inc(x_81); -lean_dec(x_77); -if (lean_is_scalar(x_80)) { - x_82 = lean_alloc_ctor(6, 3, 8); +x_76 = lean_ctor_get(x_72, 1); +lean_inc(x_76); +lean_dec(x_72); +if (lean_is_scalar(x_75)) { + x_77 = lean_alloc_ctor(6, 3, 8); } else { - x_82 = x_80; + x_77 = x_75; } -lean_ctor_set(x_82, 0, x_48); -lean_ctor_set(x_82, 1, x_49); -lean_ctor_set(x_82, 2, x_50); -lean_ctor_set_uint64(x_82, sizeof(void*)*3, x_51); -x_83 = (uint8_t)((x_51 << 24) >> 61); -x_84 = lean_expr_update_lambda(x_82, x_83, x_53, x_76); -lean_inc(x_84); -x_85 = lean_array_uset(x_81, x_6, x_84); -x_86 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_86, 0, x_79); -lean_ctor_set(x_86, 1, x_85); -x_87 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_87, 0, x_84); -lean_ctor_set(x_87, 1, x_86); -return x_87; +lean_ctor_set(x_77, 0, x_43); +lean_ctor_set(x_77, 1, x_44); +lean_ctor_set(x_77, 2, x_45); +lean_ctor_set_uint64(x_77, sizeof(void*)*3, x_46); +x_78 = (uint8_t)((x_46 << 24) >> 61); +x_79 = lean_expr_update_lambda(x_77, x_78, x_48, x_71); +lean_inc(x_79); +x_80 = lean_array_uset(x_76, x_6, x_79); +x_81 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_81, 0, x_74); +lean_ctor_set(x_81, 1, x_80); +x_82 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_82, 0, x_79); +lean_ctor_set(x_82, 1, x_81); +return x_82; } } case 7: { -lean_object* x_88; lean_object* x_89; lean_object* x_90; uint64_t x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; uint8_t x_96; -x_88 = lean_ctor_get(x_3, 0); +lean_object* x_83; lean_object* x_84; lean_object* x_85; uint64_t x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; uint8_t x_91; +x_83 = lean_ctor_get(x_3, 0); +lean_inc(x_83); +x_84 = lean_ctor_get(x_3, 1); +lean_inc(x_84); +x_85 = lean_ctor_get(x_3, 2); +lean_inc(x_85); +x_86 = lean_ctor_get_uint64(x_3, sizeof(void*)*3); +lean_inc(x_84); +x_87 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_84, x_4); +x_88 = lean_ctor_get(x_87, 0); lean_inc(x_88); -x_89 = lean_ctor_get(x_3, 1); +x_89 = lean_ctor_get(x_87, 1); lean_inc(x_89); -x_90 = lean_ctor_get(x_3, 2); -lean_inc(x_90); -x_91 = lean_ctor_get_uint64(x_3, sizeof(void*)*3); -lean_inc(x_89); -x_92 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_89, x_4); -x_93 = lean_ctor_get(x_92, 0); -lean_inc(x_93); -x_94 = lean_ctor_get(x_92, 1); +lean_dec(x_87); +lean_inc(x_85); +x_90 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_85, x_89); +x_91 = !lean_is_exclusive(x_90); +if (x_91 == 0) +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; uint8_t x_96; +x_92 = lean_ctor_get(x_90, 0); +x_93 = lean_ctor_get(x_90, 1); +x_94 = lean_ctor_get(x_93, 0); lean_inc(x_94); -lean_dec(x_92); -lean_inc(x_90); -x_95 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_90, x_94); -x_96 = !lean_is_exclusive(x_95); +lean_inc(x_3); +x_95 = lean_array_uset(x_94, x_6, x_3); +x_96 = !lean_is_exclusive(x_3); if (x_96 == 0) { -lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; uint8_t x_101; -x_97 = lean_ctor_get(x_95, 0); -x_98 = lean_ctor_get(x_95, 1); -x_99 = lean_ctor_get(x_98, 0); -lean_inc(x_99); -lean_inc(x_3); -x_100 = lean_array_uset(x_99, x_6, x_3); -x_101 = !lean_is_exclusive(x_3); -if (x_101 == 0) -{ -lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; uint8_t x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_102 = lean_ctor_get(x_3, 2); -lean_dec(x_102); -x_103 = lean_ctor_get(x_3, 1); -lean_dec(x_103); -x_104 = lean_ctor_get(x_3, 0); -lean_dec(x_104); -x_105 = lean_ctor_get(x_98, 1); -lean_inc(x_105); +lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; uint8_t x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; +x_97 = lean_ctor_get(x_3, 2); +lean_dec(x_97); +x_98 = lean_ctor_get(x_3, 1); lean_dec(x_98); -x_106 = (uint8_t)((x_91 << 24) >> 61); -x_107 = lean_expr_update_forall(x_3, x_106, x_93, x_97); -lean_inc(x_107); -x_108 = lean_array_uset(x_105, x_6, x_107); -x_109 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_109, 0, x_100); -lean_ctor_set(x_109, 1, x_108); -lean_ctor_set(x_95, 1, x_109); -lean_ctor_set(x_95, 0, x_107); -return x_95; +x_99 = lean_ctor_get(x_3, 0); +lean_dec(x_99); +x_100 = lean_ctor_get(x_93, 1); +lean_inc(x_100); +lean_dec(x_93); +x_101 = (uint8_t)((x_86 << 24) >> 61); +x_102 = lean_expr_update_forall(x_3, x_101, x_88, x_92); +lean_inc(x_102); +x_103 = lean_array_uset(x_100, x_6, x_102); +x_104 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_104, 0, x_95); +lean_ctor_set(x_104, 1, x_103); +lean_ctor_set(x_90, 1, x_104); +lean_ctor_set(x_90, 0, x_102); +return x_90; } else { -lean_object* x_110; lean_object* x_111; uint8_t x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; +lean_object* x_105; lean_object* x_106; uint8_t x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_dec(x_3); -x_110 = lean_ctor_get(x_98, 1); -lean_inc(x_110); -lean_dec(x_98); -x_111 = lean_alloc_ctor(7, 3, 8); -lean_ctor_set(x_111, 0, x_88); -lean_ctor_set(x_111, 1, x_89); -lean_ctor_set(x_111, 2, x_90); -lean_ctor_set_uint64(x_111, sizeof(void*)*3, x_91); -x_112 = (uint8_t)((x_91 << 24) >> 61); -x_113 = lean_expr_update_forall(x_111, x_112, x_93, x_97); -lean_inc(x_113); -x_114 = lean_array_uset(x_110, x_6, x_113); -x_115 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_115, 0, x_100); -lean_ctor_set(x_115, 1, x_114); -lean_ctor_set(x_95, 1, x_115); -lean_ctor_set(x_95, 0, x_113); -return x_95; +x_105 = lean_ctor_get(x_93, 1); +lean_inc(x_105); +lean_dec(x_93); +x_106 = lean_alloc_ctor(7, 3, 8); +lean_ctor_set(x_106, 0, x_83); +lean_ctor_set(x_106, 1, x_84); +lean_ctor_set(x_106, 2, x_85); +lean_ctor_set_uint64(x_106, sizeof(void*)*3, x_86); +x_107 = (uint8_t)((x_86 << 24) >> 61); +x_108 = lean_expr_update_forall(x_106, x_107, x_88, x_92); +lean_inc(x_108); +x_109 = lean_array_uset(x_105, x_6, x_108); +x_110 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_110, 0, x_95); +lean_ctor_set(x_110, 1, x_109); +lean_ctor_set(x_90, 1, x_110); +lean_ctor_set(x_90, 0, x_108); +return x_90; } } else { -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; uint8_t x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_116 = lean_ctor_get(x_95, 0); -x_117 = lean_ctor_get(x_95, 1); -lean_inc(x_117); -lean_inc(x_116); -lean_dec(x_95); -x_118 = lean_ctor_get(x_117, 0); -lean_inc(x_118); +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; uint8_t x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; +x_111 = lean_ctor_get(x_90, 0); +x_112 = lean_ctor_get(x_90, 1); +lean_inc(x_112); +lean_inc(x_111); +lean_dec(x_90); +x_113 = lean_ctor_get(x_112, 0); +lean_inc(x_113); lean_inc(x_3); -x_119 = lean_array_uset(x_118, x_6, x_3); +x_114 = lean_array_uset(x_113, x_6, x_3); if (lean_is_exclusive(x_3)) { lean_ctor_release(x_3, 0); lean_ctor_release(x_3, 1); lean_ctor_release(x_3, 2); - x_120 = x_3; + x_115 = x_3; } else { lean_dec_ref(x_3); - x_120 = lean_box(0); + x_115 = lean_box(0); } -x_121 = lean_ctor_get(x_117, 1); -lean_inc(x_121); -lean_dec(x_117); -if (lean_is_scalar(x_120)) { - x_122 = lean_alloc_ctor(7, 3, 8); +x_116 = lean_ctor_get(x_112, 1); +lean_inc(x_116); +lean_dec(x_112); +if (lean_is_scalar(x_115)) { + x_117 = lean_alloc_ctor(7, 3, 8); } else { - x_122 = x_120; + x_117 = x_115; } -lean_ctor_set(x_122, 0, x_88); -lean_ctor_set(x_122, 1, x_89); -lean_ctor_set(x_122, 2, x_90); -lean_ctor_set_uint64(x_122, sizeof(void*)*3, x_91); -x_123 = (uint8_t)((x_91 << 24) >> 61); -x_124 = lean_expr_update_forall(x_122, x_123, x_93, x_116); -lean_inc(x_124); -x_125 = lean_array_uset(x_121, x_6, x_124); -x_126 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_126, 0, x_119); -lean_ctor_set(x_126, 1, x_125); -x_127 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_127, 0, x_124); -lean_ctor_set(x_127, 1, x_126); -return x_127; +lean_ctor_set(x_117, 0, x_83); +lean_ctor_set(x_117, 1, x_84); +lean_ctor_set(x_117, 2, x_85); +lean_ctor_set_uint64(x_117, sizeof(void*)*3, x_86); +x_118 = (uint8_t)((x_86 << 24) >> 61); +x_119 = lean_expr_update_forall(x_117, x_118, x_88, x_111); +lean_inc(x_119); +x_120 = lean_array_uset(x_116, x_6, x_119); +x_121 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_121, 0, x_114); +lean_ctor_set(x_121, 1, x_120); +x_122 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_122, 0, x_119); +lean_ctor_set(x_122, 1, x_121); +return x_122; } } case 8: { -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; uint64_t x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; uint8_t x_140; -x_128 = lean_ctor_get(x_3, 0); -lean_inc(x_128); -x_129 = lean_ctor_get(x_3, 1); +lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; uint64_t 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; uint8_t x_135; +x_123 = lean_ctor_get(x_3, 0); +lean_inc(x_123); +x_124 = lean_ctor_get(x_3, 1); +lean_inc(x_124); +x_125 = lean_ctor_get(x_3, 2); +lean_inc(x_125); +x_126 = lean_ctor_get(x_3, 3); +lean_inc(x_126); +x_127 = lean_ctor_get_uint64(x_3, sizeof(void*)*4); +lean_inc(x_124); +x_128 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_124, x_4); +x_129 = lean_ctor_get(x_128, 0); lean_inc(x_129); -x_130 = lean_ctor_get(x_3, 2); +x_130 = lean_ctor_get(x_128, 1); lean_inc(x_130); -x_131 = lean_ctor_get(x_3, 3); -lean_inc(x_131); -x_132 = lean_ctor_get_uint64(x_3, sizeof(void*)*4); -lean_inc(x_129); -x_133 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_129, x_4); -x_134 = lean_ctor_get(x_133, 0); -lean_inc(x_134); -x_135 = lean_ctor_get(x_133, 1); -lean_inc(x_135); -lean_dec(x_133); -lean_inc(x_130); -x_136 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_130, x_135); -x_137 = lean_ctor_get(x_136, 0); -lean_inc(x_137); -x_138 = lean_ctor_get(x_136, 1); +lean_dec(x_128); +lean_inc(x_125); +x_131 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_125, x_130); +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_126); +x_134 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_126, x_133); +x_135 = !lean_is_exclusive(x_134); +if (x_135 == 0) +{ +lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; uint8_t x_140; +x_136 = lean_ctor_get(x_134, 0); +x_137 = lean_ctor_get(x_134, 1); +x_138 = lean_ctor_get(x_137, 0); lean_inc(x_138); -lean_dec(x_136); -lean_inc(x_131); -x_139 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_131, x_138); -x_140 = !lean_is_exclusive(x_139); +lean_inc(x_3); +x_139 = lean_array_uset(x_138, x_6, x_3); +x_140 = !lean_is_exclusive(x_3); if (x_140 == 0) { -lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; uint8_t x_145; -x_141 = lean_ctor_get(x_139, 0); -x_142 = lean_ctor_get(x_139, 1); -x_143 = lean_ctor_get(x_142, 0); -lean_inc(x_143); -lean_inc(x_3); -x_144 = lean_array_uset(x_143, x_6, x_3); -x_145 = !lean_is_exclusive(x_3); -if (x_145 == 0) -{ -lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -x_146 = lean_ctor_get(x_3, 3); -lean_dec(x_146); -x_147 = lean_ctor_get(x_3, 2); -lean_dec(x_147); -x_148 = lean_ctor_get(x_3, 1); -lean_dec(x_148); -x_149 = lean_ctor_get(x_3, 0); -lean_dec(x_149); -x_150 = lean_ctor_get(x_142, 1); -lean_inc(x_150); +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; +x_141 = lean_ctor_get(x_3, 3); +lean_dec(x_141); +x_142 = lean_ctor_get(x_3, 2); lean_dec(x_142); -x_151 = lean_expr_update_let(x_3, x_134, x_137, x_141); -lean_inc(x_151); -x_152 = lean_array_uset(x_150, x_6, x_151); -x_153 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_153, 0, x_144); -lean_ctor_set(x_153, 1, x_152); -lean_ctor_set(x_139, 1, x_153); -lean_ctor_set(x_139, 0, x_151); -return x_139; +x_143 = lean_ctor_get(x_3, 1); +lean_dec(x_143); +x_144 = lean_ctor_get(x_3, 0); +lean_dec(x_144); +x_145 = lean_ctor_get(x_137, 1); +lean_inc(x_145); +lean_dec(x_137); +x_146 = lean_expr_update_let(x_3, x_129, x_132, x_136); +lean_inc(x_146); +x_147 = lean_array_uset(x_145, x_6, x_146); +x_148 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_148, 0, x_139); +lean_ctor_set(x_148, 1, x_147); +lean_ctor_set(x_134, 1, x_148); +lean_ctor_set(x_134, 0, x_146); +return x_134; } else { -lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; +lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_dec(x_3); -x_154 = lean_ctor_get(x_142, 1); -lean_inc(x_154); -lean_dec(x_142); -x_155 = lean_alloc_ctor(8, 4, 8); -lean_ctor_set(x_155, 0, x_128); -lean_ctor_set(x_155, 1, x_129); -lean_ctor_set(x_155, 2, x_130); -lean_ctor_set(x_155, 3, x_131); -lean_ctor_set_uint64(x_155, sizeof(void*)*4, x_132); -x_156 = lean_expr_update_let(x_155, x_134, x_137, x_141); -lean_inc(x_156); -x_157 = lean_array_uset(x_154, x_6, x_156); -x_158 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_158, 0, x_144); -lean_ctor_set(x_158, 1, x_157); -lean_ctor_set(x_139, 1, x_158); -lean_ctor_set(x_139, 0, x_156); -return x_139; +x_149 = lean_ctor_get(x_137, 1); +lean_inc(x_149); +lean_dec(x_137); +x_150 = lean_alloc_ctor(8, 4, 8); +lean_ctor_set(x_150, 0, x_123); +lean_ctor_set(x_150, 1, x_124); +lean_ctor_set(x_150, 2, x_125); +lean_ctor_set(x_150, 3, x_126); +lean_ctor_set_uint64(x_150, sizeof(void*)*4, x_127); +x_151 = lean_expr_update_let(x_150, x_129, x_132, x_136); +lean_inc(x_151); +x_152 = lean_array_uset(x_149, x_6, x_151); +x_153 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_153, 0, x_139); +lean_ctor_set(x_153, 1, x_152); +lean_ctor_set(x_134, 1, x_153); +lean_ctor_set(x_134, 0, x_151); +return x_134; } } else { -lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; -x_159 = lean_ctor_get(x_139, 0); -x_160 = lean_ctor_get(x_139, 1); -lean_inc(x_160); -lean_inc(x_159); -lean_dec(x_139); -x_161 = lean_ctor_get(x_160, 0); -lean_inc(x_161); +lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; +x_154 = lean_ctor_get(x_134, 0); +x_155 = lean_ctor_get(x_134, 1); +lean_inc(x_155); +lean_inc(x_154); +lean_dec(x_134); +x_156 = lean_ctor_get(x_155, 0); +lean_inc(x_156); lean_inc(x_3); -x_162 = lean_array_uset(x_161, x_6, x_3); +x_157 = lean_array_uset(x_156, x_6, x_3); if (lean_is_exclusive(x_3)) { lean_ctor_release(x_3, 0); lean_ctor_release(x_3, 1); lean_ctor_release(x_3, 2); lean_ctor_release(x_3, 3); - x_163 = x_3; + x_158 = x_3; } else { lean_dec_ref(x_3); - x_163 = lean_box(0); + x_158 = lean_box(0); } -x_164 = lean_ctor_get(x_160, 1); -lean_inc(x_164); -lean_dec(x_160); -if (lean_is_scalar(x_163)) { - x_165 = lean_alloc_ctor(8, 4, 8); +x_159 = lean_ctor_get(x_155, 1); +lean_inc(x_159); +lean_dec(x_155); +if (lean_is_scalar(x_158)) { + x_160 = lean_alloc_ctor(8, 4, 8); } else { - x_165 = x_163; + x_160 = x_158; } -lean_ctor_set(x_165, 0, x_128); -lean_ctor_set(x_165, 1, x_129); -lean_ctor_set(x_165, 2, x_130); -lean_ctor_set(x_165, 3, x_131); -lean_ctor_set_uint64(x_165, sizeof(void*)*4, x_132); -x_166 = lean_expr_update_let(x_165, x_134, x_137, x_159); -lean_inc(x_166); -x_167 = lean_array_uset(x_164, x_6, x_166); -x_168 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_168, 0, x_162); -lean_ctor_set(x_168, 1, x_167); -x_169 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_169, 0, x_166); -lean_ctor_set(x_169, 1, x_168); -return x_169; +lean_ctor_set(x_160, 0, x_123); +lean_ctor_set(x_160, 1, x_124); +lean_ctor_set(x_160, 2, x_125); +lean_ctor_set(x_160, 3, x_126); +lean_ctor_set_uint64(x_160, sizeof(void*)*4, x_127); +x_161 = lean_expr_update_let(x_160, x_129, x_132, x_154); +lean_inc(x_161); +x_162 = lean_array_uset(x_159, x_6, x_161); +x_163 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_163, 0, x_157); +lean_ctor_set(x_163, 1, x_162); +x_164 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_164, 0, x_161); +lean_ctor_set(x_164, 1, x_163); +return x_164; } } case 10: { -lean_object* x_170; lean_object* x_171; uint64_t x_172; lean_object* x_173; uint8_t x_174; -x_170 = lean_ctor_get(x_3, 0); -lean_inc(x_170); -x_171 = lean_ctor_get(x_3, 1); -lean_inc(x_171); -x_172 = lean_ctor_get_uint64(x_3, sizeof(void*)*2); -lean_inc(x_171); -x_173 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_171, x_4); -x_174 = !lean_is_exclusive(x_173); +lean_object* x_165; lean_object* x_166; uint64_t x_167; lean_object* x_168; uint8_t x_169; +x_165 = lean_ctor_get(x_3, 0); +lean_inc(x_165); +x_166 = lean_ctor_get(x_3, 1); +lean_inc(x_166); +x_167 = lean_ctor_get_uint64(x_3, sizeof(void*)*2); +lean_inc(x_166); +x_168 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_166, x_4); +x_169 = !lean_is_exclusive(x_168); +if (x_169 == 0) +{ +lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; uint8_t x_174; +x_170 = lean_ctor_get(x_168, 0); +x_171 = lean_ctor_get(x_168, 1); +x_172 = lean_ctor_get(x_171, 0); +lean_inc(x_172); +lean_inc(x_3); +x_173 = lean_array_uset(x_172, x_6, x_3); +x_174 = !lean_is_exclusive(x_3); if (x_174 == 0) { -lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; uint8_t x_179; -x_175 = lean_ctor_get(x_173, 0); -x_176 = lean_ctor_get(x_173, 1); -x_177 = lean_ctor_get(x_176, 0); +lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; +x_175 = lean_ctor_get(x_3, 1); +lean_dec(x_175); +x_176 = lean_ctor_get(x_3, 0); +lean_dec(x_176); +x_177 = lean_ctor_get(x_171, 1); lean_inc(x_177); -lean_inc(x_3); -x_178 = lean_array_uset(x_177, x_6, x_3); -x_179 = !lean_is_exclusive(x_3); -if (x_179 == 0) -{ -lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; -x_180 = lean_ctor_get(x_3, 1); -lean_dec(x_180); -x_181 = lean_ctor_get(x_3, 0); -lean_dec(x_181); -x_182 = lean_ctor_get(x_176, 1); -lean_inc(x_182); -lean_dec(x_176); -x_183 = lean_expr_update_mdata(x_3, x_175); -lean_inc(x_183); -x_184 = lean_array_uset(x_182, x_6, x_183); -x_185 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_185, 0, x_178); -lean_ctor_set(x_185, 1, x_184); -lean_ctor_set(x_173, 1, x_185); -lean_ctor_set(x_173, 0, x_183); -return x_173; +lean_dec(x_171); +x_178 = lean_expr_update_mdata(x_3, x_170); +lean_inc(x_178); +x_179 = lean_array_uset(x_177, x_6, x_178); +x_180 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_180, 0, x_173); +lean_ctor_set(x_180, 1, x_179); +lean_ctor_set(x_168, 1, x_180); +lean_ctor_set(x_168, 0, x_178); +return x_168; } else { -lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; +lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_dec(x_3); -x_186 = lean_ctor_get(x_176, 1); -lean_inc(x_186); -lean_dec(x_176); -x_187 = lean_alloc_ctor(10, 2, 8); -lean_ctor_set(x_187, 0, x_170); -lean_ctor_set(x_187, 1, x_171); -lean_ctor_set_uint64(x_187, sizeof(void*)*2, x_172); -x_188 = lean_expr_update_mdata(x_187, x_175); -lean_inc(x_188); -x_189 = lean_array_uset(x_186, x_6, x_188); -x_190 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_190, 0, x_178); -lean_ctor_set(x_190, 1, x_189); -lean_ctor_set(x_173, 1, x_190); -lean_ctor_set(x_173, 0, x_188); -return x_173; +x_181 = lean_ctor_get(x_171, 1); +lean_inc(x_181); +lean_dec(x_171); +x_182 = lean_alloc_ctor(10, 2, 8); +lean_ctor_set(x_182, 0, x_165); +lean_ctor_set(x_182, 1, x_166); +lean_ctor_set_uint64(x_182, sizeof(void*)*2, x_167); +x_183 = lean_expr_update_mdata(x_182, x_170); +lean_inc(x_183); +x_184 = lean_array_uset(x_181, x_6, x_183); +x_185 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_185, 0, x_173); +lean_ctor_set(x_185, 1, x_184); +lean_ctor_set(x_168, 1, x_185); +lean_ctor_set(x_168, 0, x_183); +return x_168; } } else { -lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; -x_191 = lean_ctor_get(x_173, 0); -x_192 = lean_ctor_get(x_173, 1); -lean_inc(x_192); -lean_inc(x_191); -lean_dec(x_173); -x_193 = lean_ctor_get(x_192, 0); -lean_inc(x_193); +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; +x_186 = lean_ctor_get(x_168, 0); +x_187 = lean_ctor_get(x_168, 1); +lean_inc(x_187); +lean_inc(x_186); +lean_dec(x_168); +x_188 = lean_ctor_get(x_187, 0); +lean_inc(x_188); lean_inc(x_3); -x_194 = lean_array_uset(x_193, x_6, x_3); +x_189 = lean_array_uset(x_188, x_6, x_3); if (lean_is_exclusive(x_3)) { lean_ctor_release(x_3, 0); lean_ctor_release(x_3, 1); - x_195 = x_3; + x_190 = x_3; } else { lean_dec_ref(x_3); - x_195 = lean_box(0); + x_190 = lean_box(0); } -x_196 = lean_ctor_get(x_192, 1); -lean_inc(x_196); -lean_dec(x_192); -if (lean_is_scalar(x_195)) { - x_197 = lean_alloc_ctor(10, 2, 8); +x_191 = lean_ctor_get(x_187, 1); +lean_inc(x_191); +lean_dec(x_187); +if (lean_is_scalar(x_190)) { + x_192 = lean_alloc_ctor(10, 2, 8); } else { - x_197 = x_195; + x_192 = x_190; } -lean_ctor_set(x_197, 0, x_170); -lean_ctor_set(x_197, 1, x_171); -lean_ctor_set_uint64(x_197, sizeof(void*)*2, x_172); -x_198 = lean_expr_update_mdata(x_197, x_191); -lean_inc(x_198); -x_199 = lean_array_uset(x_196, x_6, x_198); -x_200 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_200, 0, x_194); -lean_ctor_set(x_200, 1, x_199); -x_201 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_201, 0, x_198); -lean_ctor_set(x_201, 1, x_200); -return x_201; +lean_ctor_set(x_192, 0, x_165); +lean_ctor_set(x_192, 1, x_166); +lean_ctor_set_uint64(x_192, sizeof(void*)*2, x_167); +x_193 = lean_expr_update_mdata(x_192, x_186); +lean_inc(x_193); +x_194 = lean_array_uset(x_191, x_6, x_193); +x_195 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_195, 0, x_189); +lean_ctor_set(x_195, 1, x_194); +x_196 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_196, 0, x_193); +lean_ctor_set(x_196, 1, x_195); +return x_196; } } case 11: { -lean_object* x_202; lean_object* x_203; lean_object* x_204; uint64_t x_205; lean_object* x_206; uint8_t x_207; -x_202 = lean_ctor_get(x_3, 0); -lean_inc(x_202); -x_203 = lean_ctor_get(x_3, 1); -lean_inc(x_203); -x_204 = lean_ctor_get(x_3, 2); -lean_inc(x_204); -x_205 = lean_ctor_get_uint64(x_3, sizeof(void*)*3); -lean_inc(x_204); -x_206 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_2, x_204, x_4); -x_207 = !lean_is_exclusive(x_206); +lean_object* x_197; lean_object* x_198; lean_object* x_199; uint64_t x_200; lean_object* x_201; uint8_t x_202; +x_197 = lean_ctor_get(x_3, 0); +lean_inc(x_197); +x_198 = lean_ctor_get(x_3, 1); +lean_inc(x_198); +x_199 = lean_ctor_get(x_3, 2); +lean_inc(x_199); +x_200 = lean_ctor_get_uint64(x_3, sizeof(void*)*3); +lean_inc(x_199); +x_201 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_2, x_199, x_4); +x_202 = !lean_is_exclusive(x_201); +if (x_202 == 0) +{ +lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; uint8_t x_207; +x_203 = lean_ctor_get(x_201, 0); +x_204 = lean_ctor_get(x_201, 1); +x_205 = lean_ctor_get(x_204, 0); +lean_inc(x_205); +lean_inc(x_3); +x_206 = lean_array_uset(x_205, x_6, x_3); +x_207 = !lean_is_exclusive(x_3); if (x_207 == 0) { -lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; uint8_t x_212; -x_208 = lean_ctor_get(x_206, 0); -x_209 = lean_ctor_get(x_206, 1); -x_210 = lean_ctor_get(x_209, 0); -lean_inc(x_210); -lean_inc(x_3); -x_211 = lean_array_uset(x_210, x_6, x_3); -x_212 = !lean_is_exclusive(x_3); -if (x_212 == 0) -{ -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; -x_213 = lean_ctor_get(x_3, 2); -lean_dec(x_213); -x_214 = lean_ctor_get(x_3, 1); -lean_dec(x_214); -x_215 = lean_ctor_get(x_3, 0); -lean_dec(x_215); -x_216 = lean_ctor_get(x_209, 1); -lean_inc(x_216); +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_208 = lean_ctor_get(x_3, 2); +lean_dec(x_208); +x_209 = lean_ctor_get(x_3, 1); lean_dec(x_209); -x_217 = lean_expr_update_proj(x_3, x_208); -lean_inc(x_217); -x_218 = lean_array_uset(x_216, x_6, x_217); -x_219 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_219, 0, x_211); -lean_ctor_set(x_219, 1, x_218); -lean_ctor_set(x_206, 1, x_219); -lean_ctor_set(x_206, 0, x_217); -return x_206; +x_210 = lean_ctor_get(x_3, 0); +lean_dec(x_210); +x_211 = lean_ctor_get(x_204, 1); +lean_inc(x_211); +lean_dec(x_204); +x_212 = lean_expr_update_proj(x_3, x_203); +lean_inc(x_212); +x_213 = lean_array_uset(x_211, x_6, x_212); +x_214 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_214, 0, x_206); +lean_ctor_set(x_214, 1, x_213); +lean_ctor_set(x_201, 1, x_214); +lean_ctor_set(x_201, 0, x_212); +return x_201; } else { -lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; +lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_dec(x_3); -x_220 = lean_ctor_get(x_209, 1); -lean_inc(x_220); -lean_dec(x_209); -x_221 = lean_alloc_ctor(11, 3, 8); -lean_ctor_set(x_221, 0, x_202); -lean_ctor_set(x_221, 1, x_203); -lean_ctor_set(x_221, 2, x_204); -lean_ctor_set_uint64(x_221, sizeof(void*)*3, x_205); -x_222 = lean_expr_update_proj(x_221, x_208); -lean_inc(x_222); -x_223 = lean_array_uset(x_220, x_6, x_222); -x_224 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_224, 0, x_211); -lean_ctor_set(x_224, 1, x_223); -lean_ctor_set(x_206, 1, x_224); -lean_ctor_set(x_206, 0, x_222); -return x_206; +x_215 = lean_ctor_get(x_204, 1); +lean_inc(x_215); +lean_dec(x_204); +x_216 = lean_alloc_ctor(11, 3, 8); +lean_ctor_set(x_216, 0, x_197); +lean_ctor_set(x_216, 1, x_198); +lean_ctor_set(x_216, 2, x_199); +lean_ctor_set_uint64(x_216, sizeof(void*)*3, x_200); +x_217 = lean_expr_update_proj(x_216, x_203); +lean_inc(x_217); +x_218 = lean_array_uset(x_215, x_6, x_217); +x_219 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_219, 0, x_206); +lean_ctor_set(x_219, 1, x_218); +lean_ctor_set(x_201, 1, x_219); +lean_ctor_set(x_201, 0, x_217); +return x_201; } } else { -lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; -x_225 = lean_ctor_get(x_206, 0); -x_226 = lean_ctor_get(x_206, 1); -lean_inc(x_226); -lean_inc(x_225); -lean_dec(x_206); -x_227 = lean_ctor_get(x_226, 0); -lean_inc(x_227); +lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; +x_220 = lean_ctor_get(x_201, 0); +x_221 = lean_ctor_get(x_201, 1); +lean_inc(x_221); +lean_inc(x_220); +lean_dec(x_201); +x_222 = lean_ctor_get(x_221, 0); +lean_inc(x_222); lean_inc(x_3); -x_228 = lean_array_uset(x_227, x_6, x_3); +x_223 = lean_array_uset(x_222, x_6, x_3); if (lean_is_exclusive(x_3)) { lean_ctor_release(x_3, 0); lean_ctor_release(x_3, 1); lean_ctor_release(x_3, 2); - x_229 = x_3; + x_224 = x_3; } else { lean_dec_ref(x_3); - x_229 = lean_box(0); + x_224 = lean_box(0); } -x_230 = lean_ctor_get(x_226, 1); -lean_inc(x_230); -lean_dec(x_226); -if (lean_is_scalar(x_229)) { - x_231 = lean_alloc_ctor(11, 3, 8); +x_225 = lean_ctor_get(x_221, 1); +lean_inc(x_225); +lean_dec(x_221); +if (lean_is_scalar(x_224)) { + x_226 = lean_alloc_ctor(11, 3, 8); } else { - x_231 = x_229; + x_226 = x_224; } -lean_ctor_set(x_231, 0, x_202); -lean_ctor_set(x_231, 1, x_203); -lean_ctor_set(x_231, 2, x_204); -lean_ctor_set_uint64(x_231, sizeof(void*)*3, x_205); -x_232 = lean_expr_update_proj(x_231, x_225); -lean_inc(x_232); -x_233 = lean_array_uset(x_230, x_6, x_232); -x_234 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_234, 0, x_228); -lean_ctor_set(x_234, 1, x_233); -x_235 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_235, 0, x_232); -lean_ctor_set(x_235, 1, x_234); -return x_235; +lean_ctor_set(x_226, 0, x_197); +lean_ctor_set(x_226, 1, x_198); +lean_ctor_set(x_226, 2, x_199); +lean_ctor_set_uint64(x_226, sizeof(void*)*3, x_200); +x_227 = lean_expr_update_proj(x_226, x_220); +lean_inc(x_227); +x_228 = lean_array_uset(x_225, x_6, x_227); +x_229 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_229, 0, x_223); +lean_ctor_set(x_229, 1, x_228); +x_230 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_230, 0, x_227); +lean_ctor_set(x_230, 1, x_229); +return x_230; } } default: { -lean_object* x_236; -x_236 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_236, 0, x_3); -lean_ctor_set(x_236, 1, x_4); -return x_236; +lean_object* x_231; +x_231 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_231, 0, x_3); +lean_ctor_set(x_231, 1, x_4); +return x_231; } } } -else -{ -lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; -x_237 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_238 = lean_box(0); -x_239 = l_Lean_mkConst(x_237, x_238); -x_240 = lean_array_uset(x_7, x_6, x_3); -x_241 = lean_ctor_get(x_4, 1); -lean_inc(x_241); -lean_dec(x_4); -lean_inc(x_239); -x_242 = lean_array_uset(x_241, x_6, x_239); -x_243 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_243, 0, x_240); -lean_ctor_set(x_243, 1, x_242); -x_244 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_244, 0, x_239); -lean_ctor_set(x_244, 1, x_243); -return x_244; } } -else -{ -lean_object* x_245; lean_object* x_246; lean_object* x_247; -lean_dec(x_7); -lean_dec(x_3); -x_245 = lean_ctor_get(x_4, 1); -lean_inc(x_245); -x_246 = lean_array_uget(x_245, x_6); -lean_dec(x_245); -x_247 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_247, 0, x_246); -lean_ctor_set(x_247, 1, x_4); -return x_247; -} -} -} -lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1(lean_object* x_1) { +lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg___boxed), 4, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg___boxed), 4, 0); return x_2; } } -lean_object* l_Lean_ParserCompiler_preprocessParserBody___rarg(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_ParserCompiler_replaceParserTy___rarg(lean_object* x_1, lean_object* x_2) { _start: { size_t x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_3 = 8192; x_4 = l_Lean_Expr_ReplaceImpl_initCache; -x_5 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_3, x_2, x_4); +x_5 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_3, x_2, x_4); x_6 = lean_ctor_get(x_5, 0); lean_inc(x_6); lean_dec(x_5); return x_6; } } -lean_object* l_Lean_ParserCompiler_preprocessParserBody(lean_object* x_1) { +lean_object* l_Lean_ParserCompiler_replaceParserTy(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_preprocessParserBody___rarg___boxed), 2, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_replaceParserTy___rarg___boxed), 2, 0); return x_2; } } -lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { size_t x_5; lean_object* x_6; x_5 = lean_unbox_usize(x_2); lean_dec(x_2); -x_6 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_preprocessParserBody___spec__1___rarg(x_1, x_5, x_3, x_4); +x_6 = l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at_Lean_ParserCompiler_replaceParserTy___spec__1___rarg(x_1, x_5, x_3, x_4); lean_dec(x_1); return x_6; } } -lean_object* l_Lean_ParserCompiler_preprocessParserBody___rarg___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_ParserCompiler_replaceParserTy___rarg___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); +x_3 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_dec(x_1); return x_3; } @@ -1507,7 +1558,173 @@ return x_17; } } } -lean_object* l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) +{ +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; +goto _start; +} +else +{ +uint8_t x_23; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) +{ +return x_15; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; +} +} +} +else +{ +lean_object* x_27; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; +} +} +} +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg___boxed), 10, 0); +return x_2; +} +} +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) +{ +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; +goto _start; +} +else +{ +uint8_t x_23; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) +{ +return x_15; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; +} +} +} +else +{ +lean_object* x_27; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; +} +} +} +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___boxed), 10, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; uint8_t x_9; lean_object* x_10; @@ -1560,309 +1777,11 @@ return x_18; } } } -lean_object* l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2(lean_object* x_1) { +lean_object* l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg), 7, 0); -return x_2; -} -} -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___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, lean_object* x_7, lean_object* x_8, lean_object* x_9) { -_start: -{ -lean_object* x_10; lean_object* x_11; uint8_t x_12; -x_10 = l_myMacro____x40_Init_Notation___hyg_38____closed__3; -x_11 = lean_name_mk_string(x_1, x_10); -x_12 = l_Lean_Expr_isConstOf(x_4, x_11); -lean_dec(x_11); -if (x_12 == 0) -{ -lean_object* x_13; -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_4); -lean_ctor_set(x_13, 1, x_9); -return x_13; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -lean_dec(x_4); -x_14 = l_Lean_ParserCompiler_Context_tyName___rarg(x_2); -x_15 = lean_box(0); -x_16 = l_Lean_mkConst(x_14, x_15); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_9); -return x_17; -} -} -} -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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) { -_start: -{ -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) -{ -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; -goto _start; -} -else -{ -uint8_t x_27; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) -{ -return x_20; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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; -} -} -} -else -{ -uint8_t x_31; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; -} -} -} -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___boxed), 11, 0); -return x_2; -} -} -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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) { -_start: -{ -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) -{ -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; -goto _start; -} -else -{ -uint8_t x_27; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) -{ -return x_20; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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; -} -} -} -else -{ -uint8_t x_31; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; -} -} -} -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg), 7, 0); return x_2; } } @@ -2762,129 +2681,78 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -2892,133 +2760,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -3026,7 +2843,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg___boxed), 10, 0); return x_2; } } @@ -3841,129 +3658,78 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -3971,133 +3737,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -4105,7 +3820,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg___boxed), 10, 0); return x_2; } } @@ -4920,129 +4635,78 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -5050,133 +4714,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -5184,7 +4797,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg___boxed), 10, 0); return x_2; } } @@ -5999,129 +5612,78 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -6129,133 +5691,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -6263,7 +5774,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg___boxed), 10, 0); return x_2; } } @@ -7086,129 +6597,78 @@ x_8 = l_Lean_Meta_mkLambdaFVarsImp(x_1, x_2, x_3, x_4, x_5, x_6, x_7); return x_8; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -7216,133 +6676,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -7350,7 +6759,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg___boxed), 10, 0); return x_2; } } @@ -8165,129 +7574,78 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -8295,133 +7653,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -8429,7 +7736,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg___boxed), 10, 0); return x_2; } } @@ -9244,129 +8551,78 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -9374,133 +8630,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -9508,7 +8713,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg___boxed), 10, 0); return x_2; } } @@ -10323,129 +9528,78 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -10453,133 +9607,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -10587,7 +9690,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg___boxed), 10, 0); return x_2; } } @@ -11402,129 +10505,78 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -11532,133 +10584,82 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg___boxed), 10, 0); return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -uint8_t x_12; -x_12 = x_4 == x_5; -if (x_12 == 0) +uint8_t x_11; +x_11 = x_3 == x_4; +if (x_11 == 0) { -size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_13 = 1; -x_14 = x_4 - x_13; -x_15 = lean_array_uget(x_3, x_14); -lean_inc(x_10); +size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; +x_12 = 1; +x_13 = x_3 - x_12; +x_14 = lean_array_uget(x_2, x_13); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_16 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_6); +x_15 = l_Lean_Meta_inferType___at_Lean_ParserCompiler_compileParserExpr___spec__1(x_14, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -lean_inc(x_1); -lean_inc(x_2); -x_19 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_19, 0, x_2); -lean_closure_set(x_19, 1, x_1); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_20 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_17, x_19, x_7, x_8, x_9, x_10, x_18); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_mkSimpleThunk___closed__1; -x_24 = 0; -x_25 = l_Lean_mkForall(x_23, x_24, x_21, x_6); -x_4 = x_14; -x_6 = x_25; -x_11 = x_22; +lean_dec(x_15); +x_18 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_16); +x_19 = l_Lean_mkSimpleThunk___closed__1; +x_20 = 0; +x_21 = l_Lean_mkForall(x_19, x_20, x_18, x_5); +x_3 = x_13; +x_5 = x_21; +x_10 = x_17; goto _start; } else { -uint8_t x_27; -lean_dec(x_10); +uint8_t x_23; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) +lean_dec(x_5); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -return x_20; +return x_15; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -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* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_15, 0); +x_25 = lean_ctor_get(x_15, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_15); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } else { -uint8_t x_31; -lean_dec(x_10); +lean_object* x_27; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_31 = !lean_is_exclusive(x_16); -if (x_31 == 0) -{ -return x_16; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_16, 0); -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_16); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_6); -lean_ctor_set(x_35, 1, x_11); -return x_35; +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_5); +lean_ctor_set(x_27, 1, x_10); +return x_27; } } } @@ -11666,7 +10667,7 @@ lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExp _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg___boxed), 11, 0); +x_2 = lean_alloc_closure((void*)(l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg___boxed), 10, 0); return x_2; } } @@ -12481,73 +11482,69 @@ x_2 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at_Lean_ParserCompiler return x_2; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___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, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___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, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -12691,223 +11688,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__1___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__1___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__3(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__3(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -12915,23 +11910,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -13008,73 +12003,69 @@ return x_31; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -13218,223 +12209,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__8(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__8(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -13442,23 +12431,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -13535,73 +12524,69 @@ return x_31; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -13745,223 +12730,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__13(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__13(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -13969,23 +12952,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -14062,73 +13045,69 @@ return x_31; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -14272,223 +13251,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__18(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__18(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -14496,23 +13473,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -14589,73 +13566,69 @@ return x_31; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -14799,223 +13772,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__23(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__23(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -15023,23 +13994,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -15168,73 +14139,69 @@ return x_17; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -15378,223 +14345,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__29(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__29(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -15602,23 +14567,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -15695,73 +14660,69 @@ return x_31; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -15905,223 +14866,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__34(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__34(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -16129,23 +15088,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -16222,73 +15181,69 @@ return x_31; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -16432,223 +15387,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__39(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__39(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -16656,23 +15609,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -16749,73 +15702,69 @@ return x_31; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -16959,223 +15908,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__44(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__44(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -17183,23 +16130,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -17276,73 +16223,69 @@ return x_31; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); -x_11 = lean_box(0); -x_12 = l_Lean_mkConst(x_10, x_11); -x_13 = lean_array_get_size(x_3); -x_14 = lean_nat_dec_le(x_13, x_13); -if (x_14 == 0) +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = l_Lean_ParserCompiler_Context_tyName___rarg(x_1); +x_10 = lean_box(0); +x_11 = l_Lean_mkConst(x_9, x_10); +x_12 = lean_array_get_size(x_2); +x_13 = lean_nat_dec_le(x_12, x_12); +if (x_13 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_nat_dec_lt(x_15, x_13); -if (x_16 == 0) +lean_object* x_14; uint8_t x_15; +x_14 = lean_unsigned_to_nat(0u); +x_15 = lean_nat_dec_lt(x_14, x_12); +if (x_15 == 0) { -lean_object* x_17; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_16; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_12); -lean_ctor_set(x_17, 1, x_9); -return x_17; +lean_dec(x_4); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_11); +lean_ctor_set(x_16, 1, x_8); +return x_16; } else { -size_t x_18; size_t x_19; lean_object* x_20; -x_18 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_19 = 0; -x_20 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg(x_1, x_2, x_3, x_18, x_19, x_12, x_5, x_6, x_7, x_8, x_9); -return x_20; +size_t x_17; size_t x_18; lean_object* x_19; +x_17 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_18 = 0; +x_19 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg(x_1, x_2, x_17, x_18, x_11, x_4, x_5, x_6, x_7, x_8); +return x_19; } } else { -lean_object* x_21; uint8_t x_22; -x_21 = lean_unsigned_to_nat(0u); -x_22 = lean_nat_dec_lt(x_21, x_13); -if (x_22 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_nat_dec_lt(x_20, x_12); +if (x_21 == 0) { -lean_object* x_23; -lean_dec(x_13); -lean_dec(x_8); +lean_object* x_22; +lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_12); -lean_ctor_set(x_23, 1, x_9); -return x_23; +lean_dec(x_4); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_11); +lean_ctor_set(x_22, 1, x_8); +return x_22; } else { -size_t x_24; size_t x_25; lean_object* x_26; -x_24 = lean_usize_of_nat(x_13); -lean_dec(x_13); -x_25 = 0; -x_26 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg(x_1, x_2, x_3, x_24, x_25, x_12, x_5, x_6, x_7, x_8, x_9); -return x_26; +size_t x_23; size_t x_24; lean_object* x_25; +x_23 = lean_usize_of_nat(x_12); +lean_dec(x_12); +x_24 = 0; +x_25 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg(x_1, x_2, x_23, x_24, x_11, x_4, x_5, x_6, x_7, x_8); +return x_25; } } } @@ -17486,223 +16429,221 @@ return x_28; } } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_17; lean_object* x_18; -x_17 = l_Lean_ParserCompiler_preprocessParserBody___rarg(x_1, x_2); -lean_inc(x_15); +lean_object* x_16; lean_object* x_17; +x_16 = l_Lean_ParserCompiler_replaceParserTy___rarg(x_1, x_2); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); +lean_inc(x_11); lean_inc(x_1); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_17, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg(x_1, x_3, x_16, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_18, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); +lean_dec(x_17); lean_inc(x_1); -x_21 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47___boxed), 9, 2); -lean_closure_set(x_21, 0, x_1); -lean_closure_set(x_21, 1, x_4); -lean_inc(x_15); +x_20 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47___boxed), 8, 1); +lean_closure_set(x_20, 0, x_1); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -x_22 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_5, x_21, x_12, x_13, x_14, x_15, x_20); -if (lean_obj_tag(x_22) == 0) +lean_inc(x_11); +x_21 = l_Lean_Meta_forallTelescope___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_4, x_20, x_11, x_12, x_13, x_14, x_19); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_23 = lean_ctor_get(x_22, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t 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_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -lean_inc(x_6); -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_6); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -x_27 = lean_box(0); -x_28 = 0; -x_29 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_29, 0, x_26); -lean_ctor_set(x_29, 1, x_19); -lean_ctor_set(x_29, 2, x_27); -lean_ctor_set_uint8(x_29, sizeof(void*)*3, x_28); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_st_ref_get(x_15, x_24); -x_32 = lean_ctor_get(x_31, 0); +lean_dec(x_21); +x_24 = lean_box(0); +lean_inc(x_5); +x_25 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_25, 0, x_5); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_25, 2, x_22); +x_26 = lean_box(0); +x_27 = 0; +x_28 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_28, 0, x_25); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_26); +lean_ctor_set_uint8(x_28, sizeof(void*)*3, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_st_ref_get(x_14, x_23); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); lean_dec(x_31); -x_34 = lean_ctor_get(x_32, 0); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Environment_addAndCompile(x_34, x_25, x_30); -lean_dec(x_30); -if (lean_obj_tag(x_35) == 0) +x_34 = l_Lean_Environment_addAndCompile(x_33, x_24, x_29); +lean_dec(x_29); +if (lean_obj_tag(x_34) == 0) { -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_10); +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_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_KernelException_toMessageData(x_36, x_25); -x_38 = lean_st_ref_get(x_15, x_33); -x_39 = lean_ctor_get(x_38, 1); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_KernelException_toMessageData(x_35, x_24); +x_37 = lean_st_ref_get(x_14, x_32); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = lean_ctor_get(x_13, 3); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get(x_14, 3); -lean_inc(x_40); -x_41 = l_Lean_MessageData_toString(x_37, x_39); -if (lean_obj_tag(x_41) == 0) +x_40 = l_Lean_MessageData_toString(x_36, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_40); -x_42 = lean_ctor_get(x_41, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +lean_dec(x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); -lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_42); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -x_46 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_45, x_12, x_13, x_14, x_15, x_43); -lean_dec(x_15); +lean_dec(x_40); +x_43 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_43, 0, x_41); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = l_Lean_throwError___at_Lean_ParserCompiler_compileParserExpr___spec__6___rarg(x_44, x_11, x_12, x_13, x_14, x_42); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) +lean_dec(x_11); +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) { -return x_46; +return x_45; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_46, 0); -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_45, 0); +x_48 = lean_ctor_get(x_45, 1); lean_inc(x_48); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_inc(x_47); +lean_dec(x_45); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } else { -uint8_t x_51; -lean_dec(x_15); +uint8_t x_50; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -x_51 = !lean_is_exclusive(x_41); -if (x_51 == 0) +lean_dec(x_11); +x_50 = !lean_is_exclusive(x_40); +if (x_50 == 0) { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_41, 0); -x_53 = lean_io_error_to_string(x_52); -x_54 = lean_alloc_ctor(2, 1, 0); +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_51 = lean_ctor_get(x_40, 0); +x_52 = lean_io_error_to_string(x_51); +x_53 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_53, 0, x_52); +x_54 = lean_alloc_ctor(0, 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 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_40); -lean_ctor_set(x_56, 1, x_55); -lean_ctor_set(x_41, 0, x_56); -return x_41; +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_39); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set(x_40, 0, x_55); +return x_40; } else { -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; -x_57 = lean_ctor_get(x_41, 0); -x_58 = lean_ctor_get(x_41, 1); -lean_inc(x_58); +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; +x_56 = lean_ctor_get(x_40, 0); +x_57 = lean_ctor_get(x_40, 1); lean_inc(x_57); -lean_dec(x_41); -x_59 = lean_io_error_to_string(x_57); -x_60 = lean_alloc_ctor(2, 1, 0); +lean_inc(x_56); +lean_dec(x_40); +x_58 = lean_io_error_to_string(x_56); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_60, 0, x_59); -x_61 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_61, 0, x_60); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_40); -lean_ctor_set(x_62, 1, x_61); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_58); -return x_63; +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_39); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_57); +return x_62; } } } else { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_35, 0); -lean_inc(x_64); -lean_dec(x_35); -x_65 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__49(x_7, x_8, x_6, x_25, x_9, x_1, x_3, x_10, x_64, x_12, x_13, x_14, x_15, x_33); -return x_65; +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_34, 0); +lean_inc(x_63); +lean_dec(x_34); +x_64 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__49(x_6, x_7, x_5, x_24, x_8, x_1, x_3, x_9, x_63, x_11, x_12, x_13, x_14, x_32); +return x_64; } } else { -uint8_t x_66; -lean_dec(x_19); -lean_dec(x_15); +uint8_t x_65; +lean_dec(x_18); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_66 = !lean_is_exclusive(x_22); -if (x_66 == 0) +x_65 = !lean_is_exclusive(x_21); +if (x_65 == 0) { -return x_22; +return x_21; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_22, 0); -x_68 = lean_ctor_get(x_22, 1); -lean_inc(x_68); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_21, 0); +x_67 = lean_ctor_get(x_21, 1); lean_inc(x_67); -lean_dec(x_22); -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; +lean_inc(x_66); +lean_dec(x_21); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } else { -uint8_t x_70; -lean_dec(x_15); +uint8_t x_69; lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); -lean_dec(x_10); +lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -17710,23 +16651,23 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_70 = !lean_is_exclusive(x_18); -if (x_70 == 0) +x_69 = !lean_is_exclusive(x_17); +if (x_69 == 0) { -return x_18; +return x_17; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_18, 0); -x_72 = lean_ctor_get(x_18, 1); -lean_inc(x_72); +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_17, 0); +x_71 = lean_ctor_get(x_17, 1); lean_inc(x_71); -lean_dec(x_18); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; +lean_inc(x_70); +lean_dec(x_17); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; } } } @@ -17982,23 +16923,23 @@ lean_inc(x_25); x_27 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_25, x_26, x_4, x_5, x_6, x_7, x_24); if (lean_obj_tag(x_27) == 0) { -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_61; uint8_t x_62; +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_59; uint8_t x_60; x_28 = lean_ctor_get(x_27, 0); lean_inc(x_28); x_29 = lean_ctor_get(x_27, 1); lean_inc(x_29); lean_dec(x_27); -x_61 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_59 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_60 = l_Lean_Expr_isConstOf(x_28, x_59); +if (x_60 == 0) +{ +lean_object* x_61; uint8_t x_62; +x_61 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; x_62 = l_Lean_Expr_isConstOf(x_28, x_61); +lean_dec(x_28); if (x_62 == 0) { -lean_object* x_63; uint8_t x_64; -x_63 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_64 = l_Lean_Expr_isConstOf(x_28, x_63); -lean_dec(x_28); -if (x_64 == 0) -{ -lean_object* x_65; +lean_object* x_63; lean_dec(x_25); lean_dec(x_23); lean_dec(x_21); @@ -18010,64 +16951,64 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_65 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_29); -if (lean_obj_tag(x_65) == 0) +x_63 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_29); +if (lean_obj_tag(x_63) == 0) { -lean_object* x_66; -x_66 = lean_ctor_get(x_65, 0); -lean_inc(x_66); -if (lean_obj_tag(x_66) == 0) +lean_object* x_64; +x_64 = lean_ctor_get(x_63, 0); +lean_inc(x_64); +if (lean_obj_tag(x_64) == 0) { -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_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_dec(x_1); -x_67 = lean_ctor_get(x_65, 1); -lean_inc(x_67); -lean_dec(x_65); -x_68 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_68, 0, x_18); -x_69 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_65 = lean_ctor_get(x_63, 1); +lean_inc(x_65); +lean_dec(x_63); +x_66 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_66, 0, x_18); +x_67 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_68 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_68, 0, x_67); +lean_ctor_set(x_68, 1, x_66); +x_69 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; x_70 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_70, 0, x_69); -lean_ctor_set(x_70, 1, x_68); -x_71 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +lean_ctor_set(x_70, 0, x_68); +lean_ctor_set(x_70, 1, x_69); +x_71 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_71, 0, x_10); x_72 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_72, 0, x_70); lean_ctor_set(x_72, 1, x_71); -x_73 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_73, 0, x_10); +x_73 = l_Lean_KernelException_toMessageData___closed__3; x_74 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_74, 0, x_72); lean_ctor_set(x_74, 1, x_73); -x_75 = l_Lean_KernelException_toMessageData___closed__3; -x_76 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_76, 0, x_74); -lean_ctor_set(x_76, 1, x_75); -x_77 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_76, x_4, x_5, x_6, x_7, x_67); +x_75 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_74, x_4, x_5, x_6, x_7, x_65); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_77; +return x_75; } else { -lean_object* x_78; lean_object* x_79; +lean_object* x_76; lean_object* x_77; lean_dec(x_18); lean_dec(x_10); -x_78 = lean_ctor_get(x_65, 1); -lean_inc(x_78); -lean_dec(x_65); -x_79 = lean_ctor_get(x_66, 0); -lean_inc(x_79); -lean_dec(x_66); -x_3 = x_79; -x_8 = x_78; +x_76 = lean_ctor_get(x_63, 1); +lean_inc(x_76); +lean_dec(x_63); +x_77 = lean_ctor_get(x_64, 0); +lean_inc(x_77); +lean_dec(x_64); +x_3 = x_77; +x_8 = x_76; goto _start; } } else { -uint8_t x_81; +uint8_t x_79; lean_dec(x_18); lean_dec(x_10); lean_dec(x_7); @@ -18075,43 +17016,43 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_81 = !lean_is_exclusive(x_65); -if (x_81 == 0) +x_79 = !lean_is_exclusive(x_63); +if (x_79 == 0) { -return x_65; +return x_63; } else { -lean_object* x_82; lean_object* x_83; lean_object* x_84; -x_82 = lean_ctor_get(x_65, 0); -x_83 = lean_ctor_get(x_65, 1); -lean_inc(x_83); -lean_inc(x_82); -lean_dec(x_65); -x_84 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_84, 0, x_82); -lean_ctor_set(x_84, 1, x_83); -return x_84; +lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_80 = lean_ctor_get(x_63, 0); +x_81 = lean_ctor_get(x_63, 1); +lean_inc(x_81); +lean_inc(x_80); +lean_dec(x_63); +x_82 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_82, 0, x_80); +lean_ctor_set(x_82, 1, x_81); +return x_82; } } } else { -lean_object* x_85; -x_85 = lean_box(0); -x_30 = x_85; -goto block_60; +lean_object* x_83; +x_83 = lean_box(0); +x_30 = x_83; +goto block_58; } } else { -lean_object* x_86; +lean_object* x_84; lean_dec(x_28); -x_86 = lean_box(0); -x_30 = x_86; -goto block_60; +x_84 = lean_box(0); +x_30 = x_84; +goto block_58; } -block_60: +block_58: { lean_object* x_31; lean_dec(x_30); @@ -18163,65 +17104,63 @@ x_43 = l_Lean_Environment_getModuleIdxFor_x3f(x_17, x_13); lean_dec(x_17); if (lean_obj_tag(x_43) == 0) { -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_45 = lean_box(0); -x_46 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(x_1, x_42, x_2, x_44, x_25, x_21, x_19, x_13, x_10, x_26, x_45, x_4, x_5, x_6, x_7, x_29); -return x_46; +lean_object* x_44; lean_object* x_45; +x_44 = lean_box(0); +x_45 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(x_1, x_42, x_2, x_25, x_21, x_19, x_13, x_10, x_26, x_44, x_4, x_5, x_6, x_7, x_29); +return x_45; } else { lean_dec(x_43); if (x_2 == 0) { -lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; lean_dec(x_42); lean_dec(x_25); lean_dec(x_21); lean_dec(x_19); lean_dec(x_10); lean_dec(x_1); -x_47 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_47, 0, x_13); -x_48 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_49 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_49, 0, x_48); -lean_ctor_set(x_49, 1, x_47); -x_50 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_51 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_51, 0, x_49); -lean_ctor_set(x_51, 1, x_50); -x_52 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_51, x_4, x_5, x_6, x_7, x_29); +x_46 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_46, 0, x_13); +x_47 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_48 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_48, 0, x_47); +lean_ctor_set(x_48, 1, x_46); +x_49 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_50 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_50, 0, x_48); +lean_ctor_set(x_50, 1, x_49); +x_51 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_50, x_4, x_5, x_6, x_7, x_29); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -x_53 = !lean_is_exclusive(x_52); -if (x_53 == 0) +x_52 = !lean_is_exclusive(x_51); +if (x_52 == 0) { -return x_52; +return x_51; } else { -lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_54 = lean_ctor_get(x_52, 0); -x_55 = lean_ctor_get(x_52, 1); -lean_inc(x_55); +lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_53 = lean_ctor_get(x_51, 0); +x_54 = lean_ctor_get(x_51, 1); lean_inc(x_54); -lean_dec(x_52); -x_56 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_56, 0, x_54); -lean_ctor_set(x_56, 1, x_55); -return x_56; +lean_inc(x_53); +lean_dec(x_51); +x_55 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_55, 0, x_53); +lean_ctor_set(x_55, 1, x_54); +return x_55; } } else { -lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_57 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_58 = lean_box(0); -x_59 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(x_1, x_42, x_2, x_57, x_25, x_21, x_19, x_13, x_10, x_26, x_58, x_4, x_5, x_6, x_7, x_29); -return x_59; +lean_object* x_56; lean_object* x_57; +x_56 = lean_box(0); +x_57 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(x_1, x_42, x_2, x_25, x_21, x_19, x_13, x_10, x_26, x_56, x_4, x_5, x_6, x_7, x_29); +return x_57; } } } @@ -18229,7 +17168,7 @@ return x_59; } else { -uint8_t x_87; +uint8_t x_85; lean_dec(x_25); lean_dec(x_23); lean_dec(x_21); @@ -18243,29 +17182,29 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_87 = !lean_is_exclusive(x_27); -if (x_87 == 0) +x_85 = !lean_is_exclusive(x_27); +if (x_85 == 0) { return x_27; } else { -lean_object* x_88; lean_object* x_89; lean_object* x_90; -x_88 = lean_ctor_get(x_27, 0); -x_89 = lean_ctor_get(x_27, 1); -lean_inc(x_89); -lean_inc(x_88); +lean_object* x_86; lean_object* x_87; lean_object* x_88; +x_86 = lean_ctor_get(x_27, 0); +x_87 = lean_ctor_get(x_27, 1); +lean_inc(x_87); +lean_inc(x_86); lean_dec(x_27); -x_90 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_90, 0, x_88); -lean_ctor_set(x_90, 1, x_89); -return x_90; +x_88 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_88, 0, x_86); +lean_ctor_set(x_88, 1, x_87); +return x_88; } } } else { -uint8_t x_91; +uint8_t x_89; lean_dec(x_21); lean_dec(x_19); lean_dec(x_18); @@ -18277,435 +17216,433 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_91 = !lean_is_exclusive(x_22); -if (x_91 == 0) +x_89 = !lean_is_exclusive(x_22); +if (x_89 == 0) { return x_22; } else { -lean_object* x_92; lean_object* x_93; lean_object* x_94; -x_92 = lean_ctor_get(x_22, 0); -x_93 = lean_ctor_get(x_22, 1); -lean_inc(x_93); -lean_inc(x_92); +lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_90 = lean_ctor_get(x_22, 0); +x_91 = lean_ctor_get(x_22, 1); +lean_inc(x_91); +lean_inc(x_90); lean_dec(x_22); -x_94 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_94, 0, x_92); -lean_ctor_set(x_94, 1, x_93); -return x_94; +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 { -lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; +lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_dec(x_19); lean_dec(x_18); lean_dec(x_17); lean_dec(x_13); -x_95 = lean_ctor_get(x_20, 0); -lean_inc(x_95); +x_93 = lean_ctor_get(x_20, 0); +lean_inc(x_93); lean_dec(x_20); -x_96 = lean_box(0); -x_97 = l_Lean_mkConst(x_95, x_96); +x_94 = lean_box(0); +x_95 = l_Lean_mkConst(x_93, x_94); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_97); -x_98 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_97, x_4, x_5, x_6, x_7, x_16); -if (lean_obj_tag(x_98) == 0) +lean_inc(x_95); +x_96 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_95, x_4, x_5, x_6, x_7, x_16); +if (lean_obj_tag(x_96) == 0) { -lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; -x_99 = lean_ctor_get(x_98, 0); -lean_inc(x_99); -x_100 = lean_ctor_get(x_98, 1); -lean_inc(x_100); -lean_dec(x_98); -x_101 = lean_box(x_2); -x_102 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__5___boxed), 11, 4); -lean_closure_set(x_102, 0, x_10); -lean_closure_set(x_102, 1, x_1); -lean_closure_set(x_102, 2, x_101); -lean_closure_set(x_102, 3, x_97); -x_103 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_99, x_102, x_4, x_5, x_6, x_7, x_100); -return x_103; +lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; +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 = lean_box(x_2); +x_100 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__5___boxed), 11, 4); +lean_closure_set(x_100, 0, x_10); +lean_closure_set(x_100, 1, x_1); +lean_closure_set(x_100, 2, x_99); +lean_closure_set(x_100, 3, x_95); +x_101 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_97, x_100, x_4, x_5, x_6, x_7, x_98); +return x_101; } else { -uint8_t x_104; -lean_dec(x_97); +uint8_t x_102; +lean_dec(x_95); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_104 = !lean_is_exclusive(x_98); -if (x_104 == 0) +x_102 = !lean_is_exclusive(x_96); +if (x_102 == 0) { -return x_98; +return x_96; } else { -lean_object* x_105; lean_object* x_106; lean_object* x_107; -x_105 = lean_ctor_get(x_98, 0); -x_106 = lean_ctor_get(x_98, 1); -lean_inc(x_106); -lean_inc(x_105); -lean_dec(x_98); -x_107 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_107, 0, x_105); -lean_ctor_set(x_107, 1, x_106); -return x_107; +lean_object* x_103; lean_object* x_104; lean_object* x_105; +x_103 = lean_ctor_get(x_96, 0); +x_104 = lean_ctor_get(x_96, 1); +lean_inc(x_104); +lean_inc(x_103); +lean_dec(x_96); +x_105 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_105, 0, x_103); +lean_ctor_set(x_105, 1, x_104); +return x_105; } } } } else { -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_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_dec(x_12); lean_dec(x_1); -x_108 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_108, 0, x_10); -x_109 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_106 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_106, 0, x_10); +x_107 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_108 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_108, 0, x_107); +lean_ctor_set(x_108, 1, x_106); +x_109 = l_Lean_KernelException_toMessageData___closed__3; x_110 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_110, 0, x_109); -lean_ctor_set(x_110, 1, x_108); -x_111 = l_Lean_KernelException_toMessageData___closed__3; -x_112 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_112, 0, x_110); -lean_ctor_set(x_112, 1, x_111); -x_113 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_112, x_4, x_5, x_6, x_7, x_11); +lean_ctor_set(x_110, 0, x_108); +lean_ctor_set(x_110, 1, x_109); +x_111 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_110, x_4, x_5, x_6, x_7, x_11); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_113; +return x_111; } } case 1: { -uint8_t x_114; +uint8_t x_112; lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_114 = !lean_is_exclusive(x_9); -if (x_114 == 0) +x_112 = !lean_is_exclusive(x_9); +if (x_112 == 0) { -lean_object* x_115; -x_115 = lean_ctor_get(x_9, 0); -lean_dec(x_115); +lean_object* x_113; +x_113 = lean_ctor_get(x_9, 0); +lean_dec(x_113); return x_9; } else { +lean_object* x_114; lean_object* x_115; +x_114 = lean_ctor_get(x_9, 1); +lean_inc(x_114); +lean_dec(x_9); +x_115 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_115, 0, x_10); +lean_ctor_set(x_115, 1, x_114); +return x_115; +} +} +case 2: +{ lean_object* x_116; lean_object* x_117; x_116 = lean_ctor_get(x_9, 1); lean_inc(x_116); lean_dec(x_9); -x_117 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_117, 0, x_10); -lean_ctor_set(x_117, 1, x_116); -return x_117; -} -} -case 2: +x_117 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_117) == 4) { -lean_object* x_118; lean_object* x_119; -x_118 = lean_ctor_get(x_9, 1); +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_118 = lean_ctor_get(x_117, 0); lean_inc(x_118); -lean_dec(x_9); -x_119 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_119) == 4) -{ -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; +lean_dec(x_117); +x_119 = lean_st_ref_get(x_7, x_116); x_120 = lean_ctor_get(x_119, 0); lean_inc(x_120); +x_121 = lean_ctor_get(x_119, 1); +lean_inc(x_121); lean_dec(x_119); -x_121 = lean_st_ref_get(x_7, x_118); -x_122 = lean_ctor_get(x_121, 0); +x_122 = lean_ctor_get(x_120, 0); lean_inc(x_122); -x_123 = lean_ctor_get(x_121, 1); +lean_dec(x_120); +x_123 = lean_ctor_get(x_1, 0); lean_inc(x_123); -lean_dec(x_121); -x_124 = lean_ctor_get(x_122, 0); +x_124 = lean_ctor_get(x_1, 2); lean_inc(x_124); -lean_dec(x_122); -x_125 = lean_ctor_get(x_1, 0); -lean_inc(x_125); -x_126 = lean_ctor_get(x_1, 2); -lean_inc(x_126); -x_127 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_126, x_124, x_120); +x_125 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_124, x_122, x_118); +if (lean_obj_tag(x_125) == 0) +{ +lean_object* x_126; lean_object* x_127; +lean_inc(x_123); +x_126 = l_Lean_Name_append(x_118, x_123); +lean_inc(x_118); +x_127 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_118, x_4, x_5, x_6, x_7, x_121); if (lean_obj_tag(x_127) == 0) { -lean_object* x_128; lean_object* x_129; -lean_inc(x_125); -x_128 = l_Lean_Name_append(x_120, x_125); -lean_inc(x_120); -x_129 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_120, x_4, x_5, x_6, x_7, x_123); -if (lean_obj_tag(x_129) == 0) -{ -lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; -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); -x_132 = l_Lean_ConstantInfo_type(x_130); -x_133 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_128 = lean_ctor_get(x_127, 0); +lean_inc(x_128); +x_129 = lean_ctor_get(x_127, 1); +lean_inc(x_129); +lean_dec(x_127); +x_130 = l_Lean_ConstantInfo_type(x_128); +x_131 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_132); -x_134 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_132, x_133, x_4, x_5, x_6, x_7, x_131); -if (lean_obj_tag(x_134) == 0) +lean_inc(x_130); +x_132 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_130, x_131, x_4, x_5, x_6, x_7, x_129); +if (lean_obj_tag(x_132) == 0) { -lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_168; uint8_t x_169; -x_135 = lean_ctor_get(x_134, 0); -lean_inc(x_135); -x_136 = lean_ctor_get(x_134, 1); -lean_inc(x_136); -lean_dec(x_134); -x_168 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_169 = l_Lean_Expr_isConstOf(x_135, x_168); -if (x_169 == 0) -{ -lean_object* x_170; uint8_t x_171; -x_170 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_171 = l_Lean_Expr_isConstOf(x_135, x_170); -lean_dec(x_135); -if (x_171 == 0) -{ -lean_object* x_172; +lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_164; uint8_t x_165; +x_133 = lean_ctor_get(x_132, 0); +lean_inc(x_133); +x_134 = lean_ctor_get(x_132, 1); +lean_inc(x_134); lean_dec(x_132); +x_164 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_165 = l_Lean_Expr_isConstOf(x_133, x_164); +if (x_165 == 0) +{ +lean_object* x_166; uint8_t x_167; +x_166 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_167 = l_Lean_Expr_isConstOf(x_133, x_166); +lean_dec(x_133); +if (x_167 == 0) +{ +lean_object* x_168; lean_dec(x_130); lean_dec(x_128); lean_dec(x_126); lean_dec(x_124); -lean_dec(x_120); +lean_dec(x_122); +lean_dec(x_118); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_172 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_136); -if (lean_obj_tag(x_172) == 0) +x_168 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_134); +if (lean_obj_tag(x_168) == 0) { -lean_object* x_173; -x_173 = lean_ctor_get(x_172, 0); -lean_inc(x_173); -if (lean_obj_tag(x_173) == 0) +lean_object* x_169; +x_169 = lean_ctor_get(x_168, 0); +lean_inc(x_169); +if (lean_obj_tag(x_169) == 0) { -lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; +lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_dec(x_1); -x_174 = lean_ctor_get(x_172, 1); -lean_inc(x_174); -lean_dec(x_172); -x_175 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_175, 0, x_125); -x_176 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_170 = lean_ctor_get(x_168, 1); +lean_inc(x_170); +lean_dec(x_168); +x_171 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_171, 0, x_123); +x_172 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_173 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_173, 0, x_172); +lean_ctor_set(x_173, 1, x_171); +x_174 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_175 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_175, 0, x_173); +lean_ctor_set(x_175, 1, x_174); +x_176 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_176, 0, x_10); x_177 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_177, 0, x_176); -lean_ctor_set(x_177, 1, x_175); -x_178 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +lean_ctor_set(x_177, 0, x_175); +lean_ctor_set(x_177, 1, x_176); +x_178 = l_Lean_KernelException_toMessageData___closed__3; x_179 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_179, 0, x_177); lean_ctor_set(x_179, 1, x_178); -x_180 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_180, 0, x_10); -x_181 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_181, 0, x_179); -lean_ctor_set(x_181, 1, x_180); -x_182 = l_Lean_KernelException_toMessageData___closed__3; -x_183 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_183, 0, x_181); -lean_ctor_set(x_183, 1, x_182); -x_184 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_183, x_4, x_5, x_6, x_7, x_174); +x_180 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_179, x_4, x_5, x_6, x_7, x_170); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_184; +return x_180; } else { -lean_object* x_185; lean_object* x_186; -lean_dec(x_125); +lean_object* x_181; lean_object* x_182; +lean_dec(x_123); lean_dec(x_10); -x_185 = lean_ctor_get(x_172, 1); -lean_inc(x_185); -lean_dec(x_172); -x_186 = lean_ctor_get(x_173, 0); -lean_inc(x_186); -lean_dec(x_173); -x_3 = x_186; -x_8 = x_185; +x_181 = lean_ctor_get(x_168, 1); +lean_inc(x_181); +lean_dec(x_168); +x_182 = lean_ctor_get(x_169, 0); +lean_inc(x_182); +lean_dec(x_169); +x_3 = x_182; +x_8 = x_181; goto _start; } } else { -uint8_t x_188; -lean_dec(x_125); +uint8_t x_184; +lean_dec(x_123); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_188 = !lean_is_exclusive(x_172); -if (x_188 == 0) +x_184 = !lean_is_exclusive(x_168); +if (x_184 == 0) { -return x_172; +return x_168; } else { -lean_object* x_189; lean_object* x_190; lean_object* x_191; -x_189 = lean_ctor_get(x_172, 0); -x_190 = lean_ctor_get(x_172, 1); -lean_inc(x_190); -lean_inc(x_189); -lean_dec(x_172); -x_191 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_191, 0, x_189); -lean_ctor_set(x_191, 1, x_190); -return x_191; +lean_object* x_185; lean_object* x_186; lean_object* x_187; +x_185 = lean_ctor_get(x_168, 0); +x_186 = lean_ctor_get(x_168, 1); +lean_inc(x_186); +lean_inc(x_185); +lean_dec(x_168); +x_187 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_187, 0, x_185); +lean_ctor_set(x_187, 1, x_186); +return x_187; } } } else { -lean_object* x_192; -x_192 = lean_box(0); -x_137 = x_192; -goto block_167; +lean_object* x_188; +x_188 = lean_box(0); +x_135 = x_188; +goto block_163; } } else { -lean_object* x_193; +lean_object* x_189; +lean_dec(x_133); +x_189 = lean_box(0); +x_135 = x_189; +goto block_163; +} +block_163: +{ +lean_object* x_136; lean_dec(x_135); -x_193 = lean_box(0); -x_137 = x_193; -goto block_167; -} -block_167: -{ -lean_object* x_138; -lean_dec(x_137); -x_138 = l_Lean_ConstantInfo_value_x3f(x_130); -lean_dec(x_130); -if (lean_obj_tag(x_138) == 0) -{ -lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; -lean_dec(x_132); +x_136 = l_Lean_ConstantInfo_value_x3f(x_128); lean_dec(x_128); +if (lean_obj_tag(x_136) == 0) +{ +lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; +lean_dec(x_130); lean_dec(x_126); lean_dec(x_124); -lean_dec(x_120); +lean_dec(x_122); +lean_dec(x_118); lean_dec(x_1); -x_139 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_139, 0, x_125); -x_140 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_137 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_137, 0, x_123); +x_138 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_139 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_139, 0, x_138); +lean_ctor_set(x_139, 1, x_137); +x_140 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; x_141 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_141, 0, x_140); -lean_ctor_set(x_141, 1, x_139); -x_142 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +lean_ctor_set(x_141, 0, x_139); +lean_ctor_set(x_141, 1, x_140); +x_142 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_142, 0, x_10); x_143 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_143, 0, x_141); lean_ctor_set(x_143, 1, x_142); -x_144 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_144, 0, x_10); +x_144 = l_Lean_KernelException_toMessageData___closed__3; x_145 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_145, 0, x_143); lean_ctor_set(x_145, 1, x_144); -x_146 = l_Lean_KernelException_toMessageData___closed__3; -x_147 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_147, 0, x_145); -lean_ctor_set(x_147, 1, x_146); -x_148 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_147, x_4, x_5, x_6, x_7, x_136); +x_146 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_145, x_4, x_5, x_6, x_7, x_134); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_148; +return x_146; } else { +lean_object* x_147; lean_object* x_148; +lean_dec(x_123); +x_147 = lean_ctor_get(x_136, 0); +lean_inc(x_147); +lean_dec(x_136); +x_148 = l_Lean_Environment_getModuleIdxFor_x3f(x_122, x_118); +lean_dec(x_122); +if (lean_obj_tag(x_148) == 0) +{ lean_object* x_149; lean_object* x_150; -lean_dec(x_125); -x_149 = lean_ctor_get(x_138, 0); -lean_inc(x_149); -lean_dec(x_138); -x_150 = l_Lean_Environment_getModuleIdxFor_x3f(x_124, x_120); -lean_dec(x_124); -if (lean_obj_tag(x_150) == 0) -{ -lean_object* x_151; lean_object* x_152; lean_object* x_153; -x_151 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_152 = lean_box(0); -x_153 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(x_1, x_149, x_2, x_151, x_132, x_128, x_126, x_120, x_10, x_133, x_152, x_4, x_5, x_6, x_7, x_136); -return x_153; +x_149 = lean_box(0); +x_150 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(x_1, x_147, x_2, x_130, x_126, x_124, x_118, x_10, x_131, x_149, x_4, x_5, x_6, x_7, x_134); +return x_150; } else { -lean_dec(x_150); +lean_dec(x_148); if (x_2 == 0) { -lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; uint8_t x_160; -lean_dec(x_149); -lean_dec(x_132); -lean_dec(x_128); +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; uint8_t x_157; +lean_dec(x_147); +lean_dec(x_130); lean_dec(x_126); +lean_dec(x_124); lean_dec(x_10); lean_dec(x_1); -x_154 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_154, 0, x_120); -x_155 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_156 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_156, 0, x_155); -lean_ctor_set(x_156, 1, x_154); -x_157 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_158 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_158, 0, x_156); -lean_ctor_set(x_158, 1, x_157); -x_159 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_158, x_4, x_5, x_6, x_7, x_136); +x_151 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_151, 0, x_118); +x_152 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_153 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_153, 0, x_152); +lean_ctor_set(x_153, 1, x_151); +x_154 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_155 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_155, 0, x_153); +lean_ctor_set(x_155, 1, x_154); +x_156 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_155, x_4, x_5, x_6, x_7, x_134); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -x_160 = !lean_is_exclusive(x_159); -if (x_160 == 0) +x_157 = !lean_is_exclusive(x_156); +if (x_157 == 0) { -return x_159; +return x_156; } else { -lean_object* x_161; lean_object* x_162; lean_object* x_163; -x_161 = lean_ctor_get(x_159, 0); -x_162 = lean_ctor_get(x_159, 1); -lean_inc(x_162); -lean_inc(x_161); -lean_dec(x_159); -x_163 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_163, 0, x_161); -lean_ctor_set(x_163, 1, x_162); -return x_163; +lean_object* x_158; lean_object* x_159; lean_object* x_160; +x_158 = lean_ctor_get(x_156, 0); +x_159 = lean_ctor_get(x_156, 1); +lean_inc(x_159); +lean_inc(x_158); +lean_dec(x_156); +x_160 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_160, 0, x_158); +lean_ctor_set(x_160, 1, x_159); +return x_160; } } else { -lean_object* x_164; lean_object* x_165; lean_object* x_166; -x_164 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_165 = lean_box(0); -x_166 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(x_1, x_149, x_2, x_164, x_132, x_128, x_126, x_120, x_10, x_133, x_165, x_4, x_5, x_6, x_7, x_136); -return x_166; +lean_object* x_161; lean_object* x_162; +x_161 = lean_box(0); +x_162 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(x_1, x_147, x_2, x_130, x_126, x_124, x_118, x_10, x_131, x_161, x_4, x_5, x_6, x_7, x_134); +return x_162; } } } @@ -18713,33 +17650,67 @@ return x_166; } else { +uint8_t x_190; +lean_dec(x_130); +lean_dec(x_128); +lean_dec(x_126); +lean_dec(x_124); +lean_dec(x_123); +lean_dec(x_122); +lean_dec(x_118); +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_190 = !lean_is_exclusive(x_132); +if (x_190 == 0) +{ +return x_132; +} +else +{ +lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_191 = lean_ctor_get(x_132, 0); +x_192 = lean_ctor_get(x_132, 1); +lean_inc(x_192); +lean_inc(x_191); +lean_dec(x_132); +x_193 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_193, 0, x_191); +lean_ctor_set(x_193, 1, x_192); +return x_193; +} +} +} +else +{ uint8_t x_194; -lean_dec(x_132); -lean_dec(x_130); -lean_dec(x_128); lean_dec(x_126); -lean_dec(x_125); lean_dec(x_124); -lean_dec(x_120); +lean_dec(x_123); +lean_dec(x_122); +lean_dec(x_118); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_194 = !lean_is_exclusive(x_134); +x_194 = !lean_is_exclusive(x_127); if (x_194 == 0) { -return x_134; +return x_127; } else { lean_object* x_195; lean_object* x_196; lean_object* x_197; -x_195 = lean_ctor_get(x_134, 0); -x_196 = lean_ctor_get(x_134, 1); +x_195 = lean_ctor_get(x_127, 0); +x_196 = lean_ctor_get(x_127, 1); lean_inc(x_196); lean_inc(x_195); -lean_dec(x_134); +lean_dec(x_127); x_197 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_197, 0, x_195); lean_ctor_set(x_197, 1, x_196); @@ -18749,285 +17720,417 @@ return x_197; } else { -uint8_t x_198; -lean_dec(x_128); -lean_dec(x_126); -lean_dec(x_125); +lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_dec(x_124); -lean_dec(x_120); -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_198 = !lean_is_exclusive(x_129); -if (x_198 == 0) -{ -return x_129; -} -else -{ -lean_object* x_199; lean_object* x_200; lean_object* x_201; -x_199 = lean_ctor_get(x_129, 0); -x_200 = lean_ctor_get(x_129, 1); -lean_inc(x_200); -lean_inc(x_199); -lean_dec(x_129); -x_201 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_201, 0, x_199); -lean_ctor_set(x_201, 1, x_200); -return x_201; -} -} -} -else -{ -lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; -lean_dec(x_126); +lean_dec(x_123); +lean_dec(x_122); +lean_dec(x_118); +x_198 = lean_ctor_get(x_125, 0); +lean_inc(x_198); lean_dec(x_125); -lean_dec(x_124); -lean_dec(x_120); -x_202 = lean_ctor_get(x_127, 0); -lean_inc(x_202); -lean_dec(x_127); -x_203 = lean_box(0); -x_204 = l_Lean_mkConst(x_202, x_203); +x_199 = lean_box(0); +x_200 = l_Lean_mkConst(x_198, x_199); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_204); -x_205 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_204, x_4, x_5, x_6, x_7, x_123); -if (lean_obj_tag(x_205) == 0) +lean_inc(x_200); +x_201 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_200, x_4, x_5, x_6, x_7, x_121); +if (lean_obj_tag(x_201) == 0) { -lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; -x_206 = lean_ctor_get(x_205, 0); -lean_inc(x_206); -x_207 = lean_ctor_get(x_205, 1); -lean_inc(x_207); -lean_dec(x_205); -x_208 = lean_box(x_2); -x_209 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__10___boxed), 11, 4); -lean_closure_set(x_209, 0, x_10); -lean_closure_set(x_209, 1, x_1); -lean_closure_set(x_209, 2, x_208); -lean_closure_set(x_209, 3, x_204); -x_210 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_206, x_209, x_4, x_5, x_6, x_7, x_207); -return x_210; +lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; +x_202 = lean_ctor_get(x_201, 0); +lean_inc(x_202); +x_203 = lean_ctor_get(x_201, 1); +lean_inc(x_203); +lean_dec(x_201); +x_204 = lean_box(x_2); +x_205 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__10___boxed), 11, 4); +lean_closure_set(x_205, 0, x_10); +lean_closure_set(x_205, 1, x_1); +lean_closure_set(x_205, 2, x_204); +lean_closure_set(x_205, 3, x_200); +x_206 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_202, x_205, x_4, x_5, x_6, x_7, x_203); +return x_206; } else { -uint8_t x_211; -lean_dec(x_204); +uint8_t x_207; +lean_dec(x_200); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_211 = !lean_is_exclusive(x_205); -if (x_211 == 0) +x_207 = !lean_is_exclusive(x_201); +if (x_207 == 0) { -return x_205; +return x_201; } else { -lean_object* x_212; lean_object* x_213; lean_object* x_214; -x_212 = lean_ctor_get(x_205, 0); -x_213 = lean_ctor_get(x_205, 1); -lean_inc(x_213); -lean_inc(x_212); -lean_dec(x_205); -x_214 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_214, 0, x_212); -lean_ctor_set(x_214, 1, x_213); -return x_214; +lean_object* x_208; lean_object* x_209; lean_object* x_210; +x_208 = lean_ctor_get(x_201, 0); +x_209 = lean_ctor_get(x_201, 1); +lean_inc(x_209); +lean_inc(x_208); +lean_dec(x_201); +x_210 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_210, 0, x_208); +lean_ctor_set(x_210, 1, x_209); +return x_210; } } } } else { -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_dec(x_119); +lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; +lean_dec(x_117); lean_dec(x_1); -x_215 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_215, 0, x_10); -x_216 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_217 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_217, 0, x_216); -lean_ctor_set(x_217, 1, x_215); -x_218 = l_Lean_KernelException_toMessageData___closed__3; -x_219 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_219, 0, x_217); -lean_ctor_set(x_219, 1, x_218); -x_220 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_219, x_4, x_5, x_6, x_7, x_118); +x_211 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_211, 0, x_10); +x_212 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_213 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_213, 0, x_212); +lean_ctor_set(x_213, 1, x_211); +x_214 = l_Lean_KernelException_toMessageData___closed__3; +x_215 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_215, 0, x_213); +lean_ctor_set(x_215, 1, x_214); +x_216 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_215, x_4, x_5, x_6, x_7, x_116); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_220; +return x_216; } } case 3: { -lean_object* x_221; lean_object* x_222; -x_221 = lean_ctor_get(x_9, 1); -lean_inc(x_221); +lean_object* x_217; lean_object* x_218; +x_217 = lean_ctor_get(x_9, 1); +lean_inc(x_217); lean_dec(x_9); -x_222 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_222) == 4) +x_218 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_218) == 4) { -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; -x_223 = lean_ctor_get(x_222, 0); +lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; +x_219 = lean_ctor_get(x_218, 0); +lean_inc(x_219); +lean_dec(x_218); +x_220 = lean_st_ref_get(x_7, x_217); +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); +x_223 = lean_ctor_get(x_221, 0); lean_inc(x_223); -lean_dec(x_222); -x_224 = lean_st_ref_get(x_7, x_221); -x_225 = lean_ctor_get(x_224, 0); +lean_dec(x_221); +x_224 = lean_ctor_get(x_1, 0); +lean_inc(x_224); +x_225 = lean_ctor_get(x_1, 2); lean_inc(x_225); -x_226 = lean_ctor_get(x_224, 1); -lean_inc(x_226); -lean_dec(x_224); -x_227 = lean_ctor_get(x_225, 0); -lean_inc(x_227); -lean_dec(x_225); -x_228 = lean_ctor_get(x_1, 0); -lean_inc(x_228); -x_229 = lean_ctor_get(x_1, 2); +x_226 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_225, x_223, x_219); +if (lean_obj_tag(x_226) == 0) +{ +lean_object* x_227; lean_object* x_228; +lean_inc(x_224); +x_227 = l_Lean_Name_append(x_219, x_224); +lean_inc(x_219); +x_228 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_219, x_4, x_5, x_6, x_7, x_222); +if (lean_obj_tag(x_228) == 0) +{ +lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; +x_229 = lean_ctor_get(x_228, 0); lean_inc(x_229); -x_230 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_229, x_227, x_223); -if (lean_obj_tag(x_230) == 0) -{ -lean_object* x_231; lean_object* x_232; -lean_inc(x_228); -x_231 = l_Lean_Name_append(x_223, x_228); -lean_inc(x_223); -x_232 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_223, x_4, x_5, x_6, x_7, x_226); -if (lean_obj_tag(x_232) == 0) -{ -lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; -x_233 = lean_ctor_get(x_232, 0); -lean_inc(x_233); -x_234 = lean_ctor_get(x_232, 1); -lean_inc(x_234); -lean_dec(x_232); -x_235 = l_Lean_ConstantInfo_type(x_233); -x_236 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +x_230 = lean_ctor_get(x_228, 1); +lean_inc(x_230); +lean_dec(x_228); +x_231 = l_Lean_ConstantInfo_type(x_229); +x_232 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); +lean_inc(x_231); +x_233 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_231, x_232, x_4, x_5, x_6, x_7, x_230); +if (lean_obj_tag(x_233) == 0) +{ +lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_265; uint8_t x_266; +x_234 = lean_ctor_get(x_233, 0); +lean_inc(x_234); +x_235 = lean_ctor_get(x_233, 1); lean_inc(x_235); -x_237 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_235, x_236, x_4, x_5, x_6, x_7, x_234); -if (lean_obj_tag(x_237) == 0) -{ -lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_271; uint8_t x_272; -x_238 = lean_ctor_get(x_237, 0); -lean_inc(x_238); -x_239 = lean_ctor_get(x_237, 1); -lean_inc(x_239); -lean_dec(x_237); -x_271 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_272 = l_Lean_Expr_isConstOf(x_238, x_271); -if (x_272 == 0) -{ -lean_object* x_273; uint8_t x_274; -x_273 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_274 = l_Lean_Expr_isConstOf(x_238, x_273); -lean_dec(x_238); -if (x_274 == 0) -{ -lean_object* x_275; -lean_dec(x_235); lean_dec(x_233); +x_265 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_266 = l_Lean_Expr_isConstOf(x_234, x_265); +if (x_266 == 0) +{ +lean_object* x_267; uint8_t x_268; +x_267 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_268 = l_Lean_Expr_isConstOf(x_234, x_267); +lean_dec(x_234); +if (x_268 == 0) +{ +lean_object* x_269; lean_dec(x_231); lean_dec(x_229); lean_dec(x_227); +lean_dec(x_225); lean_dec(x_223); +lean_dec(x_219); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_275 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_239); -if (lean_obj_tag(x_275) == 0) +x_269 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_235); +if (lean_obj_tag(x_269) == 0) { -lean_object* x_276; -x_276 = lean_ctor_get(x_275, 0); -lean_inc(x_276); -if (lean_obj_tag(x_276) == 0) +lean_object* x_270; +x_270 = lean_ctor_get(x_269, 0); +lean_inc(x_270); +if (lean_obj_tag(x_270) == 0) { -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_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_dec(x_1); -x_277 = lean_ctor_get(x_275, 1); -lean_inc(x_277); -lean_dec(x_275); -x_278 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_278, 0, x_228); -x_279 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_271 = lean_ctor_get(x_269, 1); +lean_inc(x_271); +lean_dec(x_269); +x_272 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_272, 0, x_224); +x_273 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_274 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_274, 0, x_273); +lean_ctor_set(x_274, 1, x_272); +x_275 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_276 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_276, 0, x_274); +lean_ctor_set(x_276, 1, x_275); +x_277 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_277, 0, x_10); +x_278 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_278, 0, x_276); +lean_ctor_set(x_278, 1, x_277); +x_279 = l_Lean_KernelException_toMessageData___closed__3; x_280 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_280, 0, x_279); -lean_ctor_set(x_280, 1, x_278); -x_281 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; -x_282 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_282, 0, x_280); -lean_ctor_set(x_282, 1, x_281); -x_283 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_283, 0, x_10); -x_284 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_284, 0, x_282); -lean_ctor_set(x_284, 1, x_283); -x_285 = l_Lean_KernelException_toMessageData___closed__3; -x_286 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_286, 0, x_284); -lean_ctor_set(x_286, 1, x_285); -x_287 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_286, x_4, x_5, x_6, x_7, x_277); +lean_ctor_set(x_280, 0, x_278); +lean_ctor_set(x_280, 1, x_279); +x_281 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_280, x_4, x_5, x_6, x_7, x_271); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_287; +return x_281; } else { -lean_object* x_288; lean_object* x_289; -lean_dec(x_228); +lean_object* x_282; lean_object* x_283; +lean_dec(x_224); lean_dec(x_10); -x_288 = lean_ctor_get(x_275, 1); -lean_inc(x_288); -lean_dec(x_275); -x_289 = lean_ctor_get(x_276, 0); -lean_inc(x_289); -lean_dec(x_276); -x_3 = x_289; -x_8 = x_288; +x_282 = lean_ctor_get(x_269, 1); +lean_inc(x_282); +lean_dec(x_269); +x_283 = lean_ctor_get(x_270, 0); +lean_inc(x_283); +lean_dec(x_270); +x_3 = x_283; +x_8 = x_282; goto _start; } } else { -uint8_t x_291; -lean_dec(x_228); +uint8_t x_285; +lean_dec(x_224); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_291 = !lean_is_exclusive(x_275); +x_285 = !lean_is_exclusive(x_269); +if (x_285 == 0) +{ +return x_269; +} +else +{ +lean_object* x_286; lean_object* x_287; lean_object* x_288; +x_286 = lean_ctor_get(x_269, 0); +x_287 = lean_ctor_get(x_269, 1); +lean_inc(x_287); +lean_inc(x_286); +lean_dec(x_269); +x_288 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_288, 0, x_286); +lean_ctor_set(x_288, 1, x_287); +return x_288; +} +} +} +else +{ +lean_object* x_289; +x_289 = lean_box(0); +x_236 = x_289; +goto block_264; +} +} +else +{ +lean_object* x_290; +lean_dec(x_234); +x_290 = lean_box(0); +x_236 = x_290; +goto block_264; +} +block_264: +{ +lean_object* x_237; +lean_dec(x_236); +x_237 = l_Lean_ConstantInfo_value_x3f(x_229); +lean_dec(x_229); +if (lean_obj_tag(x_237) == 0) +{ +lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; +lean_dec(x_231); +lean_dec(x_227); +lean_dec(x_225); +lean_dec(x_223); +lean_dec(x_219); +lean_dec(x_1); +x_238 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_238, 0, x_224); +x_239 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_240 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_240, 0, x_239); +lean_ctor_set(x_240, 1, x_238); +x_241 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_242 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_242, 0, x_240); +lean_ctor_set(x_242, 1, x_241); +x_243 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_243, 0, x_10); +x_244 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_244, 0, x_242); +lean_ctor_set(x_244, 1, x_243); +x_245 = l_Lean_KernelException_toMessageData___closed__3; +x_246 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_246, 0, x_244); +lean_ctor_set(x_246, 1, x_245); +x_247 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_246, x_4, x_5, x_6, x_7, x_235); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_247; +} +else +{ +lean_object* x_248; lean_object* x_249; +lean_dec(x_224); +x_248 = lean_ctor_get(x_237, 0); +lean_inc(x_248); +lean_dec(x_237); +x_249 = l_Lean_Environment_getModuleIdxFor_x3f(x_223, x_219); +lean_dec(x_223); +if (lean_obj_tag(x_249) == 0) +{ +lean_object* x_250; lean_object* x_251; +x_250 = lean_box(0); +x_251 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(x_1, x_248, x_2, x_231, x_227, x_225, x_219, x_10, x_232, x_250, x_4, x_5, x_6, x_7, x_235); +return x_251; +} +else +{ +lean_dec(x_249); +if (x_2 == 0) +{ +lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; uint8_t x_258; +lean_dec(x_248); +lean_dec(x_231); +lean_dec(x_227); +lean_dec(x_225); +lean_dec(x_10); +lean_dec(x_1); +x_252 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_252, 0, x_219); +x_253 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_254 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_254, 0, x_253); +lean_ctor_set(x_254, 1, x_252); +x_255 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_256 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_256, 0, x_254); +lean_ctor_set(x_256, 1, x_255); +x_257 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_256, x_4, x_5, x_6, x_7, x_235); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_258 = !lean_is_exclusive(x_257); +if (x_258 == 0) +{ +return x_257; +} +else +{ +lean_object* x_259; lean_object* x_260; lean_object* x_261; +x_259 = lean_ctor_get(x_257, 0); +x_260 = lean_ctor_get(x_257, 1); +lean_inc(x_260); +lean_inc(x_259); +lean_dec(x_257); +x_261 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_261, 0, x_259); +lean_ctor_set(x_261, 1, x_260); +return x_261; +} +} +else +{ +lean_object* x_262; lean_object* x_263; +x_262 = lean_box(0); +x_263 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(x_1, x_248, x_2, x_231, x_227, x_225, x_219, x_10, x_232, x_262, x_4, x_5, x_6, x_7, x_235); +return x_263; +} +} +} +} +} +else +{ +uint8_t x_291; +lean_dec(x_231); +lean_dec(x_229); +lean_dec(x_227); +lean_dec(x_225); +lean_dec(x_224); +lean_dec(x_223); +lean_dec(x_219); +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_291 = !lean_is_exclusive(x_233); if (x_291 == 0) { -return x_275; +return x_233; } else { lean_object* x_292; lean_object* x_293; lean_object* x_294; -x_292 = lean_ctor_get(x_275, 0); -x_293 = lean_ctor_get(x_275, 1); +x_292 = lean_ctor_get(x_233, 0); +x_293 = lean_ctor_get(x_233, 1); lean_inc(x_293); lean_inc(x_292); -lean_dec(x_275); +lean_dec(x_233); x_294 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_294, 0, x_292); lean_ctor_set(x_294, 1, x_293); @@ -19037,587 +18140,417 @@ return x_294; } else { -lean_object* x_295; -x_295 = lean_box(0); -x_240 = x_295; -goto block_270; -} -} -else -{ -lean_object* x_296; -lean_dec(x_238); -x_296 = lean_box(0); -x_240 = x_296; -goto block_270; -} -block_270: -{ -lean_object* x_241; -lean_dec(x_240); -x_241 = l_Lean_ConstantInfo_value_x3f(x_233); -lean_dec(x_233); -if (lean_obj_tag(x_241) == 0) -{ -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_dec(x_235); -lean_dec(x_231); -lean_dec(x_229); -lean_dec(x_227); -lean_dec(x_223); -lean_dec(x_1); -x_242 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_242, 0, x_228); -x_243 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_244 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_244, 0, x_243); -lean_ctor_set(x_244, 1, x_242); -x_245 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; -x_246 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_246, 0, x_244); -lean_ctor_set(x_246, 1, x_245); -x_247 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_247, 0, x_10); -x_248 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_248, 0, x_246); -lean_ctor_set(x_248, 1, x_247); -x_249 = l_Lean_KernelException_toMessageData___closed__3; -x_250 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_250, 0, x_248); -lean_ctor_set(x_250, 1, x_249); -x_251 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_250, x_4, x_5, x_6, x_7, x_239); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -return x_251; -} -else -{ -lean_object* x_252; lean_object* x_253; -lean_dec(x_228); -x_252 = lean_ctor_get(x_241, 0); -lean_inc(x_252); -lean_dec(x_241); -x_253 = l_Lean_Environment_getModuleIdxFor_x3f(x_227, x_223); -lean_dec(x_227); -if (lean_obj_tag(x_253) == 0) -{ -lean_object* x_254; lean_object* x_255; lean_object* x_256; -x_254 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_255 = lean_box(0); -x_256 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(x_1, x_252, x_2, x_254, x_235, x_231, x_229, x_223, x_10, x_236, x_255, x_4, x_5, x_6, x_7, x_239); -return x_256; -} -else -{ -lean_dec(x_253); -if (x_2 == 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; uint8_t x_263; -lean_dec(x_252); -lean_dec(x_235); -lean_dec(x_231); -lean_dec(x_229); -lean_dec(x_10); -lean_dec(x_1); -x_257 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_257, 0, x_223); -x_258 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_259 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_259, 0, x_258); -lean_ctor_set(x_259, 1, x_257); -x_260 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_261 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_261, 0, x_259); -lean_ctor_set(x_261, 1, x_260); -x_262 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_261, x_4, x_5, x_6, x_7, x_239); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_263 = !lean_is_exclusive(x_262); -if (x_263 == 0) -{ -return x_262; -} -else -{ -lean_object* x_264; lean_object* x_265; lean_object* x_266; -x_264 = lean_ctor_get(x_262, 0); -x_265 = lean_ctor_get(x_262, 1); -lean_inc(x_265); -lean_inc(x_264); -lean_dec(x_262); -x_266 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_266, 0, x_264); -lean_ctor_set(x_266, 1, x_265); -return x_266; -} -} -else -{ -lean_object* x_267; lean_object* x_268; lean_object* x_269; -x_267 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_268 = lean_box(0); -x_269 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(x_1, x_252, x_2, x_267, x_235, x_231, x_229, x_223, x_10, x_236, x_268, x_4, x_5, x_6, x_7, x_239); -return x_269; -} -} -} -} -} -else -{ -uint8_t x_297; -lean_dec(x_235); -lean_dec(x_233); -lean_dec(x_231); -lean_dec(x_229); -lean_dec(x_228); +uint8_t x_295; lean_dec(x_227); +lean_dec(x_225); +lean_dec(x_224); lean_dec(x_223); +lean_dec(x_219); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_297 = !lean_is_exclusive(x_237); -if (x_297 == 0) +x_295 = !lean_is_exclusive(x_228); +if (x_295 == 0) { -return x_237; +return x_228; } else { -lean_object* x_298; lean_object* x_299; lean_object* x_300; -x_298 = lean_ctor_get(x_237, 0); -x_299 = lean_ctor_get(x_237, 1); +lean_object* x_296; lean_object* x_297; lean_object* x_298; +x_296 = lean_ctor_get(x_228, 0); +x_297 = lean_ctor_get(x_228, 1); +lean_inc(x_297); +lean_inc(x_296); +lean_dec(x_228); +x_298 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_298, 0, x_296); +lean_ctor_set(x_298, 1, x_297); +return x_298; +} +} +} +else +{ +lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; +lean_dec(x_225); +lean_dec(x_224); +lean_dec(x_223); +lean_dec(x_219); +x_299 = lean_ctor_get(x_226, 0); lean_inc(x_299); -lean_inc(x_298); -lean_dec(x_237); -x_300 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_300, 0, x_298); -lean_ctor_set(x_300, 1, x_299); -return x_300; -} -} -} -else -{ -uint8_t x_301; -lean_dec(x_231); -lean_dec(x_229); -lean_dec(x_228); -lean_dec(x_227); -lean_dec(x_223); -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_301 = !lean_is_exclusive(x_232); -if (x_301 == 0) -{ -return x_232; -} -else -{ -lean_object* x_302; lean_object* x_303; lean_object* x_304; -x_302 = lean_ctor_get(x_232, 0); -x_303 = lean_ctor_get(x_232, 1); -lean_inc(x_303); -lean_inc(x_302); -lean_dec(x_232); -x_304 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_304, 0, x_302); -lean_ctor_set(x_304, 1, x_303); -return x_304; -} -} -} -else -{ -lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; -lean_dec(x_229); -lean_dec(x_228); -lean_dec(x_227); -lean_dec(x_223); -x_305 = lean_ctor_get(x_230, 0); -lean_inc(x_305); -lean_dec(x_230); -x_306 = lean_box(0); -x_307 = l_Lean_mkConst(x_305, x_306); +lean_dec(x_226); +x_300 = lean_box(0); +x_301 = l_Lean_mkConst(x_299, x_300); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_307); -x_308 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_307, x_4, x_5, x_6, x_7, x_226); -if (lean_obj_tag(x_308) == 0) +lean_inc(x_301); +x_302 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_301, x_4, x_5, x_6, x_7, x_222); +if (lean_obj_tag(x_302) == 0) { -lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; -x_309 = lean_ctor_get(x_308, 0); -lean_inc(x_309); -x_310 = lean_ctor_get(x_308, 1); -lean_inc(x_310); -lean_dec(x_308); -x_311 = lean_box(x_2); -x_312 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__15___boxed), 11, 4); -lean_closure_set(x_312, 0, x_10); -lean_closure_set(x_312, 1, x_1); -lean_closure_set(x_312, 2, x_311); -lean_closure_set(x_312, 3, x_307); -x_313 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_309, x_312, x_4, x_5, x_6, x_7, x_310); -return x_313; +lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; +x_303 = lean_ctor_get(x_302, 0); +lean_inc(x_303); +x_304 = lean_ctor_get(x_302, 1); +lean_inc(x_304); +lean_dec(x_302); +x_305 = lean_box(x_2); +x_306 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__15___boxed), 11, 4); +lean_closure_set(x_306, 0, x_10); +lean_closure_set(x_306, 1, x_1); +lean_closure_set(x_306, 2, x_305); +lean_closure_set(x_306, 3, x_301); +x_307 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_303, x_306, x_4, x_5, x_6, x_7, x_304); +return x_307; } else { -uint8_t x_314; -lean_dec(x_307); +uint8_t x_308; +lean_dec(x_301); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_314 = !lean_is_exclusive(x_308); -if (x_314 == 0) +x_308 = !lean_is_exclusive(x_302); +if (x_308 == 0) { -return x_308; +return x_302; } else { -lean_object* x_315; lean_object* x_316; lean_object* x_317; -x_315 = lean_ctor_get(x_308, 0); -x_316 = lean_ctor_get(x_308, 1); -lean_inc(x_316); -lean_inc(x_315); -lean_dec(x_308); -x_317 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_317, 0, x_315); -lean_ctor_set(x_317, 1, x_316); -return x_317; +lean_object* x_309; lean_object* x_310; lean_object* x_311; +x_309 = lean_ctor_get(x_302, 0); +x_310 = lean_ctor_get(x_302, 1); +lean_inc(x_310); +lean_inc(x_309); +lean_dec(x_302); +x_311 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_311, 0, x_309); +lean_ctor_set(x_311, 1, x_310); +return x_311; } } } } else { -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_dec(x_222); +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_dec(x_218); lean_dec(x_1); -x_318 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_318, 0, x_10); -x_319 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_320 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_320, 0, x_319); -lean_ctor_set(x_320, 1, x_318); -x_321 = l_Lean_KernelException_toMessageData___closed__3; -x_322 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_322, 0, x_320); -lean_ctor_set(x_322, 1, x_321); -x_323 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_322, x_4, x_5, x_6, x_7, x_221); +x_312 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_312, 0, x_10); +x_313 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_314 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_314, 0, x_313); +lean_ctor_set(x_314, 1, x_312); +x_315 = l_Lean_KernelException_toMessageData___closed__3; +x_316 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_316, 0, x_314); +lean_ctor_set(x_316, 1, x_315); +x_317 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_316, x_4, x_5, x_6, x_7, x_217); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_323; +return x_317; } } case 4: { -lean_object* x_324; lean_object* x_325; -x_324 = lean_ctor_get(x_9, 1); -lean_inc(x_324); +lean_object* x_318; lean_object* x_319; +x_318 = lean_ctor_get(x_9, 1); +lean_inc(x_318); lean_dec(x_9); -x_325 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_325) == 4) +x_319 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_319) == 4) { -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; -x_326 = lean_ctor_get(x_325, 0); +lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327; +x_320 = lean_ctor_get(x_319, 0); +lean_inc(x_320); +lean_dec(x_319); +x_321 = lean_st_ref_get(x_7, x_318); +x_322 = lean_ctor_get(x_321, 0); +lean_inc(x_322); +x_323 = lean_ctor_get(x_321, 1); +lean_inc(x_323); +lean_dec(x_321); +x_324 = lean_ctor_get(x_322, 0); +lean_inc(x_324); +lean_dec(x_322); +x_325 = lean_ctor_get(x_1, 0); +lean_inc(x_325); +x_326 = lean_ctor_get(x_1, 2); lean_inc(x_326); -lean_dec(x_325); -x_327 = lean_st_ref_get(x_7, x_324); -x_328 = lean_ctor_get(x_327, 0); -lean_inc(x_328); -x_329 = lean_ctor_get(x_327, 1); -lean_inc(x_329); -lean_dec(x_327); -x_330 = lean_ctor_get(x_328, 0); +x_327 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_326, x_324, x_320); +if (lean_obj_tag(x_327) == 0) +{ +lean_object* x_328; lean_object* x_329; +lean_inc(x_325); +x_328 = l_Lean_Name_append(x_320, x_325); +lean_inc(x_320); +x_329 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_320, x_4, x_5, x_6, x_7, x_323); +if (lean_obj_tag(x_329) == 0) +{ +lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; +x_330 = lean_ctor_get(x_329, 0); lean_inc(x_330); -lean_dec(x_328); -x_331 = lean_ctor_get(x_1, 0); +x_331 = lean_ctor_get(x_329, 1); lean_inc(x_331); -x_332 = lean_ctor_get(x_1, 2); -lean_inc(x_332); -x_333 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_332, x_330, x_326); -if (lean_obj_tag(x_333) == 0) -{ -lean_object* x_334; lean_object* x_335; -lean_inc(x_331); -x_334 = l_Lean_Name_append(x_326, x_331); -lean_inc(x_326); -x_335 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_326, x_4, x_5, x_6, x_7, x_329); -if (lean_obj_tag(x_335) == 0) -{ -lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; -x_336 = lean_ctor_get(x_335, 0); -lean_inc(x_336); -x_337 = lean_ctor_get(x_335, 1); -lean_inc(x_337); -lean_dec(x_335); -x_338 = l_Lean_ConstantInfo_type(x_336); -x_339 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +lean_dec(x_329); +x_332 = l_Lean_ConstantInfo_type(x_330); +x_333 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_338); -x_340 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_338, x_339, x_4, x_5, x_6, x_7, x_337); -if (lean_obj_tag(x_340) == 0) +lean_inc(x_332); +x_334 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_332, x_333, x_4, x_5, x_6, x_7, x_331); +if (lean_obj_tag(x_334) == 0) { -lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_374; uint8_t x_375; -x_341 = lean_ctor_get(x_340, 0); -lean_inc(x_341); -x_342 = lean_ctor_get(x_340, 1); -lean_inc(x_342); -lean_dec(x_340); -x_374 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_375 = l_Lean_Expr_isConstOf(x_341, x_374); -if (x_375 == 0) -{ -lean_object* x_376; uint8_t x_377; -x_376 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_377 = l_Lean_Expr_isConstOf(x_341, x_376); -lean_dec(x_341); -if (x_377 == 0) -{ -lean_object* x_378; -lean_dec(x_338); -lean_dec(x_336); +lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_366; uint8_t x_367; +x_335 = lean_ctor_get(x_334, 0); +lean_inc(x_335); +x_336 = lean_ctor_get(x_334, 1); +lean_inc(x_336); lean_dec(x_334); +x_366 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_367 = l_Lean_Expr_isConstOf(x_335, x_366); +if (x_367 == 0) +{ +lean_object* x_368; uint8_t x_369; +x_368 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_369 = l_Lean_Expr_isConstOf(x_335, x_368); +lean_dec(x_335); +if (x_369 == 0) +{ +lean_object* x_370; lean_dec(x_332); lean_dec(x_330); +lean_dec(x_328); lean_dec(x_326); +lean_dec(x_324); +lean_dec(x_320); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_378 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_342); -if (lean_obj_tag(x_378) == 0) +x_370 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_336); +if (lean_obj_tag(x_370) == 0) { -lean_object* x_379; -x_379 = lean_ctor_get(x_378, 0); -lean_inc(x_379); -if (lean_obj_tag(x_379) == 0) +lean_object* x_371; +x_371 = lean_ctor_get(x_370, 0); +lean_inc(x_371); +if (lean_obj_tag(x_371) == 0) { -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_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_dec(x_1); -x_380 = lean_ctor_get(x_378, 1); -lean_inc(x_380); -lean_dec(x_378); -x_381 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_381, 0, x_331); -x_382 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_383 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_383, 0, x_382); -lean_ctor_set(x_383, 1, x_381); -x_384 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; -x_385 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_385, 0, x_383); -lean_ctor_set(x_385, 1, x_384); -x_386 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_386, 0, x_10); -x_387 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_387, 0, x_385); -lean_ctor_set(x_387, 1, x_386); -x_388 = l_Lean_KernelException_toMessageData___closed__3; -x_389 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_389, 0, x_387); -lean_ctor_set(x_389, 1, x_388); -x_390 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_389, x_4, x_5, x_6, x_7, x_380); +x_372 = lean_ctor_get(x_370, 1); +lean_inc(x_372); +lean_dec(x_370); +x_373 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_373, 0, x_325); +x_374 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_375 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_375, 0, x_374); +lean_ctor_set(x_375, 1, x_373); +x_376 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_377 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_377, 0, x_375); +lean_ctor_set(x_377, 1, x_376); +x_378 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_378, 0, x_10); +x_379 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_379, 0, x_377); +lean_ctor_set(x_379, 1, x_378); +x_380 = l_Lean_KernelException_toMessageData___closed__3; +x_381 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_381, 0, x_379); +lean_ctor_set(x_381, 1, x_380); +x_382 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_381, x_4, x_5, x_6, x_7, x_372); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_390; +return x_382; } else { -lean_object* x_391; lean_object* x_392; -lean_dec(x_331); +lean_object* x_383; lean_object* x_384; +lean_dec(x_325); lean_dec(x_10); -x_391 = lean_ctor_get(x_378, 1); -lean_inc(x_391); -lean_dec(x_378); -x_392 = lean_ctor_get(x_379, 0); -lean_inc(x_392); -lean_dec(x_379); -x_3 = x_392; -x_8 = x_391; +x_383 = lean_ctor_get(x_370, 1); +lean_inc(x_383); +lean_dec(x_370); +x_384 = lean_ctor_get(x_371, 0); +lean_inc(x_384); +lean_dec(x_371); +x_3 = x_384; +x_8 = x_383; goto _start; } } else { -uint8_t x_394; -lean_dec(x_331); +uint8_t x_386; +lean_dec(x_325); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_394 = !lean_is_exclusive(x_378); -if (x_394 == 0) +x_386 = !lean_is_exclusive(x_370); +if (x_386 == 0) { -return x_378; +return x_370; } else { -lean_object* x_395; lean_object* x_396; lean_object* x_397; -x_395 = lean_ctor_get(x_378, 0); -x_396 = lean_ctor_get(x_378, 1); -lean_inc(x_396); -lean_inc(x_395); -lean_dec(x_378); -x_397 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_397, 0, x_395); -lean_ctor_set(x_397, 1, x_396); -return x_397; +lean_object* x_387; lean_object* x_388; lean_object* x_389; +x_387 = lean_ctor_get(x_370, 0); +x_388 = lean_ctor_get(x_370, 1); +lean_inc(x_388); +lean_inc(x_387); +lean_dec(x_370); +x_389 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_389, 0, x_387); +lean_ctor_set(x_389, 1, x_388); +return x_389; } } } else { -lean_object* x_398; -x_398 = lean_box(0); -x_343 = x_398; -goto block_373; +lean_object* x_390; +x_390 = lean_box(0); +x_337 = x_390; +goto block_365; } } else { -lean_object* x_399; -lean_dec(x_341); -x_399 = lean_box(0); -x_343 = x_399; -goto block_373; +lean_object* x_391; +lean_dec(x_335); +x_391 = lean_box(0); +x_337 = x_391; +goto block_365; } -block_373: +block_365: { -lean_object* x_344; -lean_dec(x_343); -x_344 = l_Lean_ConstantInfo_value_x3f(x_336); -lean_dec(x_336); -if (lean_obj_tag(x_344) == 0) -{ -lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; -lean_dec(x_338); -lean_dec(x_334); -lean_dec(x_332); +lean_object* x_338; +lean_dec(x_337); +x_338 = l_Lean_ConstantInfo_value_x3f(x_330); lean_dec(x_330); +if (lean_obj_tag(x_338) == 0) +{ +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_dec(x_332); +lean_dec(x_328); lean_dec(x_326); +lean_dec(x_324); +lean_dec(x_320); lean_dec(x_1); -x_345 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_345, 0, x_331); -x_346 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_339 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_339, 0, x_325); +x_340 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_341 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_341, 0, x_340); +lean_ctor_set(x_341, 1, x_339); +x_342 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_343 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_343, 0, x_341); +lean_ctor_set(x_343, 1, x_342); +x_344 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_344, 0, x_10); +x_345 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_345, 0, x_343); +lean_ctor_set(x_345, 1, x_344); +x_346 = l_Lean_KernelException_toMessageData___closed__3; x_347 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_347, 0, x_346); -lean_ctor_set(x_347, 1, x_345); -x_348 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; -x_349 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_349, 0, x_347); -lean_ctor_set(x_349, 1, x_348); -x_350 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_350, 0, x_10); -x_351 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_351, 0, x_349); -lean_ctor_set(x_351, 1, x_350); -x_352 = l_Lean_KernelException_toMessageData___closed__3; -x_353 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_353, 0, x_351); -lean_ctor_set(x_353, 1, x_352); -x_354 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_353, x_4, x_5, x_6, x_7, x_342); +lean_ctor_set(x_347, 0, x_345); +lean_ctor_set(x_347, 1, x_346); +x_348 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_347, x_4, x_5, x_6, x_7, x_336); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_354; +return x_348; } else { -lean_object* x_355; lean_object* x_356; -lean_dec(x_331); -x_355 = lean_ctor_get(x_344, 0); -lean_inc(x_355); -lean_dec(x_344); -x_356 = l_Lean_Environment_getModuleIdxFor_x3f(x_330, x_326); -lean_dec(x_330); -if (lean_obj_tag(x_356) == 0) +lean_object* x_349; lean_object* x_350; +lean_dec(x_325); +x_349 = lean_ctor_get(x_338, 0); +lean_inc(x_349); +lean_dec(x_338); +x_350 = l_Lean_Environment_getModuleIdxFor_x3f(x_324, x_320); +lean_dec(x_324); +if (lean_obj_tag(x_350) == 0) { -lean_object* x_357; lean_object* x_358; lean_object* x_359; -x_357 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_358 = lean_box(0); -x_359 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(x_1, x_355, x_2, x_357, x_338, x_334, x_332, x_326, x_10, x_339, x_358, x_4, x_5, x_6, x_7, x_342); -return x_359; +lean_object* x_351; lean_object* x_352; +x_351 = lean_box(0); +x_352 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(x_1, x_349, x_2, x_332, x_328, x_326, x_320, x_10, x_333, x_351, x_4, x_5, x_6, x_7, x_336); +return x_352; } else { -lean_dec(x_356); +lean_dec(x_350); if (x_2 == 0) { -lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; uint8_t x_366; -lean_dec(x_355); -lean_dec(x_338); -lean_dec(x_334); +lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; uint8_t x_359; +lean_dec(x_349); lean_dec(x_332); +lean_dec(x_328); +lean_dec(x_326); lean_dec(x_10); lean_dec(x_1); -x_360 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_360, 0, x_326); -x_361 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_362 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_362, 0, x_361); -lean_ctor_set(x_362, 1, x_360); -x_363 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_364 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_364, 0, x_362); -lean_ctor_set(x_364, 1, x_363); -x_365 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_364, x_4, x_5, x_6, x_7, x_342); +x_353 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_353, 0, x_320); +x_354 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_355 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_355, 0, x_354); +lean_ctor_set(x_355, 1, x_353); +x_356 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_357 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_357, 0, x_355); +lean_ctor_set(x_357, 1, x_356); +x_358 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_357, x_4, x_5, x_6, x_7, x_336); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -x_366 = !lean_is_exclusive(x_365); -if (x_366 == 0) +x_359 = !lean_is_exclusive(x_358); +if (x_359 == 0) { -return x_365; +return x_358; } else { -lean_object* x_367; lean_object* x_368; lean_object* x_369; -x_367 = lean_ctor_get(x_365, 0); -x_368 = lean_ctor_get(x_365, 1); -lean_inc(x_368); -lean_inc(x_367); -lean_dec(x_365); -x_369 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_369, 0, x_367); -lean_ctor_set(x_369, 1, x_368); -return x_369; +lean_object* x_360; lean_object* x_361; lean_object* x_362; +x_360 = lean_ctor_get(x_358, 0); +x_361 = lean_ctor_get(x_358, 1); +lean_inc(x_361); +lean_inc(x_360); +lean_dec(x_358); +x_362 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_362, 0, x_360); +lean_ctor_set(x_362, 1, x_361); +return x_362; } } else { -lean_object* x_370; lean_object* x_371; lean_object* x_372; -x_370 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_371 = lean_box(0); -x_372 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(x_1, x_355, x_2, x_370, x_338, x_334, x_332, x_326, x_10, x_339, x_371, x_4, x_5, x_6, x_7, x_342); -return x_372; +lean_object* x_363; lean_object* x_364; +x_363 = lean_box(0); +x_364 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(x_1, x_349, x_2, x_332, x_328, x_326, x_320, x_10, x_333, x_363, x_4, x_5, x_6, x_7, x_336); +return x_364; } } } @@ -19625,321 +18558,521 @@ return x_372; } else { -uint8_t x_400; -lean_dec(x_338); -lean_dec(x_336); -lean_dec(x_334); +uint8_t x_392; lean_dec(x_332); -lean_dec(x_331); lean_dec(x_330); +lean_dec(x_328); lean_dec(x_326); +lean_dec(x_325); +lean_dec(x_324); +lean_dec(x_320); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_400 = !lean_is_exclusive(x_340); -if (x_400 == 0) +x_392 = !lean_is_exclusive(x_334); +if (x_392 == 0) { -return x_340; +return x_334; } else { -lean_object* x_401; lean_object* x_402; lean_object* x_403; -x_401 = lean_ctor_get(x_340, 0); -x_402 = lean_ctor_get(x_340, 1); -lean_inc(x_402); -lean_inc(x_401); -lean_dec(x_340); -x_403 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_403, 0, x_401); -lean_ctor_set(x_403, 1, x_402); -return x_403; -} -} -} -else -{ -uint8_t x_404; +lean_object* x_393; lean_object* x_394; lean_object* x_395; +x_393 = lean_ctor_get(x_334, 0); +x_394 = lean_ctor_get(x_334, 1); +lean_inc(x_394); +lean_inc(x_393); lean_dec(x_334); -lean_dec(x_332); -lean_dec(x_331); -lean_dec(x_330); +x_395 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_395, 0, x_393); +lean_ctor_set(x_395, 1, x_394); +return x_395; +} +} +} +else +{ +uint8_t x_396; +lean_dec(x_328); lean_dec(x_326); +lean_dec(x_325); +lean_dec(x_324); +lean_dec(x_320); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_404 = !lean_is_exclusive(x_335); -if (x_404 == 0) +x_396 = !lean_is_exclusive(x_329); +if (x_396 == 0) { -return x_335; +return x_329; } else { -lean_object* x_405; lean_object* x_406; lean_object* x_407; -x_405 = lean_ctor_get(x_335, 0); -x_406 = lean_ctor_get(x_335, 1); -lean_inc(x_406); -lean_inc(x_405); -lean_dec(x_335); -x_407 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_407, 0, x_405); -lean_ctor_set(x_407, 1, x_406); -return x_407; +lean_object* x_397; lean_object* x_398; lean_object* x_399; +x_397 = lean_ctor_get(x_329, 0); +x_398 = lean_ctor_get(x_329, 1); +lean_inc(x_398); +lean_inc(x_397); +lean_dec(x_329); +x_399 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_399, 0, x_397); +lean_ctor_set(x_399, 1, x_398); +return x_399; } } } else { -lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; -lean_dec(x_332); -lean_dec(x_331); -lean_dec(x_330); +lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_dec(x_326); -x_408 = lean_ctor_get(x_333, 0); -lean_inc(x_408); -lean_dec(x_333); -x_409 = lean_box(0); -x_410 = l_Lean_mkConst(x_408, x_409); +lean_dec(x_325); +lean_dec(x_324); +lean_dec(x_320); +x_400 = lean_ctor_get(x_327, 0); +lean_inc(x_400); +lean_dec(x_327); +x_401 = lean_box(0); +x_402 = l_Lean_mkConst(x_400, x_401); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_410); -x_411 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_410, x_4, x_5, x_6, x_7, x_329); -if (lean_obj_tag(x_411) == 0) +lean_inc(x_402); +x_403 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_402, x_4, x_5, x_6, x_7, x_323); +if (lean_obj_tag(x_403) == 0) { -lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; -x_412 = lean_ctor_get(x_411, 0); -lean_inc(x_412); -x_413 = lean_ctor_get(x_411, 1); -lean_inc(x_413); -lean_dec(x_411); -x_414 = lean_box(x_2); -x_415 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__20___boxed), 11, 4); -lean_closure_set(x_415, 0, x_10); -lean_closure_set(x_415, 1, x_1); -lean_closure_set(x_415, 2, x_414); -lean_closure_set(x_415, 3, x_410); -x_416 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_412, x_415, x_4, x_5, x_6, x_7, x_413); -return x_416; +lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; +x_404 = lean_ctor_get(x_403, 0); +lean_inc(x_404); +x_405 = lean_ctor_get(x_403, 1); +lean_inc(x_405); +lean_dec(x_403); +x_406 = lean_box(x_2); +x_407 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__20___boxed), 11, 4); +lean_closure_set(x_407, 0, x_10); +lean_closure_set(x_407, 1, x_1); +lean_closure_set(x_407, 2, x_406); +lean_closure_set(x_407, 3, x_402); +x_408 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_404, x_407, x_4, x_5, x_6, x_7, x_405); +return x_408; } else { -uint8_t x_417; -lean_dec(x_410); +uint8_t x_409; +lean_dec(x_402); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_417 = !lean_is_exclusive(x_411); -if (x_417 == 0) +x_409 = !lean_is_exclusive(x_403); +if (x_409 == 0) { -return x_411; +return x_403; } else { -lean_object* x_418; lean_object* x_419; lean_object* x_420; -x_418 = lean_ctor_get(x_411, 0); -x_419 = lean_ctor_get(x_411, 1); -lean_inc(x_419); -lean_inc(x_418); -lean_dec(x_411); -x_420 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_420, 0, x_418); -lean_ctor_set(x_420, 1, x_419); -return x_420; +lean_object* x_410; lean_object* x_411; lean_object* x_412; +x_410 = lean_ctor_get(x_403, 0); +x_411 = lean_ctor_get(x_403, 1); +lean_inc(x_411); +lean_inc(x_410); +lean_dec(x_403); +x_412 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_412, 0, x_410); +lean_ctor_set(x_412, 1, x_411); +return x_412; } } } } else { -lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; -lean_dec(x_325); +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_dec(x_319); lean_dec(x_1); -x_421 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_421, 0, x_10); -x_422 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_423 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_423, 0, x_422); -lean_ctor_set(x_423, 1, x_421); -x_424 = l_Lean_KernelException_toMessageData___closed__3; -x_425 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_425, 0, x_423); -lean_ctor_set(x_425, 1, x_424); -x_426 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_425, x_4, x_5, x_6, x_7, x_324); +x_413 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_413, 0, x_10); +x_414 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_415 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_415, 0, x_414); +lean_ctor_set(x_415, 1, x_413); +x_416 = l_Lean_KernelException_toMessageData___closed__3; +x_417 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_417, 0, x_415); +lean_ctor_set(x_417, 1, x_416); +x_418 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_417, x_4, x_5, x_6, x_7, x_318); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_426; +return x_418; } } case 5: { -lean_object* x_427; lean_object* x_428; -x_427 = lean_ctor_get(x_9, 1); -lean_inc(x_427); +lean_object* x_419; lean_object* x_420; +x_419 = lean_ctor_get(x_9, 1); +lean_inc(x_419); lean_dec(x_9); -x_428 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_428) == 4) +x_420 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_420) == 4) { -lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; -x_429 = lean_ctor_get(x_428, 0); -lean_inc(x_429); -lean_dec(x_428); -x_430 = lean_st_ref_get(x_7, x_427); +lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; +x_421 = lean_ctor_get(x_420, 0); +lean_inc(x_421); +lean_dec(x_420); +x_422 = lean_st_ref_get(x_7, x_419); +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_ctor_get(x_423, 0); +lean_inc(x_425); +lean_dec(x_423); +x_426 = lean_ctor_get(x_1, 0); +lean_inc(x_426); +x_427 = lean_ctor_get(x_1, 2); +lean_inc(x_427); +x_428 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_427, x_425, x_421); +if (lean_obj_tag(x_428) == 0) +{ +lean_object* x_429; lean_object* x_430; +lean_inc(x_426); +x_429 = l_Lean_Name_append(x_421, x_426); +lean_inc(x_421); +x_430 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_421, x_4, x_5, x_6, x_7, x_424); +if (lean_obj_tag(x_430) == 0) +{ +lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; x_431 = lean_ctor_get(x_430, 0); lean_inc(x_431); x_432 = lean_ctor_get(x_430, 1); lean_inc(x_432); lean_dec(x_430); -x_433 = lean_ctor_get(x_431, 0); -lean_inc(x_433); -lean_dec(x_431); -x_434 = lean_ctor_get(x_1, 0); -lean_inc(x_434); -x_435 = lean_ctor_get(x_1, 2); -lean_inc(x_435); -x_436 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_435, x_433, x_429); -if (lean_obj_tag(x_436) == 0) -{ -lean_object* x_437; lean_object* x_438; -lean_inc(x_434); -x_437 = l_Lean_Name_append(x_429, x_434); -lean_inc(x_429); -x_438 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_429, x_4, x_5, x_6, x_7, x_432); -if (lean_obj_tag(x_438) == 0) -{ -lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; -x_439 = lean_ctor_get(x_438, 0); -lean_inc(x_439); -x_440 = lean_ctor_get(x_438, 1); -lean_inc(x_440); -lean_dec(x_438); -x_441 = l_Lean_ConstantInfo_type(x_439); -x_442 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +x_433 = l_Lean_ConstantInfo_type(x_431); +x_434 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_441); -x_443 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_441, x_442, x_4, x_5, x_6, x_7, x_440); -if (lean_obj_tag(x_443) == 0) +lean_inc(x_433); +x_435 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_433, x_434, x_4, x_5, x_6, x_7, x_432); +if (lean_obj_tag(x_435) == 0) { -lean_object* x_444; lean_object* x_445; lean_object* x_446; lean_object* x_477; uint8_t x_478; -x_444 = lean_ctor_get(x_443, 0); -lean_inc(x_444); -x_445 = lean_ctor_get(x_443, 1); -lean_inc(x_445); -lean_dec(x_443); -x_477 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_478 = l_Lean_Expr_isConstOf(x_444, x_477); -if (x_478 == 0) -{ -lean_object* x_479; uint8_t x_480; -x_479 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_480 = l_Lean_Expr_isConstOf(x_444, x_479); -lean_dec(x_444); -if (x_480 == 0) -{ -lean_object* x_481; -lean_dec(x_441); -lean_dec(x_439); -lean_dec(x_437); +lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_467; uint8_t x_468; +x_436 = lean_ctor_get(x_435, 0); +lean_inc(x_436); +x_437 = lean_ctor_get(x_435, 1); +lean_inc(x_437); lean_dec(x_435); +x_467 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_468 = l_Lean_Expr_isConstOf(x_436, x_467); +if (x_468 == 0) +{ +lean_object* x_469; uint8_t x_470; +x_469 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_470 = l_Lean_Expr_isConstOf(x_436, x_469); +lean_dec(x_436); +if (x_470 == 0) +{ +lean_object* x_471; lean_dec(x_433); +lean_dec(x_431); lean_dec(x_429); +lean_dec(x_427); +lean_dec(x_425); +lean_dec(x_421); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_481 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_445); -if (lean_obj_tag(x_481) == 0) +x_471 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_437); +if (lean_obj_tag(x_471) == 0) { -lean_object* x_482; -x_482 = lean_ctor_get(x_481, 0); -lean_inc(x_482); -if (lean_obj_tag(x_482) == 0) +lean_object* x_472; +x_472 = lean_ctor_get(x_471, 0); +lean_inc(x_472); +if (lean_obj_tag(x_472) == 0) { -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_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_dec(x_1); -x_483 = lean_ctor_get(x_481, 1); -lean_inc(x_483); -lean_dec(x_481); -x_484 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_484, 0, x_434); -x_485 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_486 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_486, 0, x_485); -lean_ctor_set(x_486, 1, x_484); -x_487 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; -x_488 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_488, 0, x_486); -lean_ctor_set(x_488, 1, x_487); -x_489 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_489, 0, x_10); -x_490 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_490, 0, x_488); -lean_ctor_set(x_490, 1, x_489); -x_491 = l_Lean_KernelException_toMessageData___closed__3; -x_492 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_492, 0, x_490); -lean_ctor_set(x_492, 1, x_491); -x_493 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_492, x_4, x_5, x_6, x_7, x_483); +x_473 = lean_ctor_get(x_471, 1); +lean_inc(x_473); +lean_dec(x_471); +x_474 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_474, 0, x_426); +x_475 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_476 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_476, 0, x_475); +lean_ctor_set(x_476, 1, x_474); +x_477 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_478 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_478, 0, x_476); +lean_ctor_set(x_478, 1, x_477); +x_479 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_479, 0, x_10); +x_480 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_480, 0, x_478); +lean_ctor_set(x_480, 1, x_479); +x_481 = l_Lean_KernelException_toMessageData___closed__3; +x_482 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_482, 0, x_480); +lean_ctor_set(x_482, 1, x_481); +x_483 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_482, x_4, x_5, x_6, x_7, x_473); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_493; +return x_483; } else { -lean_object* x_494; lean_object* x_495; -lean_dec(x_434); +lean_object* x_484; lean_object* x_485; +lean_dec(x_426); lean_dec(x_10); -x_494 = lean_ctor_get(x_481, 1); -lean_inc(x_494); -lean_dec(x_481); -x_495 = lean_ctor_get(x_482, 0); -lean_inc(x_495); -lean_dec(x_482); -x_3 = x_495; -x_8 = x_494; +x_484 = lean_ctor_get(x_471, 1); +lean_inc(x_484); +lean_dec(x_471); +x_485 = lean_ctor_get(x_472, 0); +lean_inc(x_485); +lean_dec(x_472); +x_3 = x_485; +x_8 = x_484; goto _start; } } else { -uint8_t x_497; -lean_dec(x_434); +uint8_t x_487; +lean_dec(x_426); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_497 = !lean_is_exclusive(x_481); +x_487 = !lean_is_exclusive(x_471); +if (x_487 == 0) +{ +return x_471; +} +else +{ +lean_object* x_488; lean_object* x_489; lean_object* x_490; +x_488 = lean_ctor_get(x_471, 0); +x_489 = lean_ctor_get(x_471, 1); +lean_inc(x_489); +lean_inc(x_488); +lean_dec(x_471); +x_490 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_490, 0, x_488); +lean_ctor_set(x_490, 1, x_489); +return x_490; +} +} +} +else +{ +lean_object* x_491; +x_491 = lean_box(0); +x_438 = x_491; +goto block_466; +} +} +else +{ +lean_object* x_492; +lean_dec(x_436); +x_492 = lean_box(0); +x_438 = x_492; +goto block_466; +} +block_466: +{ +lean_object* x_439; +lean_dec(x_438); +x_439 = l_Lean_ConstantInfo_value_x3f(x_431); +lean_dec(x_431); +if (lean_obj_tag(x_439) == 0) +{ +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_dec(x_433); +lean_dec(x_429); +lean_dec(x_427); +lean_dec(x_425); +lean_dec(x_421); +lean_dec(x_1); +x_440 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_440, 0, x_426); +x_441 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_442 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_442, 0, x_441); +lean_ctor_set(x_442, 1, x_440); +x_443 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_444 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_444, 0, x_442); +lean_ctor_set(x_444, 1, x_443); +x_445 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_445, 0, x_10); +x_446 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_446, 0, x_444); +lean_ctor_set(x_446, 1, x_445); +x_447 = l_Lean_KernelException_toMessageData___closed__3; +x_448 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_448, 0, x_446); +lean_ctor_set(x_448, 1, x_447); +x_449 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_448, x_4, x_5, x_6, x_7, x_437); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_449; +} +else +{ +lean_object* x_450; lean_object* x_451; +lean_dec(x_426); +x_450 = lean_ctor_get(x_439, 0); +lean_inc(x_450); +lean_dec(x_439); +x_451 = l_Lean_Environment_getModuleIdxFor_x3f(x_425, x_421); +lean_dec(x_425); +if (lean_obj_tag(x_451) == 0) +{ +lean_object* x_452; lean_object* x_453; +x_452 = lean_box(0); +x_453 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(x_1, x_450, x_2, x_433, x_429, x_427, x_421, x_10, x_434, x_452, x_4, x_5, x_6, x_7, x_437); +return x_453; +} +else +{ +lean_dec(x_451); +if (x_2 == 0) +{ +lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; uint8_t x_460; +lean_dec(x_450); +lean_dec(x_433); +lean_dec(x_429); +lean_dec(x_427); +lean_dec(x_10); +lean_dec(x_1); +x_454 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_454, 0, x_421); +x_455 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_456 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_456, 0, x_455); +lean_ctor_set(x_456, 1, x_454); +x_457 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_458 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_458, 0, x_456); +lean_ctor_set(x_458, 1, x_457); +x_459 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_458, x_4, x_5, x_6, x_7, x_437); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_460 = !lean_is_exclusive(x_459); +if (x_460 == 0) +{ +return x_459; +} +else +{ +lean_object* x_461; lean_object* x_462; lean_object* x_463; +x_461 = lean_ctor_get(x_459, 0); +x_462 = lean_ctor_get(x_459, 1); +lean_inc(x_462); +lean_inc(x_461); +lean_dec(x_459); +x_463 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_463, 0, x_461); +lean_ctor_set(x_463, 1, x_462); +return x_463; +} +} +else +{ +lean_object* x_464; lean_object* x_465; +x_464 = lean_box(0); +x_465 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(x_1, x_450, x_2, x_433, x_429, x_427, x_421, x_10, x_434, x_464, x_4, x_5, x_6, x_7, x_437); +return x_465; +} +} +} +} +} +else +{ +uint8_t x_493; +lean_dec(x_433); +lean_dec(x_431); +lean_dec(x_429); +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_425); +lean_dec(x_421); +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_493 = !lean_is_exclusive(x_435); +if (x_493 == 0) +{ +return x_435; +} +else +{ +lean_object* x_494; lean_object* x_495; lean_object* x_496; +x_494 = lean_ctor_get(x_435, 0); +x_495 = lean_ctor_get(x_435, 1); +lean_inc(x_495); +lean_inc(x_494); +lean_dec(x_435); +x_496 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_496, 0, x_494); +lean_ctor_set(x_496, 1, x_495); +return x_496; +} +} +} +else +{ +uint8_t x_497; +lean_dec(x_429); +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_425); +lean_dec(x_421); +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_497 = !lean_is_exclusive(x_430); if (x_497 == 0) { -return x_481; +return x_430; } else { lean_object* x_498; lean_object* x_499; lean_object* x_500; -x_498 = lean_ctor_get(x_481, 0); -x_499 = lean_ctor_get(x_481, 1); +x_498 = lean_ctor_get(x_430, 0); +x_499 = lean_ctor_get(x_430, 1); lean_inc(x_499); lean_inc(x_498); -lean_dec(x_481); +lean_dec(x_430); x_500 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_500, 0, x_498); lean_ctor_set(x_500, 1, x_499); @@ -19949,600 +19082,396 @@ return x_500; } else { -lean_object* x_501; -x_501 = lean_box(0); -x_446 = x_501; -goto block_476; -} -} -else -{ -lean_object* x_502; -lean_dec(x_444); +lean_object* x_501; lean_object* x_502; lean_object* x_503; lean_object* x_504; +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_425); +lean_dec(x_421); +x_501 = lean_ctor_get(x_428, 0); +lean_inc(x_501); +lean_dec(x_428); x_502 = lean_box(0); -x_446 = x_502; -goto block_476; -} -block_476: -{ -lean_object* x_447; -lean_dec(x_446); -x_447 = l_Lean_ConstantInfo_value_x3f(x_439); -lean_dec(x_439); -if (lean_obj_tag(x_447) == 0) -{ -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_dec(x_441); -lean_dec(x_437); -lean_dec(x_435); -lean_dec(x_433); -lean_dec(x_429); -lean_dec(x_1); -x_448 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_448, 0, x_434); -x_449 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_450 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_450, 0, x_449); -lean_ctor_set(x_450, 1, x_448); -x_451 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; -x_452 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_452, 0, x_450); -lean_ctor_set(x_452, 1, x_451); -x_453 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_453, 0, x_10); -x_454 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_454, 0, x_452); -lean_ctor_set(x_454, 1, x_453); -x_455 = l_Lean_KernelException_toMessageData___closed__3; -x_456 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_456, 0, x_454); -lean_ctor_set(x_456, 1, x_455); -x_457 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_456, x_4, x_5, x_6, x_7, x_445); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -return x_457; -} -else -{ -lean_object* x_458; lean_object* x_459; -lean_dec(x_434); -x_458 = lean_ctor_get(x_447, 0); -lean_inc(x_458); -lean_dec(x_447); -x_459 = l_Lean_Environment_getModuleIdxFor_x3f(x_433, x_429); -lean_dec(x_433); -if (lean_obj_tag(x_459) == 0) -{ -lean_object* x_460; lean_object* x_461; lean_object* x_462; -x_460 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_461 = lean_box(0); -x_462 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(x_1, x_458, x_2, x_460, x_441, x_437, x_435, x_429, x_10, x_442, x_461, x_4, x_5, x_6, x_7, x_445); -return x_462; -} -else -{ -lean_dec(x_459); -if (x_2 == 0) -{ -lean_object* x_463; lean_object* x_464; lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; uint8_t x_469; -lean_dec(x_458); -lean_dec(x_441); -lean_dec(x_437); -lean_dec(x_435); -lean_dec(x_10); -lean_dec(x_1); -x_463 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_463, 0, x_429); -x_464 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_465 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_465, 0, x_464); -lean_ctor_set(x_465, 1, x_463); -x_466 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_467 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_467, 0, x_465); -lean_ctor_set(x_467, 1, x_466); -x_468 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_467, x_4, x_5, x_6, x_7, x_445); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_469 = !lean_is_exclusive(x_468); -if (x_469 == 0) -{ -return x_468; -} -else -{ -lean_object* x_470; lean_object* x_471; lean_object* x_472; -x_470 = lean_ctor_get(x_468, 0); -x_471 = lean_ctor_get(x_468, 1); -lean_inc(x_471); -lean_inc(x_470); -lean_dec(x_468); -x_472 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_472, 0, x_470); -lean_ctor_set(x_472, 1, x_471); -return x_472; -} -} -else -{ -lean_object* x_473; lean_object* x_474; lean_object* x_475; -x_473 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_474 = lean_box(0); -x_475 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(x_1, x_458, x_2, x_473, x_441, x_437, x_435, x_429, x_10, x_442, x_474, x_4, x_5, x_6, x_7, x_445); -return x_475; -} -} -} -} -} -else -{ -uint8_t x_503; -lean_dec(x_441); -lean_dec(x_439); -lean_dec(x_437); -lean_dec(x_435); -lean_dec(x_434); -lean_dec(x_433); -lean_dec(x_429); -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_503 = !lean_is_exclusive(x_443); -if (x_503 == 0) -{ -return x_443; -} -else -{ -lean_object* x_504; lean_object* x_505; lean_object* x_506; -x_504 = lean_ctor_get(x_443, 0); -x_505 = lean_ctor_get(x_443, 1); -lean_inc(x_505); -lean_inc(x_504); -lean_dec(x_443); -x_506 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_506, 0, x_504); -lean_ctor_set(x_506, 1, x_505); -return x_506; -} -} -} -else -{ -uint8_t x_507; -lean_dec(x_437); -lean_dec(x_435); -lean_dec(x_434); -lean_dec(x_433); -lean_dec(x_429); -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_507 = !lean_is_exclusive(x_438); -if (x_507 == 0) -{ -return x_438; -} -else -{ -lean_object* x_508; lean_object* x_509; lean_object* x_510; -x_508 = lean_ctor_get(x_438, 0); -x_509 = lean_ctor_get(x_438, 1); -lean_inc(x_509); -lean_inc(x_508); -lean_dec(x_438); -x_510 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_510, 0, x_508); -lean_ctor_set(x_510, 1, x_509); -return x_510; -} -} -} -else -{ -lean_object* x_511; lean_object* x_512; lean_object* x_513; lean_object* x_514; -lean_dec(x_435); -lean_dec(x_434); -lean_dec(x_433); -lean_dec(x_429); -x_511 = lean_ctor_get(x_436, 0); -lean_inc(x_511); -lean_dec(x_436); -x_512 = lean_box(0); -x_513 = l_Lean_mkConst(x_511, x_512); +x_503 = l_Lean_mkConst(x_501, x_502); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_513); -x_514 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_513, x_4, x_5, x_6, x_7, x_432); -if (lean_obj_tag(x_514) == 0) +lean_inc(x_503); +x_504 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_503, x_4, x_5, x_6, x_7, x_424); +if (lean_obj_tag(x_504) == 0) { -lean_object* x_515; lean_object* x_516; lean_object* x_517; lean_object* x_518; lean_object* x_519; -x_515 = lean_ctor_get(x_514, 0); -lean_inc(x_515); -x_516 = lean_ctor_get(x_514, 1); -lean_inc(x_516); -lean_dec(x_514); -x_517 = lean_box(x_2); -x_518 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__25___boxed), 11, 4); -lean_closure_set(x_518, 0, x_10); -lean_closure_set(x_518, 1, x_1); -lean_closure_set(x_518, 2, x_517); -lean_closure_set(x_518, 3, x_513); -x_519 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_515, x_518, x_4, x_5, x_6, x_7, x_516); -return x_519; +lean_object* x_505; lean_object* x_506; lean_object* x_507; lean_object* x_508; lean_object* x_509; +x_505 = lean_ctor_get(x_504, 0); +lean_inc(x_505); +x_506 = lean_ctor_get(x_504, 1); +lean_inc(x_506); +lean_dec(x_504); +x_507 = lean_box(x_2); +x_508 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__25___boxed), 11, 4); +lean_closure_set(x_508, 0, x_10); +lean_closure_set(x_508, 1, x_1); +lean_closure_set(x_508, 2, x_507); +lean_closure_set(x_508, 3, x_503); +x_509 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_505, x_508, x_4, x_5, x_6, x_7, x_506); +return x_509; } else { -uint8_t x_520; -lean_dec(x_513); +uint8_t x_510; +lean_dec(x_503); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_520 = !lean_is_exclusive(x_514); -if (x_520 == 0) +x_510 = !lean_is_exclusive(x_504); +if (x_510 == 0) { -return x_514; +return x_504; } else { -lean_object* x_521; lean_object* x_522; lean_object* x_523; -x_521 = lean_ctor_get(x_514, 0); -x_522 = lean_ctor_get(x_514, 1); -lean_inc(x_522); -lean_inc(x_521); -lean_dec(x_514); -x_523 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_523, 0, x_521); -lean_ctor_set(x_523, 1, x_522); -return x_523; +lean_object* x_511; lean_object* x_512; lean_object* x_513; +x_511 = lean_ctor_get(x_504, 0); +x_512 = lean_ctor_get(x_504, 1); +lean_inc(x_512); +lean_inc(x_511); +lean_dec(x_504); +x_513 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_513, 0, x_511); +lean_ctor_set(x_513, 1, x_512); +return x_513; } } } } else { -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_dec(x_428); +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_dec(x_420); lean_dec(x_1); -x_524 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_524, 0, x_10); -x_525 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_526 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_526, 0, x_525); -lean_ctor_set(x_526, 1, x_524); -x_527 = l_Lean_KernelException_toMessageData___closed__3; -x_528 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_528, 0, x_526); -lean_ctor_set(x_528, 1, x_527); -x_529 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_528, x_4, x_5, x_6, x_7, x_427); +x_514 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_514, 0, x_10); +x_515 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_516 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_516, 0, x_515); +lean_ctor_set(x_516, 1, x_514); +x_517 = l_Lean_KernelException_toMessageData___closed__3; +x_518 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_518, 0, x_516); +lean_ctor_set(x_518, 1, x_517); +x_519 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_518, x_4, x_5, x_6, x_7, x_419); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_529; +return x_519; } } case 6: { -lean_object* x_530; lean_object* x_531; lean_object* x_532; lean_object* x_533; -x_530 = lean_ctor_get(x_9, 1); -lean_inc(x_530); +lean_object* x_520; lean_object* x_521; lean_object* x_522; lean_object* x_523; +x_520 = lean_ctor_get(x_9, 1); +lean_inc(x_520); lean_dec(x_9); -x_531 = lean_box(x_2); -x_532 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__26___boxed), 9, 2); -lean_closure_set(x_532, 0, x_1); -lean_closure_set(x_532, 1, x_531); -x_533 = l_Lean_Meta_lambdaLetTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferLambdaType___spec__2___rarg(x_10, x_532, x_4, x_5, x_6, x_7, x_530); -return x_533; +x_521 = lean_box(x_2); +x_522 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__26___boxed), 9, 2); +lean_closure_set(x_522, 0, x_1); +lean_closure_set(x_522, 1, x_521); +x_523 = l_Lean_Meta_lambdaLetTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferLambdaType___spec__2___rarg(x_10, x_522, x_4, x_5, x_6, x_7, x_520); +return x_523; } case 7: { -lean_object* x_534; lean_object* x_535; -x_534 = lean_ctor_get(x_9, 1); -lean_inc(x_534); +lean_object* x_524; lean_object* x_525; +x_524 = lean_ctor_get(x_9, 1); +lean_inc(x_524); lean_dec(x_9); -x_535 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_535) == 4) +x_525 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_525) == 4) { -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_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; +x_526 = lean_ctor_get(x_525, 0); +lean_inc(x_526); +lean_dec(x_525); +x_527 = lean_st_ref_get(x_7, x_524); +x_528 = lean_ctor_get(x_527, 0); +lean_inc(x_528); +x_529 = lean_ctor_get(x_527, 1); +lean_inc(x_529); +lean_dec(x_527); +x_530 = lean_ctor_get(x_528, 0); +lean_inc(x_530); +lean_dec(x_528); +x_531 = lean_ctor_get(x_1, 0); +lean_inc(x_531); +x_532 = lean_ctor_get(x_1, 2); +lean_inc(x_532); +x_533 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_532, x_530, x_526); +if (lean_obj_tag(x_533) == 0) +{ +lean_object* x_534; lean_object* x_535; +lean_inc(x_531); +x_534 = l_Lean_Name_append(x_526, x_531); +lean_inc(x_526); +x_535 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_526, x_4, x_5, x_6, x_7, x_529); +if (lean_obj_tag(x_535) == 0) +{ +lean_object* x_536; lean_object* x_537; lean_object* x_538; lean_object* x_539; lean_object* x_540; x_536 = lean_ctor_get(x_535, 0); lean_inc(x_536); +x_537 = lean_ctor_get(x_535, 1); +lean_inc(x_537); lean_dec(x_535); -x_537 = lean_st_ref_get(x_7, x_534); -x_538 = lean_ctor_get(x_537, 0); -lean_inc(x_538); -x_539 = lean_ctor_get(x_537, 1); -lean_inc(x_539); -lean_dec(x_537); -x_540 = lean_ctor_get(x_538, 0); -lean_inc(x_540); -lean_dec(x_538); -x_541 = lean_ctor_get(x_1, 0); -lean_inc(x_541); -x_542 = lean_ctor_get(x_1, 2); -lean_inc(x_542); -x_543 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_542, x_540, x_536); -if (lean_obj_tag(x_543) == 0) -{ -lean_object* x_544; lean_object* x_545; -lean_inc(x_541); -x_544 = l_Lean_Name_append(x_536, x_541); -lean_inc(x_536); -x_545 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_536, x_4, x_5, x_6, x_7, x_539); -if (lean_obj_tag(x_545) == 0) -{ -lean_object* x_546; lean_object* x_547; lean_object* x_548; lean_object* x_549; lean_object* x_550; -x_546 = lean_ctor_get(x_545, 0); -lean_inc(x_546); -x_547 = lean_ctor_get(x_545, 1); -lean_inc(x_547); -lean_dec(x_545); -x_548 = l_Lean_ConstantInfo_type(x_546); -x_549 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +x_538 = l_Lean_ConstantInfo_type(x_536); +x_539 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_548); -x_550 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_548, x_549, x_4, x_5, x_6, x_7, x_547); -if (lean_obj_tag(x_550) == 0) +lean_inc(x_538); +x_540 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_538, x_539, x_4, x_5, x_6, x_7, x_537); +if (lean_obj_tag(x_540) == 0) { -lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_584; uint8_t x_585; -x_551 = lean_ctor_get(x_550, 0); -lean_inc(x_551); -x_552 = lean_ctor_get(x_550, 1); -lean_inc(x_552); -lean_dec(x_550); -x_584 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_585 = l_Lean_Expr_isConstOf(x_551, x_584); -if (x_585 == 0) -{ -lean_object* x_586; uint8_t x_587; -x_586 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_587 = l_Lean_Expr_isConstOf(x_551, x_586); -lean_dec(x_551); -if (x_587 == 0) -{ -lean_object* x_588; -lean_dec(x_548); -lean_dec(x_546); -lean_dec(x_544); -lean_dec(x_542); +lean_object* x_541; lean_object* x_542; lean_object* x_543; lean_object* x_572; uint8_t x_573; +x_541 = lean_ctor_get(x_540, 0); +lean_inc(x_541); +x_542 = lean_ctor_get(x_540, 1); +lean_inc(x_542); lean_dec(x_540); +x_572 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_573 = l_Lean_Expr_isConstOf(x_541, x_572); +if (x_573 == 0) +{ +lean_object* x_574; uint8_t x_575; +x_574 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_575 = l_Lean_Expr_isConstOf(x_541, x_574); +lean_dec(x_541); +if (x_575 == 0) +{ +lean_object* x_576; +lean_dec(x_538); lean_dec(x_536); +lean_dec(x_534); +lean_dec(x_532); +lean_dec(x_530); +lean_dec(x_526); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_588 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_552); -if (lean_obj_tag(x_588) == 0) +x_576 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_542); +if (lean_obj_tag(x_576) == 0) { -lean_object* x_589; -x_589 = lean_ctor_get(x_588, 0); -lean_inc(x_589); -if (lean_obj_tag(x_589) == 0) +lean_object* x_577; +x_577 = lean_ctor_get(x_576, 0); +lean_inc(x_577); +if (lean_obj_tag(x_577) == 0) { -lean_object* x_590; lean_object* x_591; lean_object* x_592; lean_object* x_593; lean_object* x_594; lean_object* x_595; lean_object* x_596; lean_object* x_597; lean_object* x_598; lean_object* x_599; lean_object* x_600; +lean_object* x_578; lean_object* x_579; lean_object* x_580; lean_object* x_581; lean_object* x_582; lean_object* x_583; lean_object* x_584; lean_object* x_585; lean_object* x_586; lean_object* x_587; lean_object* x_588; lean_dec(x_1); -x_590 = lean_ctor_get(x_588, 1); -lean_inc(x_590); -lean_dec(x_588); -x_591 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_591, 0, x_541); -x_592 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_593 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_593, 0, x_592); -lean_ctor_set(x_593, 1, x_591); -x_594 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; -x_595 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_595, 0, x_593); -lean_ctor_set(x_595, 1, x_594); -x_596 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_596, 0, x_10); -x_597 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_597, 0, x_595); -lean_ctor_set(x_597, 1, x_596); -x_598 = l_Lean_KernelException_toMessageData___closed__3; -x_599 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_599, 0, x_597); -lean_ctor_set(x_599, 1, x_598); -x_600 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_599, x_4, x_5, x_6, x_7, x_590); +x_578 = lean_ctor_get(x_576, 1); +lean_inc(x_578); +lean_dec(x_576); +x_579 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_579, 0, x_531); +x_580 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_581 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_581, 0, x_580); +lean_ctor_set(x_581, 1, x_579); +x_582 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_583 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_583, 0, x_581); +lean_ctor_set(x_583, 1, x_582); +x_584 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_584, 0, x_10); +x_585 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_585, 0, x_583); +lean_ctor_set(x_585, 1, x_584); +x_586 = l_Lean_KernelException_toMessageData___closed__3; +x_587 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_587, 0, x_585); +lean_ctor_set(x_587, 1, x_586); +x_588 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_587, x_4, x_5, x_6, x_7, x_578); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_600; -} -else -{ -lean_object* x_601; lean_object* x_602; -lean_dec(x_541); -lean_dec(x_10); -x_601 = lean_ctor_get(x_588, 1); -lean_inc(x_601); -lean_dec(x_588); -x_602 = lean_ctor_get(x_589, 0); -lean_inc(x_602); -lean_dec(x_589); -x_3 = x_602; -x_8 = x_601; -goto _start; -} -} -else -{ -uint8_t x_604; -lean_dec(x_541); -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_604 = !lean_is_exclusive(x_588); -if (x_604 == 0) -{ return x_588; } else { -lean_object* x_605; lean_object* x_606; lean_object* x_607; -x_605 = lean_ctor_get(x_588, 0); -x_606 = lean_ctor_get(x_588, 1); -lean_inc(x_606); -lean_inc(x_605); -lean_dec(x_588); -x_607 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_607, 0, x_605); -lean_ctor_set(x_607, 1, x_606); -return x_607; -} -} -} -else -{ -lean_object* x_608; -x_608 = lean_box(0); -x_553 = x_608; -goto block_583; +lean_object* x_589; lean_object* x_590; +lean_dec(x_531); +lean_dec(x_10); +x_589 = lean_ctor_get(x_576, 1); +lean_inc(x_589); +lean_dec(x_576); +x_590 = lean_ctor_get(x_577, 0); +lean_inc(x_590); +lean_dec(x_577); +x_3 = x_590; +x_8 = x_589; +goto _start; } } else { -lean_object* x_609; -lean_dec(x_551); -x_609 = lean_box(0); -x_553 = x_609; -goto block_583; -} -block_583: -{ -lean_object* x_554; -lean_dec(x_553); -x_554 = l_Lean_ConstantInfo_value_x3f(x_546); -lean_dec(x_546); -if (lean_obj_tag(x_554) == 0) -{ -lean_object* x_555; lean_object* x_556; lean_object* x_557; lean_object* x_558; lean_object* x_559; lean_object* x_560; lean_object* x_561; lean_object* x_562; lean_object* x_563; lean_object* x_564; -lean_dec(x_548); -lean_dec(x_544); -lean_dec(x_542); -lean_dec(x_540); -lean_dec(x_536); -lean_dec(x_1); -x_555 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_555, 0, x_541); -x_556 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_557 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_557, 0, x_556); -lean_ctor_set(x_557, 1, x_555); -x_558 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; -x_559 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_559, 0, x_557); -lean_ctor_set(x_559, 1, x_558); -x_560 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_560, 0, x_10); -x_561 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_561, 0, x_559); -lean_ctor_set(x_561, 1, x_560); -x_562 = l_Lean_KernelException_toMessageData___closed__3; -x_563 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_563, 0, x_561); -lean_ctor_set(x_563, 1, x_562); -x_564 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_563, x_4, x_5, x_6, x_7, x_552); +uint8_t x_592; +lean_dec(x_531); +lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_1); +x_592 = !lean_is_exclusive(x_576); +if (x_592 == 0) +{ +return x_576; +} +else +{ +lean_object* x_593; lean_object* x_594; lean_object* x_595; +x_593 = lean_ctor_get(x_576, 0); +x_594 = lean_ctor_get(x_576, 1); +lean_inc(x_594); +lean_inc(x_593); +lean_dec(x_576); +x_595 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_595, 0, x_593); +lean_ctor_set(x_595, 1, x_594); +return x_595; +} +} +} +else +{ +lean_object* x_596; +x_596 = lean_box(0); +x_543 = x_596; +goto block_571; +} +} +else +{ +lean_object* x_597; +lean_dec(x_541); +x_597 = lean_box(0); +x_543 = x_597; +goto block_571; +} +block_571: +{ +lean_object* x_544; +lean_dec(x_543); +x_544 = l_Lean_ConstantInfo_value_x3f(x_536); +lean_dec(x_536); +if (lean_obj_tag(x_544) == 0) +{ +lean_object* x_545; lean_object* x_546; lean_object* x_547; lean_object* x_548; lean_object* x_549; lean_object* x_550; lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; +lean_dec(x_538); +lean_dec(x_534); +lean_dec(x_532); +lean_dec(x_530); +lean_dec(x_526); +lean_dec(x_1); +x_545 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_545, 0, x_531); +x_546 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_547 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_547, 0, x_546); +lean_ctor_set(x_547, 1, x_545); +x_548 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_549 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_549, 0, x_547); +lean_ctor_set(x_549, 1, x_548); +x_550 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_550, 0, x_10); +x_551 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_551, 0, x_549); +lean_ctor_set(x_551, 1, x_550); +x_552 = l_Lean_KernelException_toMessageData___closed__3; +x_553 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_553, 0, x_551); +lean_ctor_set(x_553, 1, x_552); +x_554 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_553, x_4, x_5, x_6, x_7, x_542); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_554; +} +else +{ +lean_object* x_555; lean_object* x_556; +lean_dec(x_531); +x_555 = lean_ctor_get(x_544, 0); +lean_inc(x_555); +lean_dec(x_544); +x_556 = l_Lean_Environment_getModuleIdxFor_x3f(x_530, x_526); +lean_dec(x_530); +if (lean_obj_tag(x_556) == 0) +{ +lean_object* x_557; lean_object* x_558; +x_557 = lean_box(0); +x_558 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(x_1, x_555, x_2, x_538, x_534, x_532, x_526, x_10, x_539, x_557, x_4, x_5, x_6, x_7, x_542); +return x_558; +} +else +{ +lean_dec(x_556); +if (x_2 == 0) +{ +lean_object* x_559; lean_object* x_560; lean_object* x_561; lean_object* x_562; lean_object* x_563; lean_object* x_564; uint8_t x_565; +lean_dec(x_555); +lean_dec(x_538); +lean_dec(x_534); +lean_dec(x_532); +lean_dec(x_10); +lean_dec(x_1); +x_559 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_559, 0, x_526); +x_560 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_561 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_561, 0, x_560); +lean_ctor_set(x_561, 1, x_559); +x_562 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_563 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_563, 0, x_561); +lean_ctor_set(x_563, 1, x_562); +x_564 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_563, x_4, x_5, x_6, x_7, x_542); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_565 = !lean_is_exclusive(x_564); +if (x_565 == 0) +{ return x_564; } else { -lean_object* x_565; lean_object* x_566; -lean_dec(x_541); -x_565 = lean_ctor_get(x_554, 0); -lean_inc(x_565); -lean_dec(x_554); -x_566 = l_Lean_Environment_getModuleIdxFor_x3f(x_540, x_536); -lean_dec(x_540); -if (lean_obj_tag(x_566) == 0) -{ -lean_object* x_567; lean_object* x_568; lean_object* x_569; -x_567 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_568 = lean_box(0); -x_569 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(x_1, x_565, x_2, x_567, x_548, x_544, x_542, x_536, x_10, x_549, x_568, x_4, x_5, x_6, x_7, x_552); -return x_569; -} -else -{ -lean_dec(x_566); -if (x_2 == 0) -{ -lean_object* x_570; lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; lean_object* x_575; uint8_t x_576; -lean_dec(x_565); -lean_dec(x_548); -lean_dec(x_544); -lean_dec(x_542); -lean_dec(x_10); -lean_dec(x_1); -x_570 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_570, 0, x_536); -x_571 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_572 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_572, 0, x_571); -lean_ctor_set(x_572, 1, x_570); -x_573 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_574 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_574, 0, x_572); -lean_ctor_set(x_574, 1, x_573); -x_575 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_574, x_4, x_5, x_6, x_7, x_552); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_576 = !lean_is_exclusive(x_575); -if (x_576 == 0) -{ -return x_575; -} -else -{ -lean_object* x_577; lean_object* x_578; lean_object* x_579; -x_577 = lean_ctor_get(x_575, 0); -x_578 = lean_ctor_get(x_575, 1); -lean_inc(x_578); -lean_inc(x_577); -lean_dec(x_575); -x_579 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_579, 0, x_577); -lean_ctor_set(x_579, 1, x_578); -return x_579; +lean_object* x_566; lean_object* x_567; lean_object* x_568; +x_566 = lean_ctor_get(x_564, 0); +x_567 = lean_ctor_get(x_564, 1); +lean_inc(x_567); +lean_inc(x_566); +lean_dec(x_564); +x_568 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_568, 0, x_566); +lean_ctor_set(x_568, 1, x_567); +return x_568; } } else { -lean_object* x_580; lean_object* x_581; lean_object* x_582; -x_580 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_581 = lean_box(0); -x_582 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(x_1, x_565, x_2, x_580, x_548, x_544, x_542, x_536, x_10, x_549, x_581, x_4, x_5, x_6, x_7, x_552); -return x_582; +lean_object* x_569; lean_object* x_570; +x_569 = lean_box(0); +x_570 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(x_1, x_555, x_2, x_538, x_534, x_532, x_526, x_10, x_539, x_569, x_4, x_5, x_6, x_7, x_542); +return x_570; } } } @@ -20550,455 +19479,453 @@ return x_582; } else { -uint8_t x_610; -lean_dec(x_548); -lean_dec(x_546); -lean_dec(x_544); -lean_dec(x_542); -lean_dec(x_541); -lean_dec(x_540); +uint8_t x_598; +lean_dec(x_538); lean_dec(x_536); +lean_dec(x_534); +lean_dec(x_532); +lean_dec(x_531); +lean_dec(x_530); +lean_dec(x_526); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_610 = !lean_is_exclusive(x_550); -if (x_610 == 0) +x_598 = !lean_is_exclusive(x_540); +if (x_598 == 0) { -return x_550; +return x_540; } else { -lean_object* x_611; lean_object* x_612; lean_object* x_613; -x_611 = lean_ctor_get(x_550, 0); -x_612 = lean_ctor_get(x_550, 1); -lean_inc(x_612); -lean_inc(x_611); -lean_dec(x_550); -x_613 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_613, 0, x_611); -lean_ctor_set(x_613, 1, x_612); -return x_613; -} -} -} -else -{ -uint8_t x_614; -lean_dec(x_544); -lean_dec(x_542); -lean_dec(x_541); +lean_object* x_599; lean_object* x_600; lean_object* x_601; +x_599 = lean_ctor_get(x_540, 0); +x_600 = lean_ctor_get(x_540, 1); +lean_inc(x_600); +lean_inc(x_599); lean_dec(x_540); -lean_dec(x_536); +x_601 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_601, 0, x_599); +lean_ctor_set(x_601, 1, x_600); +return x_601; +} +} +} +else +{ +uint8_t x_602; +lean_dec(x_534); +lean_dec(x_532); +lean_dec(x_531); +lean_dec(x_530); +lean_dec(x_526); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_614 = !lean_is_exclusive(x_545); -if (x_614 == 0) +x_602 = !lean_is_exclusive(x_535); +if (x_602 == 0) { -return x_545; +return x_535; } else { -lean_object* x_615; lean_object* x_616; lean_object* x_617; -x_615 = lean_ctor_get(x_545, 0); -x_616 = lean_ctor_get(x_545, 1); -lean_inc(x_616); -lean_inc(x_615); -lean_dec(x_545); -x_617 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_617, 0, x_615); -lean_ctor_set(x_617, 1, x_616); -return x_617; +lean_object* x_603; lean_object* x_604; lean_object* x_605; +x_603 = lean_ctor_get(x_535, 0); +x_604 = lean_ctor_get(x_535, 1); +lean_inc(x_604); +lean_inc(x_603); +lean_dec(x_535); +x_605 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_605, 0, x_603); +lean_ctor_set(x_605, 1, x_604); +return x_605; } } } else { -lean_object* x_618; lean_object* x_619; lean_object* x_620; lean_object* x_621; -lean_dec(x_542); -lean_dec(x_541); -lean_dec(x_540); -lean_dec(x_536); -x_618 = lean_ctor_get(x_543, 0); -lean_inc(x_618); -lean_dec(x_543); -x_619 = lean_box(0); -x_620 = l_Lean_mkConst(x_618, x_619); +lean_object* x_606; lean_object* x_607; lean_object* x_608; lean_object* x_609; +lean_dec(x_532); +lean_dec(x_531); +lean_dec(x_530); +lean_dec(x_526); +x_606 = lean_ctor_get(x_533, 0); +lean_inc(x_606); +lean_dec(x_533); +x_607 = lean_box(0); +x_608 = l_Lean_mkConst(x_606, x_607); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_620); -x_621 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_620, x_4, x_5, x_6, x_7, x_539); -if (lean_obj_tag(x_621) == 0) +lean_inc(x_608); +x_609 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_608, x_4, x_5, x_6, x_7, x_529); +if (lean_obj_tag(x_609) == 0) { -lean_object* x_622; lean_object* x_623; lean_object* x_624; lean_object* x_625; lean_object* x_626; -x_622 = lean_ctor_get(x_621, 0); -lean_inc(x_622); -x_623 = lean_ctor_get(x_621, 1); -lean_inc(x_623); -lean_dec(x_621); -x_624 = lean_box(x_2); -x_625 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__31___boxed), 11, 4); -lean_closure_set(x_625, 0, x_10); -lean_closure_set(x_625, 1, x_1); -lean_closure_set(x_625, 2, x_624); -lean_closure_set(x_625, 3, x_620); -x_626 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_622, x_625, x_4, x_5, x_6, x_7, x_623); -return x_626; +lean_object* x_610; lean_object* x_611; lean_object* x_612; lean_object* x_613; lean_object* x_614; +x_610 = lean_ctor_get(x_609, 0); +lean_inc(x_610); +x_611 = lean_ctor_get(x_609, 1); +lean_inc(x_611); +lean_dec(x_609); +x_612 = lean_box(x_2); +x_613 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__31___boxed), 11, 4); +lean_closure_set(x_613, 0, x_10); +lean_closure_set(x_613, 1, x_1); +lean_closure_set(x_613, 2, x_612); +lean_closure_set(x_613, 3, x_608); +x_614 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_610, x_613, x_4, x_5, x_6, x_7, x_611); +return x_614; } else { -uint8_t x_627; -lean_dec(x_620); +uint8_t x_615; +lean_dec(x_608); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_627 = !lean_is_exclusive(x_621); -if (x_627 == 0) +x_615 = !lean_is_exclusive(x_609); +if (x_615 == 0) { -return x_621; +return x_609; } else { -lean_object* x_628; lean_object* x_629; lean_object* x_630; -x_628 = lean_ctor_get(x_621, 0); -x_629 = lean_ctor_get(x_621, 1); -lean_inc(x_629); -lean_inc(x_628); -lean_dec(x_621); -x_630 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_630, 0, x_628); -lean_ctor_set(x_630, 1, x_629); -return x_630; +lean_object* x_616; lean_object* x_617; lean_object* x_618; +x_616 = lean_ctor_get(x_609, 0); +x_617 = lean_ctor_get(x_609, 1); +lean_inc(x_617); +lean_inc(x_616); +lean_dec(x_609); +x_618 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_618, 0, x_616); +lean_ctor_set(x_618, 1, x_617); +return x_618; } } } } else { -lean_object* x_631; lean_object* x_632; lean_object* x_633; lean_object* x_634; lean_object* x_635; lean_object* x_636; -lean_dec(x_535); +lean_object* x_619; lean_object* x_620; lean_object* x_621; lean_object* x_622; lean_object* x_623; lean_object* x_624; +lean_dec(x_525); lean_dec(x_1); -x_631 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_631, 0, x_10); -x_632 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_633 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_633, 0, x_632); -lean_ctor_set(x_633, 1, x_631); -x_634 = l_Lean_KernelException_toMessageData___closed__3; -x_635 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_635, 0, x_633); -lean_ctor_set(x_635, 1, x_634); -x_636 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_635, x_4, x_5, x_6, x_7, x_534); +x_619 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_619, 0, x_10); +x_620 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_621 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_621, 0, x_620); +lean_ctor_set(x_621, 1, x_619); +x_622 = l_Lean_KernelException_toMessageData___closed__3; +x_623 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_623, 0, x_621); +lean_ctor_set(x_623, 1, x_622); +x_624 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_623, x_4, x_5, x_6, x_7, x_524); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_636; +return x_624; } } case 8: { -lean_object* x_637; lean_object* x_638; -x_637 = lean_ctor_get(x_9, 1); -lean_inc(x_637); +lean_object* x_625; lean_object* x_626; +x_625 = lean_ctor_get(x_9, 1); +lean_inc(x_625); lean_dec(x_9); -x_638 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_638) == 4) +x_626 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_626) == 4) { -lean_object* x_639; lean_object* x_640; lean_object* x_641; lean_object* x_642; lean_object* x_643; lean_object* x_644; lean_object* x_645; lean_object* x_646; -x_639 = lean_ctor_get(x_638, 0); -lean_inc(x_639); -lean_dec(x_638); -x_640 = lean_st_ref_get(x_7, x_637); -x_641 = lean_ctor_get(x_640, 0); -lean_inc(x_641); -x_642 = lean_ctor_get(x_640, 1); -lean_inc(x_642); -lean_dec(x_640); -x_643 = lean_ctor_get(x_641, 0); -lean_inc(x_643); -lean_dec(x_641); -x_644 = lean_ctor_get(x_1, 0); -lean_inc(x_644); -x_645 = lean_ctor_get(x_1, 2); -lean_inc(x_645); -x_646 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_645, x_643, x_639); -if (lean_obj_tag(x_646) == 0) +lean_object* x_627; lean_object* x_628; lean_object* x_629; lean_object* x_630; lean_object* x_631; lean_object* x_632; lean_object* x_633; lean_object* x_634; +x_627 = lean_ctor_get(x_626, 0); +lean_inc(x_627); +lean_dec(x_626); +x_628 = lean_st_ref_get(x_7, x_625); +x_629 = lean_ctor_get(x_628, 0); +lean_inc(x_629); +x_630 = lean_ctor_get(x_628, 1); +lean_inc(x_630); +lean_dec(x_628); +x_631 = lean_ctor_get(x_629, 0); +lean_inc(x_631); +lean_dec(x_629); +x_632 = lean_ctor_get(x_1, 0); +lean_inc(x_632); +x_633 = lean_ctor_get(x_1, 2); +lean_inc(x_633); +x_634 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_633, x_631, x_627); +if (lean_obj_tag(x_634) == 0) { -lean_object* x_647; lean_object* x_648; -lean_inc(x_644); -x_647 = l_Lean_Name_append(x_639, x_644); -lean_inc(x_639); -x_648 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_639, x_4, x_5, x_6, x_7, x_642); -if (lean_obj_tag(x_648) == 0) +lean_object* x_635; lean_object* x_636; +lean_inc(x_632); +x_635 = l_Lean_Name_append(x_627, x_632); +lean_inc(x_627); +x_636 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_627, x_4, x_5, x_6, x_7, x_630); +if (lean_obj_tag(x_636) == 0) { -lean_object* x_649; lean_object* x_650; lean_object* x_651; lean_object* x_652; lean_object* x_653; -x_649 = lean_ctor_get(x_648, 0); -lean_inc(x_649); -x_650 = lean_ctor_get(x_648, 1); -lean_inc(x_650); -lean_dec(x_648); -x_651 = l_Lean_ConstantInfo_type(x_649); -x_652 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +lean_object* x_637; lean_object* x_638; lean_object* x_639; lean_object* x_640; lean_object* x_641; +x_637 = lean_ctor_get(x_636, 0); +lean_inc(x_637); +x_638 = lean_ctor_get(x_636, 1); +lean_inc(x_638); +lean_dec(x_636); +x_639 = l_Lean_ConstantInfo_type(x_637); +x_640 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_651); -x_653 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_651, x_652, x_4, x_5, x_6, x_7, x_650); -if (lean_obj_tag(x_653) == 0) +lean_inc(x_639); +x_641 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_639, x_640, x_4, x_5, x_6, x_7, x_638); +if (lean_obj_tag(x_641) == 0) { -lean_object* x_654; lean_object* x_655; lean_object* x_656; lean_object* x_687; uint8_t x_688; -x_654 = lean_ctor_get(x_653, 0); -lean_inc(x_654); -x_655 = lean_ctor_get(x_653, 1); -lean_inc(x_655); -lean_dec(x_653); -x_687 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_688 = l_Lean_Expr_isConstOf(x_654, x_687); -if (x_688 == 0) +lean_object* x_642; lean_object* x_643; lean_object* x_644; lean_object* x_673; uint8_t x_674; +x_642 = lean_ctor_get(x_641, 0); +lean_inc(x_642); +x_643 = lean_ctor_get(x_641, 1); +lean_inc(x_643); +lean_dec(x_641); +x_673 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_674 = l_Lean_Expr_isConstOf(x_642, x_673); +if (x_674 == 0) { -lean_object* x_689; uint8_t x_690; -x_689 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_690 = l_Lean_Expr_isConstOf(x_654, x_689); -lean_dec(x_654); -if (x_690 == 0) +lean_object* x_675; uint8_t x_676; +x_675 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_676 = l_Lean_Expr_isConstOf(x_642, x_675); +lean_dec(x_642); +if (x_676 == 0) { -lean_object* x_691; -lean_dec(x_651); -lean_dec(x_649); -lean_dec(x_647); -lean_dec(x_645); -lean_dec(x_643); +lean_object* x_677; lean_dec(x_639); +lean_dec(x_637); +lean_dec(x_635); +lean_dec(x_633); +lean_dec(x_631); +lean_dec(x_627); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_691 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_655); -if (lean_obj_tag(x_691) == 0) +x_677 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_643); +if (lean_obj_tag(x_677) == 0) { -lean_object* x_692; -x_692 = lean_ctor_get(x_691, 0); -lean_inc(x_692); -if (lean_obj_tag(x_692) == 0) +lean_object* x_678; +x_678 = lean_ctor_get(x_677, 0); +lean_inc(x_678); +if (lean_obj_tag(x_678) == 0) { -lean_object* x_693; lean_object* x_694; lean_object* x_695; lean_object* x_696; lean_object* x_697; lean_object* x_698; lean_object* x_699; lean_object* x_700; lean_object* x_701; lean_object* x_702; lean_object* x_703; +lean_object* x_679; lean_object* x_680; lean_object* x_681; lean_object* x_682; lean_object* x_683; lean_object* x_684; lean_object* x_685; lean_object* x_686; lean_object* x_687; lean_object* x_688; lean_object* x_689; lean_dec(x_1); -x_693 = lean_ctor_get(x_691, 1); -lean_inc(x_693); -lean_dec(x_691); -x_694 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_694, 0, x_644); -x_695 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_696 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_696, 0, x_695); -lean_ctor_set(x_696, 1, x_694); -x_697 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; -x_698 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_698, 0, x_696); -lean_ctor_set(x_698, 1, x_697); -x_699 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_699, 0, x_10); -x_700 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_700, 0, x_698); -lean_ctor_set(x_700, 1, x_699); -x_701 = l_Lean_KernelException_toMessageData___closed__3; -x_702 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_702, 0, x_700); -lean_ctor_set(x_702, 1, x_701); -x_703 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_702, x_4, x_5, x_6, x_7, x_693); +x_679 = lean_ctor_get(x_677, 1); +lean_inc(x_679); +lean_dec(x_677); +x_680 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_680, 0, x_632); +x_681 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_682 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_682, 0, x_681); +lean_ctor_set(x_682, 1, x_680); +x_683 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_684 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_684, 0, x_682); +lean_ctor_set(x_684, 1, x_683); +x_685 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_685, 0, x_10); +x_686 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_686, 0, x_684); +lean_ctor_set(x_686, 1, x_685); +x_687 = l_Lean_KernelException_toMessageData___closed__3; +x_688 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_688, 0, x_686); +lean_ctor_set(x_688, 1, x_687); +x_689 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_688, x_4, x_5, x_6, x_7, x_679); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_703; +return x_689; } else { -lean_object* x_704; lean_object* x_705; -lean_dec(x_644); +lean_object* x_690; lean_object* x_691; +lean_dec(x_632); lean_dec(x_10); -x_704 = lean_ctor_get(x_691, 1); -lean_inc(x_704); -lean_dec(x_691); -x_705 = lean_ctor_get(x_692, 0); -lean_inc(x_705); -lean_dec(x_692); -x_3 = x_705; -x_8 = x_704; +x_690 = lean_ctor_get(x_677, 1); +lean_inc(x_690); +lean_dec(x_677); +x_691 = lean_ctor_get(x_678, 0); +lean_inc(x_691); +lean_dec(x_678); +x_3 = x_691; +x_8 = x_690; goto _start; } } else { -uint8_t x_707; -lean_dec(x_644); +uint8_t x_693; +lean_dec(x_632); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_707 = !lean_is_exclusive(x_691); -if (x_707 == 0) +x_693 = !lean_is_exclusive(x_677); +if (x_693 == 0) { -return x_691; +return x_677; } else { -lean_object* x_708; lean_object* x_709; lean_object* x_710; -x_708 = lean_ctor_get(x_691, 0); -x_709 = lean_ctor_get(x_691, 1); -lean_inc(x_709); -lean_inc(x_708); -lean_dec(x_691); -x_710 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_710, 0, x_708); -lean_ctor_set(x_710, 1, x_709); -return x_710; +lean_object* x_694; lean_object* x_695; lean_object* x_696; +x_694 = lean_ctor_get(x_677, 0); +x_695 = lean_ctor_get(x_677, 1); +lean_inc(x_695); +lean_inc(x_694); +lean_dec(x_677); +x_696 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_696, 0, x_694); +lean_ctor_set(x_696, 1, x_695); +return x_696; } } } else { -lean_object* x_711; -x_711 = lean_box(0); -x_656 = x_711; -goto block_686; +lean_object* x_697; +x_697 = lean_box(0); +x_644 = x_697; +goto block_672; } } else { -lean_object* x_712; -lean_dec(x_654); -x_712 = lean_box(0); -x_656 = x_712; -goto block_686; +lean_object* x_698; +lean_dec(x_642); +x_698 = lean_box(0); +x_644 = x_698; +goto block_672; } -block_686: +block_672: { -lean_object* x_657; -lean_dec(x_656); -x_657 = l_Lean_ConstantInfo_value_x3f(x_649); -lean_dec(x_649); +lean_object* x_645; +lean_dec(x_644); +x_645 = l_Lean_ConstantInfo_value_x3f(x_637); +lean_dec(x_637); +if (lean_obj_tag(x_645) == 0) +{ +lean_object* x_646; lean_object* x_647; lean_object* x_648; lean_object* x_649; lean_object* x_650; lean_object* x_651; lean_object* x_652; lean_object* x_653; lean_object* x_654; lean_object* x_655; +lean_dec(x_639); +lean_dec(x_635); +lean_dec(x_633); +lean_dec(x_631); +lean_dec(x_627); +lean_dec(x_1); +x_646 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_646, 0, x_632); +x_647 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_648 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_648, 0, x_647); +lean_ctor_set(x_648, 1, x_646); +x_649 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_650 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_650, 0, x_648); +lean_ctor_set(x_650, 1, x_649); +x_651 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_651, 0, x_10); +x_652 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_652, 0, x_650); +lean_ctor_set(x_652, 1, x_651); +x_653 = l_Lean_KernelException_toMessageData___closed__3; +x_654 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_654, 0, x_652); +lean_ctor_set(x_654, 1, x_653); +x_655 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_654, x_4, x_5, x_6, x_7, x_643); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_655; +} +else +{ +lean_object* x_656; lean_object* x_657; +lean_dec(x_632); +x_656 = lean_ctor_get(x_645, 0); +lean_inc(x_656); +lean_dec(x_645); +x_657 = l_Lean_Environment_getModuleIdxFor_x3f(x_631, x_627); +lean_dec(x_631); if (lean_obj_tag(x_657) == 0) { -lean_object* x_658; lean_object* x_659; lean_object* x_660; lean_object* x_661; lean_object* x_662; lean_object* x_663; lean_object* x_664; lean_object* x_665; lean_object* x_666; lean_object* x_667; -lean_dec(x_651); -lean_dec(x_647); -lean_dec(x_645); -lean_dec(x_643); +lean_object* x_658; lean_object* x_659; +x_658 = lean_box(0); +x_659 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(x_1, x_656, x_2, x_639, x_635, x_633, x_627, x_10, x_640, x_658, x_4, x_5, x_6, x_7, x_643); +return x_659; +} +else +{ +lean_dec(x_657); +if (x_2 == 0) +{ +lean_object* x_660; lean_object* x_661; lean_object* x_662; lean_object* x_663; lean_object* x_664; lean_object* x_665; uint8_t x_666; +lean_dec(x_656); lean_dec(x_639); +lean_dec(x_635); +lean_dec(x_633); +lean_dec(x_10); lean_dec(x_1); -x_658 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_658, 0, x_644); -x_659 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_660 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_660, 0, x_659); -lean_ctor_set(x_660, 1, x_658); -x_661 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_660 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_660, 0, x_627); +x_661 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; x_662 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_662, 0, x_660); -lean_ctor_set(x_662, 1, x_661); -x_663 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_663, 0, x_10); +lean_ctor_set(x_662, 0, x_661); +lean_ctor_set(x_662, 1, x_660); +x_663 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; x_664 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_664, 0, x_662); lean_ctor_set(x_664, 1, x_663); -x_665 = l_Lean_KernelException_toMessageData___closed__3; -x_666 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_666, 0, x_664); -lean_ctor_set(x_666, 1, x_665); -x_667 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_666, x_4, x_5, x_6, x_7, x_655); +x_665 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_664, x_4, x_5, x_6, x_7, x_643); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_667; +x_666 = !lean_is_exclusive(x_665); +if (x_666 == 0) +{ +return x_665; } else { -lean_object* x_668; lean_object* x_669; -lean_dec(x_644); -x_668 = lean_ctor_get(x_657, 0); +lean_object* x_667; lean_object* x_668; lean_object* x_669; +x_667 = lean_ctor_get(x_665, 0); +x_668 = lean_ctor_get(x_665, 1); lean_inc(x_668); -lean_dec(x_657); -x_669 = l_Lean_Environment_getModuleIdxFor_x3f(x_643, x_639); -lean_dec(x_643); -if (lean_obj_tag(x_669) == 0) -{ -lean_object* x_670; lean_object* x_671; lean_object* x_672; -x_670 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_671 = lean_box(0); -x_672 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(x_1, x_668, x_2, x_670, x_651, x_647, x_645, x_639, x_10, x_652, x_671, x_4, x_5, x_6, x_7, x_655); -return x_672; -} -else -{ -lean_dec(x_669); -if (x_2 == 0) -{ -lean_object* x_673; lean_object* x_674; lean_object* x_675; lean_object* x_676; lean_object* x_677; lean_object* x_678; uint8_t x_679; -lean_dec(x_668); -lean_dec(x_651); -lean_dec(x_647); -lean_dec(x_645); -lean_dec(x_10); -lean_dec(x_1); -x_673 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_673, 0, x_639); -x_674 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_675 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_675, 0, x_674); -lean_ctor_set(x_675, 1, x_673); -x_676 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_677 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_677, 0, x_675); -lean_ctor_set(x_677, 1, x_676); -x_678 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_677, x_4, x_5, x_6, x_7, x_655); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_679 = !lean_is_exclusive(x_678); -if (x_679 == 0) -{ -return x_678; -} -else -{ -lean_object* x_680; lean_object* x_681; lean_object* x_682; -x_680 = lean_ctor_get(x_678, 0); -x_681 = lean_ctor_get(x_678, 1); -lean_inc(x_681); -lean_inc(x_680); -lean_dec(x_678); -x_682 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_682, 0, x_680); -lean_ctor_set(x_682, 1, x_681); -return x_682; +lean_inc(x_667); +lean_dec(x_665); +x_669 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_669, 0, x_667); +lean_ctor_set(x_669, 1, x_668); +return x_669; } } else { -lean_object* x_683; lean_object* x_684; lean_object* x_685; -x_683 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_684 = lean_box(0); -x_685 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(x_1, x_668, x_2, x_683, x_651, x_647, x_645, x_639, x_10, x_652, x_684, x_4, x_5, x_6, x_7, x_655); -return x_685; +lean_object* x_670; lean_object* x_671; +x_670 = lean_box(0); +x_671 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(x_1, x_656, x_2, x_639, x_635, x_633, x_627, x_10, x_640, x_670, x_4, x_5, x_6, x_7, x_643); +return x_671; } } } @@ -21006,911 +19933,907 @@ return x_685; } else { -uint8_t x_713; -lean_dec(x_651); -lean_dec(x_649); -lean_dec(x_647); -lean_dec(x_645); -lean_dec(x_644); -lean_dec(x_643); +uint8_t x_699; lean_dec(x_639); +lean_dec(x_637); +lean_dec(x_635); +lean_dec(x_633); +lean_dec(x_632); +lean_dec(x_631); +lean_dec(x_627); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_713 = !lean_is_exclusive(x_653); -if (x_713 == 0) +x_699 = !lean_is_exclusive(x_641); +if (x_699 == 0) { -return x_653; +return x_641; } else { -lean_object* x_714; lean_object* x_715; lean_object* x_716; -x_714 = lean_ctor_get(x_653, 0); -x_715 = lean_ctor_get(x_653, 1); -lean_inc(x_715); -lean_inc(x_714); -lean_dec(x_653); -x_716 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_716, 0, x_714); -lean_ctor_set(x_716, 1, x_715); -return x_716; +lean_object* x_700; lean_object* x_701; lean_object* x_702; +x_700 = lean_ctor_get(x_641, 0); +x_701 = lean_ctor_get(x_641, 1); +lean_inc(x_701); +lean_inc(x_700); +lean_dec(x_641); +x_702 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_702, 0, x_700); +lean_ctor_set(x_702, 1, x_701); +return x_702; } } } else { -uint8_t x_717; -lean_dec(x_647); -lean_dec(x_645); -lean_dec(x_644); -lean_dec(x_643); -lean_dec(x_639); +uint8_t x_703; +lean_dec(x_635); +lean_dec(x_633); +lean_dec(x_632); +lean_dec(x_631); +lean_dec(x_627); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_717 = !lean_is_exclusive(x_648); -if (x_717 == 0) +x_703 = !lean_is_exclusive(x_636); +if (x_703 == 0) { -return x_648; +return x_636; } else { -lean_object* x_718; lean_object* x_719; lean_object* x_720; -x_718 = lean_ctor_get(x_648, 0); -x_719 = lean_ctor_get(x_648, 1); -lean_inc(x_719); -lean_inc(x_718); -lean_dec(x_648); -x_720 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_720, 0, x_718); -lean_ctor_set(x_720, 1, x_719); -return x_720; +lean_object* x_704; lean_object* x_705; lean_object* x_706; +x_704 = lean_ctor_get(x_636, 0); +x_705 = lean_ctor_get(x_636, 1); +lean_inc(x_705); +lean_inc(x_704); +lean_dec(x_636); +x_706 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_706, 0, x_704); +lean_ctor_set(x_706, 1, x_705); +return x_706; } } } else { -lean_object* x_721; lean_object* x_722; lean_object* x_723; lean_object* x_724; -lean_dec(x_645); -lean_dec(x_644); -lean_dec(x_643); -lean_dec(x_639); -x_721 = lean_ctor_get(x_646, 0); -lean_inc(x_721); -lean_dec(x_646); -x_722 = lean_box(0); -x_723 = l_Lean_mkConst(x_721, x_722); +lean_object* x_707; lean_object* x_708; lean_object* x_709; lean_object* x_710; +lean_dec(x_633); +lean_dec(x_632); +lean_dec(x_631); +lean_dec(x_627); +x_707 = lean_ctor_get(x_634, 0); +lean_inc(x_707); +lean_dec(x_634); +x_708 = lean_box(0); +x_709 = l_Lean_mkConst(x_707, x_708); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_723); -x_724 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_723, x_4, x_5, x_6, x_7, x_642); -if (lean_obj_tag(x_724) == 0) +lean_inc(x_709); +x_710 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_709, x_4, x_5, x_6, x_7, x_630); +if (lean_obj_tag(x_710) == 0) { -lean_object* x_725; lean_object* x_726; lean_object* x_727; lean_object* x_728; lean_object* x_729; -x_725 = lean_ctor_get(x_724, 0); -lean_inc(x_725); -x_726 = lean_ctor_get(x_724, 1); -lean_inc(x_726); -lean_dec(x_724); -x_727 = lean_box(x_2); -x_728 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__36___boxed), 11, 4); -lean_closure_set(x_728, 0, x_10); -lean_closure_set(x_728, 1, x_1); -lean_closure_set(x_728, 2, x_727); -lean_closure_set(x_728, 3, x_723); -x_729 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_725, x_728, x_4, x_5, x_6, x_7, x_726); -return x_729; +lean_object* x_711; lean_object* x_712; lean_object* x_713; lean_object* x_714; lean_object* x_715; +x_711 = lean_ctor_get(x_710, 0); +lean_inc(x_711); +x_712 = lean_ctor_get(x_710, 1); +lean_inc(x_712); +lean_dec(x_710); +x_713 = lean_box(x_2); +x_714 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__36___boxed), 11, 4); +lean_closure_set(x_714, 0, x_10); +lean_closure_set(x_714, 1, x_1); +lean_closure_set(x_714, 2, x_713); +lean_closure_set(x_714, 3, x_709); +x_715 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_711, x_714, x_4, x_5, x_6, x_7, x_712); +return x_715; } else { -uint8_t x_730; -lean_dec(x_723); +uint8_t x_716; +lean_dec(x_709); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_730 = !lean_is_exclusive(x_724); -if (x_730 == 0) +x_716 = !lean_is_exclusive(x_710); +if (x_716 == 0) { -return x_724; +return x_710; } else { -lean_object* x_731; lean_object* x_732; lean_object* x_733; -x_731 = lean_ctor_get(x_724, 0); -x_732 = lean_ctor_get(x_724, 1); -lean_inc(x_732); -lean_inc(x_731); -lean_dec(x_724); -x_733 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_733, 0, x_731); -lean_ctor_set(x_733, 1, x_732); -return x_733; +lean_object* x_717; lean_object* x_718; lean_object* x_719; +x_717 = lean_ctor_get(x_710, 0); +x_718 = lean_ctor_get(x_710, 1); +lean_inc(x_718); +lean_inc(x_717); +lean_dec(x_710); +x_719 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_719, 0, x_717); +lean_ctor_set(x_719, 1, x_718); +return x_719; } } } } else { -lean_object* x_734; lean_object* x_735; lean_object* x_736; lean_object* x_737; lean_object* x_738; lean_object* x_739; -lean_dec(x_638); +lean_object* x_720; lean_object* x_721; lean_object* x_722; lean_object* x_723; lean_object* x_724; lean_object* x_725; +lean_dec(x_626); lean_dec(x_1); -x_734 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_734, 0, x_10); -x_735 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_736 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_736, 0, x_735); -lean_ctor_set(x_736, 1, x_734); -x_737 = l_Lean_KernelException_toMessageData___closed__3; -x_738 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_738, 0, x_736); -lean_ctor_set(x_738, 1, x_737); -x_739 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_738, x_4, x_5, x_6, x_7, x_637); +x_720 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_720, 0, x_10); +x_721 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_722 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_722, 0, x_721); +lean_ctor_set(x_722, 1, x_720); +x_723 = l_Lean_KernelException_toMessageData___closed__3; +x_724 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_724, 0, x_722); +lean_ctor_set(x_724, 1, x_723); +x_725 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_724, x_4, x_5, x_6, x_7, x_625); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_739; +return x_725; } } case 9: { -lean_object* x_740; lean_object* x_741; -x_740 = lean_ctor_get(x_9, 1); -lean_inc(x_740); +lean_object* x_726; lean_object* x_727; +x_726 = lean_ctor_get(x_9, 1); +lean_inc(x_726); lean_dec(x_9); -x_741 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_741) == 4) +x_727 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_727) == 4) { -lean_object* x_742; lean_object* x_743; lean_object* x_744; lean_object* x_745; lean_object* x_746; lean_object* x_747; lean_object* x_748; lean_object* x_749; -x_742 = lean_ctor_get(x_741, 0); -lean_inc(x_742); -lean_dec(x_741); -x_743 = lean_st_ref_get(x_7, x_740); -x_744 = lean_ctor_get(x_743, 0); -lean_inc(x_744); -x_745 = lean_ctor_get(x_743, 1); -lean_inc(x_745); -lean_dec(x_743); -x_746 = lean_ctor_get(x_744, 0); -lean_inc(x_746); -lean_dec(x_744); -x_747 = lean_ctor_get(x_1, 0); -lean_inc(x_747); -x_748 = lean_ctor_get(x_1, 2); -lean_inc(x_748); -x_749 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_748, x_746, x_742); -if (lean_obj_tag(x_749) == 0) +lean_object* x_728; lean_object* x_729; lean_object* x_730; lean_object* x_731; lean_object* x_732; lean_object* x_733; lean_object* x_734; lean_object* x_735; +x_728 = lean_ctor_get(x_727, 0); +lean_inc(x_728); +lean_dec(x_727); +x_729 = lean_st_ref_get(x_7, x_726); +x_730 = lean_ctor_get(x_729, 0); +lean_inc(x_730); +x_731 = lean_ctor_get(x_729, 1); +lean_inc(x_731); +lean_dec(x_729); +x_732 = lean_ctor_get(x_730, 0); +lean_inc(x_732); +lean_dec(x_730); +x_733 = lean_ctor_get(x_1, 0); +lean_inc(x_733); +x_734 = lean_ctor_get(x_1, 2); +lean_inc(x_734); +x_735 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_734, x_732, x_728); +if (lean_obj_tag(x_735) == 0) { -lean_object* x_750; lean_object* x_751; -lean_inc(x_747); -x_750 = l_Lean_Name_append(x_742, x_747); -lean_inc(x_742); -x_751 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_742, x_4, x_5, x_6, x_7, x_745); -if (lean_obj_tag(x_751) == 0) +lean_object* x_736; lean_object* x_737; +lean_inc(x_733); +x_736 = l_Lean_Name_append(x_728, x_733); +lean_inc(x_728); +x_737 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_728, x_4, x_5, x_6, x_7, x_731); +if (lean_obj_tag(x_737) == 0) { -lean_object* x_752; lean_object* x_753; lean_object* x_754; lean_object* x_755; lean_object* x_756; -x_752 = lean_ctor_get(x_751, 0); -lean_inc(x_752); -x_753 = lean_ctor_get(x_751, 1); -lean_inc(x_753); -lean_dec(x_751); -x_754 = l_Lean_ConstantInfo_type(x_752); -x_755 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +lean_object* x_738; lean_object* x_739; lean_object* x_740; lean_object* x_741; lean_object* x_742; +x_738 = lean_ctor_get(x_737, 0); +lean_inc(x_738); +x_739 = lean_ctor_get(x_737, 1); +lean_inc(x_739); +lean_dec(x_737); +x_740 = l_Lean_ConstantInfo_type(x_738); +x_741 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_754); -x_756 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_754, x_755, x_4, x_5, x_6, x_7, x_753); -if (lean_obj_tag(x_756) == 0) +lean_inc(x_740); +x_742 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_740, x_741, x_4, x_5, x_6, x_7, x_739); +if (lean_obj_tag(x_742) == 0) { -lean_object* x_757; lean_object* x_758; lean_object* x_759; lean_object* x_790; uint8_t x_791; -x_757 = lean_ctor_get(x_756, 0); -lean_inc(x_757); -x_758 = lean_ctor_get(x_756, 1); -lean_inc(x_758); -lean_dec(x_756); -x_790 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_791 = l_Lean_Expr_isConstOf(x_757, x_790); -if (x_791 == 0) -{ -lean_object* x_792; uint8_t x_793; -x_792 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_793 = l_Lean_Expr_isConstOf(x_757, x_792); -lean_dec(x_757); -if (x_793 == 0) -{ -lean_object* x_794; -lean_dec(x_754); -lean_dec(x_752); -lean_dec(x_750); -lean_dec(x_748); -lean_dec(x_746); +lean_object* x_743; lean_object* x_744; lean_object* x_745; lean_object* x_774; uint8_t x_775; +x_743 = lean_ctor_get(x_742, 0); +lean_inc(x_743); +x_744 = lean_ctor_get(x_742, 1); +lean_inc(x_744); lean_dec(x_742); +x_774 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_775 = l_Lean_Expr_isConstOf(x_743, x_774); +if (x_775 == 0) +{ +lean_object* x_776; uint8_t x_777; +x_776 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_777 = l_Lean_Expr_isConstOf(x_743, x_776); +lean_dec(x_743); +if (x_777 == 0) +{ +lean_object* x_778; +lean_dec(x_740); +lean_dec(x_738); +lean_dec(x_736); +lean_dec(x_734); +lean_dec(x_732); +lean_dec(x_728); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_794 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_758); -if (lean_obj_tag(x_794) == 0) +x_778 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_744); +if (lean_obj_tag(x_778) == 0) { -lean_object* x_795; -x_795 = lean_ctor_get(x_794, 0); -lean_inc(x_795); -if (lean_obj_tag(x_795) == 0) +lean_object* x_779; +x_779 = lean_ctor_get(x_778, 0); +lean_inc(x_779); +if (lean_obj_tag(x_779) == 0) { -lean_object* x_796; lean_object* x_797; lean_object* x_798; lean_object* x_799; lean_object* x_800; lean_object* x_801; lean_object* x_802; lean_object* x_803; lean_object* x_804; lean_object* x_805; lean_object* x_806; +lean_object* x_780; lean_object* x_781; lean_object* x_782; lean_object* x_783; lean_object* x_784; lean_object* x_785; lean_object* x_786; lean_object* x_787; lean_object* x_788; lean_object* x_789; lean_object* x_790; lean_dec(x_1); -x_796 = lean_ctor_get(x_794, 1); -lean_inc(x_796); -lean_dec(x_794); -x_797 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_797, 0, x_747); -x_798 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_799 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_799, 0, x_798); -lean_ctor_set(x_799, 1, x_797); -x_800 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; -x_801 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_801, 0, x_799); -lean_ctor_set(x_801, 1, x_800); -x_802 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_802, 0, x_10); -x_803 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_803, 0, x_801); -lean_ctor_set(x_803, 1, x_802); -x_804 = l_Lean_KernelException_toMessageData___closed__3; -x_805 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_805, 0, x_803); -lean_ctor_set(x_805, 1, x_804); -x_806 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_805, x_4, x_5, x_6, x_7, x_796); +x_780 = lean_ctor_get(x_778, 1); +lean_inc(x_780); +lean_dec(x_778); +x_781 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_781, 0, x_733); +x_782 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_783 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_783, 0, x_782); +lean_ctor_set(x_783, 1, x_781); +x_784 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_785 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_785, 0, x_783); +lean_ctor_set(x_785, 1, x_784); +x_786 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_786, 0, x_10); +x_787 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_787, 0, x_785); +lean_ctor_set(x_787, 1, x_786); +x_788 = l_Lean_KernelException_toMessageData___closed__3; +x_789 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_789, 0, x_787); +lean_ctor_set(x_789, 1, x_788); +x_790 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_789, x_4, x_5, x_6, x_7, x_780); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_806; +return x_790; } else { -lean_object* x_807; lean_object* x_808; -lean_dec(x_747); +lean_object* x_791; lean_object* x_792; +lean_dec(x_733); lean_dec(x_10); -x_807 = lean_ctor_get(x_794, 1); -lean_inc(x_807); -lean_dec(x_794); -x_808 = lean_ctor_get(x_795, 0); -lean_inc(x_808); -lean_dec(x_795); -x_3 = x_808; -x_8 = x_807; +x_791 = lean_ctor_get(x_778, 1); +lean_inc(x_791); +lean_dec(x_778); +x_792 = lean_ctor_get(x_779, 0); +lean_inc(x_792); +lean_dec(x_779); +x_3 = x_792; +x_8 = x_791; goto _start; } } else { -uint8_t x_810; -lean_dec(x_747); +uint8_t x_794; +lean_dec(x_733); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_810 = !lean_is_exclusive(x_794); -if (x_810 == 0) +x_794 = !lean_is_exclusive(x_778); +if (x_794 == 0) { -return x_794; +return x_778; } else { -lean_object* x_811; lean_object* x_812; lean_object* x_813; -x_811 = lean_ctor_get(x_794, 0); -x_812 = lean_ctor_get(x_794, 1); -lean_inc(x_812); -lean_inc(x_811); -lean_dec(x_794); -x_813 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_813, 0, x_811); -lean_ctor_set(x_813, 1, x_812); -return x_813; +lean_object* x_795; lean_object* x_796; lean_object* x_797; +x_795 = lean_ctor_get(x_778, 0); +x_796 = lean_ctor_get(x_778, 1); +lean_inc(x_796); +lean_inc(x_795); +lean_dec(x_778); +x_797 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_797, 0, x_795); +lean_ctor_set(x_797, 1, x_796); +return x_797; } } } else { -lean_object* x_814; -x_814 = lean_box(0); -x_759 = x_814; -goto block_789; +lean_object* x_798; +x_798 = lean_box(0); +x_745 = x_798; +goto block_773; } } else { -lean_object* x_815; -lean_dec(x_757); -x_815 = lean_box(0); -x_759 = x_815; -goto block_789; +lean_object* x_799; +lean_dec(x_743); +x_799 = lean_box(0); +x_745 = x_799; +goto block_773; } -block_789: +block_773: { -lean_object* x_760; -lean_dec(x_759); -x_760 = l_Lean_ConstantInfo_value_x3f(x_752); -lean_dec(x_752); -if (lean_obj_tag(x_760) == 0) +lean_object* x_746; +lean_dec(x_745); +x_746 = l_Lean_ConstantInfo_value_x3f(x_738); +lean_dec(x_738); +if (lean_obj_tag(x_746) == 0) { -lean_object* x_761; lean_object* x_762; lean_object* x_763; lean_object* x_764; lean_object* x_765; lean_object* x_766; lean_object* x_767; lean_object* x_768; lean_object* x_769; lean_object* x_770; -lean_dec(x_754); -lean_dec(x_750); -lean_dec(x_748); -lean_dec(x_746); -lean_dec(x_742); +lean_object* x_747; lean_object* x_748; lean_object* x_749; lean_object* x_750; lean_object* x_751; lean_object* x_752; lean_object* x_753; lean_object* x_754; lean_object* x_755; lean_object* x_756; +lean_dec(x_740); +lean_dec(x_736); +lean_dec(x_734); +lean_dec(x_732); +lean_dec(x_728); lean_dec(x_1); -x_761 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_761, 0, x_747); -x_762 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_763 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_763, 0, x_762); -lean_ctor_set(x_763, 1, x_761); -x_764 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; -x_765 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_765, 0, x_763); -lean_ctor_set(x_765, 1, x_764); -x_766 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_766, 0, x_10); -x_767 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_767, 0, x_765); -lean_ctor_set(x_767, 1, x_766); -x_768 = l_Lean_KernelException_toMessageData___closed__3; -x_769 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_769, 0, x_767); -lean_ctor_set(x_769, 1, x_768); -x_770 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_769, x_4, x_5, x_6, x_7, x_758); +x_747 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_747, 0, x_733); +x_748 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_749 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_749, 0, x_748); +lean_ctor_set(x_749, 1, x_747); +x_750 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_751 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_751, 0, x_749); +lean_ctor_set(x_751, 1, x_750); +x_752 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_752, 0, x_10); +x_753 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_753, 0, x_751); +lean_ctor_set(x_753, 1, x_752); +x_754 = l_Lean_KernelException_toMessageData___closed__3; +x_755 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_755, 0, x_753); +lean_ctor_set(x_755, 1, x_754); +x_756 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_755, x_4, x_5, x_6, x_7, x_744); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_770; -} -else -{ -lean_object* x_771; lean_object* x_772; -lean_dec(x_747); -x_771 = lean_ctor_get(x_760, 0); -lean_inc(x_771); -lean_dec(x_760); -x_772 = l_Lean_Environment_getModuleIdxFor_x3f(x_746, x_742); -lean_dec(x_746); -if (lean_obj_tag(x_772) == 0) -{ -lean_object* x_773; lean_object* x_774; lean_object* x_775; -x_773 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_774 = lean_box(0); -x_775 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(x_1, x_771, x_2, x_773, x_754, x_750, x_748, x_742, x_10, x_755, x_774, x_4, x_5, x_6, x_7, x_758); -return x_775; -} -else -{ -lean_dec(x_772); -if (x_2 == 0) -{ -lean_object* x_776; lean_object* x_777; lean_object* x_778; lean_object* x_779; lean_object* x_780; lean_object* x_781; uint8_t x_782; -lean_dec(x_771); -lean_dec(x_754); -lean_dec(x_750); -lean_dec(x_748); -lean_dec(x_10); -lean_dec(x_1); -x_776 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_776, 0, x_742); -x_777 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_778 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_778, 0, x_777); -lean_ctor_set(x_778, 1, x_776); -x_779 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_780 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_780, 0, x_778); -lean_ctor_set(x_780, 1, x_779); -x_781 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_780, x_4, x_5, x_6, x_7, x_758); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_782 = !lean_is_exclusive(x_781); -if (x_782 == 0) -{ -return x_781; -} -else -{ -lean_object* x_783; lean_object* x_784; lean_object* x_785; -x_783 = lean_ctor_get(x_781, 0); -x_784 = lean_ctor_get(x_781, 1); -lean_inc(x_784); -lean_inc(x_783); -lean_dec(x_781); -x_785 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_785, 0, x_783); -lean_ctor_set(x_785, 1, x_784); -return x_785; -} -} -else -{ -lean_object* x_786; lean_object* x_787; lean_object* x_788; -x_786 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_787 = lean_box(0); -x_788 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(x_1, x_771, x_2, x_786, x_754, x_750, x_748, x_742, x_10, x_755, x_787, x_4, x_5, x_6, x_7, x_758); -return x_788; -} -} -} -} -} -else -{ -uint8_t x_816; -lean_dec(x_754); -lean_dec(x_752); -lean_dec(x_750); -lean_dec(x_748); -lean_dec(x_747); -lean_dec(x_746); -lean_dec(x_742); -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_816 = !lean_is_exclusive(x_756); -if (x_816 == 0) -{ return x_756; } else { -lean_object* x_817; lean_object* x_818; lean_object* x_819; -x_817 = lean_ctor_get(x_756, 0); -x_818 = lean_ctor_get(x_756, 1); -lean_inc(x_818); -lean_inc(x_817); -lean_dec(x_756); -x_819 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_819, 0, x_817); -lean_ctor_set(x_819, 1, x_818); -return x_819; +lean_object* x_757; lean_object* x_758; +lean_dec(x_733); +x_757 = lean_ctor_get(x_746, 0); +lean_inc(x_757); +lean_dec(x_746); +x_758 = l_Lean_Environment_getModuleIdxFor_x3f(x_732, x_728); +lean_dec(x_732); +if (lean_obj_tag(x_758) == 0) +{ +lean_object* x_759; lean_object* x_760; +x_759 = lean_box(0); +x_760 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(x_1, x_757, x_2, x_740, x_736, x_734, x_728, x_10, x_741, x_759, x_4, x_5, x_6, x_7, x_744); +return x_760; +} +else +{ +lean_dec(x_758); +if (x_2 == 0) +{ +lean_object* x_761; lean_object* x_762; lean_object* x_763; lean_object* x_764; lean_object* x_765; lean_object* x_766; uint8_t x_767; +lean_dec(x_757); +lean_dec(x_740); +lean_dec(x_736); +lean_dec(x_734); +lean_dec(x_10); +lean_dec(x_1); +x_761 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_761, 0, x_728); +x_762 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_763 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_763, 0, x_762); +lean_ctor_set(x_763, 1, x_761); +x_764 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_765 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_765, 0, x_763); +lean_ctor_set(x_765, 1, x_764); +x_766 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_765, x_4, x_5, x_6, x_7, x_744); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_767 = !lean_is_exclusive(x_766); +if (x_767 == 0) +{ +return x_766; +} +else +{ +lean_object* x_768; lean_object* x_769; lean_object* x_770; +x_768 = lean_ctor_get(x_766, 0); +x_769 = lean_ctor_get(x_766, 1); +lean_inc(x_769); +lean_inc(x_768); +lean_dec(x_766); +x_770 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_770, 0, x_768); +lean_ctor_set(x_770, 1, x_769); +return x_770; +} +} +else +{ +lean_object* x_771; lean_object* x_772; +x_771 = lean_box(0); +x_772 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(x_1, x_757, x_2, x_740, x_736, x_734, x_728, x_10, x_741, x_771, x_4, x_5, x_6, x_7, x_744); +return x_772; +} +} } } } else { -uint8_t x_820; -lean_dec(x_750); -lean_dec(x_748); -lean_dec(x_747); -lean_dec(x_746); -lean_dec(x_742); +uint8_t x_800; +lean_dec(x_740); +lean_dec(x_738); +lean_dec(x_736); +lean_dec(x_734); +lean_dec(x_733); +lean_dec(x_732); +lean_dec(x_728); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_820 = !lean_is_exclusive(x_751); -if (x_820 == 0) +x_800 = !lean_is_exclusive(x_742); +if (x_800 == 0) { -return x_751; +return x_742; } else { -lean_object* x_821; lean_object* x_822; lean_object* x_823; -x_821 = lean_ctor_get(x_751, 0); -x_822 = lean_ctor_get(x_751, 1); -lean_inc(x_822); -lean_inc(x_821); -lean_dec(x_751); -x_823 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_823, 0, x_821); -lean_ctor_set(x_823, 1, x_822); -return x_823; -} -} -} -else -{ -lean_object* x_824; lean_object* x_825; lean_object* x_826; lean_object* x_827; -lean_dec(x_748); -lean_dec(x_747); -lean_dec(x_746); +lean_object* x_801; lean_object* x_802; lean_object* x_803; +x_801 = lean_ctor_get(x_742, 0); +x_802 = lean_ctor_get(x_742, 1); +lean_inc(x_802); +lean_inc(x_801); lean_dec(x_742); -x_824 = lean_ctor_get(x_749, 0); -lean_inc(x_824); -lean_dec(x_749); -x_825 = lean_box(0); -x_826 = l_Lean_mkConst(x_824, x_825); +x_803 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_803, 0, x_801); +lean_ctor_set(x_803, 1, x_802); +return x_803; +} +} +} +else +{ +uint8_t x_804; +lean_dec(x_736); +lean_dec(x_734); +lean_dec(x_733); +lean_dec(x_732); +lean_dec(x_728); +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_804 = !lean_is_exclusive(x_737); +if (x_804 == 0) +{ +return x_737; +} +else +{ +lean_object* x_805; lean_object* x_806; lean_object* x_807; +x_805 = lean_ctor_get(x_737, 0); +x_806 = lean_ctor_get(x_737, 1); +lean_inc(x_806); +lean_inc(x_805); +lean_dec(x_737); +x_807 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_807, 0, x_805); +lean_ctor_set(x_807, 1, x_806); +return x_807; +} +} +} +else +{ +lean_object* x_808; lean_object* x_809; lean_object* x_810; lean_object* x_811; +lean_dec(x_734); +lean_dec(x_733); +lean_dec(x_732); +lean_dec(x_728); +x_808 = lean_ctor_get(x_735, 0); +lean_inc(x_808); +lean_dec(x_735); +x_809 = lean_box(0); +x_810 = l_Lean_mkConst(x_808, x_809); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_826); -x_827 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_826, x_4, x_5, x_6, x_7, x_745); -if (lean_obj_tag(x_827) == 0) +lean_inc(x_810); +x_811 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_810, x_4, x_5, x_6, x_7, x_731); +if (lean_obj_tag(x_811) == 0) { -lean_object* x_828; lean_object* x_829; lean_object* x_830; lean_object* x_831; lean_object* x_832; -x_828 = lean_ctor_get(x_827, 0); -lean_inc(x_828); -x_829 = lean_ctor_get(x_827, 1); -lean_inc(x_829); -lean_dec(x_827); -x_830 = lean_box(x_2); -x_831 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__41___boxed), 11, 4); -lean_closure_set(x_831, 0, x_10); -lean_closure_set(x_831, 1, x_1); -lean_closure_set(x_831, 2, x_830); -lean_closure_set(x_831, 3, x_826); -x_832 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_828, x_831, x_4, x_5, x_6, x_7, x_829); -return x_832; +lean_object* x_812; lean_object* x_813; lean_object* x_814; lean_object* x_815; lean_object* x_816; +x_812 = lean_ctor_get(x_811, 0); +lean_inc(x_812); +x_813 = lean_ctor_get(x_811, 1); +lean_inc(x_813); +lean_dec(x_811); +x_814 = lean_box(x_2); +x_815 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__41___boxed), 11, 4); +lean_closure_set(x_815, 0, x_10); +lean_closure_set(x_815, 1, x_1); +lean_closure_set(x_815, 2, x_814); +lean_closure_set(x_815, 3, x_810); +x_816 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_812, x_815, x_4, x_5, x_6, x_7, x_813); +return x_816; } else { -uint8_t x_833; -lean_dec(x_826); +uint8_t x_817; +lean_dec(x_810); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_833 = !lean_is_exclusive(x_827); -if (x_833 == 0) +x_817 = !lean_is_exclusive(x_811); +if (x_817 == 0) { -return x_827; +return x_811; } else { -lean_object* x_834; lean_object* x_835; lean_object* x_836; -x_834 = lean_ctor_get(x_827, 0); -x_835 = lean_ctor_get(x_827, 1); -lean_inc(x_835); -lean_inc(x_834); -lean_dec(x_827); -x_836 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_836, 0, x_834); -lean_ctor_set(x_836, 1, x_835); -return x_836; +lean_object* x_818; lean_object* x_819; lean_object* x_820; +x_818 = lean_ctor_get(x_811, 0); +x_819 = lean_ctor_get(x_811, 1); +lean_inc(x_819); +lean_inc(x_818); +lean_dec(x_811); +x_820 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_820, 0, x_818); +lean_ctor_set(x_820, 1, x_819); +return x_820; } } } } else { -lean_object* x_837; lean_object* x_838; lean_object* x_839; lean_object* x_840; lean_object* x_841; lean_object* x_842; -lean_dec(x_741); +lean_object* x_821; lean_object* x_822; lean_object* x_823; lean_object* x_824; lean_object* x_825; lean_object* x_826; +lean_dec(x_727); lean_dec(x_1); -x_837 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_837, 0, x_10); -x_838 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_839 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_839, 0, x_838); -lean_ctor_set(x_839, 1, x_837); -x_840 = l_Lean_KernelException_toMessageData___closed__3; -x_841 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_841, 0, x_839); -lean_ctor_set(x_841, 1, x_840); -x_842 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_841, x_4, x_5, x_6, x_7, x_740); +x_821 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_821, 0, x_10); +x_822 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_823 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_823, 0, x_822); +lean_ctor_set(x_823, 1, x_821); +x_824 = l_Lean_KernelException_toMessageData___closed__3; +x_825 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_825, 0, x_823); +lean_ctor_set(x_825, 1, x_824); +x_826 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_825, x_4, x_5, x_6, x_7, x_726); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_842; +return x_826; } } case 10: { -lean_object* x_843; lean_object* x_844; -x_843 = lean_ctor_get(x_9, 1); -lean_inc(x_843); +lean_object* x_827; lean_object* x_828; +x_827 = lean_ctor_get(x_9, 1); +lean_inc(x_827); lean_dec(x_9); -x_844 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_844) == 4) +x_828 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_828) == 4) { -lean_object* x_845; lean_object* x_846; lean_object* x_847; lean_object* x_848; lean_object* x_849; lean_object* x_850; lean_object* x_851; lean_object* x_852; -x_845 = lean_ctor_get(x_844, 0); -lean_inc(x_845); -lean_dec(x_844); -x_846 = lean_st_ref_get(x_7, x_843); -x_847 = lean_ctor_get(x_846, 0); -lean_inc(x_847); -x_848 = lean_ctor_get(x_846, 1); -lean_inc(x_848); -lean_dec(x_846); -x_849 = lean_ctor_get(x_847, 0); -lean_inc(x_849); -lean_dec(x_847); -x_850 = lean_ctor_get(x_1, 0); -lean_inc(x_850); -x_851 = lean_ctor_get(x_1, 2); -lean_inc(x_851); -x_852 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_851, x_849, x_845); -if (lean_obj_tag(x_852) == 0) +lean_object* x_829; lean_object* x_830; lean_object* x_831; lean_object* x_832; lean_object* x_833; lean_object* x_834; lean_object* x_835; lean_object* x_836; +x_829 = lean_ctor_get(x_828, 0); +lean_inc(x_829); +lean_dec(x_828); +x_830 = lean_st_ref_get(x_7, x_827); +x_831 = lean_ctor_get(x_830, 0); +lean_inc(x_831); +x_832 = lean_ctor_get(x_830, 1); +lean_inc(x_832); +lean_dec(x_830); +x_833 = lean_ctor_get(x_831, 0); +lean_inc(x_833); +lean_dec(x_831); +x_834 = lean_ctor_get(x_1, 0); +lean_inc(x_834); +x_835 = lean_ctor_get(x_1, 2); +lean_inc(x_835); +x_836 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_835, x_833, x_829); +if (lean_obj_tag(x_836) == 0) { -lean_object* x_853; lean_object* x_854; -lean_inc(x_850); -x_853 = l_Lean_Name_append(x_845, x_850); -lean_inc(x_845); -x_854 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_845, x_4, x_5, x_6, x_7, x_848); -if (lean_obj_tag(x_854) == 0) +lean_object* x_837; lean_object* x_838; +lean_inc(x_834); +x_837 = l_Lean_Name_append(x_829, x_834); +lean_inc(x_829); +x_838 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_829, x_4, x_5, x_6, x_7, x_832); +if (lean_obj_tag(x_838) == 0) { -lean_object* x_855; lean_object* x_856; lean_object* x_857; lean_object* x_858; lean_object* x_859; -x_855 = lean_ctor_get(x_854, 0); -lean_inc(x_855); -x_856 = lean_ctor_get(x_854, 1); -lean_inc(x_856); -lean_dec(x_854); -x_857 = l_Lean_ConstantInfo_type(x_855); -x_858 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +lean_object* x_839; lean_object* x_840; lean_object* x_841; lean_object* x_842; lean_object* x_843; +x_839 = lean_ctor_get(x_838, 0); +lean_inc(x_839); +x_840 = lean_ctor_get(x_838, 1); +lean_inc(x_840); +lean_dec(x_838); +x_841 = l_Lean_ConstantInfo_type(x_839); +x_842 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_857); -x_859 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_857, x_858, x_4, x_5, x_6, x_7, x_856); -if (lean_obj_tag(x_859) == 0) +lean_inc(x_841); +x_843 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_841, x_842, x_4, x_5, x_6, x_7, x_840); +if (lean_obj_tag(x_843) == 0) { -lean_object* x_860; lean_object* x_861; lean_object* x_862; lean_object* x_893; uint8_t x_894; -x_860 = lean_ctor_get(x_859, 0); -lean_inc(x_860); -x_861 = lean_ctor_get(x_859, 1); -lean_inc(x_861); -lean_dec(x_859); -x_893 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_894 = l_Lean_Expr_isConstOf(x_860, x_893); -if (x_894 == 0) +lean_object* x_844; lean_object* x_845; lean_object* x_846; lean_object* x_875; uint8_t x_876; +x_844 = lean_ctor_get(x_843, 0); +lean_inc(x_844); +x_845 = lean_ctor_get(x_843, 1); +lean_inc(x_845); +lean_dec(x_843); +x_875 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_876 = l_Lean_Expr_isConstOf(x_844, x_875); +if (x_876 == 0) { -lean_object* x_895; uint8_t x_896; -x_895 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_896 = l_Lean_Expr_isConstOf(x_860, x_895); -lean_dec(x_860); -if (x_896 == 0) +lean_object* x_877; uint8_t x_878; +x_877 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_878 = l_Lean_Expr_isConstOf(x_844, x_877); +lean_dec(x_844); +if (x_878 == 0) { -lean_object* x_897; -lean_dec(x_857); -lean_dec(x_855); -lean_dec(x_853); -lean_dec(x_851); -lean_dec(x_849); -lean_dec(x_845); +lean_object* x_879; +lean_dec(x_841); +lean_dec(x_839); +lean_dec(x_837); +lean_dec(x_835); +lean_dec(x_833); +lean_dec(x_829); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_897 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_861); -if (lean_obj_tag(x_897) == 0) +x_879 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_845); +if (lean_obj_tag(x_879) == 0) { -lean_object* x_898; -x_898 = lean_ctor_get(x_897, 0); -lean_inc(x_898); -if (lean_obj_tag(x_898) == 0) +lean_object* x_880; +x_880 = lean_ctor_get(x_879, 0); +lean_inc(x_880); +if (lean_obj_tag(x_880) == 0) { -lean_object* x_899; lean_object* x_900; lean_object* x_901; lean_object* x_902; lean_object* x_903; lean_object* x_904; lean_object* x_905; lean_object* x_906; lean_object* x_907; lean_object* x_908; lean_object* x_909; +lean_object* x_881; lean_object* x_882; lean_object* x_883; lean_object* x_884; lean_object* x_885; lean_object* x_886; lean_object* x_887; lean_object* x_888; lean_object* x_889; lean_object* x_890; lean_object* x_891; lean_dec(x_1); -x_899 = lean_ctor_get(x_897, 1); -lean_inc(x_899); -lean_dec(x_897); -x_900 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_900, 0, x_850); -x_901 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_902 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_902, 0, x_901); -lean_ctor_set(x_902, 1, x_900); -x_903 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; -x_904 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_904, 0, x_902); -lean_ctor_set(x_904, 1, x_903); -x_905 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_905, 0, x_10); -x_906 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_906, 0, x_904); -lean_ctor_set(x_906, 1, x_905); -x_907 = l_Lean_KernelException_toMessageData___closed__3; -x_908 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_908, 0, x_906); -lean_ctor_set(x_908, 1, x_907); -x_909 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_908, x_4, x_5, x_6, x_7, x_899); +x_881 = lean_ctor_get(x_879, 1); +lean_inc(x_881); +lean_dec(x_879); +x_882 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_882, 0, x_834); +x_883 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_884 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_884, 0, x_883); +lean_ctor_set(x_884, 1, x_882); +x_885 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_886 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_886, 0, x_884); +lean_ctor_set(x_886, 1, x_885); +x_887 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_887, 0, x_10); +x_888 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_888, 0, x_886); +lean_ctor_set(x_888, 1, x_887); +x_889 = l_Lean_KernelException_toMessageData___closed__3; +x_890 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_890, 0, x_888); +lean_ctor_set(x_890, 1, x_889); +x_891 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_890, x_4, x_5, x_6, x_7, x_881); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_909; +return x_891; } else { -lean_object* x_910; lean_object* x_911; -lean_dec(x_850); +lean_object* x_892; lean_object* x_893; +lean_dec(x_834); lean_dec(x_10); -x_910 = lean_ctor_get(x_897, 1); -lean_inc(x_910); -lean_dec(x_897); -x_911 = lean_ctor_get(x_898, 0); -lean_inc(x_911); -lean_dec(x_898); -x_3 = x_911; -x_8 = x_910; +x_892 = lean_ctor_get(x_879, 1); +lean_inc(x_892); +lean_dec(x_879); +x_893 = lean_ctor_get(x_880, 0); +lean_inc(x_893); +lean_dec(x_880); +x_3 = x_893; +x_8 = x_892; goto _start; } } else { -uint8_t x_913; -lean_dec(x_850); +uint8_t x_895; +lean_dec(x_834); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_913 = !lean_is_exclusive(x_897); -if (x_913 == 0) +x_895 = !lean_is_exclusive(x_879); +if (x_895 == 0) { -return x_897; +return x_879; } else { -lean_object* x_914; lean_object* x_915; lean_object* x_916; -x_914 = lean_ctor_get(x_897, 0); -x_915 = lean_ctor_get(x_897, 1); -lean_inc(x_915); -lean_inc(x_914); -lean_dec(x_897); -x_916 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_916, 0, x_914); -lean_ctor_set(x_916, 1, x_915); -return x_916; +lean_object* x_896; lean_object* x_897; lean_object* x_898; +x_896 = lean_ctor_get(x_879, 0); +x_897 = lean_ctor_get(x_879, 1); +lean_inc(x_897); +lean_inc(x_896); +lean_dec(x_879); +x_898 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_898, 0, x_896); +lean_ctor_set(x_898, 1, x_897); +return x_898; } } } else { -lean_object* x_917; -x_917 = lean_box(0); -x_862 = x_917; -goto block_892; +lean_object* x_899; +x_899 = lean_box(0); +x_846 = x_899; +goto block_874; } } else { -lean_object* x_918; -lean_dec(x_860); -x_918 = lean_box(0); -x_862 = x_918; -goto block_892; +lean_object* x_900; +lean_dec(x_844); +x_900 = lean_box(0); +x_846 = x_900; +goto block_874; } -block_892: +block_874: { -lean_object* x_863; -lean_dec(x_862); -x_863 = l_Lean_ConstantInfo_value_x3f(x_855); -lean_dec(x_855); -if (lean_obj_tag(x_863) == 0) +lean_object* x_847; +lean_dec(x_846); +x_847 = l_Lean_ConstantInfo_value_x3f(x_839); +lean_dec(x_839); +if (lean_obj_tag(x_847) == 0) { -lean_object* x_864; lean_object* x_865; lean_object* x_866; lean_object* x_867; lean_object* x_868; lean_object* x_869; lean_object* x_870; lean_object* x_871; lean_object* x_872; lean_object* x_873; -lean_dec(x_857); -lean_dec(x_853); -lean_dec(x_851); -lean_dec(x_849); -lean_dec(x_845); +lean_object* x_848; lean_object* x_849; lean_object* x_850; lean_object* x_851; lean_object* x_852; lean_object* x_853; lean_object* x_854; lean_object* x_855; lean_object* x_856; lean_object* x_857; +lean_dec(x_841); +lean_dec(x_837); +lean_dec(x_835); +lean_dec(x_833); +lean_dec(x_829); lean_dec(x_1); -x_864 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_864, 0, x_850); -x_865 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_866 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_866, 0, x_865); -lean_ctor_set(x_866, 1, x_864); -x_867 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; -x_868 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_868, 0, x_866); -lean_ctor_set(x_868, 1, x_867); -x_869 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_869, 0, x_10); -x_870 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_870, 0, x_868); -lean_ctor_set(x_870, 1, x_869); -x_871 = l_Lean_KernelException_toMessageData___closed__3; -x_872 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_872, 0, x_870); -lean_ctor_set(x_872, 1, x_871); -x_873 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_872, x_4, x_5, x_6, x_7, x_861); +x_848 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_848, 0, x_834); +x_849 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_850 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_850, 0, x_849); +lean_ctor_set(x_850, 1, x_848); +x_851 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_852 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_852, 0, x_850); +lean_ctor_set(x_852, 1, x_851); +x_853 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_853, 0, x_10); +x_854 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_854, 0, x_852); +lean_ctor_set(x_854, 1, x_853); +x_855 = l_Lean_KernelException_toMessageData___closed__3; +x_856 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_856, 0, x_854); +lean_ctor_set(x_856, 1, x_855); +x_857 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_856, x_4, x_5, x_6, x_7, x_845); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_873; +return x_857; } else { -lean_object* x_874; lean_object* x_875; -lean_dec(x_850); -x_874 = lean_ctor_get(x_863, 0); -lean_inc(x_874); -lean_dec(x_863); -x_875 = l_Lean_Environment_getModuleIdxFor_x3f(x_849, x_845); -lean_dec(x_849); -if (lean_obj_tag(x_875) == 0) +lean_object* x_858; lean_object* x_859; +lean_dec(x_834); +x_858 = lean_ctor_get(x_847, 0); +lean_inc(x_858); +lean_dec(x_847); +x_859 = l_Lean_Environment_getModuleIdxFor_x3f(x_833, x_829); +lean_dec(x_833); +if (lean_obj_tag(x_859) == 0) { -lean_object* x_876; lean_object* x_877; lean_object* x_878; -x_876 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_877 = lean_box(0); -x_878 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(x_1, x_874, x_2, x_876, x_857, x_853, x_851, x_845, x_10, x_858, x_877, x_4, x_5, x_6, x_7, x_861); -return x_878; +lean_object* x_860; lean_object* x_861; +x_860 = lean_box(0); +x_861 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(x_1, x_858, x_2, x_841, x_837, x_835, x_829, x_10, x_842, x_860, x_4, x_5, x_6, x_7, x_845); +return x_861; } else { -lean_dec(x_875); +lean_dec(x_859); if (x_2 == 0) { -lean_object* x_879; lean_object* x_880; lean_object* x_881; lean_object* x_882; lean_object* x_883; lean_object* x_884; uint8_t x_885; -lean_dec(x_874); -lean_dec(x_857); -lean_dec(x_853); -lean_dec(x_851); +lean_object* x_862; lean_object* x_863; lean_object* x_864; lean_object* x_865; lean_object* x_866; lean_object* x_867; uint8_t x_868; +lean_dec(x_858); +lean_dec(x_841); +lean_dec(x_837); +lean_dec(x_835); lean_dec(x_10); lean_dec(x_1); -x_879 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_879, 0, x_845); -x_880 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_881 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_881, 0, x_880); -lean_ctor_set(x_881, 1, x_879); -x_882 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_883 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_883, 0, x_881); -lean_ctor_set(x_883, 1, x_882); -x_884 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_883, x_4, x_5, x_6, x_7, x_861); +x_862 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_862, 0, x_829); +x_863 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_864 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_864, 0, x_863); +lean_ctor_set(x_864, 1, x_862); +x_865 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_866 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_866, 0, x_864); +lean_ctor_set(x_866, 1, x_865); +x_867 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_866, x_4, x_5, x_6, x_7, x_845); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -x_885 = !lean_is_exclusive(x_884); -if (x_885 == 0) +x_868 = !lean_is_exclusive(x_867); +if (x_868 == 0) { -return x_884; +return x_867; } else { -lean_object* x_886; lean_object* x_887; lean_object* x_888; -x_886 = lean_ctor_get(x_884, 0); -x_887 = lean_ctor_get(x_884, 1); -lean_inc(x_887); -lean_inc(x_886); -lean_dec(x_884); -x_888 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_888, 0, x_886); -lean_ctor_set(x_888, 1, x_887); -return x_888; +lean_object* x_869; lean_object* x_870; lean_object* x_871; +x_869 = lean_ctor_get(x_867, 0); +x_870 = lean_ctor_get(x_867, 1); +lean_inc(x_870); +lean_inc(x_869); +lean_dec(x_867); +x_871 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_871, 0, x_869); +lean_ctor_set(x_871, 1, x_870); +return x_871; } } else { -lean_object* x_889; lean_object* x_890; lean_object* x_891; -x_889 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_890 = lean_box(0); -x_891 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(x_1, x_874, x_2, x_889, x_857, x_853, x_851, x_845, x_10, x_858, x_890, x_4, x_5, x_6, x_7, x_861); -return x_891; +lean_object* x_872; lean_object* x_873; +x_872 = lean_box(0); +x_873 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(x_1, x_858, x_2, x_841, x_837, x_835, x_829, x_10, x_842, x_872, x_4, x_5, x_6, x_7, x_845); +return x_873; } } } @@ -21918,646 +20841,644 @@ return x_891; } else { -uint8_t x_919; -lean_dec(x_857); -lean_dec(x_855); -lean_dec(x_853); -lean_dec(x_851); -lean_dec(x_850); -lean_dec(x_849); -lean_dec(x_845); +uint8_t x_901; +lean_dec(x_841); +lean_dec(x_839); +lean_dec(x_837); +lean_dec(x_835); +lean_dec(x_834); +lean_dec(x_833); +lean_dec(x_829); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_919 = !lean_is_exclusive(x_859); -if (x_919 == 0) +x_901 = !lean_is_exclusive(x_843); +if (x_901 == 0) { -return x_859; +return x_843; } else { -lean_object* x_920; lean_object* x_921; lean_object* x_922; -x_920 = lean_ctor_get(x_859, 0); -x_921 = lean_ctor_get(x_859, 1); -lean_inc(x_921); -lean_inc(x_920); -lean_dec(x_859); -x_922 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_922, 0, x_920); -lean_ctor_set(x_922, 1, x_921); -return x_922; +lean_object* x_902; lean_object* x_903; lean_object* x_904; +x_902 = lean_ctor_get(x_843, 0); +x_903 = lean_ctor_get(x_843, 1); +lean_inc(x_903); +lean_inc(x_902); +lean_dec(x_843); +x_904 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_904, 0, x_902); +lean_ctor_set(x_904, 1, x_903); +return x_904; } } } else { -uint8_t x_923; -lean_dec(x_853); -lean_dec(x_851); -lean_dec(x_850); -lean_dec(x_849); -lean_dec(x_845); +uint8_t x_905; +lean_dec(x_837); +lean_dec(x_835); +lean_dec(x_834); +lean_dec(x_833); +lean_dec(x_829); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_923 = !lean_is_exclusive(x_854); -if (x_923 == 0) +x_905 = !lean_is_exclusive(x_838); +if (x_905 == 0) { -return x_854; +return x_838; } else { -lean_object* x_924; lean_object* x_925; lean_object* x_926; -x_924 = lean_ctor_get(x_854, 0); -x_925 = lean_ctor_get(x_854, 1); -lean_inc(x_925); -lean_inc(x_924); -lean_dec(x_854); -x_926 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_926, 0, x_924); -lean_ctor_set(x_926, 1, x_925); -return x_926; +lean_object* x_906; lean_object* x_907; lean_object* x_908; +x_906 = lean_ctor_get(x_838, 0); +x_907 = lean_ctor_get(x_838, 1); +lean_inc(x_907); +lean_inc(x_906); +lean_dec(x_838); +x_908 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_908, 0, x_906); +lean_ctor_set(x_908, 1, x_907); +return x_908; } } } else { -lean_object* x_927; lean_object* x_928; lean_object* x_929; lean_object* x_930; -lean_dec(x_851); -lean_dec(x_850); -lean_dec(x_849); -lean_dec(x_845); -x_927 = lean_ctor_get(x_852, 0); -lean_inc(x_927); -lean_dec(x_852); -x_928 = lean_box(0); -x_929 = l_Lean_mkConst(x_927, x_928); +lean_object* x_909; lean_object* x_910; lean_object* x_911; lean_object* x_912; +lean_dec(x_835); +lean_dec(x_834); +lean_dec(x_833); +lean_dec(x_829); +x_909 = lean_ctor_get(x_836, 0); +lean_inc(x_909); +lean_dec(x_836); +x_910 = lean_box(0); +x_911 = l_Lean_mkConst(x_909, x_910); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_929); -x_930 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_929, x_4, x_5, x_6, x_7, x_848); -if (lean_obj_tag(x_930) == 0) +lean_inc(x_911); +x_912 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_911, x_4, x_5, x_6, x_7, x_832); +if (lean_obj_tag(x_912) == 0) { -lean_object* x_931; lean_object* x_932; lean_object* x_933; lean_object* x_934; lean_object* x_935; -x_931 = lean_ctor_get(x_930, 0); -lean_inc(x_931); -x_932 = lean_ctor_get(x_930, 1); -lean_inc(x_932); -lean_dec(x_930); -x_933 = lean_box(x_2); -x_934 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__46___boxed), 11, 4); -lean_closure_set(x_934, 0, x_10); -lean_closure_set(x_934, 1, x_1); -lean_closure_set(x_934, 2, x_933); -lean_closure_set(x_934, 3, x_929); -x_935 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_931, x_934, x_4, x_5, x_6, x_7, x_932); -return x_935; +lean_object* x_913; lean_object* x_914; lean_object* x_915; lean_object* x_916; lean_object* x_917; +x_913 = lean_ctor_get(x_912, 0); +lean_inc(x_913); +x_914 = lean_ctor_get(x_912, 1); +lean_inc(x_914); +lean_dec(x_912); +x_915 = lean_box(x_2); +x_916 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__46___boxed), 11, 4); +lean_closure_set(x_916, 0, x_10); +lean_closure_set(x_916, 1, x_1); +lean_closure_set(x_916, 2, x_915); +lean_closure_set(x_916, 3, x_911); +x_917 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_913, x_916, x_4, x_5, x_6, x_7, x_914); +return x_917; } else { -uint8_t x_936; -lean_dec(x_929); +uint8_t x_918; +lean_dec(x_911); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_936 = !lean_is_exclusive(x_930); -if (x_936 == 0) +x_918 = !lean_is_exclusive(x_912); +if (x_918 == 0) { -return x_930; +return x_912; } else { -lean_object* x_937; lean_object* x_938; lean_object* x_939; -x_937 = lean_ctor_get(x_930, 0); -x_938 = lean_ctor_get(x_930, 1); -lean_inc(x_938); -lean_inc(x_937); -lean_dec(x_930); -x_939 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_939, 0, x_937); -lean_ctor_set(x_939, 1, x_938); -return x_939; +lean_object* x_919; lean_object* x_920; lean_object* x_921; +x_919 = lean_ctor_get(x_912, 0); +x_920 = lean_ctor_get(x_912, 1); +lean_inc(x_920); +lean_inc(x_919); +lean_dec(x_912); +x_921 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_921, 0, x_919); +lean_ctor_set(x_921, 1, x_920); +return x_921; } } } } else { -lean_object* x_940; lean_object* x_941; lean_object* x_942; lean_object* x_943; lean_object* x_944; lean_object* x_945; -lean_dec(x_844); +lean_object* x_922; lean_object* x_923; lean_object* x_924; lean_object* x_925; lean_object* x_926; lean_object* x_927; +lean_dec(x_828); lean_dec(x_1); -x_940 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_940, 0, x_10); -x_941 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_942 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_942, 0, x_941); -lean_ctor_set(x_942, 1, x_940); -x_943 = l_Lean_KernelException_toMessageData___closed__3; -x_944 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_944, 0, x_942); -lean_ctor_set(x_944, 1, x_943); -x_945 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_944, x_4, x_5, x_6, x_7, x_843); +x_922 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_922, 0, x_10); +x_923 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_924 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_924, 0, x_923); +lean_ctor_set(x_924, 1, x_922); +x_925 = l_Lean_KernelException_toMessageData___closed__3; +x_926 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_926, 0, x_924); +lean_ctor_set(x_926, 1, x_925); +x_927 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_926, x_4, x_5, x_6, x_7, x_827); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_945; +return x_927; } } default: { -lean_object* x_946; lean_object* x_947; -x_946 = lean_ctor_get(x_9, 1); -lean_inc(x_946); +lean_object* x_928; lean_object* x_929; +x_928 = lean_ctor_get(x_9, 1); +lean_inc(x_928); lean_dec(x_9); -x_947 = l_Lean_Expr_getAppFn(x_10); -if (lean_obj_tag(x_947) == 4) +x_929 = l_Lean_Expr_getAppFn(x_10); +if (lean_obj_tag(x_929) == 4) { -lean_object* x_948; lean_object* x_949; lean_object* x_950; lean_object* x_951; lean_object* x_952; lean_object* x_953; lean_object* x_954; lean_object* x_955; -x_948 = lean_ctor_get(x_947, 0); -lean_inc(x_948); -lean_dec(x_947); -x_949 = lean_st_ref_get(x_7, x_946); -x_950 = lean_ctor_get(x_949, 0); -lean_inc(x_950); -x_951 = lean_ctor_get(x_949, 1); -lean_inc(x_951); -lean_dec(x_949); -x_952 = lean_ctor_get(x_950, 0); -lean_inc(x_952); -lean_dec(x_950); -x_953 = lean_ctor_get(x_1, 0); -lean_inc(x_953); -x_954 = lean_ctor_get(x_1, 2); -lean_inc(x_954); -x_955 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_954, x_952, x_948); -if (lean_obj_tag(x_955) == 0) +lean_object* x_930; lean_object* x_931; lean_object* x_932; lean_object* x_933; lean_object* x_934; lean_object* x_935; lean_object* x_936; lean_object* x_937; +x_930 = lean_ctor_get(x_929, 0); +lean_inc(x_930); +lean_dec(x_929); +x_931 = lean_st_ref_get(x_7, x_928); +x_932 = lean_ctor_get(x_931, 0); +lean_inc(x_932); +x_933 = lean_ctor_get(x_931, 1); +lean_inc(x_933); +lean_dec(x_931); +x_934 = lean_ctor_get(x_932, 0); +lean_inc(x_934); +lean_dec(x_932); +x_935 = lean_ctor_get(x_1, 0); +lean_inc(x_935); +x_936 = lean_ctor_get(x_1, 2); +lean_inc(x_936); +x_937 = l_Lean_ParserCompiler_CombinatorAttribute_getDeclFor_x3f(x_936, x_934, x_930); +if (lean_obj_tag(x_937) == 0) { -lean_object* x_956; lean_object* x_957; -lean_inc(x_953); -x_956 = l_Lean_Name_append(x_948, x_953); -lean_inc(x_948); -x_957 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_948, x_4, x_5, x_6, x_7, x_951); -if (lean_obj_tag(x_957) == 0) +lean_object* x_938; lean_object* x_939; +lean_inc(x_935); +x_938 = l_Lean_Name_append(x_930, x_935); +lean_inc(x_930); +x_939 = l_Lean_getConstInfo___at_Lean_Meta_getParamNamesImp___spec__1(x_930, x_4, x_5, x_6, x_7, x_933); +if (lean_obj_tag(x_939) == 0) { -lean_object* x_958; lean_object* x_959; lean_object* x_960; lean_object* x_961; lean_object* x_962; -x_958 = lean_ctor_get(x_957, 0); -lean_inc(x_958); -x_959 = lean_ctor_get(x_957, 1); -lean_inc(x_959); -lean_dec(x_957); -x_960 = l_Lean_ConstantInfo_type(x_958); -x_961 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; +lean_object* x_940; lean_object* x_941; lean_object* x_942; lean_object* x_943; lean_object* x_944; +x_940 = lean_ctor_get(x_939, 0); +lean_inc(x_940); +x_941 = lean_ctor_get(x_939, 1); +lean_inc(x_941); +lean_dec(x_939); +x_942 = l_Lean_ConstantInfo_type(x_940); +x_943 = l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__7___rarg___closed__1; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_960); -x_962 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_960, x_961, x_4, x_5, x_6, x_7, x_959); -if (lean_obj_tag(x_962) == 0) +lean_inc(x_942); +x_944 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_942, x_943, x_4, x_5, x_6, x_7, x_941); +if (lean_obj_tag(x_944) == 0) { -lean_object* x_963; lean_object* x_964; lean_object* x_965; lean_object* x_996; uint8_t x_997; -x_963 = lean_ctor_get(x_962, 0); -lean_inc(x_963); -x_964 = lean_ctor_get(x_962, 1); -lean_inc(x_964); -lean_dec(x_962); -x_996 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; -x_997 = l_Lean_Expr_isConstOf(x_963, x_996); -if (x_997 == 0) +lean_object* x_945; lean_object* x_946; lean_object* x_947; lean_object* x_976; uint8_t x_977; +x_945 = lean_ctor_get(x_944, 0); +lean_inc(x_945); +x_946 = lean_ctor_get(x_944, 1); +lean_inc(x_946); +lean_dec(x_944); +x_976 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__11; +x_977 = l_Lean_Expr_isConstOf(x_945, x_976); +if (x_977 == 0) { -lean_object* x_998; uint8_t x_999; -x_998 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; -x_999 = l_Lean_Expr_isConstOf(x_963, x_998); -lean_dec(x_963); -if (x_999 == 0) +lean_object* x_978; uint8_t x_979; +x_978 = l_Lean_Parser_parserOfStackFnUnsafe___closed__3; +x_979 = l_Lean_Expr_isConstOf(x_945, x_978); +lean_dec(x_945); +if (x_979 == 0) { -lean_object* x_1000; -lean_dec(x_960); -lean_dec(x_958); -lean_dec(x_956); -lean_dec(x_954); -lean_dec(x_952); -lean_dec(x_948); +lean_object* x_980; +lean_dec(x_942); +lean_dec(x_940); +lean_dec(x_938); +lean_dec(x_936); +lean_dec(x_934); +lean_dec(x_930); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_10); -x_1000 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_964); -if (lean_obj_tag(x_1000) == 0) +x_980 = l___private_Lean_Meta_WHNF_0__Lean_Meta_unfoldDefinitionImp_x3f(x_10, x_4, x_5, x_6, x_7, x_946); +if (lean_obj_tag(x_980) == 0) { -lean_object* x_1001; -x_1001 = lean_ctor_get(x_1000, 0); -lean_inc(x_1001); -if (lean_obj_tag(x_1001) == 0) +lean_object* x_981; +x_981 = lean_ctor_get(x_980, 0); +lean_inc(x_981); +if (lean_obj_tag(x_981) == 0) { -lean_object* x_1002; lean_object* x_1003; lean_object* x_1004; lean_object* x_1005; lean_object* x_1006; lean_object* x_1007; lean_object* x_1008; lean_object* x_1009; lean_object* x_1010; lean_object* x_1011; lean_object* x_1012; +lean_object* x_982; lean_object* x_983; lean_object* x_984; lean_object* x_985; lean_object* x_986; lean_object* x_987; lean_object* x_988; lean_object* x_989; lean_object* x_990; lean_object* x_991; lean_object* x_992; lean_dec(x_1); -x_1002 = lean_ctor_get(x_1000, 1); -lean_inc(x_1002); -lean_dec(x_1000); -x_1003 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_1003, 0, x_953); -x_1004 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_1005 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_1005, 0, x_1004); -lean_ctor_set(x_1005, 1, x_1003); -x_1006 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; -x_1007 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_1007, 0, x_1005); -lean_ctor_set(x_1007, 1, x_1006); -x_1008 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_1008, 0, x_10); -x_1009 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_1009, 0, x_1007); -lean_ctor_set(x_1009, 1, x_1008); -x_1010 = l_Lean_KernelException_toMessageData___closed__3; -x_1011 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_1011, 0, x_1009); -lean_ctor_set(x_1011, 1, x_1010); -x_1012 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_1011, x_4, x_5, x_6, x_7, x_1002); +x_982 = lean_ctor_get(x_980, 1); +lean_inc(x_982); +lean_dec(x_980); +x_983 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_983, 0, x_935); +x_984 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_985 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_985, 0, x_984); +lean_ctor_set(x_985, 1, x_983); +x_986 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__13; +x_987 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_987, 0, x_985); +lean_ctor_set(x_987, 1, x_986); +x_988 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_988, 0, x_10); +x_989 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_989, 0, x_987); +lean_ctor_set(x_989, 1, x_988); +x_990 = l_Lean_KernelException_toMessageData___closed__3; +x_991 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_991, 0, x_989); +lean_ctor_set(x_991, 1, x_990); +x_992 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_991, x_4, x_5, x_6, x_7, x_982); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_1012; +return x_992; } else { -lean_object* x_1013; lean_object* x_1014; -lean_dec(x_953); +lean_object* x_993; lean_object* x_994; +lean_dec(x_935); lean_dec(x_10); -x_1013 = lean_ctor_get(x_1000, 1); -lean_inc(x_1013); -lean_dec(x_1000); -x_1014 = lean_ctor_get(x_1001, 0); -lean_inc(x_1014); -lean_dec(x_1001); -x_3 = x_1014; -x_8 = x_1013; +x_993 = lean_ctor_get(x_980, 1); +lean_inc(x_993); +lean_dec(x_980); +x_994 = lean_ctor_get(x_981, 0); +lean_inc(x_994); +lean_dec(x_981); +x_3 = x_994; +x_8 = x_993; goto _start; } } else { -uint8_t x_1016; -lean_dec(x_953); +uint8_t x_996; +lean_dec(x_935); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_1016 = !lean_is_exclusive(x_1000); -if (x_1016 == 0) +x_996 = !lean_is_exclusive(x_980); +if (x_996 == 0) { -return x_1000; +return x_980; } else { -lean_object* x_1017; lean_object* x_1018; lean_object* x_1019; -x_1017 = lean_ctor_get(x_1000, 0); -x_1018 = lean_ctor_get(x_1000, 1); -lean_inc(x_1018); -lean_inc(x_1017); -lean_dec(x_1000); -x_1019 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_1019, 0, x_1017); -lean_ctor_set(x_1019, 1, x_1018); -return x_1019; +lean_object* x_997; lean_object* x_998; lean_object* x_999; +x_997 = lean_ctor_get(x_980, 0); +x_998 = lean_ctor_get(x_980, 1); +lean_inc(x_998); +lean_inc(x_997); +lean_dec(x_980); +x_999 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_999, 0, x_997); +lean_ctor_set(x_999, 1, x_998); +return x_999; } } } else { -lean_object* x_1020; -x_1020 = lean_box(0); -x_965 = x_1020; -goto block_995; +lean_object* x_1000; +x_1000 = lean_box(0); +x_947 = x_1000; +goto block_975; } } else { -lean_object* x_1021; -lean_dec(x_963); -x_1021 = lean_box(0); -x_965 = x_1021; -goto block_995; +lean_object* x_1001; +lean_dec(x_945); +x_1001 = lean_box(0); +x_947 = x_1001; +goto block_975; } -block_995: +block_975: { -lean_object* x_966; -lean_dec(x_965); -x_966 = l_Lean_ConstantInfo_value_x3f(x_958); -lean_dec(x_958); -if (lean_obj_tag(x_966) == 0) +lean_object* x_948; +lean_dec(x_947); +x_948 = l_Lean_ConstantInfo_value_x3f(x_940); +lean_dec(x_940); +if (lean_obj_tag(x_948) == 0) { -lean_object* x_967; lean_object* x_968; lean_object* x_969; lean_object* x_970; lean_object* x_971; lean_object* x_972; lean_object* x_973; lean_object* x_974; lean_object* x_975; lean_object* x_976; -lean_dec(x_960); -lean_dec(x_956); -lean_dec(x_954); -lean_dec(x_952); +lean_object* x_949; lean_object* x_950; lean_object* x_951; lean_object* x_952; lean_object* x_953; lean_object* x_954; lean_object* x_955; lean_object* x_956; lean_object* x_957; lean_object* x_958; +lean_dec(x_942); +lean_dec(x_938); +lean_dec(x_936); +lean_dec(x_934); +lean_dec(x_930); +lean_dec(x_1); +x_949 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_949, 0, x_935); +x_950 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; +x_951 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_951, 0, x_950); +lean_ctor_set(x_951, 1, x_949); +x_952 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; +x_953 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_953, 0, x_951); +lean_ctor_set(x_953, 1, x_952); +x_954 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_954, 0, x_10); +x_955 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_955, 0, x_953); +lean_ctor_set(x_955, 1, x_954); +x_956 = l_Lean_KernelException_toMessageData___closed__3; +x_957 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_957, 0, x_955); +lean_ctor_set(x_957, 1, x_956); +x_958 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_957, x_4, x_5, x_6, x_7, x_946); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_958; +} +else +{ +lean_object* x_959; lean_object* x_960; +lean_dec(x_935); +x_959 = lean_ctor_get(x_948, 0); +lean_inc(x_959); lean_dec(x_948); -lean_dec(x_1); -x_967 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_967, 0, x_953); -x_968 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; -x_969 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_969, 0, x_968); -lean_ctor_set(x_969, 1, x_967); -x_970 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__6; -x_971 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_971, 0, x_969); -lean_ctor_set(x_971, 1, x_970); -x_972 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_972, 0, x_10); -x_973 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_973, 0, x_971); -lean_ctor_set(x_973, 1, x_972); -x_974 = l_Lean_KernelException_toMessageData___closed__3; -x_975 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_975, 0, x_973); -lean_ctor_set(x_975, 1, x_974); -x_976 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_975, x_4, x_5, x_6, x_7, x_964); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -return x_976; -} -else -{ -lean_object* x_977; lean_object* x_978; -lean_dec(x_953); -x_977 = lean_ctor_get(x_966, 0); -lean_inc(x_977); -lean_dec(x_966); -x_978 = l_Lean_Environment_getModuleIdxFor_x3f(x_952, x_948); -lean_dec(x_952); -if (lean_obj_tag(x_978) == 0) -{ -lean_object* x_979; lean_object* x_980; lean_object* x_981; -x_979 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_980 = lean_box(0); -x_981 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(x_1, x_977, x_2, x_979, x_960, x_956, x_954, x_948, x_10, x_961, x_980, x_4, x_5, x_6, x_7, x_964); -return x_981; -} -else -{ -lean_dec(x_978); -if (x_2 == 0) -{ -lean_object* x_982; lean_object* x_983; lean_object* x_984; lean_object* x_985; lean_object* x_986; lean_object* x_987; uint8_t x_988; -lean_dec(x_977); -lean_dec(x_960); -lean_dec(x_956); -lean_dec(x_954); -lean_dec(x_10); -lean_dec(x_1); -x_982 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_982, 0, x_948); -x_983 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; -x_984 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_984, 0, x_983); -lean_ctor_set(x_984, 1, x_982); -x_985 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; -x_986 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_986, 0, x_984); -lean_ctor_set(x_986, 1, x_985); -x_987 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_986, x_4, x_5, x_6, x_7, x_964); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_988 = !lean_is_exclusive(x_987); -if (x_988 == 0) -{ -return x_987; -} -else -{ -lean_object* x_989; lean_object* x_990; lean_object* x_991; -x_989 = lean_ctor_get(x_987, 0); -x_990 = lean_ctor_get(x_987, 1); -lean_inc(x_990); -lean_inc(x_989); -lean_dec(x_987); -x_991 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_991, 0, x_989); -lean_ctor_set(x_991, 1, x_990); -return x_991; -} -} -else -{ -lean_object* x_992; lean_object* x_993; lean_object* x_994; -x_992 = l_myMacro____x40_Init_Notation___hyg_38____closed__4; -x_993 = lean_box(0); -x_994 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(x_1, x_977, x_2, x_992, x_960, x_956, x_954, x_948, x_10, x_961, x_993, x_4, x_5, x_6, x_7, x_964); -return x_994; -} -} -} -} -} -else -{ -uint8_t x_1022; -lean_dec(x_960); -lean_dec(x_958); -lean_dec(x_956); -lean_dec(x_954); -lean_dec(x_953); -lean_dec(x_952); -lean_dec(x_948); -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_1022 = !lean_is_exclusive(x_962); -if (x_1022 == 0) +x_960 = l_Lean_Environment_getModuleIdxFor_x3f(x_934, x_930); +lean_dec(x_934); +if (lean_obj_tag(x_960) == 0) { +lean_object* x_961; lean_object* x_962; +x_961 = lean_box(0); +x_962 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(x_1, x_959, x_2, x_942, x_938, x_936, x_930, x_10, x_943, x_961, x_4, x_5, x_6, x_7, x_946); return x_962; } else { -lean_object* x_1023; lean_object* x_1024; lean_object* x_1025; -x_1023 = lean_ctor_get(x_962, 0); -x_1024 = lean_ctor_get(x_962, 1); -lean_inc(x_1024); -lean_inc(x_1023); -lean_dec(x_962); -x_1025 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_1025, 0, x_1023); -lean_ctor_set(x_1025, 1, x_1024); -return x_1025; +lean_dec(x_960); +if (x_2 == 0) +{ +lean_object* x_963; lean_object* x_964; lean_object* x_965; lean_object* x_966; lean_object* x_967; lean_object* x_968; uint8_t x_969; +lean_dec(x_959); +lean_dec(x_942); +lean_dec(x_938); +lean_dec(x_936); +lean_dec(x_10); +lean_dec(x_1); +x_963 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_963, 0, x_930); +x_964 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__8; +x_965 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_965, 0, x_964); +lean_ctor_set(x_965, 1, x_963); +x_966 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__10; +x_967 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_967, 0, x_965); +lean_ctor_set(x_967, 1, x_966); +x_968 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_967, x_4, x_5, x_6, x_7, x_946); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_969 = !lean_is_exclusive(x_968); +if (x_969 == 0) +{ +return x_968; +} +else +{ +lean_object* x_970; lean_object* x_971; lean_object* x_972; +x_970 = lean_ctor_get(x_968, 0); +x_971 = lean_ctor_get(x_968, 1); +lean_inc(x_971); +lean_inc(x_970); +lean_dec(x_968); +x_972 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_972, 0, x_970); +lean_ctor_set(x_972, 1, x_971); +return x_972; +} +} +else +{ +lean_object* x_973; lean_object* x_974; +x_973 = lean_box(0); +x_974 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(x_1, x_959, x_2, x_942, x_938, x_936, x_930, x_10, x_943, x_973, x_4, x_5, x_6, x_7, x_946); +return x_974; +} +} } } } else { -uint8_t x_1026; -lean_dec(x_956); -lean_dec(x_954); -lean_dec(x_953); -lean_dec(x_952); -lean_dec(x_948); +uint8_t x_1002; +lean_dec(x_942); +lean_dec(x_940); +lean_dec(x_938); +lean_dec(x_936); +lean_dec(x_935); +lean_dec(x_934); +lean_dec(x_930); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_1026 = !lean_is_exclusive(x_957); -if (x_1026 == 0) +x_1002 = !lean_is_exclusive(x_944); +if (x_1002 == 0) { -return x_957; +return x_944; } else { -lean_object* x_1027; lean_object* x_1028; lean_object* x_1029; -x_1027 = lean_ctor_get(x_957, 0); -x_1028 = lean_ctor_get(x_957, 1); -lean_inc(x_1028); -lean_inc(x_1027); -lean_dec(x_957); -x_1029 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_1029, 0, x_1027); -lean_ctor_set(x_1029, 1, x_1028); -return x_1029; +lean_object* x_1003; lean_object* x_1004; lean_object* x_1005; +x_1003 = lean_ctor_get(x_944, 0); +x_1004 = lean_ctor_get(x_944, 1); +lean_inc(x_1004); +lean_inc(x_1003); +lean_dec(x_944); +x_1005 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_1005, 0, x_1003); +lean_ctor_set(x_1005, 1, x_1004); +return x_1005; } } } else { -lean_object* x_1030; lean_object* x_1031; lean_object* x_1032; lean_object* x_1033; -lean_dec(x_954); -lean_dec(x_953); -lean_dec(x_952); -lean_dec(x_948); -x_1030 = lean_ctor_get(x_955, 0); -lean_inc(x_1030); -lean_dec(x_955); -x_1031 = lean_box(0); -x_1032 = l_Lean_mkConst(x_1030, x_1031); +uint8_t x_1006; +lean_dec(x_938); +lean_dec(x_936); +lean_dec(x_935); +lean_dec(x_934); +lean_dec(x_930); +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_1006 = !lean_is_exclusive(x_939); +if (x_1006 == 0) +{ +return x_939; +} +else +{ +lean_object* x_1007; lean_object* x_1008; lean_object* x_1009; +x_1007 = lean_ctor_get(x_939, 0); +x_1008 = lean_ctor_get(x_939, 1); +lean_inc(x_1008); +lean_inc(x_1007); +lean_dec(x_939); +x_1009 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_1009, 0, x_1007); +lean_ctor_set(x_1009, 1, x_1008); +return x_1009; +} +} +} +else +{ +lean_object* x_1010; lean_object* x_1011; lean_object* x_1012; lean_object* x_1013; +lean_dec(x_936); +lean_dec(x_935); +lean_dec(x_934); +lean_dec(x_930); +x_1010 = lean_ctor_get(x_937, 0); +lean_inc(x_1010); +lean_dec(x_937); +x_1011 = lean_box(0); +x_1012 = l_Lean_mkConst(x_1010, x_1011); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_1032); -x_1033 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_1032, x_4, x_5, x_6, x_7, x_951); -if (lean_obj_tag(x_1033) == 0) +lean_inc(x_1012); +x_1013 = l_Lean_Meta_inferType___at___private_Lean_Meta_InferType_0__Lean_Meta_inferAppType___spec__1(x_1012, x_4, x_5, x_6, x_7, x_933); +if (lean_obj_tag(x_1013) == 0) { -lean_object* x_1034; lean_object* x_1035; lean_object* x_1036; lean_object* x_1037; lean_object* x_1038; -x_1034 = lean_ctor_get(x_1033, 0); -lean_inc(x_1034); -x_1035 = lean_ctor_get(x_1033, 1); -lean_inc(x_1035); -lean_dec(x_1033); -x_1036 = lean_box(x_2); -x_1037 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__51___boxed), 11, 4); -lean_closure_set(x_1037, 0, x_10); -lean_closure_set(x_1037, 1, x_1); -lean_closure_set(x_1037, 2, x_1036); -lean_closure_set(x_1037, 3, x_1032); -x_1038 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_1034, x_1037, x_4, x_5, x_6, x_7, x_1035); -return x_1038; +lean_object* x_1014; lean_object* x_1015; lean_object* x_1016; lean_object* x_1017; lean_object* x_1018; +x_1014 = lean_ctor_get(x_1013, 0); +lean_inc(x_1014); +x_1015 = lean_ctor_get(x_1013, 1); +lean_inc(x_1015); +lean_dec(x_1013); +x_1016 = lean_box(x_2); +x_1017 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__51___boxed), 11, 4); +lean_closure_set(x_1017, 0, x_10); +lean_closure_set(x_1017, 1, x_1); +lean_closure_set(x_1017, 2, x_1016); +lean_closure_set(x_1017, 3, x_1012); +x_1018 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__3___rarg(x_1014, x_1017, x_4, x_5, x_6, x_7, x_1015); +return x_1018; } else { -uint8_t x_1039; -lean_dec(x_1032); +uint8_t x_1019; +lean_dec(x_1012); lean_dec(x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_1039 = !lean_is_exclusive(x_1033); -if (x_1039 == 0) +x_1019 = !lean_is_exclusive(x_1013); +if (x_1019 == 0) { -return x_1033; +return x_1013; } else { -lean_object* x_1040; lean_object* x_1041; lean_object* x_1042; -x_1040 = lean_ctor_get(x_1033, 0); -x_1041 = lean_ctor_get(x_1033, 1); -lean_inc(x_1041); -lean_inc(x_1040); -lean_dec(x_1033); -x_1042 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_1042, 0, x_1040); -lean_ctor_set(x_1042, 1, x_1041); -return x_1042; +lean_object* x_1020; lean_object* x_1021; lean_object* x_1022; +x_1020 = lean_ctor_get(x_1013, 0); +x_1021 = lean_ctor_get(x_1013, 1); +lean_inc(x_1021); +lean_inc(x_1020); +lean_dec(x_1013); +x_1022 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_1022, 0, x_1020); +lean_ctor_set(x_1022, 1, x_1021); +return x_1022; } } } } else { -lean_object* x_1043; lean_object* x_1044; lean_object* x_1045; lean_object* x_1046; lean_object* x_1047; lean_object* x_1048; -lean_dec(x_947); +lean_object* x_1023; lean_object* x_1024; lean_object* x_1025; lean_object* x_1026; lean_object* x_1027; lean_object* x_1028; +lean_dec(x_929); lean_dec(x_1); -x_1043 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_1043, 0, x_10); -x_1044 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; -x_1045 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_1045, 0, x_1044); -lean_ctor_set(x_1045, 1, x_1043); -x_1046 = l_Lean_KernelException_toMessageData___closed__3; -x_1047 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_1047, 0, x_1045); -lean_ctor_set(x_1047, 1, x_1046); -x_1048 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_1047, x_4, x_5, x_6, x_7, x_946); +x_1023 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_1023, 0, x_10); +x_1024 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__2; +x_1025 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_1025, 0, x_1024); +lean_ctor_set(x_1025, 1, x_1023); +x_1026 = l_Lean_KernelException_toMessageData___closed__3; +x_1027 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_1027, 0, x_1025); +lean_ctor_set(x_1027, 1, x_1026); +x_1028 = l_Lean_throwError___at_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1018____spec__1___rarg(x_1027, x_4, x_5, x_6, x_7, x_928); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -return x_1048; +return x_1028; } } } } else { -uint8_t x_1049; +uint8_t x_1029; lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_1049 = !lean_is_exclusive(x_9); -if (x_1049 == 0) +x_1029 = !lean_is_exclusive(x_9); +if (x_1029 == 0) { return x_9; } else { -lean_object* x_1050; lean_object* x_1051; lean_object* x_1052; -x_1050 = lean_ctor_get(x_9, 0); -x_1051 = lean_ctor_get(x_9, 1); -lean_inc(x_1051); -lean_inc(x_1050); +lean_object* x_1030; lean_object* x_1031; lean_object* x_1032; +x_1030 = lean_ctor_get(x_9, 0); +x_1031 = lean_ctor_get(x_9, 1); +lean_inc(x_1031); +lean_inc(x_1030); lean_dec(x_9); -x_1052 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_1052, 0, x_1050); -lean_ctor_set(x_1052, 1, x_1051); -return x_1052; +x_1032 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_1032, 0, x_1030); +lean_ctor_set(x_1032, 1, x_1031); +return x_1032; } } } @@ -22570,44 +21491,32 @@ x_2 = lean_alloc_closure((void*)(l_Lean_ParserCompiler_compileParserExpr___rarg_ return x_2; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___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, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -lean_object* x_10; -x_10 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); lean_dec(x_3); +x_12 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__2___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); lean_dec(x_2); -return x_10; +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; -} -} -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { -_start: -{ -size_t x_12; size_t x_13; lean_object* x_14; -x_12 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__4___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__3___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__5___rarg___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, lean_object* x_7) { @@ -22673,30 +21582,32 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__8___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__9___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__10___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -22725,30 +21636,32 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__12___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__13___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__14___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -22777,30 +21690,32 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__16___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__17___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__18___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -22829,30 +21744,32 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__20___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__21___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__22___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -22892,30 +21809,32 @@ lean_dec(x_4); return x_8; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__25___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__26___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__27___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -22944,30 +21863,32 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__29___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__30___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__31___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -22996,30 +21917,32 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__33___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__34___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__35___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -23048,30 +21971,32 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__37___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__39___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -23100,30 +22025,32 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__41___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } -lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { -size_t x_12; size_t x_13; lean_object* x_14; +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); x_12 = lean_unbox_usize(x_4); lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -return x_14; +x_13 = l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__42___rarg(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +lean_dec(x_1); +return x_13; } } lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compileParserExpr___spec__43___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { @@ -23152,14 +22079,15 @@ lean_dec(x_3); return x_15; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___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, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___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, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23184,15 +22112,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__3(x_1, x_2, x_3, return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__4(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23207,14 +22135,15 @@ lean_dec(x_5); return x_13; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__6(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__7___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23239,15 +22168,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__8(x_1, x_2, x_3, return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__9(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__10___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23262,14 +22191,15 @@ lean_dec(x_5); return x_13; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__11(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__12___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23294,15 +22224,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__13(x_1, x_2, x_3 return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__14(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__15___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23317,14 +22247,15 @@ lean_dec(x_5); return x_13; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__16(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__17___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23349,15 +22280,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__18(x_1, x_2, x_3 return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__19(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__20___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23372,14 +22303,15 @@ lean_dec(x_5); return x_13; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__21(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__22___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23404,15 +22336,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__23(x_1, x_2, x_3 return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__24(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__25___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23437,14 +22369,15 @@ x_11 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__26(x_1, x_10, x_ return x_11; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__27(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__28___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23469,15 +22402,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__29(x_1, x_2, x_3 return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__30(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__31___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23492,14 +22425,15 @@ lean_dec(x_5); return x_13; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__32(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__33___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23524,15 +22458,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__34(x_1, x_2, x_3 return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__36___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23547,14 +22481,15 @@ lean_dec(x_5); return x_13; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__37(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__38___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23579,15 +22514,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__39(x_1, x_2, x_3 return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__40(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__41___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23602,14 +22537,15 @@ lean_dec(x_5); return x_13; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__42(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__43___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23634,15 +22570,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__44(x_1, x_2, x_3 return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__46___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -23657,14 +22593,15 @@ lean_dec(x_5); return x_13; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_4); +lean_object* x_9; +x_9 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_3); -return x_10; +lean_dec(x_2); +lean_dec(x_1); +return x_9; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__48___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { @@ -23689,15 +22626,15 @@ x_16 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__49(x_1, x_2, x_3 return x_16; } } -lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* 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) { _start: { -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_3); +uint8_t x_16; lean_object* x_17; +x_16 = lean_unbox(x_3); lean_dec(x_3); -x_18 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(x_1, x_2, x_17, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_11); -return x_18; +x_17 = l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__50(x_1, x_2, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_10); +return x_17; } } lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__51___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { diff --git a/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c b/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c index 931919addf..e578f7ed1f 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c @@ -230,7 +230,6 @@ lean_object* lean_get_projection_info(lean_object*, lean_object*); lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_unresolveOpenDecls_match__1(lean_object*); extern lean_object* l_Lean_throwUnknownConstant___rarg___closed__2; lean_object* l_Lean_PrettyPrinter_Delaborator_delabLit___closed__2; -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; lean_object* l_Lean_PrettyPrinter_Delaborator_delabOfScientific_match__1(lean_object*); lean_object* l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppImplicit_match__1(lean_object*); @@ -252,6 +251,7 @@ lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabOfScientific(lea lean_object* l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_hasIdent___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabMData_match__3(lean_object*); lean_object* l_Lean_Meta_forallTelescope___at___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabPatterns___spec__4(lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__3___closed__1; lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabDo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -307,7 +307,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_delabCoe___closed__2; lean_object* l_Lean_PrettyPrinter_Delaborator_delabCoe___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit_match__1(lean_object*); extern lean_object* l_Lean_myMacro____x40_Init_NotationExtra___hyg_1127____closed__29; -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__4; extern lean_object* l_myMacro____x40_Init_Notation___hyg_9203____closed__17; lean_object* l_Lean_PrettyPrinter_Delaborator_delabMData___closed__1; lean_object* l_Lean_getConstInfo___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -401,6 +400,7 @@ lean_object* l_Lean_getStructureFields(lean_object*, lean_object*); lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_shouldGroupWithNext___closed__2; lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__2___closed__3; lean_object* lean_array_to_list(lean_object*, lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__4; lean_object* l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Name_isAtomic(lean_object*); extern lean_object* l_Lean_PrettyPrinter_Delaborator_getExprKind___closed__4; @@ -674,7 +674,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppImplicit_match__1___rarg(l lean_object* l_Lean_PrettyPrinter_Delaborator_delabStructureInstance_match__2(lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabAppWithUnexpander___closed__1; lean_object* l_Lean_PrettyPrinter_Delaborator_AppMatchState_discrs___default; -lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabProj(lean_object*); lean_object* l_Array_mapIdxM_map___at___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabPatterns___spec__3___closed__2; extern lean_object* l_Lean_Parser_Term_inaccessible___elambda__1___closed__6; @@ -717,6 +716,7 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_delabSort_match__2___rarg(lean_obj lean_object* l_ReaderT_pure___at_Lean_PrettyPrinter_Delaborator_instMonadQuotationDelabM___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE_match__1(lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabBinders___closed__1; uint8_t l_List_isEmpty___rarg(lean_object*); lean_object* lean_local_ctx_find(lean_object*, lean_object*); @@ -738,6 +738,7 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___lambda__3(lean_ lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__3___closed__11; lean_object* l_Lean_PrettyPrinter_Delaborator_delabOfScientific(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabProj(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch_match__1(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppWithUnexpander(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -746,7 +747,6 @@ lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabStr lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___closed__1; lean_object* l_Lean_PrettyPrinter_Delaborator_delabForall___lambda__1___closed__1; lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_shouldGroupWithNext_match__1(lean_object*); -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; lean_object* l_Lean_Expr_isConstructorApp_x3f(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabStructureInstance_match__1(lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); @@ -13808,7 +13808,7 @@ if (x_29 == 0) lean_object* x_30; lean_object* x_31; lean_dec(x_26); lean_dec(x_14); -x_30 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_1); +x_30 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_1); lean_dec(x_1); x_31 = l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__1(x_2, x_30, x_3, x_4, x_5, x_6, x_7, x_24); lean_dec(x_7); @@ -13934,7 +13934,7 @@ case 3: 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_dec(x_26); lean_dec(x_18); -x_81 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_1); +x_81 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_1); lean_dec(x_1); x_82 = l_Array_empty___closed__1; x_83 = lean_array_push(x_82, x_81); @@ -13944,10 +13944,10 @@ 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_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_88 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_89 = lean_array_push(x_88, x_87); x_90 = lean_array_push(x_89, x_14); -x_91 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_91 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_92 = lean_array_push(x_90, x_91); x_93 = l_Lean_Parser_Term_instBinder___elambda__1___closed__2; x_94 = lean_alloc_ctor(1, 2, 0); @@ -14171,7 +14171,7 @@ if (x_130 == 0) lean_object* x_131; lean_object* x_132; lean_dec(x_127); lean_dec(x_14); -x_131 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_1); +x_131 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_1); lean_dec(x_1); x_132 = l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__1(x_2, x_131, x_3, x_4, x_5, x_6, x_7, x_125); lean_dec(x_7); @@ -14297,7 +14297,7 @@ case 3: 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_dec(x_127); lean_dec(x_18); -x_182 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_1); +x_182 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_1); lean_dec(x_1); x_183 = l_Array_empty___closed__1; x_184 = lean_array_push(x_183, x_182); @@ -14307,10 +14307,10 @@ x_187 = l_Lean_nullKind___closed__2; x_188 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_188, 0, x_187); lean_ctor_set(x_188, 1, x_186); -x_189 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_189 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_190 = lean_array_push(x_189, x_188); x_191 = lean_array_push(x_190, x_14); -x_192 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_192 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_193 = lean_array_push(x_191, x_192); x_194 = l_Lean_Parser_Term_instBinder___elambda__1___closed__2; x_195 = lean_alloc_ctor(1, 2, 0); @@ -14961,7 +14961,7 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_88 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_1); +x_88 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_1); x_89 = l_Array_empty___closed__1; x_90 = lean_array_push(x_89, x_88); x_91 = l_myMacro____x40_Init_Notation___hyg_11225____closed__10; @@ -14970,10 +14970,10 @@ x_93 = l_Lean_nullKind___closed__2; x_94 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_94, 0, x_93); lean_ctor_set(x_94, 1, x_92); -x_95 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_95 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_96 = lean_array_push(x_95, x_94); x_97 = lean_array_push(x_96, x_15); -x_98 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_98 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_99 = lean_array_push(x_97, x_98); x_100 = l_Lean_Parser_Term_instBinder___elambda__1___closed__2; x_101 = lean_alloc_ctor(1, 2, 0); @@ -15301,7 +15301,7 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_195 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_1); +x_195 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_1); x_196 = l_Array_empty___closed__1; x_197 = lean_array_push(x_196, x_195); x_198 = l_myMacro____x40_Init_Notation___hyg_11225____closed__10; @@ -15310,10 +15310,10 @@ x_200 = l_Lean_nullKind___closed__2; x_201 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_201, 0, x_200); lean_ctor_set(x_201, 1, x_199); -x_202 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_202 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_203 = lean_array_push(x_202, x_201); x_204 = lean_array_push(x_203, x_121); -x_205 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_205 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_206 = lean_array_push(x_204, x_205); x_207 = l_Lean_Parser_Term_instBinder___elambda__1___closed__2; x_208 = lean_alloc_ctor(1, 2, 0); @@ -20393,7 +20393,7 @@ static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabNil___lambda__1_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_1 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_2 = l_myMacro____x40_Init_Notation___hyg_9203____closed__20; x_3 = lean_array_push(x_1, x_2); return x_3; @@ -20404,7 +20404,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_PrettyPrinter_Delaborator_delabNil___lambda__1___closed__1; -x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_3 = lean_array_push(x_1, x_2); return x_3; } @@ -20682,9 +20682,9 @@ x_49 = lean_array_push(x_48, x_12); x_50 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_50, 0, x_40); lean_ctor_set(x_50, 1, x_49); -x_51 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_51 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_52 = lean_array_push(x_51, x_50); -x_53 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_53 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_54 = lean_array_push(x_52, x_53); x_55 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_55, 0, x_19); @@ -20710,9 +20710,9 @@ x_31 = l_Lean_nullKind___closed__2; x_32 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_32, 0, x_31); lean_ctor_set(x_32, 1, x_30); -x_33 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_33 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_34 = lean_array_push(x_33, x_32); -x_35 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_35 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_36 = lean_array_push(x_34, x_35); x_37 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_37, 0, x_19); @@ -20832,9 +20832,9 @@ x_97 = lean_array_push(x_96, x_60); x_98 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_98, 0, x_88); lean_ctor_set(x_98, 1, x_97); -x_99 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_99 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_100 = lean_array_push(x_99, x_98); -x_101 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_101 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_102 = lean_array_push(x_100, x_101); x_103 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_103, 0, x_67); @@ -20861,9 +20861,9 @@ x_79 = l_Lean_nullKind___closed__2; x_80 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_80, 0, x_79); lean_ctor_set(x_80, 1, x_78); -x_81 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__9; +x_81 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__9; x_82 = lean_array_push(x_81, x_80); -x_83 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_83 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_84 = lean_array_push(x_82, x_83); x_85 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_85, 0, x_67); @@ -21110,7 +21110,7 @@ lean_ctor_set(x_23, 0, x_22); lean_ctor_set(x_23, 1, x_21); x_24 = l_Lean_PrettyPrinter_Delaborator_delabListToArray___lambda__1___closed__2; x_25 = lean_array_push(x_24, x_23); -x_26 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_26 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_27 = lean_array_push(x_25, x_26); x_28 = l_term_x23_x5b___x2c_x5d___closed__2; x_29 = lean_alloc_ctor(1, 2, 0); @@ -21155,7 +21155,7 @@ lean_ctor_set(x_41, 0, x_40); lean_ctor_set(x_41, 1, x_39); x_42 = l_Lean_PrettyPrinter_Delaborator_delabListToArray___lambda__1___closed__2; x_43 = lean_array_push(x_42, x_41); -x_44 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__10; +x_44 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__10; x_45 = lean_array_push(x_43, x_44); x_46 = l_term_x23_x5b___x2c_x5d___closed__2; x_47 = lean_alloc_ctor(1, 2, 0); @@ -21237,7 +21237,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabNil___closed__1; -x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__4; +x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__4; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } diff --git a/stage0/stdlib/Lean/PrettyPrinter/Formatter.c b/stage0/stdlib/Lean/PrettyPrinter/Formatter.c index cb24728480..96848f0f6f 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Formatter.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Formatter.c @@ -441,7 +441,6 @@ lean_object* l_Lean_PrettyPrinter_Formatter_instMonadTraverserFormatterM___close lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter_match__1(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_withoutInfo_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_pop(lean_object*); -lean_object* l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_concat___lambda__1___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_throwError___at_Lean_Core_withIncRecDepth___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -490,6 +489,7 @@ lean_object* l_Lean_PrettyPrinter_Formatter_initFn____x40_Lean_PrettyPrinter_For lean_object* l_Lean_PrettyPrinter_Formatter_symbol_formatter___closed__11; extern lean_object* l_Lean_PrettyPrinter_backtrackExceptionId; lean_object* l_Lean_PrettyPrinter_Formatter_suppressInsideQuot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_2502____closed__2; lean_object* l_Lean_Syntax_Traverser_left(lean_object*); lean_object* l_ReaderT_map___at_Lean_PrettyPrinter_Formatter_instMonadTraverserFormatterM___spec__1(lean_object*, lean_object*); @@ -3797,12 +3797,12 @@ lean_inc(x_12); lean_dec(x_10); x_13 = lean_ctor_get(x_12, 1); lean_inc(x_13); -x_14 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_13); +x_14 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_13); lean_dec(x_13); x_15 = lean_ctor_get(x_12, 2); lean_inc(x_15); lean_dec(x_12); -x_16 = l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(x_15); +x_16 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_15); lean_dec(x_15); x_17 = lean_nat_sub(x_16, x_1); lean_dec(x_16); @@ -3843,12 +3843,12 @@ lean_inc(x_13); lean_dec(x_11); x_14 = lean_ctor_get(x_13, 1); lean_inc(x_14); -x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_14); +x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_14); lean_dec(x_14); x_16 = lean_ctor_get(x_13, 2); lean_inc(x_16); lean_dec(x_13); -x_17 = l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(x_16); +x_17 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_16); lean_dec(x_16); x_18 = lean_nat_sub(x_17, x_1); lean_dec(x_17); diff --git a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c index 9789f106d7..7c6b750bd0 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c @@ -160,6 +160,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer(lean_objec lean_object* l_Lean_PrettyPrinter_Parenthesizer_errorAtSavedPos_parenthesizer___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_instMonadQuotationParenthesizerM___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back_x3f___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkPrec_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_unicodeSymbol_parenthesizer___boxed(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_sepByNoAntiquot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -204,7 +205,6 @@ lean_object* l_Lean_Syntax_Traverser_setCur(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Tactic_intro___closed__12; lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_term___x24_______closed__4; -lean_object* l_Lean_Syntax_Traverser_idxsBack(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__1; @@ -482,7 +482,6 @@ lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_lookahead_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_IO_mkRef___at_Lean_PrettyPrinter_Parenthesizer_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_2401____spec__1(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__4___closed__1; -lean_object* l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(lean_object*); lean_object* l_Lean_PrettyPrinter_mkCombinatorParenthesizerAttribute(lean_object*); lean_object* l_Lean_throwError___at_Lean_Core_withIncRecDepth___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); @@ -541,6 +540,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_instMonadQuotationParenthesizerM lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__6; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGt_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__1; lean_object* l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___spec__1(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_2466____closed__14; @@ -3340,33 +3340,69 @@ x_7 = lean_st_ref_get(x_1, x_6); x_8 = !lean_is_exclusive(x_7); if (x_8 == 0) { -lean_object* x_9; lean_object* x_10; lean_object* x_11; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_9 = lean_ctor_get(x_7, 0); x_10 = lean_ctor_get(x_9, 0); lean_inc(x_10); lean_dec(x_9); -x_11 = l_Lean_Syntax_Traverser_idxsBack(x_10); +x_11 = lean_ctor_get(x_10, 2); +lean_inc(x_11); lean_dec(x_10); -lean_ctor_set(x_7, 0, x_11); +x_12 = l_Array_back_x3f___rarg(x_11); +lean_dec(x_11); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; +x_13 = lean_unsigned_to_nat(0u); +lean_ctor_set(x_7, 0, x_13); return x_7; } else { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_12 = lean_ctor_get(x_7, 0); -x_13 = lean_ctor_get(x_7, 1); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_7); +lean_object* x_14; x_14 = lean_ctor_get(x_12, 0); lean_inc(x_14); lean_dec(x_12); -x_15 = l_Lean_Syntax_Traverser_idxsBack(x_14); -lean_dec(x_14); -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_13); -return x_16; +lean_ctor_set(x_7, 0, x_14); +return x_7; +} +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_ctor_get(x_7, 0); +x_16 = lean_ctor_get(x_7, 1); +lean_inc(x_16); +lean_inc(x_15); +lean_dec(x_7); +x_17 = lean_ctor_get(x_15, 0); +lean_inc(x_17); +lean_dec(x_15); +x_18 = lean_ctor_get(x_17, 2); +lean_inc(x_18); +lean_dec(x_17); +x_19 = l_Array_back_x3f___rarg(x_18); +lean_dec(x_18); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; +x_20 = lean_unsigned_to_nat(0u); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_16); +return x_21; +} +else +{ +lean_object* x_22; lean_object* x_23; +x_22 = lean_ctor_get(x_19, 0); +lean_inc(x_22); +lean_dec(x_19); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_16); +return x_23; +} } } } @@ -7342,12 +7378,12 @@ lean_inc(x_13); lean_dec(x_11); x_14 = lean_ctor_get(x_13, 1); lean_inc(x_14); -x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_14); +x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_14); lean_dec(x_14); x_16 = lean_ctor_get(x_13, 2); lean_inc(x_16); lean_dec(x_13); -x_17 = l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(x_16); +x_17 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_16); lean_dec(x_16); x_18 = lean_nat_sub(x_17, x_1); lean_dec(x_17); @@ -7388,12 +7424,12 @@ lean_inc(x_13); lean_dec(x_11); x_14 = lean_ctor_get(x_13, 1); lean_inc(x_14); -x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_14); +x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_14); lean_dec(x_14); x_16 = lean_ctor_get(x_13, 2); lean_inc(x_16); lean_dec(x_13); -x_17 = l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(x_16); +x_17 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_16); lean_dec(x_16); x_18 = lean_nat_sub(x_17, x_1); lean_dec(x_17); diff --git a/stage0/stdlib/Lean/Server/ServerBin.c b/stage0/stdlib/Lean/Server/ServerBin.c deleted file mode 100644 index edda8e79fa..0000000000 --- a/stage0/stdlib/Lean/Server/ServerBin.c +++ /dev/null @@ -1,330 +0,0 @@ -// Lean compiler output -// Module: Lean.Server.ServerBin -// Imports: Init Init.System.IO Lean.Server -#include -#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* lean_get_stdin(lean_object*); -lean_object* lean_io_error_to_string(lean_object*); -lean_object* _lean_main(lean_object*, lean_object*); -lean_object* lean_get_stderr(lean_object*); -lean_object* l_main___boxed__const__1; -lean_object* l_IO_getStdin___at_main___spec__1(lean_object*); -lean_object* lean_init_search_path(lean_object*, lean_object*); -lean_object* lean_get_stdout(lean_object*); -lean_object* l_IO_FS_Stream_putStrLn___at_Lean_Server_Test_runWithInputFile___spec__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Server_initAndRunServer(lean_object*, lean_object*, lean_object*); -lean_object* l_IO_getStdin___at_main___spec__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_get_stdin(x_1); -return x_2; -} -} -static lean_object* _init_l_main___boxed__const__1() { -_start: -{ -uint32_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_uint32(x_1); -return x_2; -} -} -lean_object* _lean_main(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -lean_dec(x_1); -x_3 = lean_get_stdin(x_2); -if (lean_obj_tag(x_3) == 0) -{ -lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_4 = lean_ctor_get(x_3, 0); -lean_inc(x_4); -x_5 = lean_ctor_get(x_3, 1); -lean_inc(x_5); -lean_dec(x_3); -x_6 = lean_get_stdout(x_5); -if (lean_obj_tag(x_6) == 0) -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; -x_7 = lean_ctor_get(x_6, 0); -lean_inc(x_7); -x_8 = lean_ctor_get(x_6, 1); -lean_inc(x_8); -lean_dec(x_6); -x_9 = lean_get_stderr(x_8); -if (lean_obj_tag(x_9) == 0) -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -x_12 = lean_box(0); -x_13 = lean_init_search_path(x_12, x_11); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_13, 1); -lean_inc(x_14); -lean_dec(x_13); -x_15 = l_Lean_Server_initAndRunServer(x_4, x_7, x_14); -if (lean_obj_tag(x_15) == 0) -{ -uint8_t x_16; -lean_dec(x_10); -x_16 = !lean_is_exclusive(x_15); -if (x_16 == 0) -{ -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_15, 0); -lean_dec(x_17); -x_18 = l_main___boxed__const__1; -lean_ctor_set(x_15, 0, x_18); -return x_15; -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_19 = lean_ctor_get(x_15, 1); -lean_inc(x_19); -lean_dec(x_15); -x_20 = l_main___boxed__const__1; -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_19); -return x_21; -} -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_22 = lean_ctor_get(x_15, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_15, 1); -lean_inc(x_23); -lean_dec(x_15); -x_24 = lean_io_error_to_string(x_22); -x_25 = l_IO_FS_Stream_putStrLn___at_Lean_Server_Test_runWithInputFile___spec__1(x_10, x_24, x_23); -if (lean_obj_tag(x_25) == 0) -{ -uint8_t x_26; -x_26 = !lean_is_exclusive(x_25); -if (x_26 == 0) -{ -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_25, 0); -lean_dec(x_27); -x_28 = l_main___boxed__const__1; -lean_ctor_set(x_25, 0, x_28); -return x_25; -} -else -{ -lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_29 = lean_ctor_get(x_25, 1); -lean_inc(x_29); -lean_dec(x_25); -x_30 = l_main___boxed__const__1; -x_31 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_31, 1, x_29); -return x_31; -} -} -else -{ -uint8_t x_32; -x_32 = !lean_is_exclusive(x_25); -if (x_32 == 0) -{ -return x_25; -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_33 = lean_ctor_get(x_25, 0); -x_34 = lean_ctor_get(x_25, 1); -lean_inc(x_34); -lean_inc(x_33); -lean_dec(x_25); -x_35 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_35, 0, x_33); -lean_ctor_set(x_35, 1, x_34); -return x_35; -} -} -} -} -else -{ -uint8_t x_36; -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_4); -x_36 = !lean_is_exclusive(x_13); -if (x_36 == 0) -{ -return x_13; -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_37 = lean_ctor_get(x_13, 0); -x_38 = lean_ctor_get(x_13, 1); -lean_inc(x_38); -lean_inc(x_37); -lean_dec(x_13); -x_39 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_39, 0, x_37); -lean_ctor_set(x_39, 1, x_38); -return x_39; -} -} -} -else -{ -uint8_t x_40; -lean_dec(x_7); -lean_dec(x_4); -x_40 = !lean_is_exclusive(x_9); -if (x_40 == 0) -{ -return x_9; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_9, 0); -x_42 = lean_ctor_get(x_9, 1); -lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_9); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -return x_43; -} -} -} -else -{ -uint8_t x_44; -lean_dec(x_4); -x_44 = !lean_is_exclusive(x_6); -if (x_44 == 0) -{ -return x_6; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_6, 0); -x_46 = lean_ctor_get(x_6, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_6); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -else -{ -uint8_t x_48; -x_48 = !lean_is_exclusive(x_3); -if (x_48 == 0) -{ -return x_3; -} -else -{ -lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_49 = lean_ctor_get(x_3, 0); -x_50 = lean_ctor_get(x_3, 1); -lean_inc(x_50); -lean_inc(x_49); -lean_dec(x_3); -x_51 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_51, 0, x_49); -lean_ctor_set(x_51, 1, x_50); -return x_51; -} -} -} -} -lean_object* initialize_Init(lean_object*); -lean_object* initialize_Init_System_IO(lean_object*); -lean_object* initialize_Lean_Server(lean_object*); -static bool _G_initialized = false; -lean_object* initialize_Lean_Server_ServerBin(lean_object* w) { -lean_object * res; -if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); -_G_initialized = true; -res = initialize_Init(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Init_System_IO(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Lean_Server(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -l_main___boxed__const__1 = _init_l_main___boxed__const__1(); -lean_mark_persistent(l_main___boxed__const__1); -return lean_io_result_mk_ok(lean_box(0)); -} -void lean_initialize(); - - #if defined(WIN32) || defined(_WIN32) - #include - #endif - - int main(int argc, char ** argv) { - #if defined(WIN32) || defined(_WIN32) - SetErrorMode(SEM_FAILCRITICALERRORS); - #endif - lean_object* in; lean_object* res; -lean_initialize(); -res = initialize_Lean_Server_ServerBin(lean_io_mk_world()); -lean_io_mark_end_initialization(); -if (lean_io_result_is_ok(res)) { -lean_dec_ref(res); -lean_init_task_manager(); -in = lean_box(0); -int i = argc; -while (i > 1) { - lean_object* n; - i--; - n = lean_alloc_ctor(1,2,0); lean_ctor_set(n, 0, lean_mk_string(argv[i])); lean_ctor_set(n, 1, in); - in = n; -} -res = _lean_main(in, lean_io_mk_world()); -} -if (lean_io_result_is_ok(res)) { - int ret = lean_unbox(lean_io_result_get_value(res)); - lean_dec_ref(res); - return ret; -} else { - lean_io_result_show_error(res); - lean_dec_ref(res); - return 1; -} -} -#ifdef __cplusplus -} -#endif diff --git a/stage0/stdlib/Lean/Syntax.c b/stage0/stdlib/Lean/Syntax.c index a669be1c3c..22975d49df 100644 --- a/stage0/stdlib/Lean/Syntax.c +++ b/stage0/stdlib/Lean/Syntax.c @@ -106,6 +106,7 @@ lean_object* l_Lean_Syntax_getAntiquotTerm___boxed(lean_object*); uint8_t l_USize_decLt(size_t, size_t); extern lean_object* l_term___x24_______closed__5; lean_object* l_Lean_Syntax_MonadTraverser_goDown(lean_object*); +lean_object* l_Array_back_x3f___rarg(lean_object*); lean_object* l_Lean_Syntax_mkAntiquotNode(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); lean_object* l_Lean_Syntax_modifyArgs_match__1(lean_object*); lean_object* l_List_map___at_Lean_Syntax_formatStxAux___spec__4(lean_object*, uint8_t, lean_object*, lean_object*); @@ -136,7 +137,6 @@ lean_object* l_Lean_SyntaxNode_getIdAt(lean_object*, lean_object*); lean_object* l_Lean_Syntax_antiquotKind_x3f___boxed(lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_getIdx___rarg___lambda__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_replaceM___rarg___lambda__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Syntax_Traverser_idxsBack(lean_object*); lean_object* lean_array_fget(lean_object*, lean_object*); lean_object* l_Lean_SyntaxNode_getKind___boxed(lean_object*); lean_object* l_Lean_Syntax_instBEqSyntax; @@ -231,6 +231,7 @@ uint8_t l_Lean_Syntax_isAntiquot(lean_object*); lean_object* l_Lean_Syntax_ifNode___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_mkAntiquotNode___closed__17; lean_object* l_Lean_Syntax_instToStringSyntax; +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2___boxed(lean_object*); lean_object* l_Lean_SyntaxNode_getNumArgs___boxed(lean_object*); lean_object* l_Lean_Format_joinSep___at_Lean_Syntax_formatStxAux___spec__2___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_Format_sbracket___closed__3; @@ -276,7 +277,6 @@ lean_object* l_Lean_Syntax_Traverser_right(lean_object*); lean_object* l_Lean_SyntaxNode_withArgs___rarg(lean_object*, lean_object*); lean_object* lean_panic_fn(lean_object*, lean_object*); uint8_t l_Lean_Syntax_isAntiquotSplicePat(lean_object*); -lean_object* l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1___boxed(lean_object*); lean_object* l_Lean_Syntax_instToStringSyntax___closed__2; lean_object* l_Lean_SyntaxNode_modifyArgs_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Format_paren___closed__2; @@ -307,7 +307,6 @@ extern lean_object* l_myMacro____x40_Init_Notation___hyg_9203____closed__21; lean_object* lean_array_pop(lean_object*); lean_object* l_Lean_Syntax_ifNode_match__1(lean_object*); lean_object* lean_mk_array(lean_object*, lean_object*); -lean_object* l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(lean_object*); uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l___private_Lean_Syntax_0__Lean_Syntax_updateLeadingAux(lean_object*, lean_object*); lean_object* l_Lean_mkListNode(lean_object*); @@ -334,6 +333,7 @@ extern lean_object* l_stx___x2a___closed__3; lean_object* l_Lean_Syntax_getAtomVal_x21(lean_object*); lean_object* l_List_map___at_Lean_Syntax_formatStxAux___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_ifNodeKind___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object*); lean_object* l_Lean_SyntaxNode_getKind_match__1(lean_object*); lean_object* l_Lean_Syntax_Traverser_left(lean_object*); lean_object* l_Lean_Syntax_mkAntiquotNode_match__3(lean_object*); @@ -341,7 +341,6 @@ lean_object* l_Lean_Syntax_isQuot___boxed(lean_object*); lean_object* l_Lean_Syntax_modifyArgs(lean_object*, lean_object*); lean_object* l_Lean_Syntax_structEq_match__1(lean_object*); lean_object* l_Lean_Name_replacePrefix(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Syntax_Traverser_idxsBack___boxed(lean_object*); lean_object* l_Lean_SyntaxNode_getArg(lean_object*, lean_object*); lean_object* l_Lean_Syntax_antiquotKind_x3f(lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_Syntax_rewriteBottomUp___spec__2(lean_object*, size_t, size_t, lean_object*); @@ -5778,58 +5777,6 @@ x_1 = l_Lean_Syntax_instBEqSyntax___closed__1; return x_1; } } -lean_object* l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_2 = lean_array_get_size(x_1); -x_3 = lean_unsigned_to_nat(1u); -x_4 = lean_nat_sub(x_2, x_3); -lean_dec(x_2); -x_5 = l_instInhabitedNat; -x_6 = lean_array_get(x_5, x_1, x_4); -lean_dec(x_4); -return x_6; -} -} -lean_object* l_Lean_Syntax_Traverser_idxsBack(lean_object* x_1) { -_start: -{ -lean_object* x_2; uint8_t x_3; -x_2 = lean_ctor_get(x_1, 2); -x_3 = l_Array_isEmpty___rarg(x_2); -if (x_3 == 0) -{ -lean_object* x_4; -x_4 = l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(x_2); -return x_4; -} -else -{ -lean_object* x_5; -x_5 = lean_unsigned_to_nat(0u); -return x_5; -} -} -} -lean_object* l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Array_back___at_Lean_Syntax_Traverser_idxsBack___spec__1(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_Syntax_Traverser_idxsBack___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_Syntax_Traverser_idxsBack(x_1); -lean_dec(x_1); -return x_2; -} -} lean_object* l_Lean_Syntax_Traverser_fromSyntax(lean_object* x_1) { _start: { @@ -5926,6 +5873,20 @@ x_2 = lean_array_get_size(x_1); x_3 = lean_unsigned_to_nat(1u); x_4 = lean_nat_sub(x_2, x_3); lean_dec(x_2); +x_5 = l_instInhabitedNat; +x_6 = lean_array_get(x_5, x_1, x_4); +lean_dec(x_4); +return x_6; +} +} +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_2 = lean_array_get_size(x_1); +x_3 = lean_unsigned_to_nat(1u); +x_4 = lean_nat_sub(x_2, x_3); +lean_dec(x_2); x_5 = l_Lean_instInhabitedSyntax; x_6 = lean_array_get(x_5, x_1, x_4); lean_dec(x_4); @@ -5949,24 +5910,24 @@ return x_1; } else { -lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_6 = l_Lean_Syntax_Traverser_idxsBack(x_1); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_2); -x_8 = l_Lean_Syntax_getNumArgs(x_7); -x_9 = lean_nat_dec_lt(x_6, x_8); -lean_dec(x_8); -x_10 = lean_array_pop(x_2); -x_11 = lean_ctor_get(x_1, 2); -lean_inc(x_11); -x_12 = lean_array_pop(x_11); -if (x_9 == 0) +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; lean_object* x_11; lean_object* x_12; +x_6 = lean_ctor_get(x_1, 2); +lean_inc(x_6); +x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); +x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_2); +x_9 = l_Lean_Syntax_getNumArgs(x_8); +x_10 = lean_nat_dec_lt(x_7, x_9); +lean_dec(x_9); +x_11 = lean_array_pop(x_2); +x_12 = lean_array_pop(x_6); +if (x_10 == 0) { lean_object* x_13; -lean_dec(x_6); +lean_dec(x_7); lean_dec(x_1); x_13 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_13, 0, x_7); -lean_ctor_set(x_13, 1, x_10); +lean_ctor_set(x_13, 0, x_8); +lean_ctor_set(x_13, 1, x_11); lean_ctor_set(x_13, 2, x_12); return x_13; } @@ -5976,11 +5937,11 @@ lean_object* x_14; lean_object* x_15; lean_object* x_16; x_14 = lean_ctor_get(x_1, 0); lean_inc(x_14); lean_dec(x_1); -x_15 = l_Lean_Syntax_setArg(x_7, x_6, x_14); -lean_dec(x_6); +x_15 = l_Lean_Syntax_setArg(x_8, x_7, x_14); +lean_dec(x_7); x_16 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_10); +lean_ctor_set(x_16, 1, x_11); lean_ctor_set(x_16, 2, x_12); return x_16; } @@ -5996,6 +5957,15 @@ lean_dec(x_1); return x_2; } } +lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__2___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_Lean_Syntax_Traverser_left(lean_object* x_1) { _start: { @@ -6013,16 +5983,19 @@ return x_1; } else { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +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_inc(x_1); x_6 = l_Lean_Syntax_Traverser_up(x_1); -x_7 = l_Lean_Syntax_Traverser_idxsBack(x_1); +x_7 = lean_ctor_get(x_1, 2); +lean_inc(x_7); lean_dec(x_1); -x_8 = lean_unsigned_to_nat(1u); -x_9 = lean_nat_sub(x_7, x_8); +x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_7); lean_dec(x_7); -x_10 = l_Lean_Syntax_Traverser_down(x_6, x_9); -return x_10; +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_sub(x_8, x_9); +lean_dec(x_8); +x_11 = l_Lean_Syntax_Traverser_down(x_6, x_10); +return x_11; } } } @@ -6043,16 +6016,19 @@ return x_1; } else { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +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_inc(x_1); x_6 = l_Lean_Syntax_Traverser_up(x_1); -x_7 = l_Lean_Syntax_Traverser_idxsBack(x_1); +x_7 = lean_ctor_get(x_1, 2); +lean_inc(x_7); lean_dec(x_1); -x_8 = lean_unsigned_to_nat(1u); -x_9 = lean_nat_add(x_7, x_8); +x_8 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_7); lean_dec(x_7); -x_10 = l_Lean_Syntax_Traverser_down(x_6, x_9); -return x_10; +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_add(x_8, x_9); +lean_dec(x_8); +x_11 = l_Lean_Syntax_Traverser_down(x_6, x_10); +return x_11; } } } @@ -6307,9 +6283,24 @@ lean_dec(x_1); x_4 = lean_ctor_get(x_3, 1); lean_inc(x_4); lean_dec(x_3); -x_5 = l_Lean_Syntax_Traverser_idxsBack(x_2); -x_6 = lean_apply_2(x_4, lean_box(0), x_5); -return x_6; +x_5 = lean_ctor_get(x_2, 2); +x_6 = l_Array_back_x3f___rarg(x_5); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; lean_object* x_8; +x_7 = lean_unsigned_to_nat(0u); +x_8 = lean_apply_2(x_4, lean_box(0), x_7); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_6, 0); +lean_inc(x_9); +lean_dec(x_6); +x_10 = lean_apply_2(x_4, lean_box(0), x_9); +return x_10; +} } } lean_object* l_Lean_Syntax_MonadTraverser_getIdx___rarg(lean_object* x_1, lean_object* x_2) { diff --git a/stage0/stdlib/Lean/ToExpr.c b/stage0/stdlib/Lean/ToExpr.c index 66c545103f..f7186415f3 100644 --- a/stage0/stdlib/Lean/ToExpr.c +++ b/stage0/stdlib/Lean/ToExpr.c @@ -80,12 +80,12 @@ lean_object* l_Lean_instToExprList___rarg___closed__1; lean_object* l_Lean_instToExprNat; lean_object* l_Lean_instToExprBool___lambda__1___closed__2; lean_object* l_Lean_List_toExprAux_match__1(lean_object*, lean_object*); -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; lean_object* l_Lean_instToExprName___closed__3; lean_object* l_Lean_List_toExprAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instToExprUnit___lambda__1(lean_object*); lean_object* l_Lean_instToExprProd___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_instQuoteBool___closed__2; +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; lean_object* l_Lean_mkApp(lean_object*, lean_object*); lean_object* l_Lean_instToExprUnit___closed__2; lean_object* l_Lean_List_toExprAux_match__1___rarg(lean_object*, lean_object*, lean_object*); @@ -910,7 +910,7 @@ static lean_object* _init_l_Lean_instToExprArray___rarg___lambda__1___closed__1( _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_1 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_2 = l_Lean_instToExprOption___rarg___lambda__1___closed__1; x_3 = l_Lean_mkConst(x_1, x_2); return x_3; diff --git a/stage0/stdlib/Lean/Util/Recognizers.c b/stage0/stdlib/Lean/Util/Recognizers.c index 5ab842c944..e0f16ac881 100644 --- a/stage0/stdlib/Lean/Util/Recognizers.c +++ b/stage0/stdlib/Lean/Util/Recognizers.c @@ -59,9 +59,9 @@ lean_object* l_Lean_Expr_app3_x3f(lean_object*, lean_object*); lean_object* l_Lean_Expr_heq_x3f___boxed(lean_object*); lean_object* l_Lean_Expr_app1_x3f___boxed(lean_object*, lean_object*); lean_object* l_Lean_Expr_app2_x3f___boxed(lean_object*, lean_object*); -extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); lean_object* l_Lean_Expr_arrow_x3f(lean_object*); +extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; lean_object* l_Lean_Expr_isConstructorApp_x3f_match__3(lean_object*); lean_object* l_Lean_Expr_constructorApp_x3f_match__1(lean_object*); lean_object* l_Lean_Expr_isConstructorApp_x3f___closed__1; @@ -610,7 +610,7 @@ lean_object* l_Lean_Expr_arrayLit_x3f(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; uint8_t x_4; -x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3393____closed__5; +x_2 = l_myMacro____x40_Init_Data_Array_Basic___hyg_3405____closed__5; x_3 = lean_unsigned_to_nat(2u); x_4 = l_Lean_Expr_isAppOfArity(x_1, x_2, x_3); if (x_4 == 0)