diff --git a/stage0/src/Lean/CoreM.lean b/stage0/src/Lean/CoreM.lean index 781c42ed78..46716caeae 100644 --- a/stage0/src/Lean/CoreM.lean +++ b/stage0/src/Lean/CoreM.lean @@ -8,6 +8,7 @@ import Init.Control.StateRef import Lean.Util.RecDepth import Lean.Util.Trace import Lean.Environment +import Lean.Exception import Lean.InternalExceptionId import Lean.Eval @@ -27,22 +28,7 @@ structure Context := (maxRecDepth : Nat := 1000) (ref : Syntax := Syntax.missing) -inductive Exception -| error (ref : Syntax) (msg : MessageData) -| internal (id : InternalExceptionId) - -def Exception.toMessageData : Exception → MessageData -| Exception.error _ msg => msg -| Exception.internal id => id.toString - -def Exception.getRef : Exception → Syntax -| Exception.error ref _ => ref -| Exception.internal _ => Syntax.missing - -instance Exception.inhabited : Inhabited Exception := ⟨Exception.error (arbitrary _) (arbitrary _)⟩ - -abbrev ECoreM (ε : Type) := ReaderT Context $ StateRefT State $ EIO ε -abbrev CoreM := ECoreM Exception +abbrev CoreM := ReaderT Context $ StateRefT State $ EIO Exception instance CoreM.inhabited {α} : Inhabited (CoreM α) := ⟨fun _ _ => throw $ arbitrary _⟩ @@ -52,9 +38,7 @@ ctx ← read; pure ctx.ref @[inline] def liftIOCore {α} (x : IO α) : CoreM α := do ref ← getRef; -adaptExcept - (fun (err : IO.Error) => Exception.error ref (toString err)) - (liftM x : ECoreM IO.Error α) +liftM $ (adaptExcept (fun (err : IO.Error) => Exception.error ref (toString err)) x : EIO Exception α) instance : MonadIO CoreM := { liftIO := @liftIOCore } @@ -171,10 +155,10 @@ traceState.traces.forM $ fun m => liftIO $ IO.println $ format m def resetTraceState : CoreM Unit := modify fun s => { s with traceState := {} } -@[inline] def ECoreM.run {ε α} (x : ECoreM ε α) (ctx : Context) (s : State) : EIO ε (α × State) := +@[inline] def CoreM.run {α} (x : CoreM α) (ctx : Context) (s : State) : EIO Exception (α × State) := (x.run ctx).run s -@[inline] def ECoreM.run' {ε α} (x : ECoreM ε α) (ctx : Context) (s : State) : EIO ε α := +@[inline] def CoreM.run' {α} (x : CoreM α) (ctx : Context) (s : State) : EIO Exception α := Prod.fst <$> x.run ctx s @[inline] def CoreM.toIO {α} (x : CoreM α) (ctx : Context) (s : State) : IO (α × State) := @@ -191,7 +175,7 @@ instance hasEval {α} [MetaHasEval α] : MetaHasEval (CoreM α) := end Core -export Core (CoreM Exception Exception.error Exception.internal) +export Core (CoreM) @[inline] def catchInternalId {α} {m : Type → Type} [MonadExcept Exception m] (id : InternalExceptionId) (x : m α) (h : Exception → m α) : m α := catch x fun ex => match ex with diff --git a/stage0/src/Lean/Elab/App.lean b/stage0/src/Lean/Elab/App.lean index 39072bfe49..3c4f8e24d4 100644 --- a/stage0/src/Lean/Elab/App.lean +++ b/stage0/src/Lean/Elab/App.lean @@ -362,7 +362,7 @@ match eType.getAppFn, lval with | _, _ => throwLValError e eType "invalid field notation, type is not of the form (C ...) where C is a constant" -private partial def resolveLValLoop (e : Expr) (lval : LVal) : Expr → Array Core.Exception → TermElabM LValResolution +private partial def resolveLValLoop (e : Expr) (lval : LVal) : Expr → Array Exception → TermElabM LValResolution | eType, previousExceptions => do eType ← whnfCore eType; tryPostponeIfMVar eType; diff --git a/stage0/src/Lean/Elab/Command.lean b/stage0/src/Lean/Elab/Command.lean index 54f1772721..96cca11882 100644 --- a/stage0/src/Lean/Elab/Command.lean +++ b/stage0/src/Lean/Elab/Command.lean @@ -65,7 +65,7 @@ let scope := s.scopes.head!; def liftCoreM {α} (x : CoreM α) : CommandElabM α := do s ← get; ctx ← read; -let Eα := Except Core.Exception α; +let Eα := Except Exception α; let x : CoreM Eα := catch (do a ← x; pure $ Except.ok a) (fun ex => pure $ Except.error ex); let x : EIO Exception (Eα × Core.State) := (ReaderT.run x (mkCoreContext ctx s)).run { env := s.env, ngen := s.ngen }; (ea, coreS) ← liftM x; diff --git a/stage0/src/Lean/Elab/Term.lean b/stage0/src/Lean/Elab/Term.lean index 431f55b142..223d785765 100644 --- a/stage0/src/Lean/Elab/Term.lean +++ b/stage0/src/Lean/Elab/Term.lean @@ -160,7 +160,7 @@ setTraceState {}; finally (liftMetaMCore x) (liftMetaMFinalizer oldTraceState) @[inline] def liftCoreM {α} (x : CoreM α) : TermElabM α := -liftMetaM $ Meta.liftCoreM x +liftMetaM $ liftM x def getEnv : TermElabM Environment := do s ← getThe Core.State; pure s.env def getMCtx : TermElabM MetavarContext := do s ← getThe Meta.State; pure s.mctx diff --git a/stage0/src/Lean/Exception.lean b/stage0/src/Lean/Exception.lean new file mode 100644 index 0000000000..f72f54614b --- /dev/null +++ b/stage0/src/Lean/Exception.lean @@ -0,0 +1,26 @@ +/- +Copyright (c) 2020 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +import Lean.Message +import Lean.InternalExceptionId + +namespace Lean + +/- Exception type used in most Lean monads -/ +inductive Exception +| error (ref : Syntax) (msg : MessageData) +| internal (id : InternalExceptionId) + +def Exception.toMessageData : Exception → MessageData +| Exception.error _ msg => msg +| Exception.internal id => id.toString + +def Exception.getRef : Exception → Syntax +| Exception.error ref _ => ref +| Exception.internal _ => Syntax.missing + +instance Exception.inhabited : Inhabited Exception := ⟨Exception.error (arbitrary _) (arbitrary _)⟩ + +end Lean diff --git a/stage0/src/Lean/Meta/Basic.lean b/stage0/src/Lean/Meta/Basic.lean index f9c48b51a4..7f71cb88a9 100644 --- a/stage0/src/Lean/Meta/Basic.lean +++ b/stage0/src/Lean/Meta/Basic.lean @@ -130,24 +130,19 @@ structure Context := (lctx : LocalContext := {}) (localInstances : LocalInstances := #[]) -open Core (ECoreM Exception) - abbrev MetaM := ReaderT Context $ StateRefT State $ CoreM -@[inline] def liftCoreM {α} (x : CoreM α) : MetaM α := -liftM $ x - @[inline] def mapCoreM (f : forall {α}, CoreM α → CoreM α) {α} : MetaM α → MetaM α := monadMap @f instance : MonadIO MetaM := -{ liftIO := fun α x => liftCoreM $ liftIO x } +{ liftIO := fun α x => liftM (liftIO x : CoreM α) } instance MetaM.inhabited {α} : Inhabited (MetaM α) := ⟨fun _ _ => arbitrary _⟩ def getRef : MetaM Syntax := -liftCoreM Core.getRef +liftM Core.getRef def addContext (msg : MessageData) : MetaM MessageData := do ctxCore ← readThe Core.Context; @@ -159,13 +154,13 @@ pure $ MessageData.withContext { env := sCore.env, mctx := s.mctx, lctx := ctx.l def throwError {α} (msg : MessageData) : MetaM α := do ref ← getRef; msg ← addContext msg; -throw $ Core.Exception.error ref msg +throw $ Exception.error ref msg def throwIsDefEqStuck {α} : MetaM α := -throw $ Core.Exception.internal isDefEqStuckExceptionId +throw $ Exception.internal isDefEqStuckExceptionId def checkRecDepth : MetaM Unit := -liftCoreM $ Core.checkRecDepth +liftM $ Core.checkRecDepth @[inline] def withIncRecDepth {α} (x : MetaM α) : MetaM α := do mapCoreM (fun α => Core.withIncRecDepth) x @@ -189,25 +184,25 @@ def setMCtx (mctx : MetavarContext) : MetaM Unit := modify $ fun s => { s with mctx := mctx } @[inline] def getOptions : MetaM Options := -liftCoreM Core.getOptions +liftM Core.getOptions @[inline] def getEnv : MetaM Environment := -liftCoreM Core.getEnv +liftM Core.getEnv def setEnv (env : Environment) : MetaM Unit := -liftCoreM $ Core.setEnv env +liftM $ Core.setEnv env def getNGen : MetaM NameGenerator := -liftCoreM Core.getNGen +liftM Core.getNGen def setNGen (ngen : NameGenerator) : MetaM Unit := -liftCoreM $ Core.setNGen ngen +liftM $ Core.setNGen ngen def getTraceState : MetaM TraceState := -liftCoreM $ Core.getTraceState +liftM $ Core.getTraceState def setTraceState (traceState : TraceState) : MetaM Unit := -liftCoreM $ Core.setTraceState traceState +liftM $ Core.setTraceState traceState def mkWHNFRef : IO (IO.Ref (Expr → MetaM Expr)) := IO.mkRef $ fun _ => throwError "whnf implementation was not set" @@ -254,7 +249,7 @@ withIncRecDepth do fn mvarId def mkFreshId : MetaM Name := do -liftCoreM Core.mkFreshId +liftM Core.mkFreshId private def mkFreshExprMVarAtCore (mvarId : MVarId) (lctx : LocalContext) (localInsts : LocalInstances) (type : Expr) (userName : Name) (kind : MetavarKind) : MetaM Expr := do @@ -285,7 +280,7 @@ modify $ fun s => { s with mctx := s.mctx.addLevelMVarDecl mvarId }; pure $ mkLevelMVar mvarId @[inline] def ofExcept {α ε} [HasToString ε] (x : Except ε α) : MetaM α := -liftCoreM $ Core.ofExcept x +liftM $ Core.ofExcept x @[inline] def shouldReduceAll : MetaM Bool := do ctx ← read; pure $ ctx.config.transparency == TransparencyMode.all @@ -882,7 +877,7 @@ opts ← getOptions; mctx ← getMCtx; lctx ← getLCtx; match Lean.mkAuxDefinition env opts mctx lctx name type value with -| Except.error ex => liftCoreM $ Core.throwKernelException ex +| Except.error ex => liftM $ Core.throwKernelException ex | Except.ok (e, env, mctx) => do setEnv env; setMCtx mctx; pure e /-- Similar to `mkAuxDefinition`, but infers the type of `value`. -/ diff --git a/stage0/src/Lean/Meta/ExprDefEq.lean b/stage0/src/Lean/Meta/ExprDefEq.lean index 10314a000e..194ec5b8c5 100644 --- a/stage0/src/Lean/Meta/ExprDefEq.lean +++ b/stage0/src/Lean/Meta/ExprDefEq.lean @@ -368,26 +368,13 @@ structure Context := (hasCtxLocals : Bool) (rhs : Expr) -/- -inductive Exception -| occursCheck -| useFOApprox -| outOfScopeFVar (fvarId : FVarId) -| readOnlyMVarWithBiggerLCtx (mvarId : MVarId) -| unknownExprMVar (mvarId : MVarId) -| meta (ex : Meta.Exception) --/ - abbrev CheckAssignmentM := ReaderT Context $ StateRefT State $ MetaM -@[inline] def liftMetaM {α} (x : MetaM α) : CheckAssignmentM α := -liftM x - def throwCheckAssignmentFailure {α} : CheckAssignmentM α := -throw $ Core.Exception.internal checkAssignmentExceptionId +throw $ Exception.internal checkAssignmentExceptionId def throwOutOfScopeFVar {α} : CheckAssignmentM α := -throw $ Core.Exception.internal outOfScopeExceptionId +throw $ Exception.internal outOfScopeExceptionId private def findCached? (e : Expr) : CheckAssignmentM (Option Expr) := do s ← get; @@ -402,15 +389,12 @@ instance : MonadCache Expr Expr CheckAssignmentM := @[inline] private def visit (f : Expr → CheckAssignmentM Expr) (e : Expr) : CheckAssignmentM Expr := if !e.hasExprMVar && !e.hasFVar then pure e else checkCache e f -@[inline] private def readMeta : CheckAssignmentM Meta.Context := do -liftMetaM read - private def addAssignmentInfo (msg : MessageData) : CheckAssignmentM MessageData := do ctx ← read; pure $ msg ++ " @ " ++ mkMVar ctx.mvarId ++ " " ++ ctx.fvars ++ " := " ++ ctx.rhs @[specialize] def checkFVar (check : Expr → CheckAssignmentM Expr) (fvar : Expr) : CheckAssignmentM Expr := do -ctxMeta ← readMeta; +ctxMeta ← readThe Meta.Context; ctx ← read; if ctx.mvarDecl.lctx.containsFVar fvar then pure fvar else do @@ -424,10 +408,10 @@ else do throwOutOfScopeFVar @[inline] def getMCtx : CheckAssignmentM MetavarContext := do -liftMetaM Meta.getMCtx +liftM Meta.getMCtx def mkAuxMVar (lctx : LocalContext) (localInsts : LocalInstances) (type : Expr) : CheckAssignmentM Expr := do -liftMetaM $ mkFreshExprMVarAt lctx localInsts type +liftM $ mkFreshExprMVarAt lctx localInsts type @[specialize] def checkMVar (check : Expr → CheckAssignmentM Expr) (mvar : Expr) : CheckAssignmentM Expr := do let mvarId := mvar.mvarId!; @@ -439,7 +423,7 @@ if mvarId == ctx.mvarId then do else match mctx.getExprAssignment? mvarId with | some v => check v | none => match mctx.findDecl? mvarId with - | none => liftMetaM $ throwUnknownMVar mvarId + | none => liftM $ throwUnknownMVar mvarId | some mvarDecl => if ctx.hasCtxLocals then throwCheckAssignmentFailure -- It is not a pattern, then we fail and fall back to FO unification @@ -451,14 +435,14 @@ else match mctx.getExprAssignment? mvarId with traceM `Meta.isDefEq.assign.readOnlyMVarWithBiggerLCtx $ addAssignmentInfo (mkMVar mvarId); throwCheckAssignmentFailure else do - ctxMeta ← readMeta; + ctxMeta ← readThe Meta.Context; if ctxMeta.config.ctxApprox && ctx.mvarDecl.lctx.isSubPrefixOf mvarDecl.lctx then do mvarType ← check mvarDecl.type; /- Create an auxiliary metavariable with a smaller context and "checked" type. Note that `mvarType` may be different from `mvarDecl.type`. Example: `mvarType` contains a metavariable that we also need to reduce the context. -/ newMVar ← mkAuxMVar ctx.mvarDecl.lctx ctx.mvarDecl.localInstances mvarType; - liftMetaM $ modify (fun s => { s with mctx := s.mctx.assignExpr mvarId newMVar }); + modifyThe Meta.State (fun s => { s with mctx := s.mctx.assignExpr mvarId newMVar }); pure newMVar else pure mvar @@ -491,7 +475,7 @@ partial def check : Expr → CheckAssignmentM Expr | e@(Expr.mvar _ _) => visit (checkMVar check) e | Expr.localE _ _ _ _ => unreachable! | e@(Expr.app _ _ _) => e.withApp $ fun f args => do - ctxMeta ← readMeta; + ctxMeta ← readThe Meta.Context; if f.isMVar && ctxMeta.config.ctxApprox && args.all Expr.isFVar then do f ← visit (checkMVar check) f; catchInternalId outOfScopeExceptionId @@ -499,14 +483,14 @@ partial def check : Expr → CheckAssignmentM Expr args ← args.mapM (visit check); pure $ mkAppN f args) (fun ex => - condM (liftMetaM $ isDelayedAssigned f.mvarId!) (throw ex) do - eType ← liftMetaM $ inferType e; + condM (liftM $ isDelayedAssigned f.mvarId!) (throw ex) do + eType ← liftM $ inferType e; mvarType ← check eType; /- Create an auxiliary metavariable with a smaller context and "checked" type, assign `?f := fun _ => ?newMVar` Note that `mvarType` may be different from `eType`. -/ ctx ← read; newMVar ← mkAuxMVar ctx.mvarDecl.lctx ctx.mvarDecl.localInstances mvarType; - condM (liftMetaM $ assignToConstFun f args.size newMVar) + condM (liftM $ assignToConstFun f args.size newMVar) (pure newMVar) (throw ex)) else do diff --git a/stage0/src/Lean/Meta/SynthInstance.lean b/stage0/src/Lean/Meta/SynthInstance.lean index f3d8282f40..8b25392c80 100644 --- a/stage0/src/Lean/Meta/SynthInstance.lean +++ b/stage0/src/Lean/Meta/SynthInstance.lean @@ -154,9 +154,6 @@ structure State := abbrev SynthM := StateRefT State MetaM -@[inline] def liftMetaM {α} (x : MetaM α) : SynthM α := -liftM x - @[inline] def mapMetaM (f : forall {α}, MetaM α → MetaM α) {α} : SynthM α → SynthM α := monadMap @f @@ -205,7 +202,7 @@ else do def newSubgoal (mctx : MetavarContext) (key : Expr) (mvar : Expr) (waiter : Waiter) : SynthM Unit := withMCtx mctx $ do trace! `Meta.synthInstance.newSubgoal key; - node? ← liftMetaM $ mkGeneratorNode? key mvar; + node? ← liftM $ mkGeneratorNode? key mvar; match node? with | none => pure () | some node => @@ -232,8 +229,8 @@ match entry? with We must instantiate assigned metavariables before we invoke `mkTableKey`. -/ def mkTableKeyFor (mctx : MetavarContext) (mvar : Expr) : SynthM Expr := withMCtx mctx $ do - mvarType ← liftMetaM $ inferType mvar; - mvarType ← liftMetaM $ instantiateMVars mvarType; + mvarType ← liftM $ inferType mvar; + mvarType ← liftM $ instantiateMVars mvarType; pure $ mkTableKey mctx mvarType /- See `getSubgoals` and `getSubgoalsAux` @@ -317,13 +314,13 @@ forallTelescopeReducing mvarType $ fun xs mvarTypeBody => do If it succeeds, the result is a new updated metavariable context and a new list of subgoals. A subgoal is created for each instance implicit parameter of `inst`. -/ def tryResolve (mctx : MetavarContext) (mvar : Expr) (inst : Expr) : SynthM (Option (MetavarContext × List Expr)) := -liftMetaM $ traceCtx `Meta.synthInstance.tryResolve $ Meta.withMCtx mctx $ tryResolveCore mvar inst +liftM $ traceCtx `Meta.synthInstance.tryResolve $ Meta.withMCtx mctx $ tryResolveCore mvar inst /-- Assign a precomputed answer to `mvar`. If it succeeds, the result is a new updated metavariable context and a new list of subgoals. -/ def tryAnswer (mctx : MetavarContext) (mvar : Expr) (answer : Answer) : SynthM (Option MetavarContext) := -liftMetaM $ Meta.withMCtx mctx $ do +liftM $ Meta.withMCtx mctx $ do (_, _, val) ← openAbstractMVarsResult answer.result; condM (isDefEq mvar val) (do mctx ← getMCtx; pure $ some mctx) @@ -335,7 +332,7 @@ def wakeUp (answer : Answer) : Waiter → SynthM Unit if answer.result.paramNames.isEmpty && answer.result.numMVars == 0 then do modify $ fun s => { s with result := answer.result.expr } else do - (_, _, answerExpr) ← liftMetaM $ openAbstractMVarsResult answer.result; + (_, _, answerExpr) ← liftM $ openAbstractMVarsResult answer.result; trace! `Meta.synthInstance ("skip answer containing metavariables " ++ answerExpr); pure () | Waiter.consumerNode cNode => modify $ fun s => { s with resumeStack := s.resumeStack.push (cNode, answer) } @@ -359,7 +356,7 @@ Meta.withMCtx cNode.mctx do That is, `cNode.subgoals == []`. And then, store it in the tabled entries map, and wakeup waiters. -/ def addAnswer (cNode : ConsumerNode) : SynthM Unit := do -answer ← liftMetaM $ mkAnswer cNode; +answer ← liftM $ mkAnswer cNode; -- Remark: `answer` does not contain assignable or assigned metavariables. let key := cNode.key; entry ← getEntry key; @@ -425,7 +422,7 @@ match cNode.subgoals with match result? with | none => pure () | some mctx => do - liftMetaM $ Meta.withMCtx mctx $ traceM `Meta.synthInstance.resume $ do { + liftM $ Meta.withMCtx mctx $ traceM `Meta.synthInstance.resume $ do { goal ← inferType cNode.mvar; subgoal ← inferType mvar; pure (goal ++ " <== " ++ subgoal) diff --git a/stage0/src/Lean/PrettyPrinter.lean b/stage0/src/Lean/PrettyPrinter.lean index 5d9aaf759d..2acc15e71f 100644 --- a/stage0/src/Lean/PrettyPrinter.lean +++ b/stage0/src/Lean/PrettyPrinter.lean @@ -13,8 +13,9 @@ namespace PrettyPrinter def ppTerm (stx : Syntax) : CoreM Format := parenthesizeTerm stx >>= formatTerm -def ppExpr (e : Expr) : MetaM Format := -delab e >>= Meta.liftCoreM ∘ ppTerm +def ppExpr (e : Expr) : MetaM Format := do +stx ← delab e; +liftM $ ppTerm stx def ppCommand (stx : Syntax) : CoreM Format := parenthesizeCommand stx >>= formatCommand diff --git a/stage0/src/Lean/PrettyPrinter/Backtrack.lean b/stage0/src/Lean/PrettyPrinter/Backtrack.lean new file mode 100644 index 0000000000..44096131b5 --- /dev/null +++ b/stage0/src/Lean/PrettyPrinter/Backtrack.lean @@ -0,0 +1,17 @@ +/- +Copyright (c) 2020 Sebastian Ullrich. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Sebastian Ullrich +-/ +import Lean.InternalExceptionId + +namespace Lean +namespace PrettyPrinter + +/- Auxiliary internal exception for backtracking the pretty printer. + See `orelse.parenthesizer` for example -/ +def registerBacktrackId : IO InternalExceptionId := registerInternalExceptionId `backtrackFormatter +@[init registerBacktrackId] constant backtrackExceptionId : InternalExceptionId := arbitrary _ + +end PrettyPrinter +end Lean diff --git a/stage0/src/Lean/PrettyPrinter/Formatter.lean b/stage0/src/Lean/PrettyPrinter/Formatter.lean index c61eed8024..f6a53acf05 100644 --- a/stage0/src/Lean/PrettyPrinter/Formatter.lean +++ b/stage0/src/Lean/PrettyPrinter/Formatter.lean @@ -17,6 +17,7 @@ import Lean.CoreM import Lean.Parser.Extension import Lean.KeyedDeclsAttribute import Lean.ParserCompiler.Attribute +import Lean.PrettyPrinter.Backtrack namespace Lean namespace PrettyPrinter @@ -34,12 +35,17 @@ structure State := -- Note, however, that the stack is reversed because of the right-to-left traversal. (stack : Array Format := #[]) --- see `orelse.parenthesizer` -structure BacktrackException := mk - end Formatter -abbrev FormatterM := ReaderT Formatter.Context $ StateT Formatter.State $ ExceptT Formatter.BacktrackException CoreM +abbrev FormatterM := ReaderT Formatter.Context $ StateRefT Formatter.State $ CoreM + +@[inline] def FormatterM.orelse {α} (p₁ p₂ : FormatterM α) : FormatterM α := do +s ← get; +catchInternalId backtrackExceptionId + p₁ + (fun _ => do set s; p₂) + +instance Formatter.orelse {α} : HasOrelse (FormatterM α) := ⟨FormatterM.orelse⟩ abbrev Formatter := FormatterM Unit @@ -78,6 +84,9 @@ open Lean.Core open Lean.Parser open Lean.Format +def throwBacktrack {α} : FormatterM α := +throw $ Exception.internal backtrackExceptionId + instance FormatterM.monadTraverser : Syntax.MonadTraverser FormatterM := ⟨{ get := State.stxTrav <$> get, set := fun t => modify (fun st => { st with stxTrav := t }), @@ -240,8 +249,7 @@ def checkKind (k : SyntaxNodeKind) : FormatterM Unit := do stx ← getCur; when (k != stx.getKind) $ do { trace! `PrettyPrinter.format.backtrack ("unexpected node kind '" ++ toString stx.getKind ++ "', expected '" ++ toString k ++ "'"); - -- HACK; see `orelse.formatter` - throw ⟨⟩ + throwBacktrack } @[combinatorFormatter Lean.Parser.node] @@ -406,9 +414,11 @@ open Formatter def format (formatter : Formatter) (stx : Syntax) : CoreM Format := do table ← Parser.builtinTokenTable.get; -Except.ok (_, st) ← formatter { table := table } { stxTrav := Syntax.Traverser.fromSyntax stx } - | Core.throwError "format: uncaught backtrack exception"; -pure $ st.stack.get! 0 +catchInternalId backtrackExceptionId + (do + (_, st) ← (formatter { table := table }).run { stxTrav := Syntax.Traverser.fromSyntax stx }; + pure $ st.stack.get! 0) + (fun _ => Core.throwError "format: uncaught backtrack exception") def formatTerm := format $ categoryParser.formatter `term def formatCommand := format $ categoryParser.formatter `command diff --git a/stage0/src/Lean/PrettyPrinter/Parenthesizer.lean b/stage0/src/Lean/PrettyPrinter/Parenthesizer.lean index 0bc7ab17b2..2073970d8d 100644 --- a/stage0/src/Lean/PrettyPrinter/Parenthesizer.lean +++ b/stage0/src/Lean/PrettyPrinter/Parenthesizer.lean @@ -75,6 +75,7 @@ import Lean.CoreM import Lean.KeyedDeclsAttribute import Lean.Parser.Extension import Lean.ParserCompiler.Attribute +import Lean.PrettyPrinter.Backtrack namespace Lean namespace PrettyPrinter @@ -96,15 +97,19 @@ structure State := -- true iff we have already visited a token on this parser level; used for detecting trailing parsers (visitedToken : Bool := false) --- see `orelse.parenthesizer` -structure BacktrackException := mk - end Parenthesizer -abbrev ParenthesizerM := ReaderT Parenthesizer.Context $ StateT Parenthesizer.State $ ExceptT Parenthesizer.BacktrackException CoreM - +abbrev ParenthesizerM := ReaderT Parenthesizer.Context $ StateRefT Parenthesizer.State $ CoreM abbrev Parenthesizer := ParenthesizerM Unit +@[inline] def ParenthesizerM.orelse {α} (p₁ p₂ : ParenthesizerM α) : ParenthesizerM α := do +s ← get; +catchInternalId backtrackExceptionId + p₁ + (fun _ => do set s; p₂) + +instance Parenthesizer.orelse {α} : HasOrelse (ParenthesizerM α) := ⟨ParenthesizerM.orelse⟩ + unsafe def mkParenthesizerAttribute : IO (KeyedDeclsAttribute Parenthesizer) := KeyedDeclsAttribute.init { builtinName := `builtinParenthesizer, @@ -160,6 +165,9 @@ namespace Parenthesizer open Lean.Core open Lean.Format +def throwBacktrack {α} : ParenthesizerM α := +throw $ Exception.internal backtrackExceptionId + instance ParenthesizerM.monadTraverser : Syntax.MonadTraverser ParenthesizerM := ⟨{ get := State.stxTrav <$> get, set := fun t => modify (fun st => { st with stxTrav := t }), @@ -296,7 +304,7 @@ def term.parenthesizer : CategoryParenthesizer | prec => do stx ← getCur; -- this can happen at `termParser <|> many1 commandParser` in `Term.stxQuot` if stx.getKind == nullKind then - throw ⟨⟩ + throwBacktrack else do maybeParenthesize `term (fun stx => Unhygienic.run `(($stx))) prec $ parenthesizeCategoryCore `term prec @@ -329,7 +337,7 @@ stx ← getCur; when (k != stx.getKind) $ do { trace! `PrettyPrinter.parenthesize.backtrack ("unexpected node kind '" ++ toString stx.getKind ++ "', expected '" ++ toString k ++ "'"); -- HACK; see `orelse.parenthesizer` - throw ⟨⟩ + throwBacktrack }; visitArgs p @@ -352,7 +360,7 @@ stx ← getCur; when (k != stx.getKind) $ do { trace! `PrettyPrinter.parenthesize.backtrack ("unexpected node kind '" ++ toString stx.getKind ++ "', expected '" ++ toString k ++ "'"); -- HACK; see `orelse.parenthesizer` - throw ⟨⟩ + throwBacktrack }; visitArgs $ do { p; @@ -439,10 +447,12 @@ end Parenthesizer open Parenthesizer /-- Add necessary parentheses in `stx` parsed by `parser`. -/ -def parenthesize (parenthesizer : Parenthesizer) (stx : Syntax) : CoreM Syntax := do -Except.ok (_, st) ← parenthesizer {} { stxTrav := Syntax.Traverser.fromSyntax stx } - | Core.throwError "parenthesize: uncaught backtrack exception"; -pure st.stxTrav.cur +def parenthesize (parenthesizer : Parenthesizer) (stx : Syntax) : CoreM Syntax := +catchInternalId backtrackExceptionId + (do + (_, st) ← (parenthesizer {}).run { stxTrav := Syntax.Traverser.fromSyntax stx }; + pure st.stxTrav.cur) + (fun _ => Core.throwError "parenthesize: uncaught backtrack exception") def parenthesizeTerm := parenthesize $ categoryParser.parenthesizer `term 0 def parenthesizeCommand := parenthesize $ categoryParser.parenthesizer `command 0 diff --git a/stage0/src/Lean/Util/Sorry.lean b/stage0/src/Lean/Util/Sorry.lean index 5ac97cd0a9..33b5208637 100644 --- a/stage0/src/Lean/Util/Sorry.lean +++ b/stage0/src/Lean/Util/Sorry.lean @@ -4,7 +4,7 @@ Released under Apache 2.0 license as described in the file LICENSE. Authors: Leonardo de Moura -/ import Lean.Message -import Lean.CoreM +import Lean.Exception namespace Lean @@ -55,7 +55,7 @@ partial def MessageData.hasSyntheticSorry : MessageData → Bool | MessageData.node msgs => msgs.any MessageData.hasSyntheticSorry | _ => false -def Core.Exception.hasSyntheticSorry : Exception → Bool +def Exception.hasSyntheticSorry : Exception → Bool | Exception.error _ msg => msg.hasSyntheticSorry | _ => false diff --git a/stage0/src/library/abstract_context_cache.cpp b/stage0/src/library/abstract_context_cache.cpp index 81f84ac66e..d1c7f10fbe 100644 --- a/stage0/src/library/abstract_context_cache.cpp +++ b/stage0/src/library/abstract_context_cache.cpp @@ -20,7 +20,7 @@ Author: Leonardo de Moura #endif #ifndef LEAN_DEFAULT_CLASS_INSTANCE_MAX_DEPTH -#define LEAN_DEFAULT_CLASS_INSTANCE_MAX_DEPTH 100 +#define LEAN_DEFAULT_CLASS_INSTANCE_MAX_DEPTH 5000 #endif namespace lean { diff --git a/stage0/stdlib/CMakeLists.txt b/stage0/stdlib/CMakeLists.txt index 486a4409c3..e4754f2eab 100644 --- a/stage0/stdlib/CMakeLists.txt +++ b/stage0/stdlib/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT ./Init.c ./Init/Coe.c ./Init/Control.c ./Init/Control/Alternative.c ./Init/Control/Applicative.c ./Init/Control/Conditional.c ./Init/Control/EState.c ./Init/Control/Except.c ./Init/Control/Functor.c ./Init/Control/Id.c ./Init/Control/Lift.c ./Init/Control/Monad.c ./Init/Control/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/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/List/Instances.c ./Init/Data/Nat.c ./Init/Data/Nat/Basic.c ./Init/Data/Nat/Bitwise.c ./Init/Data/Nat/Control.c ./Init/Data/Nat/Div.c ./Init/Data/Option.c ./Init/Data/Option/Basic.c ./Init/Data/Option/BasicAux.c ./Init/Data/Option/Instances.c ./Init/Data/Random.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/UInt.c ./Init/Fix.c ./Init/HasCoe.c ./Init/LeanInit.c ./Init/System.c ./Init/System/FilePath.c ./Init/System/IO.c ./Init/System/IOError.c ./Init/System/Platform.c ./Init/Util.c ./Init/WF.c ./Lean.c ./Lean/Attributes.c ./Lean/AuxRecursor.c ./Lean/Class.c ./Lean/Compiler.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/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/KVMap.c ./Lean/Data/LBool.c ./Lean/Data/LOption.c ./Lean/Data/Name.c ./Lean/Data/Occurrences.c ./Lean/Data/Options.c ./Lean/Data/Position.c ./Lean/Data/SMap.c ./Lean/Data/Trie.c ./Lean/Declaration.c ./Lean/Delaborator.c ./Lean/Elab.c ./Lean/Elab/Alias.c ./Lean/Elab/App.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/Definition.c ./Lean/Elab/DoNotation.c ./Lean/Elab/Exception.c ./Lean/Elab/Frontend.c ./Lean/Elab/Import.c ./Lean/Elab/Inductive.c ./Lean/Elab/Level.c ./Lean/Elab/Log.c ./Lean/Elab/Match.c ./Lean/Elab/Print.c ./Lean/Elab/Quotation.c ./Lean/Elab/ResolveName.c ./Lean/Elab/StrategyAttrs.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/ElabTerm.c ./Lean/Elab/Tactic/Generalize.c ./Lean/Elab/Tactic/Induction.c ./Lean/Elab/Tactic/Injection.c ./Lean/Elab/Term.c ./Lean/Elab/Util.c ./Lean/Environment.c ./Lean/Eval.c ./Lean/Expr.c ./Lean/HeadIndex.c ./Lean/Hygiene.c ./Lean/InternalExceptionId.c ./Lean/KeyedDeclsAttribute.c ./Lean/Level.c ./Lean/Linter.c ./Lean/LocalContext.c ./Lean/Message.c ./Lean/Meta.c ./Lean/Meta/AbstractMVars.c ./Lean/Meta/AppBuilder.c ./Lean/Meta/Basic.c ./Lean/Meta/Check.c ./Lean/Meta/DiscrTree.c ./Lean/Meta/DiscrTreeTypes.c ./Lean/Meta/EqnCompiler.c ./Lean/Meta/EqnCompiler/CaseArraySizes.c ./Lean/Meta/EqnCompiler/CaseValues.c ./Lean/Meta/EqnCompiler/MVarRenaming.c ./Lean/Meta/EqnCompiler/Match.c ./Lean/Meta/EqnCompiler/MatchPatternAttr.c ./Lean/Meta/Exception.c ./Lean/Meta/ExprDefEq.c ./Lean/Meta/FunInfo.c ./Lean/Meta/GeneralizeTelescope.c ./Lean/Meta/InferType.c ./Lean/Meta/Instances.c ./Lean/Meta/KAbstract.c ./Lean/Meta/LevelDefEq.c ./Lean/Meta/Offset.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/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/LocalDecl.c ./Lean/Meta/Tactic/Revert.c ./Lean/Meta/Tactic/Rewrite.c ./Lean/Meta/Tactic/Subst.c ./Lean/Meta/Tactic/Target.c ./Lean/Meta/Tactic/Util.c ./Lean/Meta/WHNF.c ./Lean/MetavarContext.c ./Lean/Modifiers.c ./Lean/Parser.c ./Lean/Parser/Basic.c ./Lean/Parser/Command.c ./Lean/Parser/Extension.c ./Lean/Parser/Level.c ./Lean/Parser/Module.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/Formatter.c ./Lean/PrettyPrinter/Meta.c ./Lean/PrettyPrinter/Parenthesizer.c ./Lean/ProjFns.c ./Lean/ReducibilityAttrs.c ./Lean/Runtime.c ./Lean/Scopes.c ./Lean/Structure.c ./Lean/Syntax.c ./Lean/ToExpr.c ./Lean/Util.c ./Lean/Util/Closure.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/MonadCache.c ./Lean/Util/PPExt.c ./Lean/Util/PPGoal.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/Sorry.c ./Lean/Util/Trace.c ./Lean/Util/WHNF.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/Coe.c ./Init/Control.c ./Init/Control/Alternative.c ./Init/Control/Applicative.c ./Init/Control/Conditional.c ./Init/Control/EState.c ./Init/Control/Except.c ./Init/Control/Functor.c ./Init/Control/Id.c ./Init/Control/Lift.c ./Init/Control/Monad.c ./Init/Control/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/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/List/Instances.c ./Init/Data/Nat.c ./Init/Data/Nat/Basic.c ./Init/Data/Nat/Bitwise.c ./Init/Data/Nat/Control.c ./Init/Data/Nat/Div.c ./Init/Data/Option.c ./Init/Data/Option/Basic.c ./Init/Data/Option/BasicAux.c ./Init/Data/Option/Instances.c ./Init/Data/Random.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/UInt.c ./Init/Fix.c ./Init/HasCoe.c ./Init/LeanInit.c ./Init/System.c ./Init/System/FilePath.c ./Init/System/IO.c ./Init/System/IOError.c ./Init/System/Platform.c ./Init/Util.c ./Init/WF.c ./Lean.c ./Lean/Attributes.c ./Lean/AuxRecursor.c ./Lean/Class.c ./Lean/Compiler.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/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/KVMap.c ./Lean/Data/LBool.c ./Lean/Data/LOption.c ./Lean/Data/Name.c ./Lean/Data/Occurrences.c ./Lean/Data/Options.c ./Lean/Data/Position.c ./Lean/Data/SMap.c ./Lean/Data/Trie.c ./Lean/Declaration.c ./Lean/Delaborator.c ./Lean/Elab.c ./Lean/Elab/Alias.c ./Lean/Elab/App.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/Definition.c ./Lean/Elab/DoNotation.c ./Lean/Elab/Exception.c ./Lean/Elab/Frontend.c ./Lean/Elab/Import.c ./Lean/Elab/Inductive.c ./Lean/Elab/Level.c ./Lean/Elab/Log.c ./Lean/Elab/Match.c ./Lean/Elab/Print.c ./Lean/Elab/Quotation.c ./Lean/Elab/ResolveName.c ./Lean/Elab/StrategyAttrs.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/ElabTerm.c ./Lean/Elab/Tactic/Generalize.c ./Lean/Elab/Tactic/Induction.c ./Lean/Elab/Tactic/Injection.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/Linter.c ./Lean/LocalContext.c ./Lean/Message.c ./Lean/Meta.c ./Lean/Meta/AbstractMVars.c ./Lean/Meta/AppBuilder.c ./Lean/Meta/Basic.c ./Lean/Meta/Check.c ./Lean/Meta/DiscrTree.c ./Lean/Meta/DiscrTreeTypes.c ./Lean/Meta/EqnCompiler.c ./Lean/Meta/EqnCompiler/CaseArraySizes.c ./Lean/Meta/EqnCompiler/CaseValues.c ./Lean/Meta/EqnCompiler/MVarRenaming.c ./Lean/Meta/EqnCompiler/Match.c ./Lean/Meta/EqnCompiler/MatchPatternAttr.c ./Lean/Meta/Exception.c ./Lean/Meta/ExprDefEq.c ./Lean/Meta/FunInfo.c ./Lean/Meta/GeneralizeTelescope.c ./Lean/Meta/InferType.c ./Lean/Meta/Instances.c ./Lean/Meta/KAbstract.c ./Lean/Meta/LevelDefEq.c ./Lean/Meta/Offset.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/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/LocalDecl.c ./Lean/Meta/Tactic/Revert.c ./Lean/Meta/Tactic/Rewrite.c ./Lean/Meta/Tactic/Subst.c ./Lean/Meta/Tactic/Target.c ./Lean/Meta/Tactic/Util.c ./Lean/Meta/WHNF.c ./Lean/MetavarContext.c ./Lean/Modifiers.c ./Lean/Parser.c ./Lean/Parser/Basic.c ./Lean/Parser/Command.c ./Lean/Parser/Extension.c ./Lean/Parser/Level.c ./Lean/Parser/Module.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/Backtrack.c ./Lean/PrettyPrinter/Formatter.c ./Lean/PrettyPrinter/Meta.c ./Lean/PrettyPrinter/Parenthesizer.c ./Lean/ProjFns.c ./Lean/ReducibilityAttrs.c ./Lean/Runtime.c ./Lean/Scopes.c ./Lean/Structure.c ./Lean/Syntax.c ./Lean/ToExpr.c ./Lean/Util.c ./Lean/Util/Closure.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/MonadCache.c ./Lean/Util/PPExt.c ./Lean/Util/PPGoal.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/Sorry.c ./Lean/Util/Trace.c ./Lean/Util/WHNF.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/Lean/CoreM.c b/stage0/stdlib/Lean/CoreM.c index c3f200821b..1b4242235a 100644 --- a/stage0/stdlib/Lean/CoreM.c +++ b/stage0/stdlib/Lean/CoreM.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Lean.CoreM -// Imports: Init Init.System.IO Init.Control.StateRef Lean.Util.RecDepth Lean.Util.Trace Lean.Environment Lean.InternalExceptionId Lean.Eval +// Imports: Init Init.System.IO Init.Control.StateRef Lean.Util.RecDepth Lean.Util.Trace Lean.Environment Lean.Exception Lean.InternalExceptionId Lean.Eval #include #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -16,7 +16,6 @@ extern "C" { lean_object* l_Lean_Core_getConstInfo___closed__5; lean_object* l_Lean_Core_throwKernelException___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_compileDecl___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_InternalExceptionId_toString(lean_object*); extern lean_object* l_Lean_InternalExceptionId_toString___closed__1; lean_object* lean_io_error_to_string(lean_object*); lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); @@ -29,10 +28,8 @@ lean_object* l_Lean_Core_getEnv___rarg(lean_object*, lean_object*); lean_object* l_Lean_Core_replaceRef(lean_object*, lean_object*); lean_object* lean_environment_find(lean_object*, lean_object*); lean_object* l_Lean_Core_addContext(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Core_ECoreM_run___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_dbg_trace(lean_object*, lean_object*); lean_object* lean_io_mk_ref(lean_object*, lean_object*); -lean_object* l_Lean_Core_Exception_toMessageData(lean_object*); lean_object* lean_io_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Core_Context_replaceRef___boxed(lean_object*, lean_object*); lean_object* l_Lean_Core_resetTraceState___rarg(lean_object*, lean_object*); @@ -71,13 +68,14 @@ lean_object* l_Lean_Core_mkFreshId___rarg___boxed(lean_object*, lean_object*); uint8_t l_List_elem___main___at_Lean_catchInternalIds___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Core_CoreM_inhabited(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_checkRecDepth___closed__1; +extern lean_object* l_Lean_Exception_inhabited___closed__1; lean_object* l_Lean_Core_checkRecDepth___closed__2; lean_object* l_Lean_Core_addDecl___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_withIncRecDepth(lean_object*); lean_object* l_Lean_Core_tracer___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_KernelException_toMessageData(lean_object*, lean_object*); +lean_object* l_Lean_Core_CoreM_run_x27___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_checkRecDepth(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Core_Exception_getRef(lean_object*); lean_object* l_Lean_Core_getEnv___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_catchInternalIds(lean_object*, lean_object*); lean_object* l_Lean_Core_setEnv___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -87,6 +85,7 @@ lean_object* l_Lean_Core_modifyEnv___boxed(lean_object*, lean_object*, lean_obje lean_object* l_Lean_Core_checkRecDepth___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_resetTraceState___boxed(lean_object*); lean_object* l_Std_PersistentArray_forMAux___main___at_Lean_Core_printTraces___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Core_CoreM_run(lean_object*); lean_object* l_Nat_repr(lean_object*); extern lean_object* l_Char_HasRepr___closed__1; lean_object* l_Lean_Core_getNGen(lean_object*); @@ -94,7 +93,6 @@ lean_object* l_Lean_Core_dbgTrace___rarg___closed__1; lean_object* l___private_Lean_CoreM_1__getTraceState___rarg(lean_object*, lean_object*); lean_object* l_Lean_catchInternalId___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_getConstInfo___closed__3; -lean_object* l_Lean_Core_ECoreM_run(lean_object*, lean_object*); lean_object* l_Array_forMAux___main___at_Lean_Core_printTraces___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_getRef(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_replaceRef___boxed(lean_object*, lean_object*); @@ -129,6 +127,7 @@ lean_object* l_Lean_Core_throwError___rarg___boxed(lean_object*, lean_object*, l lean_object* l_Lean_Core_throwError(lean_object*); lean_object* l_IO_print___at_Lean_Core_printTraces___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Core_tracer___closed__4; +lean_object* l_Lean_Core_CoreM_run___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_Context_incCurrRecDepth(lean_object*); lean_object* l_Lean_Core_getEnv___boxed(lean_object*); lean_object* l_Lean_getMaxRecDepth(lean_object*); @@ -140,7 +139,6 @@ extern lean_object* l_Lean_EnvExtension_setState___closed__1; lean_object* l_Lean_Core_getTraceState(lean_object*); lean_object* l_Lean_Core_getOptions(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_addDecl(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Core_Exception_inhabited___closed__1; lean_object* l_Lean_Core_tracer___closed__1; lean_object* l_Lean_Core_CoreM_toIO(lean_object*); lean_object* l_Lean_Syntax_getPos(lean_object*); @@ -155,7 +153,6 @@ lean_object* l_Lean_catchInternalId(lean_object*, lean_object*); lean_object* l_Lean_Core_hasEval___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_Array_forMAux___main___at_Lean_Core_printTraces___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_tracer___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Core_ECoreM_run_x27(lean_object*, lean_object*); lean_object* l_Lean_catchInternalId___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_setTraceState(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_tracer___closed__2; @@ -163,20 +160,17 @@ lean_object* l_Lean_Core_liftIOCore(lean_object*); lean_object* l_List_elem___main___at_Lean_catchInternalIds___spec__1___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_MetavarContext_Inhabited___closed__1; lean_object* l_Lean_Core_getConstInfo___closed__4; +lean_object* l_Lean_Core_CoreM_run_x27(lean_object*); lean_object* lean_compile_decl(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Core_Exception_inhabited; lean_object* l_Lean_Core_setNGen___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_getTraceState___rarg(lean_object*, lean_object*); lean_object* l_Lean_Core_MonadIO___closed__1; lean_object* l_Lean_catchInternalId___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_addContext___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_MessageData_Inhabited___closed__1; -lean_object* l_Lean_Core_ECoreM_run_x27___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_dbgTrace___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_name_mk_numeral(lean_object*, lean_object*); lean_object* l_Lean_Core_addAndCompile(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_getNGen___rarg(lean_object*, lean_object*); -lean_object* l_Lean_Core_Exception_getRef___boxed(lean_object*); lean_object* l_Lean_Core_CoreM_toIO___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_CoreM_1__getTraceState___boxed(lean_object*); lean_object* l_Lean_Core_liftIOCore___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -206,84 +200,11 @@ x_1 = l_Lean_Core_State_inhabited___closed__1; return x_1; } } -lean_object* l_Lean_Core_Exception_toMessageData(lean_object* x_1) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_2; -x_2 = lean_ctor_get(x_1, 1); -lean_inc(x_2); -lean_dec(x_1); -return x_2; -} -else -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_3 = lean_ctor_get(x_1, 0); -lean_inc(x_3); -lean_dec(x_1); -x_4 = l_Lean_InternalExceptionId_toString(x_3); -x_5 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_5, 0, x_4); -x_6 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_6, 0, x_5); -return x_6; -} -} -} -lean_object* l_Lean_Core_Exception_getRef(lean_object* x_1) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_2; -x_2 = lean_ctor_get(x_1, 0); -lean_inc(x_2); -return x_2; -} -else -{ -lean_object* x_3; -x_3 = lean_box(0); -return x_3; -} -} -} -lean_object* l_Lean_Core_Exception_getRef___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_Core_Exception_getRef(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Core_Exception_inhabited___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_MessageData_Inhabited___closed__1; -x_3 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3, 0, x_1); -lean_ctor_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Core_Exception_inhabited() { -_start: -{ -lean_object* x_1; -x_1 = l_Lean_Core_Exception_inhabited___closed__1; -return x_1; -} -} lean_object* l_Lean_Core_CoreM_inhabited___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Core_Exception_inhabited___closed__1; +x_2 = l_Lean_Exception_inhabited___closed__1; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); @@ -2630,7 +2551,7 @@ lean_dec(x_1); return x_2; } } -lean_object* l_Lean_Core_ECoreM_run___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Core_CoreM_run___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; @@ -2705,15 +2626,15 @@ return x_22; } } } -lean_object* l_Lean_Core_ECoreM_run(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_Core_CoreM_run(lean_object* x_1) { _start: { -lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_Lean_Core_ECoreM_run___rarg), 4, 0); -return x_3; +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Core_CoreM_run___rarg), 4, 0); +return x_2; } } -lean_object* l_Lean_Core_ECoreM_run_x27___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Core_CoreM_run_x27___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; @@ -2781,12 +2702,12 @@ return x_19; } } } -lean_object* l_Lean_Core_ECoreM_run_x27(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_Core_CoreM_run_x27(lean_object* x_1) { _start: { -lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_Lean_Core_ECoreM_run_x27___rarg), 4, 0); -return x_3; +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Core_CoreM_run_x27___rarg), 4, 0); +return x_2; } } lean_object* l_Lean_Core_CoreM_toIO___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { @@ -3307,6 +3228,7 @@ lean_object* initialize_Init_Control_StateRef(lean_object*); lean_object* initialize_Lean_Util_RecDepth(lean_object*); lean_object* initialize_Lean_Util_Trace(lean_object*); lean_object* initialize_Lean_Environment(lean_object*); +lean_object* initialize_Lean_Exception(lean_object*); lean_object* initialize_Lean_InternalExceptionId(lean_object*); lean_object* initialize_Lean_Eval(lean_object*); static bool _G_initialized = false; @@ -3332,6 +3254,9 @@ lean_dec_ref(res); res = initialize_Lean_Environment(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +res = initialize_Lean_Exception(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); res = initialize_Lean_InternalExceptionId(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); @@ -3342,10 +3267,6 @@ l_Lean_Core_State_inhabited___closed__1 = _init_l_Lean_Core_State_inhabited___cl lean_mark_persistent(l_Lean_Core_State_inhabited___closed__1); l_Lean_Core_State_inhabited = _init_l_Lean_Core_State_inhabited(); lean_mark_persistent(l_Lean_Core_State_inhabited); -l_Lean_Core_Exception_inhabited___closed__1 = _init_l_Lean_Core_Exception_inhabited___closed__1(); -lean_mark_persistent(l_Lean_Core_Exception_inhabited___closed__1); -l_Lean_Core_Exception_inhabited = _init_l_Lean_Core_Exception_inhabited(); -lean_mark_persistent(l_Lean_Core_Exception_inhabited); l_Lean_Core_MonadIO___closed__1 = _init_l_Lean_Core_MonadIO___closed__1(); lean_mark_persistent(l_Lean_Core_MonadIO___closed__1); l_Lean_Core_MonadIO = _init_l_Lean_Core_MonadIO(); diff --git a/stage0/stdlib/Lean/Elab/App.c b/stage0/stdlib/Lean/Elab/App.c index c448262074..1151a11c6a 100644 --- a/stage0/stdlib/Lean/Elab/App.c +++ b/stage0/stdlib/Lean/Elab/App.c @@ -77,7 +77,6 @@ lean_object* l___private_Lean_Elab_App_5__getForallBody(lean_object*, lean_objec lean_object* l___private_Lean_Elab_App_14__resolveLValLoop___boxed(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_checkTraceOption(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Term_elabApp___closed__1; -lean_object* l_Lean_Core_Exception_toMessageData(lean_object*); uint8_t l___private_Lean_Elab_App_9__nextArgIsHole(lean_object*); lean_object* l_List_append___rarg(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_12__throwLValError___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -182,7 +181,6 @@ lean_object* l_Lean_Name_append___main(lean_object*, lean_object*); lean_object* l_Array_shrink___main___rarg(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_5__getForallBody___main(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_17__addLValArg___main___closed__6; -lean_object* l_Lean_Core_Exception_getRef(lean_object*); lean_object* l___private_Lean_Elab_App_4__tryCoeFun___closed__5; lean_object* l_Lean_Elab_Term_elabTerm(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_logException(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -325,6 +323,7 @@ lean_object* l___private_Lean_Elab_App_13__resolveLValAux___closed__10; lean_object* l_Lean_Elab_Term_whnfCore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_25__elabAppAux___closed__1; lean_object* l___private_Lean_Elab_App_13__resolveLValAux___closed__20; +lean_object* l_Lean_Exception_getRef(lean_object*); lean_object* l___private_Lean_Elab_App_4__tryCoeFun___closed__2; lean_object* l___private_Lean_Elab_App_12__throwLValError___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_throwUnsupportedSyntax___at___private_Lean_Elab_App_20__elabAppFnId___spec__1___rarg(lean_object*); @@ -426,6 +425,7 @@ uint8_t l_Lean_isStructure(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_App_11__elabAppArgs___closed__2; lean_object* l___private_Lean_Elab_App_11__elabAppArgs(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_Elab_App_10__elabAppArgsAux___main___closed__7; +lean_object* l_Lean_Exception_toMessageData(lean_object*); lean_object* l___private_Lean_Elab_App_21__elabAppFn___main___closed__3; uint8_t lean_string_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_Arg_inhabited; @@ -13176,14 +13176,14 @@ if (x_10 == 0) { lean_object* x_11; lean_object* x_12; lean_object* x_13; x_11 = lean_ctor_get(x_9, 0); -x_12 = l_Lean_Core_Exception_getRef(x_1); +x_12 = l_Lean_Exception_getRef(x_1); x_13 = l_Lean_Syntax_getPos(x_12); lean_dec(x_12); if (lean_obj_tag(x_13) == 0) { lean_object* x_14; lean_dec(x_11); -x_14 = l_Lean_Core_Exception_toMessageData(x_1); +x_14 = l_Lean_Exception_toMessageData(x_1); lean_ctor_set(x_9, 0, x_14); return x_9; } @@ -13226,7 +13226,7 @@ x_30 = l_Lean_Meta_SynthInstance_getInstances___lambda__1___closed__8; x_31 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_31, 0, x_29); lean_ctor_set(x_31, 1, x_30); -x_32 = l_Lean_Core_Exception_toMessageData(x_1); +x_32 = l_Lean_Exception_toMessageData(x_1); x_33 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_33, 0, x_31); lean_ctor_set(x_33, 1, x_32); @@ -13237,7 +13237,7 @@ else { lean_object* x_34; lean_dec(x_15); -x_34 = l_Lean_Core_Exception_toMessageData(x_1); +x_34 = l_Lean_Exception_toMessageData(x_1); lean_ctor_set(x_9, 0, x_34); return x_9; } @@ -13251,14 +13251,14 @@ x_36 = lean_ctor_get(x_9, 1); lean_inc(x_36); lean_inc(x_35); lean_dec(x_9); -x_37 = l_Lean_Core_Exception_getRef(x_1); +x_37 = l_Lean_Exception_getRef(x_1); x_38 = l_Lean_Syntax_getPos(x_37); lean_dec(x_37); if (lean_obj_tag(x_38) == 0) { lean_object* x_39; lean_object* x_40; lean_dec(x_35); -x_39 = l_Lean_Core_Exception_toMessageData(x_1); +x_39 = l_Lean_Exception_toMessageData(x_1); x_40 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_40, 0, x_39); lean_ctor_set(x_40, 1, x_36); @@ -13303,7 +13303,7 @@ x_56 = l_Lean_Meta_SynthInstance_getInstances___lambda__1___closed__8; x_57 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_57, 0, x_55); lean_ctor_set(x_57, 1, x_56); -x_58 = l_Lean_Core_Exception_toMessageData(x_1); +x_58 = l_Lean_Exception_toMessageData(x_1); x_59 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_59, 0, x_57); lean_ctor_set(x_59, 1, x_58); @@ -13316,7 +13316,7 @@ else { lean_object* x_61; lean_object* x_62; lean_dec(x_41); -x_61 = l_Lean_Core_Exception_toMessageData(x_1); +x_61 = l_Lean_Exception_toMessageData(x_1); x_62 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_62, 0, x_61); lean_ctor_set(x_62, 1, x_36); diff --git a/stage0/stdlib/Lean/Elab/Command.c b/stage0/stdlib/Lean/Elab/Command.c index efe473a178..dbc23d7768 100644 --- a/stage0/stdlib/Lean/Elab/Command.c +++ b/stage0/stdlib/Lean/Elab/Command.c @@ -250,6 +250,7 @@ lean_object* l_Lean_Elab_Command_elabCheck___boxed(lean_object*, lean_object*, l lean_object* l_Lean_Elab_Command_Lean_Elab_MonadMacroAdapter___closed__9; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabEvalUnsafe___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_Lean_Exception_inhabited___closed__1; extern lean_object* l_Lean_EnvExtension_Inhabited___rarg___closed__1; extern lean_object* l_Lean_Core_checkRecDepth___closed__2; lean_object* l_Lean_getOptionDecl(lean_object*, lean_object*); @@ -520,7 +521,6 @@ lean_object* l_Lean_Elab_Command_mkCommandElabAttribute___closed__2; lean_object* l_Std_PersistentHashMap_findAtAux___main___at_Lean_Elab_Command_elabCommand___main___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elbChoice___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabNamespace(lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Core_Exception_inhabited___closed__1; lean_object* l_Lean_Elab_Command_getMainModule___rarg(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Command_elabOpen(lean_object*); lean_object* l___private_Lean_Elab_Command_4__getVarDecls___boxed(lean_object*); @@ -5861,7 +5861,7 @@ lean_object* _init_l_Lean_Elab_Command_CommandElabM_inhabited___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Core_Exception_inhabited___closed__1; +x_1 = l_Lean_Exception_inhabited___closed__1; x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Command_CommandElabM_inhabited___lambda__1___boxed), 4, 1); lean_closure_set(x_2, 0, x_1); return x_2; @@ -15194,7 +15194,7 @@ lean_object* l_Lean_Elab_Command_elabEval___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Core_Exception_inhabited___closed__1; +x_2 = l_Lean_Exception_inhabited___closed__1; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); diff --git a/stage0/stdlib/Lean/Elab/Inductive.c b/stage0/stdlib/Lean/Elab/Inductive.c index 4b92129c50..071882180e 100644 --- a/stage0/stdlib/Lean/Elab/Inductive.c +++ b/stage0/stdlib/Lean/Elab/Inductive.c @@ -150,6 +150,7 @@ lean_object* l___private_Lean_Elab_Inductive_11__checkHeaders___main(lean_object lean_object* l_List_map___main___at___private_Lean_Elab_Inductive_32__applyInferMod___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_restoreSynthInstanceCache(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Lean_Elab_Inductive_31__mkCtor2InferMod___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__10; lean_object* l_List_map___main___at___private_Lean_Elab_Inductive_32__applyInferMod___spec__1___closed__1; lean_object* l___private_Lean_Elab_Inductive_14__withInductiveLocalDecls___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_foldlM___main___at___private_Lean_Elab_Inductive_22__collectUniverses___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -247,7 +248,6 @@ lean_object* l___private_Lean_Elab_Inductive_33__mkInductiveDecl(lean_object*, l lean_object* l___private_Lean_Elab_Inductive_23__updateResultingUniverse___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_Inductive_23__updateResultingUniverse___closed__1; lean_object* l_Lean_Core_Context_replaceRef(lean_object*, lean_object*); -extern lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__11; lean_object* l___private_Lean_Elab_Inductive_19__getResultingUniverse___closed__1; lean_object* l_Lean_Elab_Command_shouldInferResultUniverse___closed__2; lean_object* l_Lean_Elab_Command_accLevelAtCtor___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -2552,7 +2552,7 @@ x_74 = l___private_Lean_Elab_Inductive_9__checkParamsAndResultType___main___clos x_75 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_75, 0, x_74); lean_ctor_set(x_75, 1, x_73); -x_76 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__11; +x_76 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__10; x_77 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_77, 0, x_75); lean_ctor_set(x_77, 1, x_76); diff --git a/stage0/stdlib/Lean/Elab/Match.c b/stage0/stdlib/Lean/Elab/Match.c index 294a88d297..78db15a2a6 100644 --- a/stage0/stdlib/Lean/Elab/Match.c +++ b/stage0/stdlib/Lean/Elab/Match.c @@ -41,6 +41,7 @@ lean_object* l_Lean_mkSort(lean_object*); lean_object* l_Lean_Elab_Term_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Match_37__mkNewDiscrs___main___closed__4; lean_object* l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; lean_object* l___private_Init_LeanInit_14__mapSepElemsMAux___main___at___private_Lean_Elab_Match_20__collect___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabMatch(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unreachable_x21___rarg(lean_object*); @@ -116,6 +117,7 @@ lean_object* lean_io_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabMatchAltView___lambda__1___closed__1; lean_object* l_Lean_annotation_x3f(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Match_41__expandMatchDiscr_x3f___closed__1; +extern lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; lean_object* l___private_Lean_Elab_Match_20__collect___main___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabInaccessible(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_Monad___rarg(lean_object*); @@ -133,7 +135,6 @@ lean_object* l___private_Lean_Elab_Match_40__mkNewAlts(lean_object*, lean_object lean_object* l_Lean_MessageData_ofList(lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Elab_Match_13__getNumExplicitCtorParams___spec__5___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*); lean_object* l_Lean_Expr_getAppFn___main(lean_object*); -extern lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__1; lean_object* l___private_Lean_Elab_Match_22__withPatternVarsAux___main___rarg(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_String_splitAux___main___closed__1; extern lean_object* l_Lean_Expr_getAppArgs___closed__1; @@ -390,7 +391,6 @@ lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Term_expandMacros extern lean_object* l_Lean_nullKind___closed__2; lean_object* l_Array_findIdxAux___main___at___private_Lean_Elab_Match_29__mkLocalDeclFor___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_List_toString___at_Lean_Elab_Term_elabMatchAltView___spec__1(lean_object*); -extern lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; extern lean_object* l_Lean_Meta_mkEqRefl___closed__2; extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__5; lean_object* l_Array_umapMAux___main___at___private_Lean_Elab_Match_32__elabMatchAux___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -494,7 +494,6 @@ lean_object* l___private_Lean_Elab_Match_35__mkMatchType___main___closed__4; lean_object* l___private_Lean_Elab_Match_3__expandMatchOptTypeAux___main___closed__4; lean_object* l_Lean_Parser_registerBuiltinNodeKind(lean_object*, lean_object*); extern lean_object* l_Lean_mkHole___closed__1; -lean_object* l_Lean_Elab_Term_expandMacrosInPatterns___closed__3; lean_object* l___regBuiltin_Lean_Elab_Term_elabMatch___closed__1; lean_object* l___private_Lean_Elab_Match_9__registerAuxiliaryNodeKind___closed__1; lean_object* l_Array_umapMAux___main___at___private_Lean_Elab_Match_31__withElaboratedLHS___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1797,7 +1796,7 @@ x_79 = l___private_Lean_Elab_Match_6__elabDiscrsAux___main___closed__16; x_80 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_80, 0, x_79); lean_ctor_set(x_80, 1, x_78); -x_81 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; +x_81 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; x_82 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_82, 0, x_80); lean_ctor_set(x_82, 1, x_81); @@ -2561,7 +2560,7 @@ lean_object* _init_l_Lean_Elab_Term_expandMacrosInPatterns___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__1; +x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } @@ -2575,15 +2574,6 @@ x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } } -lean_object* _init_l_Lean_Elab_Term_expandMacrosInPatterns___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_expandMacrosInPatterns___closed__2; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} lean_object* l_Lean_Elab_Term_expandMacrosInPatterns(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: { @@ -2596,8 +2586,8 @@ lean_inc(x_11); lean_dec(x_9); x_12 = x_1; x_13 = l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; -x_14 = l_Lean_Elab_Term_expandMacrosInPatterns___closed__1; -x_15 = l_Lean_Elab_Term_expandMacrosInPatterns___closed__3; +x_14 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; +x_15 = l_Lean_Elab_Term_expandMacrosInPatterns___closed__2; x_16 = lean_unsigned_to_nat(0u); x_17 = lean_alloc_closure((void*)(l_Array_umapMAux___main___at_Lean_Elab_Term_expandMacrosInPatterns___spec__3), 13, 6); lean_closure_set(x_17, 0, x_13); @@ -6251,7 +6241,7 @@ lean_object* _init_l___private_Lean_Elab_Match_16__processIdAux___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_expandMacrosInPatterns___closed__3; +x_1 = l_Lean_Elab_Term_expandMacrosInPatterns___closed__2; x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } @@ -27102,8 +27092,6 @@ l_Lean_Elab_Term_expandMacrosInPatterns___closed__1 = _init_l_Lean_Elab_Term_exp lean_mark_persistent(l_Lean_Elab_Term_expandMacrosInPatterns___closed__1); l_Lean_Elab_Term_expandMacrosInPatterns___closed__2 = _init_l_Lean_Elab_Term_expandMacrosInPatterns___closed__2(); lean_mark_persistent(l_Lean_Elab_Term_expandMacrosInPatterns___closed__2); -l_Lean_Elab_Term_expandMacrosInPatterns___closed__3 = _init_l_Lean_Elab_Term_expandMacrosInPatterns___closed__3(); -lean_mark_persistent(l_Lean_Elab_Term_expandMacrosInPatterns___closed__3); l_Lean_Elab_Term_mkInaccessible___closed__1 = _init_l_Lean_Elab_Term_mkInaccessible___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_mkInaccessible___closed__1); l_Lean_Elab_Term_mkInaccessible___closed__2 = _init_l_Lean_Elab_Term_mkInaccessible___closed__2(); diff --git a/stage0/stdlib/Lean/Elab/StructInst.c b/stage0/stdlib/Lean/Elab/StructInst.c index 6943d7be9a..45f6edec0c 100644 --- a/stage0/stdlib/Lean/Elab/StructInst.c +++ b/stage0/stdlib/Lean/Elab/StructInst.c @@ -112,6 +112,7 @@ extern lean_object* l___private_Lean_Elab_Quotation_4__getHeadInfo___elambda__3_ lean_object* l_List_foldlM___main___at___private_Lean_Elab_StructInst_24__elabStruct___main___spec__1___closed__2; lean_object* l_Lean_Elab_Term_StructInst_FieldLHS_inhabited___closed__1; lean_object* l___private_Lean_Elab_StructInst_16__mkSubstructSource___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__3; lean_object* l_List_mapM___main___at___private_Lean_Elab_StructInst_10__expandParentFields___spec__2___closed__5; @@ -135,7 +136,6 @@ lean_object* l_Nat_max(lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn___main(lean_object*); lean_object* l_List_mapM___main___at___private_Lean_Elab_StructInst_10__expandParentFields___spec__2___closed__3; extern lean_object* l_Lean_formatKVMap___closed__1; -extern lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__1; extern lean_object* l_Lean_Name_inhabited; extern lean_object* l_Lean_Expr_getAppArgs___closed__1; lean_object* l_Lean_Elab_Term_StructInst_formatField(lean_object*, lean_object*); @@ -480,7 +480,6 @@ lean_object* l___private_Lean_Elab_StructInst_4__elabModifyOp___closed__21; lean_object* l___private_Lean_Elab_StructInst_14__getFieldIdx(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_StructInst_5__getStructName___rarg___closed__5; lean_object* l_Lean_Core_setTraceState(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_StructInst_17__groupFields___closed__4; lean_object* l_Lean_Elab_Term_getOptions___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_StructInst_18__addMissingFields___at___private_Lean_Elab_StructInst_19__expandStruct___main___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_map___main___at_Lean_Elab_Term_StructInst_formatStruct___main___spec__1___closed__1; @@ -14639,7 +14638,7 @@ lean_object* _init_l___private_Lean_Elab_StructInst_17__groupFields___closed__1( _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__1; +x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } @@ -14662,15 +14661,6 @@ x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } } -lean_object* _init_l___private_Lean_Elab_StructInst_17__groupFields___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_StructInst_17__groupFields___closed__3; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} lean_object* l___private_Lean_Elab_StructInst_17__groupFields(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: { @@ -14686,7 +14676,7 @@ lean_inc(x_13); lean_inc(x_11); x_14 = l_Lean_getStructureFields(x_11, x_13); x_15 = l_Lean_Elab_Term_StructInst_Struct_ref(x_2); -x_16 = l___private_Lean_Elab_StructInst_17__groupFields___closed__4; +x_16 = l___private_Lean_Elab_StructInst_17__groupFields___closed__3; lean_inc(x_15); lean_inc(x_2); x_17 = lean_alloc_closure((void*)(l___private_Lean_Elab_StructInst_17__groupFields___lambda__4), 15, 7); @@ -15108,7 +15098,7 @@ lean_closure_set(x_17, 5, x_14); lean_closure_set(x_17, 6, x_1); x_18 = l_Lean_Core_Context_replaceRef(x_15, x_7); lean_dec(x_15); -x_19 = l___private_Lean_Elab_StructInst_17__groupFields___closed__4; +x_19 = l___private_Lean_Elab_StructInst_17__groupFields___closed__3; x_20 = lean_unsigned_to_nat(0u); x_21 = l_Array_iterateMAux___main___rarg(x_19, lean_box(0), x_14, x_17, x_20, x_16); x_22 = lean_apply_7(x_21, x_3, x_4, x_5, x_6, x_18, x_8, x_12); @@ -24207,7 +24197,7 @@ lean_object* _init_l_Lean_Elab_Term_StructInst_DefaultFields_step___main___close _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_StructInst_17__groupFields___closed__4; +x_1 = l___private_Lean_Elab_StructInst_17__groupFields___closed__3; x_2 = l_StateT_Monad___rarg(x_1); return x_2; } @@ -26221,8 +26211,6 @@ l___private_Lean_Elab_StructInst_17__groupFields___closed__2 = _init_l___private lean_mark_persistent(l___private_Lean_Elab_StructInst_17__groupFields___closed__2); l___private_Lean_Elab_StructInst_17__groupFields___closed__3 = _init_l___private_Lean_Elab_StructInst_17__groupFields___closed__3(); lean_mark_persistent(l___private_Lean_Elab_StructInst_17__groupFields___closed__3); -l___private_Lean_Elab_StructInst_17__groupFields___closed__4 = _init_l___private_Lean_Elab_StructInst_17__groupFields___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_StructInst_17__groupFields___closed__4); l___private_Lean_Elab_StructInst_20__mkCtorHeaderAux___main___closed__1 = _init_l___private_Lean_Elab_StructInst_20__mkCtorHeaderAux___main___closed__1(); lean_mark_persistent(l___private_Lean_Elab_StructInst_20__mkCtorHeaderAux___main___closed__1); l___private_Lean_Elab_StructInst_20__mkCtorHeaderAux___main___closed__2 = _init_l___private_Lean_Elab_StructInst_20__mkCtorHeaderAux___main___closed__2(); diff --git a/stage0/stdlib/Lean/Elab/Syntax.c b/stage0/stdlib/Lean/Elab/Syntax.c index 0932ea7976..993fd64918 100644 --- a/stage0/stdlib/Lean/Elab/Syntax.c +++ b/stage0/stdlib/Lean/Elab/Syntax.c @@ -366,6 +366,7 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__89; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__47; lean_object* l_Lean_Elab_Term_toParserDescrAux___main(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__5; +extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; lean_object* l___private_Lean_Elab_Syntax_7__elabKind___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__14; lean_object* l_Nat_pred(lean_object*); @@ -395,7 +396,6 @@ lean_object* l_Lean_Elab_Command_expandElab___closed__23; extern lean_object* l_Lean_Parser_Syntax_sepBy___elambda__1___closed__1; lean_object* l___private_Lean_Elab_Syntax_6__declareSyntaxCatQuotParser___closed__42; extern lean_object* l___private_Lean_Elab_Util_4__regTraceClasses___closed__1; -extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__52; lean_object* l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_quot___elambda__1___closed__1; @@ -744,7 +744,7 @@ lean_dec(x_6); if (lean_obj_tag(x_8) == 0) { lean_object* x_9; -x_9 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; +x_9 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; return x_9; } else diff --git a/stage0/stdlib/Lean/Elab/Tactic/Induction.c b/stage0/stdlib/Lean/Elab/Tactic/Induction.c index 09aabd41d0..9a1069affb 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Induction.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Induction.c @@ -18,6 +18,7 @@ lean_object* l___private_Lean_Elab_Tactic_Induction_5__getGeneralizingFVarIds___ extern lean_object* l_Lean_Core_getConstInfo___closed__5; lean_object* l_Lean_Elab_Tactic_evalCases(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_Name_toString___closed__1; +extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; lean_object* l_Nat_foldMAux___main___at___private_Lean_Elab_Tactic_Induction_14__getRecInfo___spec__2___closed__2; lean_object* l___private_Lean_Elab_Tactic_Induction_13__getRecInfoDefault___closed__1; lean_object* l___private_Lean_Elab_Tactic_Induction_17__checkCasesResultAux___main___closed__3; @@ -219,7 +220,6 @@ lean_object* l___private_Lean_Elab_Tactic_Induction_16__processResult___closed__ lean_object* l___private_Lean_Elab_Tactic_Induction_16__processResult___closed__1; uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_resolveGlobalName(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; extern lean_object* l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; lean_object* l_Lean_Elab_Tactic_getRecFromUsing___closed__4; extern lean_object* l_Lean_mkHole___closed__2; @@ -7126,7 +7126,7 @@ lean_ctor_set(x_38, 0, x_37); x_39 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_39, 0, x_35); lean_ctor_set(x_39, 1, x_38); -x_40 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; +x_40 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; x_41 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_41, 0, x_39); lean_ctor_set(x_41, 1, x_40); diff --git a/stage0/stdlib/Lean/Elab/Term.c b/stage0/stdlib/Lean/Elab/Term.c index 2a78b69722..fde76869b9 100644 --- a/stage0/stdlib/Lean/Elab/Term.c +++ b/stage0/stdlib/Lean/Elab/Term.c @@ -330,6 +330,7 @@ lean_object* l_Lean_Elab_Term_elabByTactic(lean_object*, lean_object*, lean_obje lean_object* l_Lean_Elab_Term_observing(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkLet___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_withoutMacroStackAtErr(lean_object*); +extern lean_object* l_Lean_Exception_inhabited___closed__1; lean_object* l_Lean_Elab_Term_withMacroExpansion(lean_object*); lean_object* l_Lean_Elab_Term_getMessageLog(lean_object*); lean_object* l_Lean_Elab_Term_State_inhabited___closed__1; @@ -395,6 +396,7 @@ lean_object* l_Lean_Elab_Term_getFVarLocalDecl_x21(lean_object*, lean_object*, l lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTacticBlock___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_levelMVarToParam___lambda__1___boxed(lean_object*, lean_object*); +uint8_t l_Lean_Exception_hasSyntheticSorry(lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_Elab_Term_termElabAttribute___spec__1___closed__1; lean_object* l_Lean_Elab_Term_withTransparency___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_getMVarDecl___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -495,7 +497,6 @@ lean_object* l_Lean_Elab_Term_withLocalDecl___rarg(lean_object*, uint8_t, lean_o lean_object* l_Lean_Elab_Term_getMainModule(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkTermElabAttribute(lean_object*); lean_object* l___private_Lean_Elab_Term_27__mkConsts(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -uint8_t l_Lean_Core_Exception_hasSyntheticSorry(lean_object*); extern lean_object* l_Lean_numLitKind___closed__2; lean_object* l_Lean_Elab_Term_SavedState_inhabited___closed__1; lean_object* l_Lean_Elab_Term_elabTacticBlock___closed__2; @@ -743,7 +744,6 @@ lean_object* l_Lean_Elab_Term_setNGen___boxed(lean_object*, lean_object*, lean_o lean_object* l_Lean_Elab_Term_modifyEnv___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_resolveGlobalName___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l___private_Lean_Elab_Term_18__isLambdaWithImplicit(lean_object*); -extern lean_object* l_Lean_Core_Exception_inhabited___closed__1; lean_object* l_Lean_Elab_Term_expandArrayLit___closed__6; lean_object* l_Lean_Elab_Term_MonadIO(lean_object*); lean_object* l_Lean_Elab_Term_logException___closed__2; @@ -1050,7 +1050,7 @@ lean_object* _init_l_Lean_Elab_Term_TermElabM_inhabited___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Core_Exception_inhabited___closed__1; +x_1 = l_Lean_Exception_inhabited___closed__1; x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Term_TermElabM_inhabited___lambda__1___boxed), 8, 1); lean_closure_set(x_2, 0, x_1); return x_2; @@ -14920,7 +14920,7 @@ x_21 = l_Lean_Meta_mkSorry___closed__2; x_22 = l_Lean_mkConst(x_21, x_20); x_23 = l_Lean_Meta_mkSorry___closed__4; x_24 = l_Lean_mkAppB(x_22, x_13, x_23); -x_25 = l_Lean_Core_Exception_hasSyntheticSorry(x_1); +x_25 = l_Lean_Exception_hasSyntheticSorry(x_1); if (x_25 == 0) { lean_object* x_26; @@ -15006,7 +15006,7 @@ x_39 = l_Lean_Meta_mkSorry___closed__2; x_40 = l_Lean_mkConst(x_39, x_38); x_41 = l_Lean_Meta_mkSorry___closed__4; x_42 = l_Lean_mkAppB(x_40, x_13, x_41); -x_43 = l_Lean_Core_Exception_hasSyntheticSorry(x_1); +x_43 = l_Lean_Exception_hasSyntheticSorry(x_1); if (x_43 == 0) { lean_object* x_44; @@ -15139,7 +15139,7 @@ x_64 = l_Lean_Meta_mkSorry___closed__2; x_65 = l_Lean_mkConst(x_64, x_63); x_66 = l_Lean_Meta_mkSorry___closed__4; x_67 = l_Lean_mkAppB(x_65, x_57, x_66); -x_68 = l_Lean_Core_Exception_hasSyntheticSorry(x_1); +x_68 = l_Lean_Exception_hasSyntheticSorry(x_1); if (x_68 == 0) { lean_object* x_69; @@ -15225,7 +15225,7 @@ x_82 = l_Lean_Meta_mkSorry___closed__2; x_83 = l_Lean_mkConst(x_82, x_81); x_84 = l_Lean_Meta_mkSorry___closed__4; x_85 = l_Lean_mkAppB(x_83, x_57, x_84); -x_86 = l_Lean_Core_Exception_hasSyntheticSorry(x_1); +x_86 = l_Lean_Exception_hasSyntheticSorry(x_1); if (x_86 == 0) { lean_object* x_87; diff --git a/stage0/stdlib/Lean/Exception.c b/stage0/stdlib/Lean/Exception.c new file mode 100644 index 0000000000..14db88e5fa --- /dev/null +++ b/stage0/stdlib/Lean/Exception.c @@ -0,0 +1,121 @@ +// Lean compiler output +// Module: Lean.Exception +// Imports: Init Lean.Message Lean.InternalExceptionId +#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* l_Lean_InternalExceptionId_toString(lean_object*); +lean_object* l_Lean_Exception_inhabited; +lean_object* l_Lean_Exception_inhabited___closed__1; +lean_object* l_Lean_Exception_getRef___boxed(lean_object*); +lean_object* l_Lean_Exception_getRef(lean_object*); +extern lean_object* l_Lean_MessageData_Inhabited___closed__1; +lean_object* l_Lean_Exception_toMessageData(lean_object*); +lean_object* l_Lean_Exception_toMessageData(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 1); +lean_inc(x_2); +lean_dec(x_1); +return x_2; +} +else +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +lean_dec(x_1); +x_4 = l_Lean_InternalExceptionId_toString(x_3); +x_5 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_5, 0, x_4); +x_6 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_6, 0, x_5); +return x_6; +} +} +} +lean_object* l_Lean_Exception_getRef(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +return x_2; +} +else +{ +lean_object* x_3; +x_3 = lean_box(0); +return x_3; +} +} +} +lean_object* l_Lean_Exception_getRef___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Exception_getRef(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Exception_inhabited___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_MessageData_Inhabited___closed__1; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Exception_inhabited() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Exception_inhabited___closed__1; +return x_1; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Message(lean_object*); +lean_object* initialize_Lean_InternalExceptionId(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Exception(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_mk_io_result(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_Message(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_InternalExceptionId(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Exception_inhabited___closed__1 = _init_l_Lean_Exception_inhabited___closed__1(); +lean_mark_persistent(l_Lean_Exception_inhabited___closed__1); +l_Lean_Exception_inhabited = _init_l_Lean_Exception_inhabited(); +lean_mark_persistent(l_Lean_Exception_inhabited); +return lean_mk_io_result(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Meta/Basic.c b/stage0/stdlib/Lean/Meta/Basic.c index 8d5bb5c001..7e76351f6d 100644 --- a/stage0/stdlib/Lean/Meta/Basic.c +++ b/stage0/stdlib/Lean/Meta/Basic.c @@ -46,7 +46,6 @@ lean_object* l_Lean_LocalDecl_userName(lean_object*); lean_object* l_unreachable_x21___rarg(lean_object*); lean_object* l_Lean_Meta_whnfForall(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MetavarContext_instantiateMVars(lean_object*, lean_object*); -lean_object* l_Lean_Meta_liftCoreM(lean_object*); lean_object* l_Lean_Meta_InfoCacheKey_Inhabited; extern lean_object* l_Lean_InternalExceptionId_toString___closed__1; lean_object* l_Lean_Meta_getEnv(lean_object*, lean_object*, lean_object*); @@ -159,7 +158,6 @@ lean_object* l_Lean_Meta_setTraceState(lean_object*, lean_object*, lean_object*, lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_isClassExpensive_x3f___main___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkAuxDefinition(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_liftCoreM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withTransparency___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_setEnv(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_2__liftMkBindingM___rarg___closed__3; @@ -210,6 +208,7 @@ lean_object* l_Lean_Meta_mkSynthPendingRef(lean_object*); lean_object* l_Lean_Meta_TransparencyMode_lt___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_throwIsDefEqStuck(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getEnv___rarg___boxed(lean_object*, lean_object*); +extern lean_object* l_Lean_Exception_inhabited___closed__1; lean_object* l_Lean_Meta_mkWHNFRef___lambda__1___closed__1; lean_object* l_Lean_Meta_MetaM_toIO(lean_object*); lean_object* l_Lean_Meta_withMVarContext___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -421,13 +420,11 @@ lean_object* l_Lean_LocalContext_addDecl(lean_object*, lean_object*); lean_object* l_Array_isEqvAux___main___at_Lean_Meta_withLocalContext___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instantiateLocalDeclMVars___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEqAuxRef; -extern lean_object* l_Lean_Core_Exception_inhabited___closed__1; lean_object* l_Lean_Meta_throwError___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_TransparencyMode_HasBeq; lean_object* l_Lean_Meta_lambdaTelescope___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getExprMVarAssignment_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_6__forallMetaTelescopeReducingAux(uint8_t, 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_Meta_liftCoreM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLocalDeclD___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_assignLevelMVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withReducible___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1051,32 +1048,6 @@ x_1 = l_Lean_Meta_State_inhabited___closed__5; return x_1; } } -lean_object* l_Lean_Meta_liftCoreM___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) { -_start: -{ -lean_object* x_7; -x_7 = lean_apply_3(x_1, x_4, x_5, x_6); -return x_7; -} -} -lean_object* l_Lean_Meta_liftCoreM(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_liftCoreM___rarg___boxed), 6, 0); -return x_2; -} -} -lean_object* l_Lean_Meta_liftCoreM___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) { -_start: -{ -lean_object* x_7; -x_7 = l_Lean_Meta_liftCoreM___rarg(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_Meta_mapCoreM(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: { @@ -1187,7 +1158,7 @@ lean_object* l_Lean_Meta_MetaM_inhabited___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Core_Exception_inhabited___closed__1; +x_2 = l_Lean_Exception_inhabited___closed__1; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); diff --git a/stage0/stdlib/Lean/Meta/Check.c b/stage0/stdlib/Lean/Meta/Check.c index 63aa43377d..b18036fc10 100644 --- a/stage0/stdlib/Lean/Meta/Check.c +++ b/stage0/stdlib/Lean/Meta/Check.c @@ -28,7 +28,6 @@ lean_object* lean_environment_find(lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEqAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_addContext(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); -lean_object* l_Lean_Core_Exception_toMessageData(lean_object*); lean_object* l___private_Lean_Meta_Check_2__checkLambdaLet___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_Monad___rarg(lean_object*); lean_object* l_Array_forMAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -120,6 +119,7 @@ lean_object* l___private_Lean_Meta_Check_5__getFunctionDomain(lean_object*, lean lean_object* l___private_Lean_Meta_Check_2__checkLambdaLet___at___private_Lean_Meta_Check_7__checkAux___main___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Check_2__checkLambdaLet(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_check(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Exception_toMessageData(lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Lean_Meta_getFVarLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_KernelException_toMessageData___closed__39; @@ -5039,7 +5039,7 @@ lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; x_33 = lean_ctor_get(x_22, 1); lean_inc(x_33); lean_dec(x_22); -x_34 = l_Lean_Core_Exception_toMessageData(x_7); +x_34 = l_Lean_Exception_toMessageData(x_7); x_35 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(x_21, x_34, x_2, x_3, x_4, x_5, x_33); lean_dec(x_5); lean_dec(x_4); diff --git a/stage0/stdlib/Lean/Meta/EqnCompiler/Match.c b/stage0/stdlib/Lean/Meta/EqnCompiler/Match.c index f85dd558b2..0c685dad66 100644 --- a/stage0/stdlib/Lean/Meta/EqnCompiler/Match.c +++ b/stage0/stdlib/Lean/Meta/EqnCompiler/Match.c @@ -31,6 +31,7 @@ lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l___private_Lean_Meta_EqnCompiler_Match_23__unify_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l___private_Lean_Meta_EqnCompiler_Match_6__hasAsPattern(lean_object*); lean_object* l_Lean_mkSort(lean_object*); +extern lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; lean_object* l_List_map___main___at_Lean_Meta_Match_Example_applyFVarSubst___main___spec__2(lean_object*, lean_object*); lean_object* l_List_map___main___at___private_Lean_Meta_EqnCompiler_Match_24__expandVarIntoCtor_x3f___spec__3(lean_object*, lean_object*); lean_object* l_List_foldr___main___at___private_Lean_Meta_EqnCompiler_Match_7__hasCtorPattern___spec__1___boxed(lean_object*, lean_object*); @@ -346,7 +347,6 @@ lean_object* l___private_Lean_Meta_EqnCompiler_Match_40__getUnusedLevelParam___c lean_object* l_Lean_LocalDecl_fvarId(lean_object*); uint8_t l___private_Lean_Meta_EqnCompiler_Match_7__hasCtorPattern(lean_object*); extern lean_object* l_Std_HashSet_Inhabited___closed__1; -extern lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; lean_object* l___private_Lean_Meta_EqnCompiler_Match_40__getUnusedLevelParam___closed__1; uint8_t l___private_Lean_Meta_EqnCompiler_Match_15__isArrayLitTransition(lean_object*); lean_object* l_Lean_Meta_Match_Pattern_toMessageData___main___closed__5; @@ -718,7 +718,7 @@ lean_inc(x_3); x_4 = lean_ctor_get(x_2, 1); lean_inc(x_4); lean_dec(x_2); -x_5 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; +x_5 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; x_6 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_6, 0, x_1); lean_ctor_set(x_6, 1, x_5); @@ -3034,7 +3034,7 @@ lean_inc(x_3); x_4 = lean_ctor_get(x_2, 1); lean_inc(x_4); lean_dec(x_2); -x_5 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; +x_5 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; x_6 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_6, 0, x_1); lean_ctor_set(x_6, 1, x_5); diff --git a/stage0/stdlib/Lean/Meta/ExprDefEq.c b/stage0/stdlib/Lean/Meta/ExprDefEq.c index f8f808778b..ea2b70fbdf 100644 --- a/stage0/stdlib/Lean/Meta/ExprDefEq.c +++ b/stage0/stdlib/Lean/Meta/ExprDefEq.c @@ -15,78 +15,79 @@ extern "C" { #endif lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignmentQuick_check___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__1; -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__3(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_ExprDefEq_34__isDefEqDelta(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_CheckAssignment_checkMVar___closed__11; lean_object* l_Lean_Meta_restore(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_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__1(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__3; +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__4(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_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4___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*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_getMCtx___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_44__isDefEqWHNF(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqWHNF(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_anyRangeMAux___main___at_Lean_Meta_CheckAssignmentQuick_check___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_mvarId_x21(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__1; extern lean_object* l___private_Lean_Meta_Check_2__checkLambdaLet___lambda__2___closed__1; -lean_object* l___private_Lean_Meta_ExprDefEq_12__readMeta___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__2; lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_2__isDefEqArgsFirstPass(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_ExprDefEq_26__isDefEqLeftRight___closed__1; lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__7; +lean_object* l___private_Lean_Meta_ExprDefEq_46__consumeLet___boxed(lean_object*); lean_object* l_Lean_Meta_CheckAssignment_Lean_MonadCache___closed__2; +lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main(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_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_1__isDefEqEta___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, uint64_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unreachable_x21___rarg(lean_object*); lean_object* l___private_Lean_Expr_3__getAppArgsAux___main(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_47__consumeLet___boxed(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_36__isDelayedAssignedHead___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_38__isAssignable___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__11; lean_object* l_Lean_Meta_isDefEqStringLit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -uint8_t l___private_Lean_Meta_ExprDefEq_30__sameHeadSymbol(lean_object*, lean_object*); lean_object* l_Lean_Meta_setIsExprDefEqAuxRef(lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_Meta_checkAssignment___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_mdata(lean_object*, lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3(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_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_CheckAssignment_check___main___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_isExprDefEq___closed__2; +lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqWHNF___at_Lean_Meta_isExprDefEqAuxImpl___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_name_eq(lean_object*, lean_object*); -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__2; +uint8_t l___private_Lean_Meta_ExprDefEq_29__sameHeadSymbol(lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__4___lambda__1(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*); lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_1__isDefEqEta___spec__2___closed__1; -lean_object* l___private_Lean_Meta_ExprDefEq_22__isDeltaCandidate_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_registerCheckAssignmentId___closed__2; +uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Std_HashMap_inhabited___closed__1; extern lean_object* l_Lean_Expr_updateMData_x21___closed__2; lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_1__isDefEqEta___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_checkAssignmentAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__1; lean_object* l_Lean_Meta_isClassQuick_x3f___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkFVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_9__findCached_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_metavar_ctx_get_expr_assignment(lean_object*, lean_object*); uint8_t l_Array_anyRangeMAux___main___at_Lean_Meta_CheckAssignment_check___main___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_getEnv___rarg(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_2__isDefEqArgsFirstPass___main___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_CheckAssignment_liftMetaM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_22__isDeltaCandidate_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkMVar(lean_object*); +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Array_empty___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_21__isDeltaCandidate_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Format_flatten___main___closed__1; lean_object* l_Lean_Meta_commitWhenSome_x3f___at_Lean_Meta_isExprDefEqAuxImpl___spec__2___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEqAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isDefEqBindingDomain___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___spec__1(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_28__unfold(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_27__unfold(lean_object*); lean_object* l_Lean_Core_addContext(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__6; -lean_object* l___private_Lean_Meta_ExprDefEq_36__isAssigned(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isProofQuick___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_io_mk_ref(lean_object*, lean_object*); lean_object* l_Lean_Meta_checkAssignmentAux(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5(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_CheckAssignment_registerOutOfScopeId(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_35__isAssigned(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_1__isDefEqEta(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__2; lean_object* l_Lean_MessageData_arrayExpr_toMessageData___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__4___boxed(lean_object**); lean_object* lean_io_ref_get(lean_object*, lean_object*); @@ -94,56 +95,56 @@ extern lean_object* l_Lean_Substring_HasQuote___closed__2; lean_object* l___private_Lean_Meta_ExprDefEq_3__isDefEqArgsAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkFVar___at_Lean_Meta_CheckAssignment_check___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_Lean_MonadCache; -lean_object* l___private_Lean_Meta_ExprDefEq_33__unfoldReducibeDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalContext_containsFVar(lean_object*, lean_object*); lean_object* l_ReaderT_Monad___rarg(lean_object*); -lean_object* l_Lean_Meta_CheckAssignment_liftMetaM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_32__unfoldReducibeDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isAppOf(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_LevelDefEq_12__processPostponed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_reduceNat_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4___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*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__2; +lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__3; lean_object* l_Lean_LocalContext_findFVar_x3f(lean_object*, lean_object*); lean_object* l_Lean_Meta_isClass_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__12; +lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isTypeCorrect(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_registerCheckAssignmentId(lean_object*); lean_object* l_Lean_Expr_getAppFn___main(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__2; lean_object* l_Lean_Meta_getConst_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_getAppArgs___closed__1; uint8_t l_Array_anyRangeMAux___main___at_Lean_Meta_CheckAssignment_check___main___spec__7(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isDefEqNative(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__4; -lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__1(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_ExprDefEq_32__unfoldDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__2; +lean_object* l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_contains___at_Lean_Meta_CheckAssignment_check___main___spec__2(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__6; lean_object* lean_io_ref_take(lean_object*, lean_object*); uint8_t l_Lean_isReducible(lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_Lean_MonadCache___closed__1; uint8_t l_Lean_LocalContext_contains(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_isLevelDefEqAux___main___closed__3; -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__1; lean_object* l_Lean_Meta_CheckAssignment_outOfScopeExceptionId; lean_object* l_Lean_Meta_isExprDefEqAuxImpl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Environment_isProjectionFn(lean_object*, lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); -uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_18__simpAssignmentArg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4___boxed(lean_object**); +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_7__isDefEqBinding(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_isLevelDefEqAux___main___closed__8; lean_object* l_Lean_Meta_CheckAssignment_throwOutOfScopeFVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_updateLambdaE_x21___closed__1; lean_object* l_Lean_Meta_commitWhenSome_x3f___at_Lean_Meta_isExprDefEqAuxImpl___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_toCtorIfLit(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_36__isAssigned___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_5__isDefEqArgs___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__1; lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__6; lean_object* l_Lean_Meta_CheckAssignment_checkAssignmentExceptionId; -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_6__isDefEqBindingAux(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_getAppNumArgsAux___main(lean_object*, lean_object*); uint8_t lean_metavar_ctx_is_expr_assigned(lean_object*, lean_object*); @@ -153,13 +154,16 @@ lean_object* l_Lean_Meta_CheckAssignment_assignToConstFun(lean_object*, lean_obj lean_object* l_Lean_Meta_CheckAssignment_check(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_anyRangeMAux___main___at_Lean_Meta_checkAssignment___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_restoreSynthInstanceCache(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_3__isDefEqArgsAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_HashMapImp_find_x3f___at_Lean_Closure_visitExpr___spec__1(lean_object*, lean_object*); extern lean_object* l_Lean_Meta_isLevelDefEqAux___main___closed__7; +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4___lambda__1(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*); +lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__2; lean_object* l_Lean_Meta_CheckAssignment_checkMVar___at_Lean_Meta_CheckAssignment_check___main___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_fget(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__2; lean_object* lean_expr_instantiate_rev_range(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); @@ -170,302 +174,295 @@ lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_CheckAssign uint8_t l_List_elem___main___at_Lean_catchInternalIds___spec__1(lean_object*, lean_object*); lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_12__readMeta___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_4__trySynthPending(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_constLevels_x21(lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_39__isAssignable(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux(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_isTypeCorrect___closed__1; -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux(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_CheckAssignment_checkMVar___closed__9; +lean_object* l_Lean_Meta_CheckAssignment_checkMVar___closed__8; uint8_t l_Lean_Literal_beq(lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEqAuxImpl___closed__1; lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_CheckAssignment_check___main___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__4; lean_object* l_Lean_Meta_CheckAssignment_checkMVar___closed__4; lean_object* l_Lean_Meta_isLevelDefEqAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEqAuxImpl___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_HashMapImp_insert___at_Lean_Closure_visitExpr___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_Meta_CheckAssignmentQuick_check___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_hasExprMVar(lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4(lean_object*, 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*); extern lean_object* l_Array_iterateMAux___main___at_Lean_ppGoal___spec__6___closed__4; -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_fvarId_x21(lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_3__isDefEqArgsAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_formatEntry___closed__2; lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_44__unstuckMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_contains___at_Lean_Meta_CheckAssignment_check___main___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_throwIsDefEqStuck___rarg(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_45__unstuckMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkMVar___closed__6; lean_object* l_ReaderT_bind___at_Lean_Meta_isClassExpensive_x3f___main___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_22__isListLevelDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_run___closed__2; -lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___spec__1___boxed(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_41__isLetFVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_38__isAssignable(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_throwOutOfScopeFVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ConstantInfo_name(lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__2; extern lean_object* l_Lean_MessageData_coeOfArrayExpr___closed__2; lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__7; lean_object* l_Lean_Meta_isDefEqOffset(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2(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_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__4; extern lean_object* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__2; lean_object* l_Lean_Meta_CheckAssignment_run___closed__1; -lean_object* l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_1__isDefEqEta___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, uint64_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__8; lean_object* l_Lean_liftMonadTracerAdapter___rarg(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; +lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1(lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkMVar___closed__3; -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__4(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_ExprDefEq_24__isDefEqLeft(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__1; +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_mkAuxMVar___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_isEtaUnassignedMVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MetavarContext_assignExpr(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isDefEqStringLit___closed__1; -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4___boxed(lean_object**); -lean_object* l___private_Lean_Meta_ExprDefEq_48__regTraceClasses(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_26__tryHeuristic(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_47__regTraceClasses(lean_object*); +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__3; +lean_object* l___private_Lean_Meta_ExprDefEq_46__consumeLet___main___boxed(lean_object*); uint8_t l_Lean_Meta_TransparencyMode_beq(uint8_t, uint8_t); -lean_object* l___private_Lean_Meta_ExprDefEq_14__visit(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_13__visit(lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkMVar___closed__5; lean_object* l___private_Lean_Meta_ExprDefEq_2__isDefEqArgsFirstPass___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_commitWhen___at_Lean_Meta_isExprDefEqAuxImpl___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_6__isDefEqBindingAux___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_ExprDefEq_11__visit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkMVar___closed__2; -lean_object* l___private_Lean_Meta_ExprDefEq_23__isListLevelDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isEtaUnassignedMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkLambda(lean_object*, uint8_t, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_whenUndefDo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__4; lean_object* l___private_Lean_Meta_ExprDefEq_6__isDefEqBindingAux___main___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_withNewLocalInstances___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__4___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*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__1(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_ExprDefEq_18__processConstApprox(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_27__unfold___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_checkAssignment(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_throwCheckAssignmentFailure___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isDefEqBindingDomain___main(lean_object*, 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*); uint8_t l_Lean_Expr_isForall(lean_object*); lean_object* l___private_Lean_Util_Trace_3__getResetTraces___at_Lean_Meta_check___spec__1___rarg(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_28__unfold___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkFVar(lean_object*); uint8_t l_Lean_Expr_Data_binderInfo(uint64_t); lean_object* l_Lean_ConstantInfo_hints(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__3; lean_object* l_Lean_Meta_CheckAssignment_throwOutOfScopeFVar___rarg___closed__1; -lean_object* l___private_Lean_Meta_ExprDefEq_33__unfoldReducibeDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_19__processConstApprox(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Core_tracer; lean_object* l_Lean_Meta_CheckAssignment_throwOutOfScopeFVar___rarg(lean_object*); uint8_t l_Lean_Expr_isLambda(lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_9__findCached_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_mkFreshId___rarg(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_38__isSynthetic(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__3; +lean_object* l___private_Lean_Meta_ExprDefEq_37__isSynthetic(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_Lean_Meta_CheckAssignment_checkMVar___closed__1; +lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_1__isDefEqEta___spec__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_Lean_registerInternalExceptionId(lean_object*, lean_object*); -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_contains___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1___boxed(lean_object*); extern lean_object* l_Lean_Meta_commitWhen___closed__1; lean_object* l___private_Lean_Meta_ExprDefEq_10__cache(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_updateProj_x21___closed__2; +lean_object* l___private_Lean_Meta_ExprDefEq_46__consumeLet(lean_object*); lean_object* l_Lean_Meta_CheckAssignment_registerCheckAssignmentId___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_35__isAssigned___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isDefEqBindingDomain___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isListLevelDefEqAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_anyRangeMAux___main___at_Lean_Meta_CheckAssignmentQuick_check___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkFreshExprMVarAt(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_47__consumeLet___main___boxed(lean_object*); -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_type(lean_object*); lean_object* l_Lean_LocalDecl_value_x3f(lean_object*); -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__1; lean_object* lean_local_ctx_mk_local_decl(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__1(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_CheckAssignment_checkFVar___closed__3; -lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4(lean_object*, 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___private_Lean_Meta_ExprDefEq_18__simpAssignmentArg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__1(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_assignExprMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_Meta_CheckAssignmentQuick_check___main___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); lean_object* l_StateRefT_HasMonadLift(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_getMCtx(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_MetavarKind_isSyntheticOpaque(uint8_t); +lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_whnfCore___main___at_Lean_Meta_whnfCore___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_ParamInfo_inhabited; lean_object* l___private_Lean_Meta_ExprDefEq_5__isDefEqArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_throwCheckAssignmentFailure___rarg(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_34__unfoldNonProjFnDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isDefEqBindingDomain___main___at___private_Lean_Meta_ExprDefEq_6__isDefEqBindingAux___main___spec__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* l___private_Lean_Meta_ExprDefEq_33__unfoldNonProjFnDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_expr_eqv(lean_object*, lean_object*); extern lean_object* l_Std_PersistentArray_empty___closed__3; +lean_object* l___private_Lean_Meta_ExprDefEq_32__unfoldReducibeDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkMVar___closed__7; -lean_object* l___private_Lean_Meta_ExprDefEq_47__consumeLet(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__3; uint8_t l_Lean_Expr_isMVar(lean_object*); +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_getStuckMVar_x3f___main___at_Lean_Meta_getStuckMVar_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkApp(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__1(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_ExprDefEq_37__isSynthetic___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_hasMVar(lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4___lambda__1(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*); -lean_object* l___private_Lean_Meta_ExprDefEq_30__sameHeadSymbol___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__4; +lean_object* l___private_Lean_Meta_ExprDefEq_29__sameHeadSymbol___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_saveAndResetSynthInstanceCache___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_27__tryHeuristic(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_12__readMeta(lean_object*, lean_object*); extern uint8_t l_Bool_Inhabited; lean_object* lean_panic_fn(lean_object*, lean_object*); -uint8_t l___private_Lean_Meta_ExprDefEq_40__etaEq(lean_object*, lean_object*); +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_36__isDelayedAssignedHead(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignmentQuick_check(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_23__isListLevelDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l___private_Lean_Meta_ExprDefEq_39__etaEq(lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__6; -lean_object* l___private_Lean_Meta_ExprDefEq_37__isDelayedAssignedHead(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Bool_toLBool(uint8_t); +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__2; lean_object* l_Lean_Meta_CheckAssignment_run(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_synthPending(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_Meta_CheckAssignment_check___main___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_isExprDefEqAuxRef; lean_object* l_Lean_Meta_CheckAssignment_throwCheckAssignmentFailure(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_40__isLetFVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignmentQuick_check___main(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_2__isDefEqArgsFirstPass___main(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_ExprDefEq_17__simpAssignmentArgAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_CheckAssignment_liftMetaM(lean_object*); -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_21__isDeltaCandidate_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_check___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__9; -lean_object* l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__1; -lean_object* l___private_Lean_Meta_ExprDefEq_41__isLetFVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_28__unfoldBothDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getFunInfoNArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_metavar_ctx_find_decl(lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_Meta_CheckAssignment_check___main___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isFVar(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_41__isDefEqProofIrrel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Expr_2__mkAppRangeAux___main(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_29__unfoldBothDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__2(lean_object*, 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* l_Lean_Meta_CheckAssignment_checkMVar___closed__10; lean_object* l_Lean_Meta_isDefEqBindingDomain___main___at___private_Lean_Meta_ExprDefEq_6__isDefEqBindingAux___main___spec__1___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___private_Lean_Meta_ExprDefEq_42__isDefEqProofIrrel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_updateLet_x21___closed__1; lean_object* lean_expr_update_lambda(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_throwCheckAssignmentFailure___rarg___closed__1; lean_object* l_Lean_simpleMonadTracerAdapter___rarg(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_inferType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_commitWhenSome_x3f___at_Lean_Meta_isExprDefEqAuxImpl___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_throwUnknownMVar___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_io_ref_set(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_instantiate_rev(lean_object*, lean_object*); uint8_t l_Lean_Meta_TransparencyMode_lt(uint8_t, uint8_t); extern lean_object* l_Lean_prodToExpr___rarg___lambda__1___closed__3; +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isDelayedAssigned(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_hasLooseBVars(lean_object*); lean_object* l___private_Lean_Expr_9__etaExpandedAux___main(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__1; lean_object* l_Lean_Meta_mkLambda(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getMVarDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_Inhabited; uint8_t l_Lean_Expr_isStringLit(lean_object*); +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2(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_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isClassExpensive_x3f___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_mk_array(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_22__isListLevelDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_10__cache___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__1; lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__10; lean_object* l_Lean_Meta_CheckAssignment_mkAuxMVar(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_CheckAssignment_Lean_MonadCache___closed__3; -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__5; -lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; lean_object* l_Lean_Meta_reduceNative_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_check___main___closed__2; extern lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_FunInfo_6__getFunInfoAux___spec__2___closed__1; lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__3; lean_object* l_Lean_Meta_whnfD(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_getMCtx___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__5; lean_object* l_Lean_Meta_setIsExprDefEqAuxRef___closed__1; lean_object* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__5; +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__3; +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__3(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_isDefEqNat(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5___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___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_check___main___closed__1; -lean_object* l___private_Lean_Meta_ExprDefEq_47__consumeLet___main(lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_run___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_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__2(lean_object*, 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* l_Lean_Meta_CheckAssignment_checkFVar___closed__2; lean_object* l_Lean_Meta_isReadOnlyOrSyntheticOpaqueExprMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__7; -lean_object* l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__2; +lean_object* l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__3; lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_local_ctx_find(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_3__isDefEqArgsAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__7; lean_object* l___private_Lean_Meta_ExprDefEq_7__isDefEqBinding___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_39__isAssignable___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_12__readMeta___boxed(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_46__consumeLet___main(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main(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_Basic_3__forallTelescopeReducingAuxAux___main___at_Lean_Meta_CheckAssignment_assignToConstFun___spec__2(lean_object*, 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* l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__2; lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__5; -lean_object* l___private_Lean_Meta_ExprDefEq_34__unfoldNonProjFnDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignmentQuick_check___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isProp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_HasBeq; -lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__3; -lean_object* l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__1; +lean_object* l___private_Lean_Meta_ExprDefEq_33__unfoldNonProjFnDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_inhabited___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_mkBVar(lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_5__isDefEqArgs___spec__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*); uint8_t l_Lean_Expr_hasFVar(lean_object*); lean_object* l_Lean_MonadTracerAdapter_addTrace___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_39__etaEq___boxed(lean_object*, lean_object*); lean_object* l_ReaderT_lift___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_getTraceState___rarg(lean_object*, lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_40__etaEq___boxed(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_21__processAssignment(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__2; -lean_object* l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__2; +lean_object* l___private_Lean_Meta_ExprDefEq_40__isLetFVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignment(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_ExprDefEq_6__isDefEqBindingAux___main(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_updateForallE_x21___closed__1; lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__9; -lean_object* l___private_Lean_Meta_ExprDefEq_44__isDefEqWHNF___at_Lean_Meta_isExprDefEqAuxImpl___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_37__isDelayedAssignedHead___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalContext_isSubPrefixOf(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_getMCtx___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__3; +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__8; -lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_ReducibilityHints_lt(lean_object*, lean_object*); lean_object* l_Lean_Meta_CheckAssignment_registerOutOfScopeId___closed__2; -lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__2; lean_object* l_Lean_Meta_CheckAssignment_checkFVar___closed__4; -lean_object* l___private_Lean_Meta_ExprDefEq_38__isSynthetic___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__1; +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_withAppAux___main___at_Lean_Meta_CheckAssignment_check___main___spec__8(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_LocalDecl_isLet(lean_object*); -lean_object* l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_monadInhabited___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_getFVarLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -7512,32 +7509,6 @@ x_3 = l_Lean_registerInternalExceptionId(x_2, x_1); return x_3; } } -lean_object* l_Lean_Meta_CheckAssignment_liftMetaM___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* x_8) { -_start: -{ -lean_object* x_9; -x_9 = lean_apply_5(x_1, x_4, x_5, x_6, x_7, x_8); -return x_9; -} -} -lean_object* l_Lean_Meta_CheckAssignment_liftMetaM(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_CheckAssignment_liftMetaM___rarg___boxed), 8, 0); -return x_2; -} -} -lean_object* l_Lean_Meta_CheckAssignment_liftMetaM___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) { -_start: -{ -lean_object* x_9; -x_9 = l_Lean_Meta_CheckAssignment_liftMetaM___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean_dec(x_3); -lean_dec(x_2); -return x_9; -} -} lean_object* _init_l_Lean_Meta_CheckAssignment_throwCheckAssignmentFailure___rarg___closed__1() { _start: { @@ -7925,46 +7896,7 @@ return x_31; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_12__readMeta___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -lean_object* x_6; -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_1); -lean_ctor_set(x_6, 1, x_5); -return x_6; -} -} -lean_object* l___private_Lean_Meta_ExprDefEq_12__readMeta(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_12__readMeta___rarg___boxed), 5, 0); -return x_3; -} -} -lean_object* l___private_Lean_Meta_ExprDefEq_12__readMeta___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -lean_object* x_6; -x_6 = l___private_Lean_Meta_ExprDefEq_12__readMeta___rarg(x_1, x_2, x_3, x_4, x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_6; -} -} -lean_object* l___private_Lean_Meta_ExprDefEq_12__readMeta___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = l___private_Lean_Meta_ExprDefEq_12__readMeta(x_1, x_2); -lean_dec(x_2); -lean_dec(x_1); -return x_3; -} -} -lean_object* _init_l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__1() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__1() { _start: { lean_object* x_1; @@ -7972,27 +7904,27 @@ x_1 = lean_mk_string(" @ "); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__2() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__1; +x_1 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__3() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__3() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__2; +x_1 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__2; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4() { _start: { lean_object* x_1; lean_object* x_2; @@ -8002,11 +7934,11 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(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_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_9 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__3; +x_9 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__3; x_10 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_10, 0, x_1); lean_ctor_set(x_10, 1, x_9); @@ -8018,7 +7950,7 @@ lean_ctor_set(x_13, 0, x_12); x_14 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_14, 0, x_10); lean_ctor_set(x_14, 1, x_13); -x_15 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; +x_15 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; x_16 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_16, 0, x_14); lean_ctor_set(x_16, 1, x_15); @@ -8049,11 +7981,11 @@ lean_ctor_set(x_27, 1, x_8); return x_27; } } -lean_object* l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___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_9; -x_9 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_9 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -8083,16 +8015,6 @@ return x_2; lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__3() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Core_tracer; -x_2 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__1; -x_3 = l_Lean_simpleMonadTracerAdapter___rarg(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__4() { -_start: -{ lean_object* x_1; x_1 = lean_alloc_closure((void*)(l_StateRefT_HasMonadLift), 3, 2); lean_closure_set(x_1, 0, lean_box(0)); @@ -8100,49 +8022,7 @@ lean_closure_set(x_1, 1, lean_box(0)); return x_1; } } -lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__5() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_CheckAssignment_checkFVar___closed__3; -x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__4; -x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__2; -x_2 = lean_alloc_closure((void*)(l_ReaderT_lift___boxed), 4, 3); -lean_closure_set(x_2, 0, lean_box(0)); -lean_closure_set(x_2, 1, lean_box(0)); -lean_closure_set(x_2, 2, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__7() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_CheckAssignment_checkFVar___closed__5; -x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__6; -x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__8() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_CheckAssignment_checkFVar___closed__7; -x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__4; -x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__9() { +lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__4() { _start: { lean_object* x_1; lean_object* x_2; @@ -8154,12 +8034,64 @@ lean_closure_set(x_2, 2, x_1); return x_2; } } -lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__10() { +lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Core_tracer; +x_2 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__1; +x_3 = l_Lean_simpleMonadTracerAdapter___rarg(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_CheckAssignment_checkFVar___closed__5; +x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__3; +x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__2; +x_2 = lean_alloc_closure((void*)(l_ReaderT_lift___boxed), 4, 3); +lean_closure_set(x_2, 0, lean_box(0)); +lean_closure_set(x_2, 1, lean_box(0)); +lean_closure_set(x_2, 2, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_CheckAssignment_checkFVar___closed__6; +x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__7; +x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__9() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Meta_CheckAssignment_checkFVar___closed__8; -x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__9; +x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__3; +x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__10() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_CheckAssignment_checkFVar___closed__9; +x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__4; x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); return x_3; } @@ -8277,7 +8209,7 @@ x_34 = lean_ctor_get(x_29, 1); lean_inc(x_34); lean_dec(x_29); lean_inc(x_3); -x_35 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_18, x_3, x_4, x_5, x_6, x_7, x_8, x_34); +x_35 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_18, x_3, x_4, x_5, x_6, x_7, x_8, x_34); x_36 = lean_ctor_get(x_35, 0); lean_inc(x_36); x_37 = lean_ctor_get(x_35, 1); @@ -8452,7 +8384,7 @@ x_73 = lean_ctor_get(x_68, 1); lean_inc(x_73); lean_dec(x_68); lean_inc(x_3); -x_74 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_57, x_3, x_4, x_5, x_6, x_7, x_8, x_73); +x_74 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_57, x_3, x_4, x_5, x_6, x_7, x_8, x_73); x_75 = lean_ctor_get(x_74, 0); lean_inc(x_75); x_76 = lean_ctor_get(x_74, 1); @@ -8821,36 +8753,40 @@ return x_11; lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__1() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("readOnlyMVarWithBiggerLCtx"); -return x_1; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_CheckAssignment_checkFVar___closed__5; +x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__3; +x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); +return x_3; } } lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__2; -x_2 = l_Lean_Meta_CheckAssignment_checkMVar___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); +x_1 = l_Lean_Meta_CheckAssignment_checkMVar___closed__1; +x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__7; +x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); return x_3; } } lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("occursCheck"); -return x_1; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_CheckAssignment_checkMVar___closed__2; +x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__3; +x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); +return x_3; } } lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__2; -x_2 = l_Lean_Meta_CheckAssignment_checkMVar___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); +x_1 = l_Lean_Meta_CheckAssignment_checkMVar___closed__3; +x_2 = l_Lean_Meta_CheckAssignment_checkFVar___closed__4; +x_3 = l_Lean_liftMonadTracerAdapter___rarg(x_1, x_2); return x_3; } } @@ -8858,25 +8794,61 @@ lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__5() { _start: { lean_object* x_1; -x_1 = lean_mk_string("occurs check failed"); +x_1 = lean_mk_string("readOnlyMVarWithBiggerLCtx"); return x_1; } } lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__6() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_CheckAssignment_checkMVar___closed__5; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__2; +x_2 = l_Lean_Meta_CheckAssignment_checkMVar___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; } } lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__7() { _start: { +lean_object* x_1; +x_1 = lean_mk_string("occursCheck"); +return x_1; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__2; +x_2 = l_Lean_Meta_CheckAssignment_checkMVar___closed__7; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__9() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("occurs check failed"); +return x_1; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__10() { +_start: +{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_CheckAssignment_checkMVar___closed__6; +x_1 = l_Lean_Meta_CheckAssignment_checkMVar___closed__9; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__11() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_CheckAssignment_checkMVar___closed__10; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -9274,7 +9246,7 @@ lean_inc(x_118); lean_dec(x_113); x_119 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__1; x_120 = l_Lean_Core_tracer; -x_121 = l_Lean_Meta_CheckAssignment_checkMVar___closed__4; +x_121 = l_Lean_Meta_CheckAssignment_checkMVar___closed__8; x_122 = l___private_Lean_Util_Trace_5__checkTraceOptionM___rarg(x_119, x_120, x_121); lean_inc(x_8); lean_inc(x_7); @@ -9307,16 +9279,16 @@ lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; x_128 = lean_ctor_get(x_123, 1); lean_inc(x_128); lean_dec(x_123); -x_129 = l_Lean_Meta_CheckAssignment_checkMVar___closed__7; +x_129 = l_Lean_Meta_CheckAssignment_checkMVar___closed__11; lean_inc(x_3); -x_130 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_129, x_3, x_4, x_5, x_6, x_7, x_8, x_128); +x_130 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_129, x_3, x_4, x_5, x_6, x_7, x_8, x_128); x_131 = lean_ctor_get(x_130, 0); lean_inc(x_131); x_132 = lean_ctor_get(x_130, 1); lean_inc(x_132); lean_dec(x_130); x_133 = l_Lean_Meta_CheckAssignment_checkFVar___closed__2; -x_134 = l_Lean_Meta_CheckAssignment_checkFVar___closed__10; +x_134 = l_Lean_Meta_CheckAssignment_checkMVar___closed__4; x_135 = l_Lean_MonadTracerAdapter_addTrace___rarg(x_133, x_134, x_121, x_131); x_136 = lean_apply_7(x_135, x_3, x_4, x_5, x_6, x_7, x_8, x_132); if (lean_obj_tag(x_136) == 0) @@ -9418,7 +9390,7 @@ lean_inc(x_24); lean_dec(x_19); x_25 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__1; x_26 = l_Lean_Core_tracer; -x_27 = l_Lean_Meta_CheckAssignment_checkMVar___closed__2; +x_27 = l_Lean_Meta_CheckAssignment_checkMVar___closed__6; x_28 = l___private_Lean_Util_Trace_5__checkTraceOptionM___rarg(x_25, x_26, x_27); lean_inc(x_8); lean_inc(x_7); @@ -9453,14 +9425,14 @@ x_34 = lean_ctor_get(x_29, 1); lean_inc(x_34); lean_dec(x_29); lean_inc(x_3); -x_35 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_18, x_3, x_4, x_5, x_6, x_7, x_8, x_34); +x_35 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_18, x_3, x_4, x_5, x_6, x_7, x_8, x_34); x_36 = lean_ctor_get(x_35, 0); lean_inc(x_36); x_37 = lean_ctor_get(x_35, 1); lean_inc(x_37); lean_dec(x_35); x_38 = l_Lean_Meta_CheckAssignment_checkFVar___closed__2; -x_39 = l_Lean_Meta_CheckAssignment_checkFVar___closed__10; +x_39 = l_Lean_Meta_CheckAssignment_checkMVar___closed__4; x_40 = l_Lean_MonadTracerAdapter_addTrace___rarg(x_38, x_39, x_27, x_36); x_41 = lean_apply_7(x_40, x_3, x_4, x_5, x_6, x_7, x_8, x_37); if (lean_obj_tag(x_41) == 0) @@ -9897,7 +9869,7 @@ lean_inc(x_248); lean_dec(x_243); x_249 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__1; x_250 = l_Lean_Core_tracer; -x_251 = l_Lean_Meta_CheckAssignment_checkMVar___closed__4; +x_251 = l_Lean_Meta_CheckAssignment_checkMVar___closed__8; x_252 = l___private_Lean_Util_Trace_5__checkTraceOptionM___rarg(x_249, x_250, x_251); lean_inc(x_8); lean_inc(x_7); @@ -9930,16 +9902,16 @@ lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; x_258 = lean_ctor_get(x_253, 1); lean_inc(x_258); lean_dec(x_253); -x_259 = l_Lean_Meta_CheckAssignment_checkMVar___closed__7; +x_259 = l_Lean_Meta_CheckAssignment_checkMVar___closed__11; lean_inc(x_3); -x_260 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_259, x_3, x_4, x_5, x_6, x_7, x_8, x_258); +x_260 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_259, x_3, x_4, x_5, x_6, x_7, x_8, x_258); x_261 = lean_ctor_get(x_260, 0); lean_inc(x_261); x_262 = lean_ctor_get(x_260, 1); lean_inc(x_262); lean_dec(x_260); x_263 = l_Lean_Meta_CheckAssignment_checkFVar___closed__2; -x_264 = l_Lean_Meta_CheckAssignment_checkFVar___closed__10; +x_264 = l_Lean_Meta_CheckAssignment_checkMVar___closed__4; x_265 = l_Lean_MonadTracerAdapter_addTrace___rarg(x_263, x_264, x_251, x_261); x_266 = lean_apply_7(x_265, x_3, x_4, x_5, x_6, x_7, x_8, x_262); if (lean_obj_tag(x_266) == 0) @@ -10045,7 +10017,7 @@ lean_inc(x_158); lean_dec(x_153); x_159 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___rarg___closed__1; x_160 = l_Lean_Core_tracer; -x_161 = l_Lean_Meta_CheckAssignment_checkMVar___closed__2; +x_161 = l_Lean_Meta_CheckAssignment_checkMVar___closed__6; x_162 = l___private_Lean_Util_Trace_5__checkTraceOptionM___rarg(x_159, x_160, x_161); lean_inc(x_8); lean_inc(x_7); @@ -10080,14 +10052,14 @@ x_168 = lean_ctor_get(x_163, 1); lean_inc(x_168); lean_dec(x_163); lean_inc(x_3); -x_169 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_152, x_3, x_4, x_5, x_6, x_7, x_8, x_168); +x_169 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_152, x_3, x_4, x_5, x_6, x_7, x_8, x_168); x_170 = lean_ctor_get(x_169, 0); lean_inc(x_170); x_171 = lean_ctor_get(x_169, 1); lean_inc(x_171); lean_dec(x_169); x_172 = l_Lean_Meta_CheckAssignment_checkFVar___closed__2; -x_173 = l_Lean_Meta_CheckAssignment_checkFVar___closed__10; +x_173 = l_Lean_Meta_CheckAssignment_checkMVar___closed__4; x_174 = l_Lean_MonadTracerAdapter_addTrace___rarg(x_172, x_173, x_161, x_170); x_175 = lean_apply_7(x_174, x_3, x_4, x_5, x_6, x_7, x_8, x_171); if (lean_obj_tag(x_175) == 0) @@ -12453,7 +12425,7 @@ x_29 = lean_ctor_get(x_24, 1); lean_inc(x_29); lean_dec(x_24); lean_inc(x_2); -x_30 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_16, x_2, x_3, x_4, x_5, x_6, x_7, x_29); +x_30 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_16, x_2, x_3, x_4, x_5, x_6, x_7, x_29); x_31 = lean_ctor_get(x_30, 0); lean_inc(x_31); x_32 = lean_ctor_get(x_30, 1); @@ -12564,7 +12536,7 @@ x_53 = lean_ctor_get(x_48, 1); lean_inc(x_53); lean_dec(x_48); lean_inc(x_2); -x_54 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_40, x_2, x_3, x_4, x_5, x_6, x_7, x_53); +x_54 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_40, x_2, x_3, x_4, x_5, x_6, x_7, x_53); x_55 = lean_ctor_get(x_54, 0); lean_inc(x_55); x_56 = lean_ctor_get(x_54, 1); @@ -13168,7 +13140,7 @@ lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; x_103 = lean_ctor_get(x_98, 1); lean_inc(x_103); lean_dec(x_98); -x_104 = l_Lean_Meta_CheckAssignment_checkMVar___closed__4; +x_104 = l_Lean_Meta_CheckAssignment_checkMVar___closed__8; x_105 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_104, x_6, x_7, x_103); x_106 = lean_ctor_get(x_105, 0); lean_inc(x_106); @@ -13195,9 +13167,9 @@ lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; x_110 = lean_ctor_get(x_105, 1); lean_inc(x_110); lean_dec(x_105); -x_111 = l_Lean_Meta_CheckAssignment_checkMVar___closed__7; +x_111 = l_Lean_Meta_CheckAssignment_checkMVar___closed__11; lean_inc(x_2); -x_112 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_111, x_2, x_3, x_4, x_5, x_6, x_7, x_110); +x_112 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_111, x_2, x_3, x_4, x_5, x_6, x_7, x_110); x_113 = lean_ctor_get(x_112, 0); lean_inc(x_113); x_114 = lean_ctor_get(x_112, 1); @@ -13252,7 +13224,7 @@ lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint x_23 = lean_ctor_get(x_18, 1); lean_inc(x_23); lean_dec(x_18); -x_24 = l_Lean_Meta_CheckAssignment_checkMVar___closed__2; +x_24 = l_Lean_Meta_CheckAssignment_checkMVar___closed__6; x_25 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_24, x_6, x_7, x_23); x_26 = lean_ctor_get(x_25, 0); lean_inc(x_26); @@ -13281,7 +13253,7 @@ x_30 = lean_ctor_get(x_25, 1); lean_inc(x_30); lean_dec(x_25); lean_inc(x_2); -x_31 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_17, x_2, x_3, x_4, x_5, x_6, x_7, x_30); +x_31 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_17, x_2, x_3, x_4, x_5, x_6, x_7, x_30); x_32 = lean_ctor_get(x_31, 0); lean_inc(x_32); x_33 = lean_ctor_get(x_31, 1); @@ -13662,7 +13634,7 @@ lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; x_205 = lean_ctor_get(x_200, 1); lean_inc(x_205); lean_dec(x_200); -x_206 = l_Lean_Meta_CheckAssignment_checkMVar___closed__4; +x_206 = l_Lean_Meta_CheckAssignment_checkMVar___closed__8; x_207 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_206, x_6, x_7, x_205); x_208 = lean_ctor_get(x_207, 0); lean_inc(x_208); @@ -13689,9 +13661,9 @@ lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; x_212 = lean_ctor_get(x_207, 1); lean_inc(x_212); lean_dec(x_207); -x_213 = l_Lean_Meta_CheckAssignment_checkMVar___closed__7; +x_213 = l_Lean_Meta_CheckAssignment_checkMVar___closed__11; lean_inc(x_2); -x_214 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_213, x_2, x_3, x_4, x_5, x_6, x_7, x_212); +x_214 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_213, x_2, x_3, x_4, x_5, x_6, x_7, x_212); x_215 = lean_ctor_get(x_214, 0); lean_inc(x_215); x_216 = lean_ctor_get(x_214, 1); @@ -13746,7 +13718,7 @@ lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; x_129 = lean_ctor_get(x_124, 1); lean_inc(x_129); lean_dec(x_124); -x_130 = l_Lean_Meta_CheckAssignment_checkMVar___closed__2; +x_130 = l_Lean_Meta_CheckAssignment_checkMVar___closed__6; x_131 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_130, x_6, x_7, x_129); x_132 = lean_ctor_get(x_131, 0); lean_inc(x_132); @@ -13775,7 +13747,7 @@ x_136 = lean_ctor_get(x_131, 1); lean_inc(x_136); lean_dec(x_131); lean_inc(x_2); -x_137 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo(x_123, x_2, x_3, x_4, x_5, x_6, x_7, x_136); +x_137 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo(x_123, x_2, x_3, x_4, x_5, x_6, x_7, x_136); x_138 = lean_ctor_get(x_137, 0); lean_inc(x_138); x_139 = lean_ctor_get(x_137, 1); @@ -28224,7 +28196,7 @@ x_12 = l_Lean_Meta_CheckAssignment_run(x_1, x_2, x_3, x_11, x_5, x_6, x_7, x_8, return x_12; } } -lean_object* l___private_Lean_Meta_ExprDefEq_14__visit(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Lean_Meta_ExprDefEq_13__visit(lean_object* x_1, lean_object* x_2) { _start: { uint8_t x_3; @@ -29825,7 +29797,7 @@ x_7 = lean_box(x_6); return x_7; } } -lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___spec__1(lean_object* x_1) { +lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___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; @@ -29839,7 +29811,7 @@ lean_dec(x_4); return x_6; } } -lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux(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: { if (lean_obj_tag(x_3) == 5) @@ -29850,7 +29822,7 @@ lean_inc(x_9); x_10 = lean_ctor_get(x_3, 1); lean_inc(x_10); lean_dec(x_3); -x_11 = l_Array_back___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___spec__1(x_2); +x_11 = l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1(x_2); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); @@ -29956,29 +29928,29 @@ return x_32; } } } -lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___spec__1___boxed(lean_object* x_1) { +lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l_Array_back___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___spec__1(x_1); +x_2 = l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1(x_1); lean_dec(x_1); return x_2; } } -lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___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_9; -x_9 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_9 = l___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_2); return x_9; } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; -x_9 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___boxed), 8, 3); +x_9 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___boxed), 8, 3); lean_closure_set(x_9, 0, x_1); lean_closure_set(x_9, 1, x_2); lean_closure_set(x_9, 2, x_3); @@ -30391,11 +30363,11 @@ return x_74; } } } -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___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, lean_object* x_7, lean_object* x_8) { +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___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, lean_object* x_7, lean_object* x_8) { _start: { lean_object* x_9; -x_9 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_9 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); if (lean_obj_tag(x_9) == 0) { lean_object* x_10; @@ -30483,7 +30455,7 @@ return x_30; } } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__1() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__1() { _start: { lean_object* x_1; @@ -30491,17 +30463,17 @@ x_1 = lean_mk_string("foApprox"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__2() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Meta_isExprDefEq___closed__2; -x_2 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__1; +x_2 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { lean_object* x_9; lean_object* x_36; uint8_t x_37; @@ -30551,7 +30523,7 @@ lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean x_63 = lean_ctor_get(x_58, 1); lean_inc(x_63); lean_dec(x_58); -x_64 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__2; +x_64 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__2; x_65 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_64, x_6, x_7, x_63); x_66 = lean_ctor_get(x_65, 0); lean_inc(x_66); @@ -30577,7 +30549,7 @@ lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean lean_inc(x_1); x_43 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_43, 0, x_1); -x_44 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; +x_44 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; x_45 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_45, 0, x_43); lean_ctor_set(x_45, 1, x_44); @@ -30597,7 +30569,7 @@ lean_ctor_set(x_52, 0, x_3); x_53 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_53, 0, x_51); lean_ctor_set(x_53, 1, x_52); -x_54 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__2; +x_54 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__2; x_55 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(x_54, x_53, x_4, x_5, x_6, x_7, x_42); x_56 = lean_ctor_get(x_55, 1); lean_inc(x_56); @@ -30617,7 +30589,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_10 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_9); +x_10 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_9); if (lean_obj_tag(x_10) == 0) { lean_object* x_11; uint8_t x_12; @@ -30778,15 +30750,15 @@ return x_34; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox(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_9; -x_9 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_9 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); return x_9; } } -lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { switch (lean_obj_tag(x_1)) { @@ -30905,37 +30877,37 @@ return x_27; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___main(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___main(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); return x_7; } } -lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___main(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___main(x_1, x_2, x_3, x_4, x_5, x_6); return x_7; } } -lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); return x_7; } } -lean_object* l___private_Lean_Meta_ExprDefEq_18__simpAssignmentArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArg(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; @@ -30945,7 +30917,7 @@ lean_dec(x_7); if (x_8 == 0) { lean_object* x_9; -x_9 = l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___main(x_1, x_2, x_3, x_4, x_5, x_6); +x_9 = l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___main(x_1, x_2, x_3, x_4, x_5, x_6); return x_9; } else @@ -30957,23 +30929,23 @@ lean_inc(x_11); x_12 = lean_ctor_get(x_10, 1); lean_inc(x_12); lean_dec(x_10); -x_13 = l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArgAux___main(x_11, x_2, x_3, x_4, x_5, x_12); +x_13 = l___private_Lean_Meta_ExprDefEq_16__simpAssignmentArgAux___main(x_11, x_2, x_3, x_4, x_5, x_12); return x_13; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_18__simpAssignmentArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_18__simpAssignmentArg(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArg(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); return x_7; } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { _start: { lean_object* x_13; uint8_t x_14; @@ -31126,7 +31098,7 @@ lean_ctor_set(x_50, 2, x_49); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -x_51 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_41, x_50, x_9, x_10, x_11, x_44); +x_51 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_41, x_50, x_9, x_10, x_11, x_44); if (lean_obj_tag(x_51) == 0) { lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; @@ -31262,7 +31234,7 @@ lean_ctor_set(x_85, 2, x_84); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -x_86 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_76, x_85, x_9, x_10, x_11, x_79); +x_86 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_76, x_85, x_9, x_10, x_11, x_79); if (lean_obj_tag(x_86) == 0) { lean_object* x_87; lean_object* x_88; lean_object* x_89; uint8_t x_90; @@ -31435,7 +31407,7 @@ return x_112; } } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7, lean_object* 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* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7, lean_object* 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) { _start: { uint8_t x_15; @@ -31514,12 +31486,12 @@ return x_27; else { lean_object* x_28; -x_28 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__2(x_5, x_2, x_4, x_6, x_7, x_8, x_3, x_1, x_9, x_10, x_11, x_12, x_13, x_14); +x_28 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__2(x_5, x_2, x_4, x_6, x_7, x_8, x_3, x_1, x_9, x_10, x_11, x_12, x_13, x_14); return x_28; } } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16, lean_object* x_17) { +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16, lean_object* x_17) { _start: { lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; @@ -31534,7 +31506,7 @@ lean_inc(x_3); lean_inc(x_7); lean_inc(x_2); lean_inc(x_10); -x_21 = lean_alloc_closure((void*)(l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4___lambda__1___boxed), 14, 8); +x_21 = lean_alloc_closure((void*)(l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4___lambda__1___boxed), 14, 8); lean_closure_set(x_21, 0, x_10); lean_closure_set(x_21, 1, x_2); lean_closure_set(x_21, 2, x_7); @@ -31641,7 +31613,7 @@ lean_ctor_set(x_48, 2, x_47); lean_inc(x_16); lean_inc(x_15); lean_inc(x_14); -x_49 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_39, x_48, x_14, x_15, x_16, x_42); +x_49 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_39, x_48, x_14, x_15, x_16, x_42); if (lean_obj_tag(x_49) == 0) { lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; @@ -31777,7 +31749,7 @@ lean_ctor_set(x_83, 2, x_82); lean_inc(x_16); lean_inc(x_15); lean_inc(x_14); -x_84 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_74, x_83, x_14, x_15, x_16, x_77); +x_84 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_74, x_83, x_14, x_15, x_16, x_77); if (lean_obj_tag(x_84) == 0) { lean_object* x_85; lean_object* x_86; lean_object* x_87; uint8_t x_88; @@ -31962,7 +31934,7 @@ return x_110; } } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5(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* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5(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) { _start: { lean_object* x_13; uint8_t x_14; @@ -32115,7 +32087,7 @@ lean_ctor_set(x_50, 2, x_49); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -x_51 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_41, x_50, x_9, x_10, x_11, x_44); +x_51 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_41, x_50, x_9, x_10, x_11, x_44); if (lean_obj_tag(x_51) == 0) { lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; @@ -32251,7 +32223,7 @@ lean_ctor_set(x_85, 2, x_84); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -x_86 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_76, x_85, x_9, x_10, x_11, x_79); +x_86 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_76, x_85, x_9, x_10, x_11, x_79); if (lean_obj_tag(x_86) == 0) { lean_object* x_87; lean_object* x_88; lean_object* x_89; uint8_t x_90; @@ -32424,7 +32396,7 @@ return x_112; } } } -lean_object* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { _start: { lean_object* x_15; @@ -32493,7 +32465,7 @@ x_49 = lean_ctor_get(x_10, 1); lean_dec(x_49); lean_ctor_set(x_10, 1, x_6); lean_inc(x_7); -x_50 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5(x_1, x_2, x_3, x_7, x_46, x_7, x_8, x_10, x_11, x_12, x_13, x_14); +x_50 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5(x_1, x_2, x_3, x_7, x_46, x_7, x_8, x_10, x_11, x_12, x_13, x_14); lean_dec(x_46); lean_dec(x_7); lean_dec(x_2); @@ -32512,7 +32484,7 @@ lean_ctor_set(x_53, 0, x_51); lean_ctor_set(x_53, 1, x_6); lean_ctor_set(x_53, 2, x_52); lean_inc(x_7); -x_54 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5(x_1, x_2, x_3, x_7, x_46, x_7, x_8, x_53, x_11, x_12, x_13, x_14); +x_54 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5(x_1, x_2, x_3, x_7, x_46, x_7, x_8, x_53, x_11, x_12, x_13, x_14); lean_dec(x_46); lean_dec(x_7); lean_dec(x_2); @@ -32571,7 +32543,7 @@ lean_dec(x_9); lean_dec(x_6); lean_dec(x_5); lean_inc(x_7); -x_19 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3(x_1, x_2, x_3, x_7, x_16, x_7, x_8, x_10, x_11, x_12, x_13, x_14); +x_19 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3(x_1, x_2, x_3, x_7, x_16, x_7, x_8, x_10, x_11, x_12, x_13, x_14); lean_dec(x_16); lean_dec(x_7); lean_dec(x_2); @@ -32582,7 +32554,7 @@ else lean_object* x_20; lean_inc(x_8); lean_inc(x_7); -x_20 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_16, x_7, x_8, x_10, x_11, x_12, x_13, x_14); +x_20 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_16, x_7, x_8, x_10, x_11, x_12, x_13, x_14); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -32609,7 +32581,7 @@ lean_dec(x_9); lean_dec(x_6); lean_dec(x_5); lean_inc(x_7); -x_24 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3(x_1, x_2, x_3, x_7, x_16, x_7, x_8, x_23, x_11, x_12, x_13, x_14); +x_24 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3(x_1, x_2, x_3, x_7, x_16, x_7, x_8, x_23, x_11, x_12, x_13, x_14); lean_dec(x_16); lean_dec(x_7); lean_dec(x_2); @@ -32620,7 +32592,7 @@ else lean_object* x_25; lean_inc(x_8); lean_inc(x_7); -x_25 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_16, x_7, x_8, x_23, x_11, x_12, x_13, x_14); +x_25 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_16, x_7, x_8, x_23, x_11, x_12, x_13, x_14); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -32630,7 +32602,7 @@ return x_25; } } } -lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___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, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___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, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { lean_object* x_11; @@ -32727,7 +32699,7 @@ lean_inc(x_29); x_30 = 1; x_31 = l_Array_empty___closed__1; x_32 = lean_unsigned_to_nat(0u); -x_33 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__2(x_1, x_2, x_3, x_30, x_5, x_29, x_31, x_32, x_13, x_6, x_7, x_8, x_9, x_14); +x_33 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__2(x_1, x_2, x_3, x_30, x_5, x_29, x_31, x_32, x_13, x_6, x_7, x_8, x_9, x_14); return x_33; } } @@ -32820,7 +32792,7 @@ lean_inc(x_51); x_52 = 1; x_53 = l_Array_empty___closed__1; x_54 = lean_unsigned_to_nat(0u); -x_55 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__2(x_1, x_2, x_3, x_52, x_5, x_51, x_53, x_54, x_34, x_6, x_7, x_8, x_9, x_35); +x_55 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__2(x_1, x_2, x_3, x_52, x_5, x_51, x_53, x_54, x_34, x_6, x_7, x_8, x_9, x_35); return x_55; } } @@ -32857,7 +32829,7 @@ return x_59; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_19__processConstApprox(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_18__processConstApprox(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_9; uint8_t x_10; @@ -32958,7 +32930,7 @@ lean_inc(x_32); lean_dec(x_30); lean_inc(x_2); lean_ctor_set(x_17, 0, x_2); -x_33 = l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__1(x_1, x_2, x_28, x_32, x_17, x_4, x_5, x_6, x_7, x_31); +x_33 = l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__1(x_1, x_2, x_28, x_32, x_17, x_4, x_5, x_6, x_7, x_31); return x_33; } else @@ -33013,7 +32985,7 @@ lean_dec(x_40); lean_inc(x_2); x_43 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_43, 0, x_2); -x_44 = l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__1(x_1, x_2, x_38, x_42, x_43, x_4, x_5, x_6, x_7, x_41); +x_44 = l___private_Lean_Meta_Basic_4__forallTelescopeReducingAux___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__1(x_1, x_2, x_38, x_42, x_43, x_4, x_5, x_6, x_7, x_41); return x_44; } else @@ -33082,28 +33054,28 @@ return x_52; } } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { _start: { lean_object* x_13; -x_13 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +x_13 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); lean_dec(x_6); lean_dec(x_5); lean_dec(x_2); return x_13; } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4___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* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4___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* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { _start: { uint8_t x_15; lean_object* x_16; x_15 = lean_unbox(x_6); lean_dec(x_6); -x_16 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4___lambda__1(x_1, x_2, x_3, x_4, x_5, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14); +x_16 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4___lambda__1(x_1, x_2, x_3, x_4, x_5, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14); return x_16; } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4___boxed(lean_object** _args) { +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4___boxed(lean_object** _args) { lean_object* x_1 = _args[0]; lean_object* x_2 = _args[1]; lean_object* x_3 = _args[2]; @@ -33126,35 +33098,35 @@ _start: uint8_t x_18; lean_object* x_19; x_18 = lean_unbox(x_4); lean_dec(x_4); -x_19 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__4(x_1, x_2, x_3, x_18, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); +x_19 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__4(x_1, x_2, x_3, x_18, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); lean_dec(x_11); lean_dec(x_9); lean_dec(x_8); return x_19; } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { _start: { lean_object* x_13; -x_13 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +x_13 = l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); lean_dec(x_6); lean_dec(x_5); lean_dec(x_2); return x_13; } } -lean_object* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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* l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, 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) { _start: { uint8_t x_15; lean_object* x_16; x_15 = lean_unbox(x_4); lean_dec(x_4); -x_16 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_19__processConstApprox___spec__2(x_1, x_2, x_3, x_15, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14); +x_16 = l___private_Lean_Meta_Basic_3__forallTelescopeReducingAuxAux___main___at___private_Lean_Meta_ExprDefEq_18__processConstApprox___spec__2(x_1, x_2, x_3, x_15, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14); return x_16; } } -uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { uint8_t x_6; @@ -33193,7 +33165,7 @@ return x_10; } } } -uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { uint8_t x_8; @@ -33229,7 +33201,7 @@ return x_11; } } } -uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { uint8_t x_9; @@ -33266,7 +33238,7 @@ return x_12; } } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__1() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -33276,7 +33248,7 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__2() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__2() { _start: { lean_object* x_1; @@ -33284,17 +33256,17 @@ x_1 = lean_mk_string("beforeMkLambda"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__3() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Lean_Meta_ExprDefEq_8__checkTypesAndAssign___closed__2; -x_2 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__2; +x_2 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__2; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +lean_object* l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { lean_object* x_11; lean_object* x_12; uint8_t x_13; @@ -33345,7 +33317,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_23 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_22); +x_23 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_22); if (lean_obj_tag(x_23) == 0) { lean_object* x_24; uint8_t x_25; @@ -33359,7 +33331,7 @@ lean_dec(x_24); x_26 = lean_ctor_get(x_23, 1); lean_inc(x_26); lean_dec(x_23); -x_27 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_12, x_5, x_6, x_7, x_8, x_9, x_26); +x_27 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_12, x_5, x_6, x_7, x_8, x_9, x_26); return x_27; } else @@ -33454,7 +33426,7 @@ lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; x_126 = lean_ctor_get(x_121, 1); lean_inc(x_126); lean_dec(x_121); -x_127 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__3; +x_127 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__3; x_128 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_127, x_8, x_9, x_126); x_129 = lean_ctor_get(x_128, 0); lean_inc(x_129); @@ -33482,7 +33454,7 @@ x_41 = lean_ctor_get(x_39, 1); lean_inc(x_41); lean_dec(x_39); x_42 = lean_unsigned_to_nat(0u); -x_43 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__1(x_2, x_4, x_4, x_12, x_42); +x_43 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__1(x_2, x_4, x_4, x_12, x_42); if (x_43 == 0) { lean_object* x_44; @@ -33533,7 +33505,7 @@ lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean x_91 = lean_ctor_get(x_86, 1); lean_inc(x_91); lean_dec(x_86); -x_92 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__1; +x_92 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__1; x_93 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_92, x_8, x_9, x_91); x_94 = lean_ctor_get(x_93, 0); lean_inc(x_94); @@ -33558,7 +33530,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_51 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_50); +x_51 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_50); if (lean_obj_tag(x_51) == 0) { lean_object* x_52; uint8_t x_53; @@ -33572,7 +33544,7 @@ lean_dec(x_52); x_54 = lean_ctor_get(x_51, 1); lean_inc(x_54); lean_dec(x_51); -x_55 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_12, x_5, x_6, x_7, x_8, x_9, x_54); +x_55 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_12, x_5, x_6, x_7, x_8, x_9, x_54); return x_55; } else @@ -33651,7 +33623,7 @@ lean_ctor_set(x_67, 0, x_40); x_68 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_68, 0, x_66); lean_ctor_set(x_68, 1, x_67); -x_69 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__1; +x_69 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__1; x_70 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(x_69, x_68, x_6, x_7, x_8, x_9, x_50); x_71 = lean_ctor_get(x_70, 1); lean_inc(x_71); @@ -33662,7 +33634,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_72 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_71); +x_72 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_71); if (lean_obj_tag(x_72) == 0) { lean_object* x_73; uint8_t x_74; @@ -33676,7 +33648,7 @@ lean_dec(x_73); x_75 = lean_ctor_get(x_72, 1); lean_inc(x_75); lean_dec(x_72); -x_76 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_12, x_5, x_6, x_7, x_8, x_9, x_75); +x_76 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_12, x_5, x_6, x_7, x_8, x_9, x_75); return x_76; } else @@ -33801,7 +33773,7 @@ lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_inc(x_1); x_106 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_106, 0, x_1); -x_107 = l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4; +x_107 = l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4; x_108 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_108, 0, x_106); lean_ctor_set(x_108, 1, x_107); @@ -33821,7 +33793,7 @@ lean_ctor_set(x_115, 0, x_37); x_116 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_116, 0, x_114); lean_ctor_set(x_116, 1, x_115); -x_117 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__3; +x_117 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__3; x_118 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(x_117, x_116, x_6, x_7, x_8, x_9, x_105); x_119 = lean_ctor_get(x_118, 1); lean_inc(x_119); @@ -33875,7 +33847,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_136 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_16); +x_136 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_16); if (lean_obj_tag(x_136) == 0) { lean_object* x_137; uint8_t x_138; @@ -33889,7 +33861,7 @@ lean_dec(x_137); x_139 = lean_ctor_get(x_136, 1); lean_inc(x_139); lean_dec(x_136); -x_140 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_12, x_5, x_6, x_7, x_8, x_9, x_139); +x_140 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_12, x_5, x_6, x_7, x_8, x_9, x_139); return x_140; } else @@ -33960,7 +33932,7 @@ lean_object* x_149; lean_object* x_150; lean_dec(x_12); x_149 = lean_array_fget(x_4, x_3); lean_inc(x_6); -x_150 = l___private_Lean_Meta_ExprDefEq_18__simpAssignmentArg(x_149, x_6, x_7, x_8, x_9, x_10); +x_150 = l___private_Lean_Meta_ExprDefEq_17__simpAssignmentArg(x_149, x_6, x_7, x_8, x_9, x_10); if (lean_obj_tag(x_150) == 0) { lean_object* x_151; lean_object* x_152; lean_object* x_153; @@ -33983,7 +33955,7 @@ if (x_156 == 0) { lean_object* x_157; uint8_t x_158; x_157 = lean_unsigned_to_nat(0u); -x_158 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__2(x_3, x_4, lean_box(0), x_151, x_153, x_155, x_157); +x_158 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__2(x_3, x_4, lean_box(0), x_151, x_153, x_155, x_157); lean_dec(x_151); lean_dec(x_4); if (x_158 == 0) @@ -34022,7 +33994,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_165 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); +x_165 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); if (lean_obj_tag(x_165) == 0) { lean_object* x_166; uint8_t x_167; @@ -34036,7 +34008,7 @@ lean_dec(x_166); x_168 = lean_ctor_get(x_165, 1); lean_inc(x_168); lean_dec(x_165); -x_169 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_155, x_5, x_6, x_7, x_8, x_9, x_168); +x_169 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_155, x_5, x_6, x_7, x_8, x_9, x_168); return x_169; } else @@ -34127,7 +34099,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_181 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); +x_181 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); if (lean_obj_tag(x_181) == 0) { lean_object* x_182; uint8_t x_183; @@ -34141,7 +34113,7 @@ lean_dec(x_182); x_184 = lean_ctor_get(x_181, 1); lean_inc(x_184); lean_dec(x_181); -x_185 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_155, x_5, x_6, x_7, x_8, x_9, x_184); +x_185 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_155, x_5, x_6, x_7, x_8, x_9, x_184); return x_185; } else @@ -34210,7 +34182,7 @@ else { lean_object* x_194; uint8_t x_195; x_194 = lean_unsigned_to_nat(0u); -x_195 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__3(x_3, x_4, lean_box(0), x_151, lean_box(0), x_153, x_3, x_194); +x_195 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__3(x_3, x_4, lean_box(0), x_151, lean_box(0), x_153, x_3, x_194); lean_dec(x_151); lean_dec(x_4); if (x_195 == 0) @@ -34249,7 +34221,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_202 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); +x_202 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); if (lean_obj_tag(x_202) == 0) { lean_object* x_203; uint8_t x_204; @@ -34263,7 +34235,7 @@ lean_dec(x_203); x_205 = lean_ctor_get(x_202, 1); lean_inc(x_205); lean_dec(x_202); -x_206 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_155, x_5, x_6, x_7, x_8, x_9, x_205); +x_206 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_155, x_5, x_6, x_7, x_8, x_9, x_205); return x_206; } else @@ -34354,7 +34326,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_218 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); +x_218 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); if (lean_obj_tag(x_218) == 0) { lean_object* x_219; uint8_t x_220; @@ -34368,7 +34340,7 @@ lean_dec(x_219); x_221 = lean_ctor_get(x_218, 1); lean_inc(x_221); lean_dec(x_218); -x_222 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_155, x_5, x_6, x_7, x_8, x_9, x_221); +x_222 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_155, x_5, x_6, x_7, x_8, x_9, x_221); return x_222; } else @@ -34449,7 +34421,7 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_153); lean_inc(x_1); -x_231 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); +x_231 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main(x_1, x_153, x_5, x_6, x_7, x_8, x_9, x_152); if (lean_obj_tag(x_231) == 0) { lean_object* x_232; uint8_t x_233; @@ -34465,7 +34437,7 @@ lean_inc(x_234); lean_dec(x_231); x_235 = lean_array_get_size(x_153); lean_dec(x_153); -x_236 = l___private_Lean_Meta_ExprDefEq_19__processConstApprox(x_1, x_235, x_5, x_6, x_7, x_8, x_9, x_234); +x_236 = l___private_Lean_Meta_ExprDefEq_18__processConstApprox(x_1, x_235, x_5, x_6, x_7, x_8, x_9, x_234); return x_236; } else @@ -34565,11 +34537,11 @@ return x_248; } } } -lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___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* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { uint8_t x_6; lean_object* x_7; -x_6 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__1(x_1, x_2, x_3, x_4, x_5); +x_6 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__1(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); @@ -34577,11 +34549,11 @@ x_7 = lean_box(x_6); return x_7; } } -lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { uint8_t x_8; lean_object* x_9; -x_8 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); @@ -34591,11 +34563,11 @@ x_9 = lean_box(x_8); return x_9; } } -lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { uint8_t x_9; lean_object* x_10; -x_9 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_9 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_4); @@ -34605,15 +34577,15 @@ x_10 = lean_box(x_9); return x_10; } } -lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux(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* l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux(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_11; -x_11 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +x_11 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); return x_11; } } -lean_object* l___private_Lean_Meta_ExprDefEq_21__processAssignment(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_20__processAssignment(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { uint8_t x_8; lean_object* x_9; lean_object* x_366; lean_object* x_367; uint8_t x_368; @@ -34881,7 +34853,7 @@ x_68 = lean_nat_sub(x_64, x_67); lean_dec(x_64); x_69 = l___private_Lean_Expr_3__getAppArgsAux___main(x_1, x_66, x_68); lean_inc(x_6); -x_70 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main(x_58, x_61, x_63, x_69, x_2, x_3, x_4, x_5, x_6, x_62); +x_70 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main(x_58, x_61, x_63, x_69, x_2, x_3, x_4, x_5, x_6, x_62); if (lean_obj_tag(x_70) == 0) { lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; uint8_t x_79; @@ -35230,7 +35202,7 @@ x_165 = lean_nat_sub(x_161, x_164); lean_dec(x_161); x_166 = l___private_Lean_Expr_3__getAppArgsAux___main(x_1, x_163, x_165); lean_inc(x_6); -x_167 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main(x_155, x_158, x_160, x_166, x_2, x_3, x_4, x_5, x_6, x_159); +x_167 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main(x_155, x_158, x_160, x_166, x_2, x_3, x_4, x_5, x_6, x_159); if (lean_obj_tag(x_167) == 0) { lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; @@ -35540,7 +35512,7 @@ x_253 = lean_nat_sub(x_249, x_252); lean_dec(x_249); x_254 = l___private_Lean_Expr_3__getAppArgsAux___main(x_1, x_251, x_253); lean_inc(x_6); -x_255 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main(x_243, x_246, x_248, x_254, x_2, x_3, x_4, x_5, x_6, x_247); +x_255 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main(x_243, x_246, x_248, x_254, x_2, x_3, x_4, x_5, x_6, x_247); if (lean_obj_tag(x_255) == 0) { lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; @@ -35756,7 +35728,7 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_317 = l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main(x_305, x_308, x_310, x_316, x_2, x_3, x_4, x_5, x_6, x_309); +x_317 = l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main(x_305, x_308, x_310, x_316, x_2, x_3, x_4, x_5, x_6, x_309); if (lean_obj_tag(x_317) == 0) { lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; uint8_t x_322; @@ -35905,7 +35877,7 @@ goto block_342; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_22__isDeltaCandidate_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_21__isDeltaCandidate_x3f(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; @@ -35931,11 +35903,11 @@ return x_11; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_22__isDeltaCandidate_x3f___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_21__isDeltaCandidate_x3f___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_22__isDeltaCandidate_x3f(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_21__isDeltaCandidate_x3f(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); @@ -35944,7 +35916,7 @@ lean_dec(x_1); return x_7; } } -lean_object* l___private_Lean_Meta_ExprDefEq_23__isListLevelDefEq(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_22__isListLevelDefEq(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; @@ -36006,11 +35978,11 @@ return x_23; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_23__isListLevelDefEq___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_22__isListLevelDefEq___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; -x_8 = l___private_Lean_Meta_ExprDefEq_23__isListLevelDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l___private_Lean_Meta_ExprDefEq_22__isListLevelDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); @@ -36018,7 +35990,7 @@ lean_dec(x_3); return x_8; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__1() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__1() { _start: { lean_object* x_1; @@ -36026,17 +35998,17 @@ x_1 = lean_mk_string("delta"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Meta_isExprDefEq___closed__2; -x_2 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__1; +x_2 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__3() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__3() { _start: { lean_object* x_1; @@ -36044,17 +36016,17 @@ x_1 = lean_mk_string("unfoldLeft"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__4() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; -x_2 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__3; +x_1 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; +x_2 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__3; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(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: { uint8_t x_9; lean_object* x_10; lean_object* x_48; lean_object* x_49; uint8_t x_50; @@ -36080,7 +36052,7 @@ lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean x_53 = lean_ctor_get(x_48, 1); lean_inc(x_53); lean_dec(x_48); -x_54 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__4; +x_54 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__4; x_55 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_54, x_6, x_7, x_53); x_56 = lean_ctor_get(x_55, 0); lean_inc(x_56); @@ -36161,7 +36133,7 @@ else lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; x_27 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_27, 0, x_1); -x_28 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__4; +x_28 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__4; x_29 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(x_28, x_27, x_4, x_5, x_6, x_7, x_10); x_30 = lean_ctor_get(x_29, 1); lean_inc(x_30); @@ -36226,7 +36198,7 @@ return x_46; } } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__1() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__1() { _start: { lean_object* x_1; @@ -36234,17 +36206,17 @@ x_1 = lean_mk_string("unfoldRight"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__2() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; -x_2 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__1; +x_1 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; +x_2 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(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: { uint8_t x_9; lean_object* x_10; lean_object* x_48; lean_object* x_49; uint8_t x_50; @@ -36270,7 +36242,7 @@ lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean x_53 = lean_ctor_get(x_48, 1); lean_inc(x_53); lean_dec(x_48); -x_54 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__2; +x_54 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__2; x_55 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_54, x_6, x_7, x_53); x_56 = lean_ctor_get(x_55, 0); lean_inc(x_56); @@ -36351,7 +36323,7 @@ else lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; x_27 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_27, 0, x_1); -x_28 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__2; +x_28 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__2; x_29 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(x_28, x_27, x_4, x_5, x_6, x_7, x_10); x_30 = lean_ctor_get(x_29, 1); lean_inc(x_30); @@ -36416,7 +36388,7 @@ return x_46; } } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__1() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__1() { _start: { lean_object* x_1; @@ -36424,17 +36396,17 @@ x_1 = lean_mk_string("unfoldLeftRight"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__2() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; -x_2 = l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__1; +x_1 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; +x_2 = l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight(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: { uint8_t x_9; lean_object* x_10; lean_object* x_48; lean_object* x_49; uint8_t x_50; @@ -36460,7 +36432,7 @@ lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean x_53 = lean_ctor_get(x_48, 1); lean_inc(x_53); lean_dec(x_48); -x_54 = l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__2; +x_54 = l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__2; x_55 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_54, x_6, x_7, x_53); x_56 = lean_ctor_get(x_55, 0); lean_inc(x_56); @@ -36541,7 +36513,7 @@ else lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; x_27 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_27, 0, x_1); -x_28 = l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__2; +x_28 = l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__2; x_29 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(x_28, x_27, x_4, x_5, x_6, x_7, x_10); x_30 = lean_ctor_get(x_29, 1); lean_inc(x_30); @@ -36606,7 +36578,7 @@ return x_46; } } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__1(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* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__1(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) { _start: { if (x_3 == 0) @@ -36628,7 +36600,7 @@ return x_13; } } } -lean_object* _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__1() { +lean_object* _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__1() { _start: { lean_object* x_1; @@ -36636,27 +36608,27 @@ x_1 = lean_mk_string("heuristic failed "); return x_1; } } -lean_object* _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__2() { +lean_object* _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__1; +x_1 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__3() { +lean_object* _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__3() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__2; +x_1 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__2; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { uint8_t x_10; lean_object* x_11; @@ -36730,7 +36702,7 @@ else lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; x_14 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_14, 0, x_1); -x_15 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__3; +x_15 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__3; x_16 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_16, 0, x_15); lean_ctor_set(x_16, 1, x_14); @@ -36770,7 +36742,7 @@ return x_27; } } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; @@ -36796,13 +36768,13 @@ x_22 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_5__isDefEqArgs lean_closure_set(x_22, 0, x_3); lean_closure_set(x_22, 1, x_17); lean_closure_set(x_22, 2, x_21); -x_23 = lean_alloc_closure((void*)(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__1___boxed), 8, 2); +x_23 = lean_alloc_closure((void*)(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__1___boxed), 8, 2); lean_closure_set(x_23, 0, x_3); lean_closure_set(x_23, 1, x_4); x_24 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Meta_isClassExpensive_x3f___main___spec__4___rarg), 7, 2); lean_closure_set(x_24, 0, x_22); lean_closure_set(x_24, 1, x_23); -x_25 = lean_alloc_closure((void*)(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___boxed), 9, 3); +x_25 = lean_alloc_closure((void*)(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___boxed), 9, 3); lean_closure_set(x_25, 0, x_1); lean_closure_set(x_25, 1, x_2); lean_closure_set(x_25, 2, x_5); @@ -37218,11 +37190,11 @@ return x_91; } } } -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___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, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___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, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { lean_object* x_11; -x_11 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +x_11 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); if (lean_obj_tag(x_11) == 0) { lean_object* x_12; @@ -37310,7 +37282,7 @@ return x_32; } } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__4(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* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__4(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_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; @@ -37336,13 +37308,13 @@ x_22 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_5__isDefEqArgs lean_closure_set(x_22, 0, x_3); lean_closure_set(x_22, 1, x_17); lean_closure_set(x_22, 2, x_21); -x_23 = lean_alloc_closure((void*)(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__1___boxed), 8, 2); +x_23 = lean_alloc_closure((void*)(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__1___boxed), 8, 2); lean_closure_set(x_23, 0, x_3); lean_closure_set(x_23, 1, x_4); x_24 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Meta_isClassExpensive_x3f___main___spec__4___rarg), 7, 2); lean_closure_set(x_24, 0, x_22); lean_closure_set(x_24, 1, x_23); -x_25 = lean_alloc_closure((void*)(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___boxed), 9, 3); +x_25 = lean_alloc_closure((void*)(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___boxed), 9, 3); lean_closure_set(x_25, 0, x_1); lean_closure_set(x_25, 1, x_2); lean_closure_set(x_25, 2, x_5); @@ -37758,11 +37730,11 @@ return x_91; } } } -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { lean_object* x_11; -x_11 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +x_11 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); if (lean_obj_tag(x_11) == 0) { lean_object* x_12; @@ -37850,7 +37822,7 @@ return x_32; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_27__tryHeuristic(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_26__tryHeuristic(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; lean_object* x_9; uint8_t x_10; lean_object* x_11; lean_object* x_215; lean_object* x_216; uint8_t x_217; @@ -37878,7 +37850,7 @@ lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; x_220 = lean_ctor_get(x_215, 1); lean_inc(x_220); lean_dec(x_215); -x_221 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; +x_221 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; x_222 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_221, x_5, x_6, x_220); x_223 = lean_ctor_get(x_222, 0); lean_inc(x_223); @@ -37928,9 +37900,9 @@ x_24 = lean_io_ref_set(x_6, x_17, x_19); x_25 = lean_ctor_get(x_24, 1); lean_inc(x_25); lean_dec(x_24); -x_59 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; +x_59 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; lean_inc(x_6); -x_60 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__1(x_1, x_2, x_8, x_9, x_59, x_3, x_4, x_5, x_6, x_25); +x_60 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__1(x_1, x_2, x_8, x_9, x_59, x_3, x_4, x_5, x_6, x_25); if (lean_obj_tag(x_60) == 0) { 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; uint8_t x_69; @@ -38229,9 +38201,9 @@ x_98 = lean_io_ref_set(x_6, x_17, x_19); x_99 = lean_ctor_get(x_98, 1); lean_inc(x_99); lean_dec(x_98); -x_120 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; +x_120 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; lean_inc(x_6); -x_121 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__1(x_1, x_2, x_8, x_9, x_120, x_3, x_4, x_5, x_6, x_99); +x_121 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__1(x_1, x_2, x_8, x_9, x_120, x_3, x_4, x_5, x_6, x_99); if (lean_obj_tag(x_121) == 0) { 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_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; @@ -38431,9 +38403,9 @@ x_150 = lean_io_ref_set(x_6, x_149, x_19); x_151 = lean_ctor_get(x_150, 1); lean_inc(x_151); lean_dec(x_150); -x_172 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; +x_172 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; lean_inc(x_6); -x_173 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__1(x_1, x_2, x_8, x_9, x_172, x_3, x_4, x_5, x_6, x_151); +x_173 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__1(x_1, x_2, x_8, x_9, x_172, x_3, x_4, x_5, x_6, x_151); if (lean_obj_tag(x_173) == 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_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; @@ -38609,12 +38581,12 @@ lean_inc(x_196); x_197 = lean_ctor_get(x_195, 1); lean_inc(x_197); lean_dec(x_195); -x_198 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; +x_198 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_199 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__3(x_1, x_2, x_8, x_9, x_198, x_3, x_4, x_5, x_6, x_197); +x_199 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__3(x_1, x_2, x_8, x_9, x_198, x_3, x_4, x_5, x_6, x_197); if (lean_obj_tag(x_199) == 0) { lean_object* x_200; lean_object* x_201; lean_object* x_202; uint8_t x_203; @@ -38688,13 +38660,13 @@ return x_213; } } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___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* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___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: { uint8_t x_9; lean_object* x_10; x_9 = lean_unbox(x_3); lean_dec(x_3); -x_10 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__1(x_1, x_2, x_9, x_4, x_5, x_6, x_7, x_8); +x_10 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__1(x_1, x_2, x_9, x_4, x_5, x_6, x_7, x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -38704,13 +38676,13 @@ lean_dec(x_1); return x_10; } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___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* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___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) { _start: { uint8_t x_10; lean_object* x_11; x_10 = lean_unbox(x_4); lean_dec(x_4); -x_11 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2(x_1, x_2, x_3, x_10, x_5, x_6, x_7, x_8, x_9); +x_11 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2(x_1, x_2, x_3, x_10, x_5, x_6, x_7, x_8, x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -38718,7 +38690,7 @@ lean_dec(x_5); return x_11; } } -lean_object* l___private_Lean_Meta_ExprDefEq_28__unfold___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* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_27__unfold___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* x_8) { _start: { lean_object* x_9; @@ -38786,15 +38758,15 @@ return x_19; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_28__unfold(lean_object* x_1) { +lean_object* l___private_Lean_Meta_ExprDefEq_27__unfold(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_28__unfold___rarg), 8, 0); +x_2 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_27__unfold___rarg), 8, 0); return x_2; } } -lean_object* l___private_Lean_Meta_ExprDefEq_29__unfoldBothDefEq(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_28__unfoldBothDefEq(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: { switch (lean_obj_tag(x_2)) { @@ -38810,7 +38782,7 @@ lean_dec(x_2); x_10 = lean_ctor_get(x_3, 1); lean_inc(x_10); lean_dec(x_3); -x_11 = l___private_Lean_Meta_ExprDefEq_23__isListLevelDefEq(x_9, x_10, x_4, x_5, x_6, x_7, x_8); +x_11 = l___private_Lean_Meta_ExprDefEq_22__isListLevelDefEq(x_9, x_10, x_4, x_5, x_6, x_7, x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -38845,7 +38817,7 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_15 = l___private_Lean_Meta_ExprDefEq_27__tryHeuristic(x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_15 = l___private_Lean_Meta_ExprDefEq_26__tryHeuristic(x_2, x_3, x_4, x_5, x_6, x_7, x_8); if (lean_obj_tag(x_15) == 0) { lean_object* x_16; uint8_t x_17; @@ -38929,7 +38901,7 @@ lean_dec(x_22); x_33 = lean_ctor_get(x_23, 0); lean_inc(x_33); lean_dec(x_23); -x_34 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(x_1, x_2, x_33, x_4, x_5, x_6, x_7, x_32); +x_34 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(x_1, x_2, x_33, x_4, x_5, x_6, x_7, x_32); return x_34; } } @@ -38989,7 +38961,7 @@ lean_object* x_43; lean_object* x_44; x_43 = lean_ctor_get(x_41, 1); lean_inc(x_43); lean_dec(x_41); -x_44 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft(x_1, x_40, x_3, x_4, x_5, x_6, x_7, x_43); +x_44 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(x_1, x_40, x_3, x_4, x_5, x_6, x_7, x_43); return x_44; } else @@ -39002,7 +38974,7 @@ lean_dec(x_41); x_46 = lean_ctor_get(x_42, 0); lean_inc(x_46); lean_dec(x_42); -x_47 = l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight(x_1, x_40, x_46, x_4, x_5, x_6, x_7, x_45); +x_47 = l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight(x_1, x_40, x_46, x_4, x_5, x_6, x_7, x_45); return x_47; } } @@ -39171,7 +39143,7 @@ return x_73; } } } -uint8_t l___private_Lean_Meta_ExprDefEq_30__sameHeadSymbol(lean_object* x_1, lean_object* x_2) { +uint8_t l___private_Lean_Meta_ExprDefEq_29__sameHeadSymbol(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; @@ -39205,18 +39177,18 @@ return x_7; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_30__sameHeadSymbol___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Lean_Meta_ExprDefEq_29__sameHeadSymbol___boxed(lean_object* x_1, lean_object* x_2) { _start: { uint8_t x_3; lean_object* x_4; -x_3 = l___private_Lean_Meta_ExprDefEq_30__sameHeadSymbol(x_1, x_2); +x_3 = l___private_Lean_Meta_ExprDefEq_29__sameHeadSymbol(x_1, x_2); lean_dec(x_2); lean_dec(x_1); x_4 = lean_box(x_3); return x_4; } } -lean_object* l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq(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___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq(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; @@ -39290,7 +39262,7 @@ x_24 = lean_ctor_get(x_14, 0); lean_inc(x_24); lean_dec(x_14); x_25 = l_Lean_ConstantInfo_name(x_2); -x_26 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(x_25, x_3, x_24, x_5, x_6, x_7, x_8, x_23); +x_26 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(x_25, x_3, x_24, x_5, x_6, x_7, x_8, x_23); return x_26; } } @@ -39331,7 +39303,7 @@ lean_dec(x_10); x_32 = lean_ctor_get(x_11, 0); lean_inc(x_32); lean_dec(x_11); -x_33 = l___private_Lean_Meta_ExprDefEq_30__sameHeadSymbol(x_32, x_4); +x_33 = l___private_Lean_Meta_ExprDefEq_29__sameHeadSymbol(x_32, x_4); if (x_33 == 0) { lean_object* x_34; lean_object* x_35; @@ -39354,7 +39326,7 @@ lean_dec(x_3); x_37 = lean_ctor_get(x_35, 1); lean_inc(x_37); lean_dec(x_35); -x_38 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft(x_34, x_32, x_4, x_5, x_6, x_7, x_8, x_37); +x_38 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(x_34, x_32, x_4, x_5, x_6, x_7, x_8, x_37); return x_38; } else @@ -39367,12 +39339,12 @@ lean_dec(x_35); x_40 = lean_ctor_get(x_36, 0); lean_inc(x_40); lean_dec(x_36); -x_41 = l___private_Lean_Meta_ExprDefEq_30__sameHeadSymbol(x_3, x_40); +x_41 = l___private_Lean_Meta_ExprDefEq_29__sameHeadSymbol(x_3, x_40); if (x_41 == 0) { lean_object* x_42; lean_dec(x_3); -x_42 = l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight(x_34, x_32, x_40, x_5, x_6, x_7, x_8, x_39); +x_42 = l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight(x_34, x_32, x_40, x_5, x_6, x_7, x_8, x_39); return x_42; } else @@ -39381,7 +39353,7 @@ lean_object* x_43; lean_object* x_44; lean_dec(x_34); lean_dec(x_32); x_43 = l_Lean_ConstantInfo_name(x_2); -x_44 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(x_43, x_3, x_40, x_5, x_6, x_7, x_8, x_39); +x_44 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(x_43, x_3, x_40, x_5, x_6, x_7, x_8, x_39); return x_44; } } @@ -39422,7 +39394,7 @@ else lean_object* x_49; lean_object* x_50; lean_dec(x_3); x_49 = l_Lean_ConstantInfo_name(x_1); -x_50 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft(x_49, x_32, x_4, x_5, x_6, x_7, x_8, x_31); +x_50 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(x_49, x_32, x_4, x_5, x_6, x_7, x_8, x_31); return x_50; } } @@ -39457,17 +39429,17 @@ return x_54; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq___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___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq___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) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_2); lean_dec(x_1); return x_10; } } -lean_object* l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(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___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(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: { uint8_t x_10; @@ -39491,7 +39463,7 @@ lean_dec(x_13); if (x_15 == 0) { lean_object* x_16; -x_16 = l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_16 = l___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_16; } else @@ -39514,7 +39486,7 @@ lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); lean_dec(x_17); -x_20 = l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_19); +x_20 = l___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_19); return x_20; } else @@ -39528,7 +39500,7 @@ x_22 = lean_ctor_get(x_18, 0); lean_inc(x_22); lean_dec(x_18); x_23 = l_Lean_ConstantInfo_name(x_2); -x_24 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(x_23, x_3, x_22, x_5, x_6, x_7, x_8, x_21); +x_24 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(x_23, x_3, x_22, x_5, x_6, x_7, x_8, x_21); return x_24; } } @@ -39584,7 +39556,7 @@ lean_object* x_31; lean_object* x_32; x_31 = lean_ctor_get(x_29, 1); lean_inc(x_31); lean_dec(x_29); -x_32 = l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_31); +x_32 = l___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_31); return x_32; } else @@ -39598,7 +39570,7 @@ x_34 = lean_ctor_get(x_30, 0); lean_inc(x_34); lean_dec(x_30); x_35 = l_Lean_ConstantInfo_name(x_1); -x_36 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft(x_35, x_34, x_4, x_5, x_6, x_7, x_8, x_33); +x_36 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(x_35, x_34, x_4, x_5, x_6, x_7, x_8, x_33); return x_36; } } @@ -39635,29 +39607,29 @@ return x_40; else { lean_object* x_41; -x_41 = l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_41 = l___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_41; } } else { lean_object* x_42; -x_42 = l___private_Lean_Meta_ExprDefEq_31__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_42 = l___private_Lean_Meta_ExprDefEq_30__unfoldComparingHeadsDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_42; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq___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___private_Lean_Meta_ExprDefEq_31__unfoldDefEq___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) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_2); lean_dec(x_1); return x_10; } } -lean_object* l___private_Lean_Meta_ExprDefEq_33__unfoldReducibeDefEq(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___private_Lean_Meta_ExprDefEq_32__unfoldReducibeDefEq(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; uint8_t x_11; uint8_t x_12; uint8_t x_13; @@ -39720,7 +39692,7 @@ lean_dec(x_14); x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); lean_dec(x_40); -x_43 = l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_42); +x_43 = l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_42); return x_43; } else @@ -39733,7 +39705,7 @@ lean_dec(x_40); x_45 = lean_ctor_get(x_41, 0); lean_inc(x_45); lean_dec(x_41); -x_46 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft(x_14, x_45, x_4, x_5, x_6, x_7, x_8, x_44); +x_46 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(x_14, x_45, x_4, x_5, x_6, x_7, x_8, x_44); return x_46; } } @@ -39785,7 +39757,7 @@ if (x_23 == 0) { lean_object* x_25; lean_dec(x_19); -x_25 = l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_22); +x_25 = l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_22); return x_25; } else @@ -39809,7 +39781,7 @@ lean_dec(x_19); x_28 = lean_ctor_get(x_26, 1); lean_inc(x_28); lean_dec(x_26); -x_29 = l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_28); +x_29 = l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_28); return x_29; } else @@ -39822,7 +39794,7 @@ lean_dec(x_26); x_31 = lean_ctor_get(x_27, 0); lean_inc(x_31); lean_dec(x_27); -x_32 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(x_19, x_3, x_31, x_5, x_6, x_7, x_8, x_30); +x_32 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(x_19, x_3, x_31, x_5, x_6, x_7, x_8, x_30); return x_32; } } @@ -39861,7 +39833,7 @@ else { lean_object* x_37; lean_dec(x_19); -x_37 = l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_22); +x_37 = l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_22); return x_37; } } @@ -39869,22 +39841,22 @@ return x_37; else { lean_object* x_52; -x_52 = l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_52 = l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_52; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_33__unfoldReducibeDefEq___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___private_Lean_Meta_ExprDefEq_32__unfoldReducibeDefEq___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) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_ExprDefEq_33__unfoldReducibeDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_ExprDefEq_32__unfoldReducibeDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_2); lean_dec(x_1); return x_10; } } -lean_object* l___private_Lean_Meta_ExprDefEq_34__unfoldNonProjFnDefEq(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___private_Lean_Meta_ExprDefEq_33__unfoldNonProjFnDefEq(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; lean_object* x_12; lean_object* x_13; uint8_t x_14; lean_object* x_15; uint8_t x_16; @@ -39908,7 +39880,7 @@ if (x_16 == 0) { lean_object* x_17; lean_dec(x_13); -x_17 = l___private_Lean_Meta_ExprDefEq_33__unfoldReducibeDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12); +x_17 = l___private_Lean_Meta_ExprDefEq_32__unfoldReducibeDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12); return x_17; } else @@ -39932,7 +39904,7 @@ lean_dec(x_13); x_20 = lean_ctor_get(x_18, 1); lean_inc(x_20); lean_dec(x_18); -x_21 = l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_20); +x_21 = l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_20); return x_21; } else @@ -39945,7 +39917,7 @@ lean_dec(x_18); x_23 = lean_ctor_get(x_19, 0); lean_inc(x_23); lean_dec(x_19); -x_24 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft(x_13, x_23, x_4, x_5, x_6, x_7, x_8, x_22); +x_24 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(x_13, x_23, x_4, x_5, x_6, x_7, x_8, x_22); return x_24; } } @@ -40004,7 +39976,7 @@ lean_dec(x_15); x_31 = lean_ctor_get(x_29, 1); lean_inc(x_31); lean_dec(x_29); -x_32 = l___private_Lean_Meta_ExprDefEq_32__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_31); +x_32 = l___private_Lean_Meta_ExprDefEq_31__unfoldDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_31); return x_32; } else @@ -40017,7 +39989,7 @@ lean_dec(x_29); x_34 = lean_ctor_get(x_30, 0); lean_inc(x_34); lean_dec(x_30); -x_35 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(x_15, x_3, x_34, x_5, x_6, x_7, x_8, x_33); +x_35 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(x_15, x_3, x_34, x_5, x_6, x_7, x_8, x_33); return x_35; } } @@ -40055,28 +40027,28 @@ else { lean_object* x_40; lean_dec(x_15); -x_40 = l___private_Lean_Meta_ExprDefEq_33__unfoldReducibeDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12); +x_40 = l___private_Lean_Meta_ExprDefEq_32__unfoldReducibeDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12); return x_40; } } } } -lean_object* l___private_Lean_Meta_ExprDefEq_34__unfoldNonProjFnDefEq___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___private_Lean_Meta_ExprDefEq_33__unfoldNonProjFnDefEq___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) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_ExprDefEq_34__unfoldNonProjFnDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_ExprDefEq_33__unfoldNonProjFnDefEq(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_2); lean_dec(x_1); return x_10; } } -lean_object* l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(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; lean_object* x_9; x_8 = l_Lean_Expr_getAppFn___main(x_1); -x_9 = l___private_Lean_Meta_ExprDefEq_22__isDeltaCandidate_x3f(x_8, x_3, x_4, x_5, x_6, x_7); +x_9 = l___private_Lean_Meta_ExprDefEq_21__isDeltaCandidate_x3f(x_8, x_3, x_4, x_5, x_6, x_7); lean_dec(x_8); if (lean_obj_tag(x_9) == 0) { @@ -40087,7 +40059,7 @@ x_11 = lean_ctor_get(x_9, 1); lean_inc(x_11); lean_dec(x_9); x_12 = l_Lean_Expr_getAppFn___main(x_2); -x_13 = l___private_Lean_Meta_ExprDefEq_22__isDeltaCandidate_x3f(x_12, x_3, x_4, x_5, x_6, x_11); +x_13 = l___private_Lean_Meta_ExprDefEq_21__isDeltaCandidate_x3f(x_12, x_3, x_4, x_5, x_6, x_11); lean_dec(x_12); if (lean_obj_tag(x_13) == 0) { @@ -40194,7 +40166,7 @@ lean_inc(x_36); lean_dec(x_26); x_37 = l_Lean_ConstantInfo_name(x_24); lean_dec(x_24); -x_38 = l___private_Lean_Meta_ExprDefEq_25__isDefEqRight(x_37, x_1, x_36, x_3, x_4, x_5, x_6, x_35); +x_38 = l___private_Lean_Meta_ExprDefEq_24__isDefEqRight(x_37, x_1, x_36, x_3, x_4, x_5, x_6, x_35); return x_38; } } @@ -40297,7 +40269,7 @@ lean_inc(x_57); lean_dec(x_47); x_58 = l_Lean_ConstantInfo_name(x_45); lean_dec(x_45); -x_59 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft(x_58, x_57, x_2, x_3, x_4, x_5, x_6, x_56); +x_59 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft(x_58, x_57, x_2, x_3, x_4, x_5, x_6, x_56); return x_59; } } @@ -40350,7 +40322,7 @@ if (x_69 == 0) { lean_object* x_70; lean_dec(x_67); -x_70 = l___private_Lean_Meta_ExprDefEq_34__unfoldNonProjFnDefEq(x_65, x_66, x_1, x_2, x_3, x_4, x_5, x_6, x_64); +x_70 = l___private_Lean_Meta_ExprDefEq_33__unfoldNonProjFnDefEq(x_65, x_66, x_1, x_2, x_3, x_4, x_5, x_6, x_64); lean_dec(x_66); lean_dec(x_65); return x_70; @@ -40360,7 +40332,7 @@ else lean_object* x_71; lean_dec(x_66); lean_dec(x_65); -x_71 = l___private_Lean_Meta_ExprDefEq_29__unfoldBothDefEq(x_67, x_1, x_2, x_3, x_4, x_5, x_6, x_64); +x_71 = l___private_Lean_Meta_ExprDefEq_28__unfoldBothDefEq(x_67, x_1, x_2, x_3, x_4, x_5, x_6, x_64); return x_71; } } @@ -40426,7 +40398,7 @@ return x_79; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_36__isAssigned(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_35__isAssigned(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { if (lean_obj_tag(x_1) == 2) @@ -40481,11 +40453,11 @@ return x_22; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_36__isAssigned___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_35__isAssigned___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_36__isAssigned(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_35__isAssigned(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); @@ -40493,7 +40465,7 @@ lean_dec(x_2); return x_7; } } -lean_object* l___private_Lean_Meta_ExprDefEq_37__isDelayedAssignedHead(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_36__isDelayedAssignedHead(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { if (lean_obj_tag(x_1) == 2) @@ -40612,11 +40584,11 @@ return x_36; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_37__isDelayedAssignedHead___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_36__isDelayedAssignedHead___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; -x_8 = l___private_Lean_Meta_ExprDefEq_37__isDelayedAssignedHead(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l___private_Lean_Meta_ExprDefEq_36__isDelayedAssignedHead(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); @@ -40624,7 +40596,7 @@ lean_dec(x_3); return x_8; } } -lean_object* l___private_Lean_Meta_ExprDefEq_38__isSynthetic(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_37__isSynthetic(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { if (lean_obj_tag(x_1) == 2) @@ -40736,11 +40708,11 @@ return x_34; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_38__isSynthetic___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_37__isSynthetic___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_38__isSynthetic(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_37__isSynthetic(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); @@ -40748,7 +40720,7 @@ lean_dec(x_2); return x_7; } } -lean_object* l___private_Lean_Meta_ExprDefEq_39__isAssignable(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_38__isAssignable(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { if (lean_obj_tag(x_1) == 2) @@ -40858,11 +40830,11 @@ return x_33; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_39__isAssignable___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_38__isAssignable___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_39__isAssignable(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_38__isAssignable(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); @@ -40870,7 +40842,7 @@ lean_dec(x_2); return x_7; } } -uint8_t l___private_Lean_Meta_ExprDefEq_40__etaEq(lean_object* x_1, lean_object* x_2) { +uint8_t l___private_Lean_Meta_ExprDefEq_39__etaEq(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; @@ -40894,17 +40866,17 @@ return x_7; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_40__etaEq___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Lean_Meta_ExprDefEq_39__etaEq___boxed(lean_object* x_1, lean_object* x_2) { _start: { uint8_t x_3; lean_object* x_4; -x_3 = l___private_Lean_Meta_ExprDefEq_40__etaEq(x_1, x_2); +x_3 = l___private_Lean_Meta_ExprDefEq_39__etaEq(x_1, x_2); lean_dec(x_2); x_4 = lean_box(x_3); return x_4; } } -lean_object* l___private_Lean_Meta_ExprDefEq_41__isLetFVar(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_40__isLetFVar(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; @@ -40964,18 +40936,18 @@ return x_20; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_41__isLetFVar___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_ExprDefEq_40__isLetFVar___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_ExprDefEq_41__isLetFVar(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_ExprDefEq_40__isLetFVar(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); return x_7; } } -lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqProofIrrel(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_41__isDefEqProofIrrel(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; @@ -41432,11 +41404,11 @@ return x_96; } } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; -x_8 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_21__processAssignment), 7, 2); +x_8 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_20__processAssignment), 7, 2); lean_closure_set(x_8, 0, x_1); lean_closure_set(x_8, 1, x_2); x_9 = l_Lean_Core_getEnv___rarg(x_6, x_7); @@ -41848,11 +41820,11 @@ return x_73; } } } -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___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, lean_object* x_7) { +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___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, lean_object* x_7) { _start: { lean_object* x_8; -x_8 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { lean_object* x_9; @@ -41940,11 +41912,11 @@ return x_29; } } } -lean_object* l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__4(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_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__4(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; -x_8 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_21__processAssignment), 7, 2); +x_8 = lean_alloc_closure((void*)(l___private_Lean_Meta_ExprDefEq_20__processAssignment), 7, 2); lean_closure_set(x_8, 0, x_2); lean_closure_set(x_8, 1, x_1); x_9 = l_Lean_Core_getEnv___rarg(x_6, x_7); @@ -42356,11 +42328,11 @@ return x_73; } } } -lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; -x_8 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { lean_object* x_9; @@ -42448,7 +42420,7 @@ return x_29; } } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__1() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -42458,7 +42430,7 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__2() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__2() { _start: { lean_object* x_1; @@ -42466,27 +42438,27 @@ x_1 = lean_mk_string(" [nonassignable]"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__3() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__3() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__2; +x_1 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__2; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__4() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__4() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__3; +x_1 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__3; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__5() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__5() { _start: { lean_object* x_1; @@ -42494,27 +42466,27 @@ x_1 = lean_mk_string(" [assignable]"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__6() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__5; +x_1 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__5; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__7() { +lean_object* _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__7() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__6; +x_1 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__6; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; lean_object* x_385; @@ -42531,7 +42503,7 @@ x_410 = lean_ctor_get(x_2, 0); lean_inc(x_410); lean_inc(x_3); lean_inc(x_409); -x_411 = l___private_Lean_Meta_ExprDefEq_41__isLetFVar(x_409, x_3, x_4, x_5, x_6, x_7); +x_411 = l___private_Lean_Meta_ExprDefEq_40__isLetFVar(x_409, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_411) == 0) { lean_object* x_412; uint8_t x_413; @@ -42547,7 +42519,7 @@ lean_inc(x_414); lean_dec(x_411); lean_inc(x_3); lean_inc(x_410); -x_415 = l___private_Lean_Meta_ExprDefEq_41__isLetFVar(x_410, x_3, x_4, x_5, x_6, x_414); +x_415 = l___private_Lean_Meta_ExprDefEq_40__isLetFVar(x_410, x_3, x_4, x_5, x_6, x_414); if (lean_obj_tag(x_415) == 0) { lean_object* x_416; uint8_t x_417; @@ -42572,7 +42544,7 @@ if (x_421 == 0) { lean_object* x_422; lean_free_object(x_415); -x_422 = l___private_Lean_Meta_ExprDefEq_42__isDefEqProofIrrel(x_1, x_2, x_3, x_4, x_5, x_6, x_419); +x_422 = l___private_Lean_Meta_ExprDefEq_41__isDefEqProofIrrel(x_1, x_2, x_3, x_4, x_5, x_6, x_419); return x_422; } else @@ -42602,7 +42574,7 @@ lean_dec(x_409); if (x_426 == 0) { lean_object* x_427; -x_427 = l___private_Lean_Meta_ExprDefEq_42__isDefEqProofIrrel(x_1, x_2, x_3, x_4, x_5, x_6, x_425); +x_427 = l___private_Lean_Meta_ExprDefEq_41__isDefEqProofIrrel(x_1, x_2, x_3, x_4, x_5, x_6, x_425); return x_427; } else @@ -43006,12 +42978,12 @@ if (x_9 == 0) { uint8_t x_10; lean_inc(x_1); -x_10 = l___private_Lean_Meta_ExprDefEq_40__etaEq(x_1, x_2); +x_10 = l___private_Lean_Meta_ExprDefEq_39__etaEq(x_1, x_2); if (x_10 == 0) { uint8_t x_11; lean_inc(x_2); -x_11 = l___private_Lean_Meta_ExprDefEq_40__etaEq(x_2, x_1); +x_11 = l___private_Lean_Meta_ExprDefEq_39__etaEq(x_2, x_1); if (x_11 == 0) { lean_object* x_12; lean_object* x_13; uint8_t x_14; lean_object* x_15; @@ -43060,7 +43032,7 @@ block_368: lean_object* x_16; lean_object* x_17; uint8_t x_18; lean_dec(x_15); lean_inc(x_12); -x_16 = l___private_Lean_Meta_ExprDefEq_36__isAssigned(x_12, x_3, x_4, x_5, x_6, x_7); +x_16 = l___private_Lean_Meta_ExprDefEq_35__isAssigned(x_12, x_3, x_4, x_5, x_6, x_7); x_17 = lean_ctor_get(x_16, 0); lean_inc(x_17); x_18 = lean_unbox(x_17); @@ -43072,7 +43044,7 @@ x_19 = lean_ctor_get(x_16, 1); lean_inc(x_19); lean_dec(x_16); lean_inc(x_13); -x_20 = l___private_Lean_Meta_ExprDefEq_36__isAssigned(x_13, x_3, x_4, x_5, x_6, x_19); +x_20 = l___private_Lean_Meta_ExprDefEq_35__isAssigned(x_13, x_3, x_4, x_5, x_6, x_19); x_21 = lean_ctor_get(x_20, 0); lean_inc(x_21); x_22 = lean_unbox(x_21); @@ -43085,7 +43057,7 @@ lean_inc(x_23); lean_dec(x_20); lean_inc(x_1); lean_inc(x_12); -x_24 = l___private_Lean_Meta_ExprDefEq_37__isDelayedAssignedHead(x_12, x_1, x_3, x_4, x_5, x_6, x_23); +x_24 = l___private_Lean_Meta_ExprDefEq_36__isDelayedAssignedHead(x_12, x_1, x_3, x_4, x_5, x_6, x_23); x_25 = lean_ctor_get(x_24, 0); lean_inc(x_25); x_26 = lean_unbox(x_25); @@ -43098,7 +43070,7 @@ lean_inc(x_27); lean_dec(x_24); lean_inc(x_2); lean_inc(x_13); -x_28 = l___private_Lean_Meta_ExprDefEq_37__isDelayedAssignedHead(x_13, x_2, x_3, x_4, x_5, x_6, x_27); +x_28 = l___private_Lean_Meta_ExprDefEq_36__isDelayedAssignedHead(x_13, x_2, x_3, x_4, x_5, x_6, x_27); x_29 = lean_ctor_get(x_28, 0); lean_inc(x_29); x_30 = lean_ctor_get(x_28, 1); @@ -43110,7 +43082,7 @@ if (x_330 == 0) { lean_object* x_331; lean_inc(x_12); -x_331 = l___private_Lean_Meta_ExprDefEq_38__isSynthetic(x_12, x_3, x_4, x_5, x_6, x_30); +x_331 = l___private_Lean_Meta_ExprDefEq_37__isSynthetic(x_12, x_3, x_4, x_5, x_6, x_30); if (lean_obj_tag(x_331) == 0) { lean_object* x_332; uint8_t x_333; @@ -43241,7 +43213,7 @@ if (x_31 == 0) { lean_object* x_307; lean_inc(x_13); -x_307 = l___private_Lean_Meta_ExprDefEq_38__isSynthetic(x_13, x_3, x_4, x_5, x_6, x_32); +x_307 = l___private_Lean_Meta_ExprDefEq_37__isSynthetic(x_13, x_3, x_4, x_5, x_6, x_32); if (lean_obj_tag(x_307) == 0) { lean_object* x_308; uint8_t x_309; @@ -43371,7 +43343,7 @@ if (x_33 == 0) { lean_object* x_35; lean_inc(x_12); -x_35 = l___private_Lean_Meta_ExprDefEq_39__isAssignable(x_12, x_3, x_4, x_5, x_6, x_34); +x_35 = l___private_Lean_Meta_ExprDefEq_38__isAssignable(x_12, x_3, x_4, x_5, x_6, x_34); if (lean_obj_tag(x_35) == 0) { lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; @@ -43388,7 +43360,7 @@ if (lean_is_exclusive(x_35)) { x_38 = lean_box(0); } lean_inc(x_13); -x_39 = l___private_Lean_Meta_ExprDefEq_39__isAssignable(x_13, x_3, x_4, x_5, x_6, x_37); +x_39 = l___private_Lean_Meta_ExprDefEq_38__isAssignable(x_13, x_3, x_4, x_5, x_6, x_37); if (lean_obj_tag(x_39) == 0) { lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_247; lean_object* x_248; lean_object* x_283; lean_object* x_284; uint8_t x_285; @@ -43543,7 +43515,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_52 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_50); +x_52 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_50); if (lean_obj_tag(x_52) == 0) { lean_object* x_53; uint8_t x_54; @@ -43557,7 +43529,7 @@ lean_object* x_55; lean_object* x_56; x_55 = lean_ctor_get(x_52, 1); lean_inc(x_55); lean_dec(x_52); -x_56 = l___private_Lean_Meta_ExprDefEq_21__processAssignment(x_2, x_1, x_3, x_4, x_5, x_6, x_55); +x_56 = l___private_Lean_Meta_ExprDefEq_20__processAssignment(x_2, x_1, x_3, x_4, x_5, x_6, x_55); if (lean_obj_tag(x_56) == 0) { uint8_t x_57; @@ -43688,7 +43660,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_86 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_50); +x_86 = l_Lean_Meta_commitWhen___at___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_50); if (lean_obj_tag(x_86) == 0) { lean_object* x_87; uint8_t x_88; @@ -43702,7 +43674,7 @@ lean_object* x_89; lean_object* x_90; x_89 = lean_ctor_get(x_86, 1); lean_inc(x_89); lean_dec(x_86); -x_90 = l___private_Lean_Meta_ExprDefEq_21__processAssignment(x_1, x_2, x_3, x_4, x_5, x_6, x_89); +x_90 = l___private_Lean_Meta_ExprDefEq_20__processAssignment(x_1, x_2, x_3, x_4, x_5, x_6, x_89); if (lean_obj_tag(x_90) == 0) { uint8_t x_91; @@ -43937,7 +43909,7 @@ lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; x_159 = lean_ctor_get(x_154, 1); lean_inc(x_159); lean_dec(x_154); -x_160 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__1; +x_160 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__1; x_161 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_160, x_5, x_6, x_159); x_162 = lean_ctor_get(x_161, 0); lean_inc(x_162); @@ -43978,7 +43950,7 @@ lean_ctor_set(x_147, 0, x_2); x_148 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_148, 0, x_146); lean_ctor_set(x_148, 1, x_147); -x_149 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__1; +x_149 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__1; x_150 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isTypeCorrect___spec__1(x_149, x_148, x_3, x_4, x_5, x_6, x_142); lean_dec(x_6); lean_dec(x_5); @@ -44023,7 +43995,7 @@ lean_dec(x_38); lean_dec(x_36); lean_dec(x_13); lean_dec(x_12); -x_226 = l___private_Lean_Meta_ExprDefEq_21__processAssignment(x_1, x_2, x_3, x_4, x_5, x_6, x_43); +x_226 = l___private_Lean_Meta_ExprDefEq_20__processAssignment(x_1, x_2, x_3, x_4, x_5, x_6, x_43); if (lean_obj_tag(x_226) == 0) { uint8_t x_227; @@ -44098,7 +44070,7 @@ lean_dec(x_40); lean_dec(x_38); lean_dec(x_13); lean_dec(x_12); -x_189 = l___private_Lean_Meta_ExprDefEq_21__processAssignment(x_2, x_1, x_3, x_4, x_5, x_6, x_43); +x_189 = l___private_Lean_Meta_ExprDefEq_20__processAssignment(x_2, x_1, x_3, x_4, x_5, x_6, x_43); if (lean_obj_tag(x_189) == 0) { uint8_t x_190; @@ -44175,7 +44147,7 @@ lean_dec(x_40); lean_dec(x_38); lean_dec(x_13); lean_dec(x_12); -x_207 = l___private_Lean_Meta_ExprDefEq_21__processAssignment(x_2, x_1, x_3, x_4, x_5, x_6, x_43); +x_207 = l___private_Lean_Meta_ExprDefEq_20__processAssignment(x_2, x_1, x_3, x_4, x_5, x_6, x_43); if (lean_obj_tag(x_207) == 0) { uint8_t x_208; @@ -44430,7 +44402,7 @@ x_251 = lean_unbox(x_36); if (x_251 == 0) { lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; uint8_t x_257; -x_252 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__4; +x_252 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__4; x_253 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_253, 0, x_249); lean_ctor_set(x_253, 1, x_252); @@ -44459,7 +44431,7 @@ goto block_246; else { lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; -x_262 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__7; +x_262 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__7; x_263 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_263, 0, x_256); lean_ctor_set(x_263, 1, x_262); @@ -44475,7 +44447,7 @@ goto block_246; else { lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; uint8_t x_272; -x_267 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__7; +x_267 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__7; x_268 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_268, 0, x_249); lean_ctor_set(x_268, 1, x_267); @@ -44490,7 +44462,7 @@ x_272 = lean_unbox(x_40); if (x_272 == 0) { lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; -x_273 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__4; +x_273 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__4; x_274 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_274, 0, x_271); lean_ctor_set(x_274, 1, x_273); @@ -44799,11 +44771,11 @@ return x_407; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; -x_8 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7); return x_8; } } @@ -44930,7 +44902,7 @@ return x_32; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_44__isDefEqWHNF(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqWHNF(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_9; @@ -44974,7 +44946,7 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_13); lean_inc(x_10); -x_16 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main(x_10, x_13, x_4, x_5, x_6, x_7, x_14); +x_16 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main(x_10, x_13, x_4, x_5, x_6, x_7, x_14); if (lean_obj_tag(x_16) == 0) { lean_object* x_17; uint8_t x_18; @@ -45108,7 +45080,7 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_13); lean_inc(x_10); -x_42 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main(x_10, x_13, x_4, x_5, x_6, x_7, x_14); +x_42 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main(x_10, x_13, x_4, x_5, x_6, x_7, x_14); if (lean_obj_tag(x_42) == 0) { lean_object* x_43; uint8_t x_44; @@ -45298,7 +45270,7 @@ return x_75; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_45__unstuckMVar(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_44__unstuckMVar(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_9; @@ -45435,7 +45407,7 @@ return x_32; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___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, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___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, lean_object* x_7) { _start: { lean_object* x_8; @@ -45615,7 +45587,7 @@ return x_43; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { lean_object* x_9; @@ -45637,7 +45609,7 @@ lean_dec(x_3); x_11 = lean_ctor_get(x_9, 1); lean_inc(x_11); lean_dec(x_9); -x_12 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__1(x_1, x_2, x_4, x_5, x_6, x_7, x_11); +x_12 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__1(x_1, x_2, x_4, x_5, x_6, x_7, x_11); return x_12; } else @@ -45668,7 +45640,7 @@ lean_dec(x_3); x_18 = lean_ctor_get(x_15, 1); lean_inc(x_18); lean_dec(x_15); -x_19 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__1(x_1, x_2, x_4, x_5, x_6, x_7, x_18); +x_19 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__1(x_1, x_2, x_4, x_5, x_6, x_7, x_18); return x_19; } else @@ -45750,16 +45722,16 @@ return x_32; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure(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; lean_inc(x_1); -x_8 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(x_1, x_2, x_1, x_3, x_4, x_5, x_6, x_7); +x_8 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(x_1, x_2, x_1, x_3, x_4, x_5, x_6, x_7); return x_8; } } -lean_object* l___private_Lean_Meta_ExprDefEq_47__consumeLet___main(lean_object* x_1) { +lean_object* l___private_Lean_Meta_ExprDefEq_46__consumeLet___main(lean_object* x_1) { _start: { if (lean_obj_tag(x_1) == 8) @@ -45785,28 +45757,28 @@ return x_1; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_47__consumeLet___main___boxed(lean_object* x_1) { +lean_object* l___private_Lean_Meta_ExprDefEq_46__consumeLet___main___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l___private_Lean_Meta_ExprDefEq_47__consumeLet___main(x_1); +x_2 = l___private_Lean_Meta_ExprDefEq_46__consumeLet___main(x_1); lean_dec(x_1); return x_2; } } -lean_object* l___private_Lean_Meta_ExprDefEq_47__consumeLet(lean_object* x_1) { +lean_object* l___private_Lean_Meta_ExprDefEq_46__consumeLet(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l___private_Lean_Meta_ExprDefEq_47__consumeLet___main(x_1); +x_2 = l___private_Lean_Meta_ExprDefEq_46__consumeLet___main(x_1); return x_2; } } -lean_object* l___private_Lean_Meta_ExprDefEq_47__consumeLet___boxed(lean_object* x_1) { +lean_object* l___private_Lean_Meta_ExprDefEq_46__consumeLet___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l___private_Lean_Meta_ExprDefEq_47__consumeLet(x_1); +x_2 = l___private_Lean_Meta_ExprDefEq_46__consumeLet(x_1); lean_dec(x_1); return x_2; } @@ -46372,7 +46344,7 @@ return x_30; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_44__isDefEqWHNF___at_Lean_Meta_isExprDefEqAuxImpl___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_ExprDefEq_43__isDefEqWHNF___at_Lean_Meta_isExprDefEqAuxImpl___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; @@ -46424,7 +46396,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_12); lean_inc(x_9); -x_16 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main(x_9, x_12, x_3, x_4, x_5, x_6, x_13); +x_16 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main(x_9, x_12, x_3, x_4, x_5, x_6, x_13); if (lean_obj_tag(x_16) == 0) { lean_object* x_17; uint8_t x_18; @@ -46922,7 +46894,7 @@ lean_object* x_226; lean_object* x_227; x_226 = lean_ctor_get(x_207, 1); lean_inc(x_226); lean_dec(x_207); -x_227 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_226); +x_227 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_226); if (lean_obj_tag(x_227) == 0) { lean_object* x_228; uint8_t x_229; @@ -47417,7 +47389,7 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_328 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_327); +x_328 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_327); if (lean_obj_tag(x_328) == 0) { lean_object* x_329; uint8_t x_330; @@ -47931,7 +47903,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_12); lean_inc(x_9); -x_427 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_426); +x_427 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_426); if (lean_obj_tag(x_427) == 0) { lean_object* x_428; uint8_t x_429; @@ -48037,7 +48009,7 @@ x_450 = lean_ctor_get(x_447, 1); lean_inc(x_450); lean_dec(x_447); lean_inc(x_9); -x_451 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_450); +x_451 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_450); return x_451; } else @@ -48540,7 +48512,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_12); lean_inc(x_9); -x_100 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_99); +x_100 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_99); if (lean_obj_tag(x_100) == 0) { lean_object* x_101; uint8_t x_102; @@ -48713,7 +48685,7 @@ x_139 = lean_ctor_get(x_120, 1); lean_inc(x_139); lean_dec(x_120); lean_inc(x_9); -x_140 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_139); +x_140 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_139); return x_140; } } @@ -48919,7 +48891,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_12); lean_inc(x_9); -x_504 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main(x_9, x_12, x_3, x_4, x_5, x_6, x_13); +x_504 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main(x_9, x_12, x_3, x_4, x_5, x_6, x_13); if (lean_obj_tag(x_504) == 0) { lean_object* x_505; uint8_t x_506; @@ -49417,7 +49389,7 @@ lean_object* x_714; lean_object* x_715; x_714 = lean_ctor_get(x_695, 1); lean_inc(x_714); lean_dec(x_695); -x_715 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_714); +x_715 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_714); if (lean_obj_tag(x_715) == 0) { lean_object* x_716; uint8_t x_717; @@ -49912,7 +49884,7 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_816 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_815); +x_816 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_815); if (lean_obj_tag(x_816) == 0) { lean_object* x_817; uint8_t x_818; @@ -50426,7 +50398,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_12); lean_inc(x_9); -x_915 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_914); +x_915 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_914); if (lean_obj_tag(x_915) == 0) { lean_object* x_916; uint8_t x_917; @@ -50532,7 +50504,7 @@ x_938 = lean_ctor_get(x_935, 1); lean_inc(x_938); lean_dec(x_935); lean_inc(x_9); -x_939 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_938); +x_939 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_938); return x_939; } else @@ -51035,7 +51007,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_12); lean_inc(x_9); -x_588 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_587); +x_588 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_587); if (lean_obj_tag(x_588) == 0) { lean_object* x_589; uint8_t x_590; @@ -51208,7 +51180,7 @@ x_627 = lean_ctor_get(x_608, 1); lean_inc(x_627); lean_dec(x_608); lean_inc(x_9); -x_628 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_627); +x_628 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_627); return x_628; } } @@ -51810,7 +51782,7 @@ lean_object* x_1180; lean_object* x_1181; x_1180 = lean_ctor_get(x_1161, 1); lean_inc(x_1180); lean_dec(x_1161); -x_1181 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_1180); +x_1181 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_1180); if (lean_obj_tag(x_1181) == 0) { lean_object* x_1182; uint8_t x_1183; @@ -52305,7 +52277,7 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_1282 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_1281); +x_1282 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_1281); if (lean_obj_tag(x_1282) == 0) { lean_object* x_1283; uint8_t x_1284; @@ -52819,7 +52791,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_12); lean_inc(x_9); -x_1381 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_1380); +x_1381 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_1380); if (lean_obj_tag(x_1381) == 0) { lean_object* x_1382; uint8_t x_1383; @@ -52925,7 +52897,7 @@ x_1404 = lean_ctor_get(x_1401, 1); lean_inc(x_1404); lean_dec(x_1401); lean_inc(x_9); -x_1405 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_1404); +x_1405 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_1404); return x_1405; } else @@ -53428,7 +53400,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_12); lean_inc(x_9); -x_1054 = l___private_Lean_Meta_ExprDefEq_35__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_1053); +x_1054 = l___private_Lean_Meta_ExprDefEq_34__isDefEqDelta(x_9, x_12, x_3, x_4, x_5, x_6, x_1053); if (lean_obj_tag(x_1054) == 0) { lean_object* x_1055; uint8_t x_1056; @@ -53601,7 +53573,7 @@ x_1093 = lean_ctor_get(x_1074, 1); lean_inc(x_1093); lean_dec(x_1074); lean_inc(x_9); -x_1094 = l___private_Lean_Meta_ExprDefEq_45__unstuckMVar___at___private_Lean_Meta_ExprDefEq_46__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_1093); +x_1094 = l___private_Lean_Meta_ExprDefEq_44__unstuckMVar___at___private_Lean_Meta_ExprDefEq_45__isDefEqOnFailure___spec__2(x_9, x_12, x_9, x_3, x_4, x_5, x_6, x_1093); return x_1094; } } @@ -53837,8 +53809,8 @@ lean_object* l_Lean_Meta_isExprDefEqAuxImpl(lean_object* x_1, lean_object* x_2, _start: { lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_61; lean_object* x_62; lean_object* x_72; lean_object* x_73; uint8_t x_74; -x_8 = l___private_Lean_Meta_ExprDefEq_47__consumeLet___main(x_1); -x_9 = l___private_Lean_Meta_ExprDefEq_47__consumeLet___main(x_2); +x_8 = l___private_Lean_Meta_ExprDefEq_46__consumeLet___main(x_1); +x_9 = l___private_Lean_Meta_ExprDefEq_46__consumeLet___main(x_2); x_72 = l_Lean_Core_getTraceState___rarg(x_6, x_7); x_73 = lean_ctor_get(x_72, 0); lean_inc(x_73); @@ -53883,7 +53855,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_9); lean_inc(x_8); -x_11 = l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main(x_8, x_9, x_3, x_4, x_5, x_6, x_10); +x_11 = l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main(x_8, x_9, x_3, x_4, x_5, x_6, x_10); if (lean_obj_tag(x_11) == 0) { lean_object* x_12; uint8_t x_13; @@ -53972,7 +53944,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_9); lean_inc(x_8); -x_31 = l___private_Lean_Meta_ExprDefEq_42__isDefEqProofIrrel(x_8, x_9, x_3, x_4, x_5, x_6, x_30); +x_31 = l___private_Lean_Meta_ExprDefEq_41__isDefEqProofIrrel(x_8, x_9, x_3, x_4, x_5, x_6, x_30); if (lean_obj_tag(x_31) == 0) { lean_object* x_32; uint8_t x_33; @@ -54055,7 +54027,7 @@ lean_object* x_50; lean_object* x_51; x_50 = lean_ctor_get(x_31, 1); lean_inc(x_50); lean_dec(x_31); -x_51 = l___private_Lean_Meta_ExprDefEq_44__isDefEqWHNF___at_Lean_Meta_isExprDefEqAuxImpl___spec__3(x_8, x_9, x_3, x_4, x_5, x_6, x_50); +x_51 = l___private_Lean_Meta_ExprDefEq_43__isDefEqWHNF___at_Lean_Meta_isExprDefEqAuxImpl___spec__3(x_8, x_9, x_3, x_4, x_5, x_6, x_50); return x_51; } } @@ -54209,7 +54181,7 @@ return x_8; } } } -lean_object* l___private_Lean_Meta_ExprDefEq_48__regTraceClasses(lean_object* x_1) { +lean_object* l___private_Lean_Meta_ExprDefEq_47__regTraceClasses(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -54221,7 +54193,7 @@ lean_object* x_4; lean_object* x_5; lean_object* x_6; x_4 = lean_ctor_get(x_3, 1); lean_inc(x_4); lean_dec(x_3); -x_5 = l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__2; +x_5 = l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__2; x_6 = l_Lean_registerTraceClass(x_5, x_4); if (lean_obj_tag(x_6) == 0) { @@ -54229,7 +54201,7 @@ lean_object* x_7; lean_object* x_8; lean_object* x_9; x_7 = lean_ctor_get(x_6, 1); lean_inc(x_7); lean_dec(x_6); -x_8 = l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2; +x_8 = l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2; x_9 = l_Lean_registerTraceClass(x_8, x_7); if (lean_obj_tag(x_9) == 0) { @@ -54433,14 +54405,14 @@ l_Lean_Meta_CheckAssignment_Lean_MonadCache___closed__3 = _init_l_Lean_Meta_Chec lean_mark_persistent(l_Lean_Meta_CheckAssignment_Lean_MonadCache___closed__3); l_Lean_Meta_CheckAssignment_Lean_MonadCache = _init_l_Lean_Meta_CheckAssignment_Lean_MonadCache(); lean_mark_persistent(l_Lean_Meta_CheckAssignment_Lean_MonadCache); -l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__1); -l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__2); -l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__3 = _init_l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__3(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__3); -l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4 = _init_l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_13__addAssignmentInfo___closed__4); +l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__1); +l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__2); +l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__3 = _init_l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__3); +l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4 = _init_l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_12__addAssignmentInfo___closed__4); l_Lean_Meta_CheckAssignment_checkFVar___closed__1 = _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__1(); lean_mark_persistent(l_Lean_Meta_CheckAssignment_checkFVar___closed__1); l_Lean_Meta_CheckAssignment_checkFVar___closed__2 = _init_l_Lean_Meta_CheckAssignment_checkFVar___closed__2(); @@ -54479,6 +54451,14 @@ l_Lean_Meta_CheckAssignment_checkMVar___closed__6 = _init_l_Lean_Meta_CheckAssig lean_mark_persistent(l_Lean_Meta_CheckAssignment_checkMVar___closed__6); l_Lean_Meta_CheckAssignment_checkMVar___closed__7 = _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__7(); lean_mark_persistent(l_Lean_Meta_CheckAssignment_checkMVar___closed__7); +l_Lean_Meta_CheckAssignment_checkMVar___closed__8 = _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__8(); +lean_mark_persistent(l_Lean_Meta_CheckAssignment_checkMVar___closed__8); +l_Lean_Meta_CheckAssignment_checkMVar___closed__9 = _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__9(); +lean_mark_persistent(l_Lean_Meta_CheckAssignment_checkMVar___closed__9); +l_Lean_Meta_CheckAssignment_checkMVar___closed__10 = _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__10(); +lean_mark_persistent(l_Lean_Meta_CheckAssignment_checkMVar___closed__10); +l_Lean_Meta_CheckAssignment_checkMVar___closed__11 = _init_l_Lean_Meta_CheckAssignment_checkMVar___closed__11(); +lean_mark_persistent(l_Lean_Meta_CheckAssignment_checkMVar___closed__11); l_Lean_Meta_CheckAssignment_check___main___closed__1 = _init_l_Lean_Meta_CheckAssignment_check___main___closed__1(); lean_mark_persistent(l_Lean_Meta_CheckAssignment_check___main___closed__1); l_Lean_Meta_CheckAssignment_check___main___closed__2 = _init_l_Lean_Meta_CheckAssignment_check___main___closed__2(); @@ -54487,52 +54467,52 @@ l_Lean_Meta_CheckAssignment_run___closed__1 = _init_l_Lean_Meta_CheckAssignment_ lean_mark_persistent(l_Lean_Meta_CheckAssignment_run___closed__1); l_Lean_Meta_CheckAssignment_run___closed__2 = _init_l_Lean_Meta_CheckAssignment_run___closed__2(); lean_mark_persistent(l_Lean_Meta_CheckAssignment_run___closed__2); -l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__1); -l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_16__processAssignmentFOApprox___main___closed__2); -l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__1); -l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__2); -l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__3 = _init_l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__3(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_20__processAssignmentAux___main___closed__3); -l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__1); -l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__2); -l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__3 = _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__3(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__3); -l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__4 = _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__4(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_24__isDefEqLeft___closed__4); -l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__1); -l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_25__isDefEqRight___closed__2); -l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__1); -l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_26__isDefEqLeftRight___closed__2); -l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__1 = _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__1(); -lean_mark_persistent(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__1); -l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__2 = _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__2(); -lean_mark_persistent(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__2); -l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__3 = _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__3(); -lean_mark_persistent(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_27__tryHeuristic___spec__2___lambda__2___closed__3); -l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__1); -l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__2); -l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__3 = _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__3(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__3); -l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__4 = _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__4(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__4); -l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__5 = _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__5(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__5); -l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__6 = _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__6(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__6); -l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__7 = _init_l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__7(); -lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_43__isDefEqQuick___main___closed__7); +l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__1); +l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApprox___main___closed__2); +l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__1); +l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__2); +l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__3 = _init_l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_19__processAssignmentAux___main___closed__3); +l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__1); +l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__2); +l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__3 = _init_l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__3); +l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__4 = _init_l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_23__isDefEqLeft___closed__4); +l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__1); +l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_24__isDefEqRight___closed__2); +l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__1); +l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_25__isDefEqLeftRight___closed__2); +l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__1 = _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__1(); +lean_mark_persistent(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__1); +l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__2 = _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__2(); +lean_mark_persistent(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__2); +l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__3 = _init_l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__3(); +lean_mark_persistent(l_Lean_Meta_commitWhenSome_x3f___at___private_Lean_Meta_ExprDefEq_26__tryHeuristic___spec__2___lambda__2___closed__3); +l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__1 = _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__1); +l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__2 = _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__2); +l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__3 = _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__3); +l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__4 = _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__4); +l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__5 = _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__5(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__5); +l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__6 = _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__6(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__6); +l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__7 = _init_l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__7(); +lean_mark_persistent(l___private_Lean_Meta_ExprDefEq_42__isDefEqQuick___main___closed__7); l_Lean_Meta_isExprDefEqAuxImpl___closed__1 = _init_l_Lean_Meta_isExprDefEqAuxImpl___closed__1(); lean_mark_persistent(l_Lean_Meta_isExprDefEqAuxImpl___closed__1); l_Lean_Meta_setIsExprDefEqAuxRef___closed__1 = _init_l_Lean_Meta_setIsExprDefEqAuxRef___closed__1(); @@ -54540,7 +54520,7 @@ lean_mark_persistent(l_Lean_Meta_setIsExprDefEqAuxRef___closed__1); res = l_Lean_Meta_setIsExprDefEqAuxRef(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -res = l___private_Lean_Meta_ExprDefEq_48__regTraceClasses(lean_io_mk_world()); +res = l___private_Lean_Meta_ExprDefEq_47__regTraceClasses(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_mk_io_result(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/RecursorInfo.c b/stage0/stdlib/Lean/Meta/RecursorInfo.c index c8eaf15a5a..2d86e421ac 100644 --- a/stage0/stdlib/Lean/Meta/RecursorInfo.c +++ b/stage0/stdlib/Lean/Meta/RecursorInfo.c @@ -62,7 +62,6 @@ lean_object* l_Array_findIdxAux___main___at___private_Lean_Meta_RecursorInfo_9__ lean_object* l_List_toString___at_Lean_Meta_RecursorInfo_HasToString___spec__7(lean_object*); lean_object* l_Lean_Core_getEnv___rarg(lean_object*, lean_object*); extern lean_object* l_Array_empty___closed__1; -lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___spec__1(lean_object*); lean_object* lean_io_mk_ref(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__13; lean_object* lean_io_ref_get(lean_object*, lean_object*); @@ -193,6 +192,7 @@ lean_object* lean_name_mk_string(lean_object*, lean_object*); extern lean_object* l_List_repr___rarg___closed__2; lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_toString___at_Lean_Meta_RecursorInfo_HasToString___spec__7___boxed(lean_object*); +lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1(lean_object*); extern lean_object* l_List_reprAux___main___rarg___closed__1; lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__3; lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__4; @@ -2877,7 +2877,7 @@ x_11 = l_Array_isEmpty___rarg(x_5); if (x_11 == 0) { lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_12 = l_Array_back___at___private_Lean_Meta_ExprDefEq_15__processAssignmentFOApproxAux___spec__1(x_5); +x_12 = l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1(x_5); x_13 = lean_unsigned_to_nat(0u); x_14 = l_Array_findIdxAux___main___at___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___spec__2(x_12, x_3, x_13); if (lean_obj_tag(x_14) == 0) diff --git a/stage0/stdlib/Lean/Meta/SynthInstance.c b/stage0/stdlib/Lean/Meta/SynthInstance.c index 39ed2ab922..1292d724a5 100644 --- a/stage0/stdlib/Lean/Meta/SynthInstance.c +++ b/stage0/stdlib/Lean/Meta/SynthInstance.c @@ -34,7 +34,6 @@ lean_object* l___private_Lean_Expr_3__getAppArgsAux___main(lean_object*, lean_ob lean_object* lean_array_uget(lean_object*, size_t); lean_object* l___private_Lean_Meta_SynthInstance_6__preprocessOutParam___lambda__1(lean_object*, lean_object*, 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_Meta_SynthInstance_liftMetaM(lean_object*); lean_object* l_Lean_Meta_SynthInstance_generate___closed__5; uint8_t lean_name_eq(lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Meta_SynthInstance_getInstances___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -117,7 +116,6 @@ lean_object* l_Std_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_M lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Lean_Meta_SynthInstance_getInstances(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_AssocList_replace___main___at_Lean_Meta_SynthInstance_MkTableKey_normExpr___main___spec__8(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_SynthInstance_liftMetaM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SynthInstance_findEntry_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Util_Trace_2__addNode___at___private_Lean_Meta_LevelDefEq_10__processPostponedStep___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_findAux___main___at_Lean_Meta_synthInstance_x3f___spec__6___boxed(lean_object*, lean_object*, lean_object*); @@ -142,6 +140,7 @@ uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Meta_SynthInstance_getTop___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_findAux___main___at_Lean_Meta_synthInstance_x3f___spec__6(lean_object*, size_t, lean_object*); lean_object* l_Lean_Meta_abstractMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Exception_inhabited___closed__1; lean_object* l_Lean_Meta_SynthInstance_synth___main___closed__6; lean_object* l___private_Lean_Meta_SynthInstance_3__preprocess___closed__1; lean_object* l_Lean_Meta_SynthInstance_tryResolve(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -214,7 +213,6 @@ lean_object* l_Lean_Meta_whnf(lean_object*, lean_object*, lean_object*, lean_obj lean_object* l_Lean_Meta_SynthInstance_resume___closed__3; lean_object* l_Lean_mkFVar(lean_object*); uint8_t l_Lean_Expr_Data_binderInfo(uint64_t); -lean_object* l_Lean_Meta_SynthInstance_liftMetaM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_AssocList_foldlM___main___at_Lean_Meta_SynthInstance_newSubgoal___spec__5(lean_object*, lean_object*); lean_object* l_Lean_Meta_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_AssocList_replace___main___at_Lean_Meta_SynthInstance_newSubgoal___spec__6(lean_object*, lean_object*, lean_object*); @@ -281,7 +279,6 @@ uint8_t l_Lean_TagAttribute_hasTag(lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insertAux___main___at_Lean_Meta_synthInstance_x3f___spec__2(lean_object*, size_t, size_t, lean_object*, lean_object*); lean_object* l_Lean_Meta_SynthInstance_getResult___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_getOptions(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Core_Exception_inhabited___closed__1; lean_object* l_Array_umapMAux___main___at_Lean_Meta_SynthInstance_getInstances___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_register_option(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SynthInstance_synth___main___closed__2; @@ -2159,31 +2156,6 @@ x_1 = l_Lean_Meta_SynthInstance_Answer_inhabited___closed__1; return x_1; } } -lean_object* l_Lean_Meta_SynthInstance_liftMetaM___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; -x_8 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -return x_8; -} -} -lean_object* l_Lean_Meta_SynthInstance_liftMetaM(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_SynthInstance_liftMetaM___rarg___boxed), 7, 0); -return x_2; -} -} -lean_object* l_Lean_Meta_SynthInstance_liftMetaM___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_Meta_SynthInstance_liftMetaM___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_2); -return x_8; -} -} lean_object* l_Lean_Meta_SynthInstance_mapMetaM(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: { @@ -2197,7 +2169,7 @@ lean_object* l_Lean_Meta_SynthInstance_SynthM_inhabited___rarg(lean_object* x_1) _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Core_Exception_inhabited___closed__1; +x_2 = l_Lean_Exception_inhabited___closed__1; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); @@ -2616,7 +2588,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_1 = l_Array_umapMAux___main___at_Lean_Meta_SynthInstance_getInstances___spec__2___closed__1; -x_2 = lean_unsigned_to_nat(180u); +x_2 = lean_unsigned_to_nat(177u); x_3 = lean_unsigned_to_nat(13u); x_4 = l_Array_umapMAux___main___at_Lean_Meta_SynthInstance_getInstances___spec__2___closed__2; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -4556,7 +4528,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_1 = l_Array_umapMAux___main___at_Lean_Meta_SynthInstance_getInstances___spec__2___closed__1; -x_2 = lean_unsigned_to_nat(225u); +x_2 = lean_unsigned_to_nat(222u); x_3 = lean_unsigned_to_nat(16u); x_4 = l_Lean_Meta_SynthInstance_getEntry___closed__2; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -10808,7 +10780,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_1 = l_Array_umapMAux___main___at_Lean_Meta_SynthInstance_getInstances___spec__2___closed__1; -x_2 = lean_unsigned_to_nat(422u); +x_2 = lean_unsigned_to_nat(419u); x_3 = lean_unsigned_to_nat(16u); x_4 = l_Lean_Meta_SynthInstance_resume___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); diff --git a/stage0/stdlib/Lean/Meta/WHNF.c b/stage0/stdlib/Lean/Meta/WHNF.c index f398d38d98..742eabac20 100644 --- a/stage0/stdlib/Lean/Meta/WHNF.c +++ b/stage0/stdlib/Lean/Meta/WHNF.c @@ -110,6 +110,7 @@ lean_object* l___private_Lean_Meta_WHNF_4__whnfHeadPredAux___main___at_Lean_Meta uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Meta_setWHNFRef(lean_object*); lean_object* l___private_Lean_Meta_WHNF_1__useWHNFCache___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Exception_inhabited___closed__1; lean_object* lean_nat_sub(lean_object*, lean_object*); extern lean_object* l_Std_PersistentHashMap_insertAux___main___rarg___closed__3; lean_object* l_Array_shrink___main___rarg(lean_object*, lean_object*); @@ -215,7 +216,6 @@ uint8_t l_Array_anyRangeMAux___main___at_Lean_Meta_unfoldDefinition_x3f___spec__ extern lean_object* l_Lean_Meta_whnfRef; lean_object* l_Lean_Meta_synthPending(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_reduceBoolNative___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Core_Exception_inhabited___closed__1; lean_object* l_Lean_Meta_reduceBinNatOp___closed__12; lean_object* l_Lean_Meta_getExprMVarAssignment_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_reduceQuotRec___at_Lean_Meta_whnfCore___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -11470,7 +11470,7 @@ lean_object* l_Lean_Meta_reduceBoolNative___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Core_Exception_inhabited___closed__1; +x_2 = l_Lean_Exception_inhabited___closed__1; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); @@ -11502,7 +11502,7 @@ lean_object* l_Lean_Meta_reduceNatNative___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Core_Exception_inhabited___closed__1; +x_2 = l_Lean_Exception_inhabited___closed__1; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); diff --git a/stage0/stdlib/Lean/Parser/Command.c b/stage0/stdlib/Lean/Parser/Command.c index 61a0e4d8d2..c52189f087 100644 --- a/stage0/stdlib/Lean/Parser/Command.c +++ b/stage0/stdlib/Lean/Parser/Command.c @@ -3346,6 +3346,7 @@ lean_object* x_5; x_5 = l_Lean_Parser_Command_commentBody_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -3374,6 +3375,7 @@ lean_object* x_6; x_6 = l_Lean_Parser_Command_commentBody_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } diff --git a/stage0/stdlib/Lean/Parser/Level.c b/stage0/stdlib/Lean/Parser/Level.c index 824a3c0b4a..b2df8a6820 100644 --- a/stage0/stdlib/Lean/Parser/Level.c +++ b/stage0/stdlib/Lean/Parser/Level.c @@ -167,7 +167,7 @@ lean_object* l_Lean_Parser_nonReservedSymbolInfo(lean_object*, uint8_t); lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___rarg___closed__22; lean_object* l_Lean_Parser_Level_paren; lean_object* l___regBuiltin_Lean_Parser_Level_addLit_formatter___closed__1; -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_dollarSymbol_parenthesizer(lean_object*); lean_object* l_Lean_Name_append___main(lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_addLit___elambda__1___closed__2; @@ -256,7 +256,7 @@ extern lean_object* l_Option_HasRepr___rarg___closed__3; lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__3; lean_object* l_Lean_Parser_ident___elambda__1(lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_max___closed__4; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_hole___elambda__1___closed__5; lean_object* l___regBuiltin_Lean_Parser_Level_addLit_formatter(lean_object*); extern lean_object* l_Lean_Parser_numLit; @@ -267,7 +267,7 @@ lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___rarg___closed__11; lean_object* l___regBuiltin_Lean_Parser_Level_hole_parenthesizer___closed__1; extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__1___closed__2; lean_object* l_Lean_Parser_Level_hole___closed__6; -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_max; lean_object* l_Lean_Parser_Level_num; @@ -287,7 +287,7 @@ lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___rarg___closed__26; extern lean_object* l___private_Init_Util_1__mkPanicMessage___closed__2; extern lean_object* l_Lean_Parser_epsilonInfo; lean_object* l_Lean_Parser_Level_imax___elambda__1___closed__6; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkHole___closed__1; lean_object* l_Lean_Parser_categoryParser___elambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_pushNone_formatter___boxed(lean_object*); @@ -298,7 +298,7 @@ lean_object* l_Lean_Parser_leadingNode_formatter(lean_object*, lean_object*, lea lean_object* l_Lean_Parser_antiquotExpr_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_ident_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_hole_parenthesizer___closed__1; -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Level_paren_formatter___closed__5; lean_object* l_Lean_Parser_levelParser_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Level_hole(lean_object*); @@ -997,6 +997,7 @@ lean_object* x_6; x_6 = l_Lean_Parser_dollarSymbol_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -1146,7 +1147,7 @@ lean_object* _init_l_Lean_Parser_mkAntiquot_formatter___closed__3() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed), 4, 0); return x_1; } } @@ -1226,7 +1227,7 @@ lean_object* _init_l_Lean_Parser_mkAntiquot_formatter___closed__11() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed), 4, 0); return x_1; } } @@ -1379,7 +1380,7 @@ lean_object* _init_l_Lean_Parser_leadingNode_formatter___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed), 4, 0); return x_1; } } @@ -1543,6 +1544,7 @@ lean_object* x_5; x_5 = l_Lean_Parser_dollarSymbol_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -1674,7 +1676,7 @@ lean_object* _init_l_Lean_Parser_mkAntiquot_parenthesizer___rarg___closed__3() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed), 4, 0); return x_1; } } @@ -1848,7 +1850,7 @@ lean_object* _init_l_Lean_Parser_mkAntiquot_parenthesizer___rarg___closed__19() _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed), 4, 0); return x_1; } } diff --git a/stage0/stdlib/Lean/Parser/Module.c b/stage0/stdlib/Lean/Parser/Module.c index 9105d61d57..74950c12b9 100644 --- a/stage0/stdlib/Lean/Parser/Module.c +++ b/stage0/stdlib/Lean/Parser/Module.c @@ -47,6 +47,7 @@ lean_object* l_Lean_Parser_Module_import; lean_object* l_Lean_Parser_Module_import___elambda__1___closed__2; lean_object* l___private_Lean_Parser_Module_1__mkErrorMessage___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Module_prelude_formatter___closed__2; +extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; lean_object* l_Lean_Parser_Module_header___closed__4; lean_object* l___private_Lean_Parser_Module_2__mkEOI(lean_object*); lean_object* l_Lean_Parser_mkInputContext(lean_object*, lean_object*); @@ -205,7 +206,6 @@ lean_object* l_Lean_Parser_Module_import___elambda__1___closed__7; lean_object* l_Lean_Parser_Module_header___closed__3; lean_object* l_IO_print___at___private_Lean_Parser_Module_4__testModuleParserAux___main___spec__4(lean_object*, lean_object*); lean_object* l_String_trim(lean_object*); -extern lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; lean_object* l_Lean_PrettyPrinter_Parenthesizer_optional_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Parser_Module_4__testModuleParserAux(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_IO_FS_Handle_mk___at_Lean_Parser_parseFile___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -2701,7 +2701,7 @@ _start: lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); -x_3 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; +x_3 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; x_4 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_4, 0, x_3); lean_ctor_set(x_4, 1, x_2); diff --git a/stage0/stdlib/Lean/Parser/Tactic.c b/stage0/stdlib/Lean/Parser/Tactic.c index 41f378e86b..b02f052577 100644 --- a/stage0/stdlib/Lean/Parser/Tactic.c +++ b/stage0/stdlib/Lean/Parser/Tactic.c @@ -1208,6 +1208,7 @@ lean_object* x_5; x_5 = l_Lean_Parser_Tactic_underscore_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -1235,6 +1236,7 @@ lean_object* x_6; x_6 = l_Lean_Parser_Tactic_underscore_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } diff --git a/stage0/stdlib/Lean/Parser/Term.c b/stage0/stdlib/Lean/Parser/Term.c index c766027981..10a0d4bd67 100644 --- a/stage0/stdlib/Lean/Parser/Term.c +++ b/stage0/stdlib/Lean/Parser/Term.c @@ -319,7 +319,7 @@ lean_object* l___regBuiltinParser_Lean_Parser_Term_pow(lean_object*); lean_object* l___regBuiltin_Lean_Parser_Term_match__syntax_formatter___closed__1; lean_object* l_Lean_Parser_Term_eq___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_match_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_doExpr___closed__4; lean_object* l_Lean_Parser_Term_letEqnsDecl___closed__1; @@ -936,7 +936,7 @@ lean_object* l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(lean_object*, lean_obj lean_object* l_Lean_Parser_Term_unicodeInfixR_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_not_parenthesizer___closed__3; lean_object* l_Lean_Parser_Term_implicitBinder___closed__4; -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_nonEmptySeq___closed__4; lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__11; lean_object* l_Lean_PrettyPrinter_Formatter_symbolNoWs_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1142,7 +1142,7 @@ lean_object* l___regBuiltin_Lean_Parser_Term_hole_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_suffices___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_add___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_have___elambda__1___closed__6; -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_seqRight___closed__1; lean_object* l___regBuiltin_Lean_Parser_Term_seqLeft_formatter___closed__1; lean_object* l_Lean_Parser_Term_doElem___closed__3; @@ -1555,7 +1555,7 @@ lean_object* l_Lean_Parser_Term_letIdDecl___elambda__1(lean_object*, lean_object lean_object* l___regBuiltin_Lean_Parser_Level_quot_formatter___closed__1; lean_object* l_Lean_Parser_Term_equiv___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_explicit_parenthesizer___closed__4; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_app_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_not___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_doElem___closed__4; @@ -3513,7 +3513,7 @@ lean_object* l___regBuiltin_Lean_Parser_Term_append_parenthesizer(lean_object*); lean_object* l_Lean_Parser_Term_subst_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___regBuiltinParser_Lean_Parser_Level_num___closed__1; lean_object* l___regBuiltin_Lean_Parser_Term_bnot_parenthesizer(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_app___closed__2; lean_object* l_Lean_Parser_Term_namedArgument_parenthesizer___closed__5; lean_object* l___regBuiltin_Lean_Parser_Term_heq_formatter(lean_object*); @@ -6520,7 +6520,7 @@ lean_object* _init_l_Lean_Parser_Term_type_parenthesizer___closed__4() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___boxed), 4, 0); return x_1; } } @@ -35754,6 +35754,7 @@ lean_object* x_6; x_6 = l_Lean_Parser_darrow_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -35945,6 +35946,7 @@ lean_object* x_5; x_5 = l_Lean_Parser_darrow_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -41387,7 +41389,7 @@ lean_object* _init_l_Lean_Parser_Term_matchAlts_formatter___lambda__1___closed__ _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed), 4, 0); return x_1; } } @@ -41786,7 +41788,7 @@ lean_object* _init_l_Lean_Parser_Term_matchAlts_parenthesizer___lambda__1___clos _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed), 4, 0); return x_1; } } @@ -52620,6 +52622,7 @@ lean_object* x_6; x_6 = l_Lean_Parser_Term_leftArrow_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -52724,6 +52727,7 @@ lean_object* x_5; x_5 = l_Lean_Parser_Term_leftArrow_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -61468,7 +61472,7 @@ lean_object* _init_l_Lean_Parser_Term_explicitUniv_formatter___closed__7() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___boxed), 4, 0); return x_1; } } @@ -61567,7 +61571,7 @@ lean_object* _init_l_Lean_Parser_Term_explicitUniv_parenthesizer___closed__6() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed), 4, 0); return x_1; } } diff --git a/stage0/stdlib/Lean/PrettyPrinter/Backtrack.c b/stage0/stdlib/Lean/PrettyPrinter/Backtrack.c new file mode 100644 index 0000000000..1a6af0febb --- /dev/null +++ b/stage0/stdlib/Lean/PrettyPrinter/Backtrack.c @@ -0,0 +1,75 @@ +// Lean compiler output +// Module: Lean.PrettyPrinter.Backtrack +// Imports: Init Lean.InternalExceptionId +#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* l_Lean_PrettyPrinter_registerBacktrackId___closed__2; +lean_object* lean_name_mk_string(lean_object*, lean_object*); +lean_object* l_Lean_registerInternalExceptionId(lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_registerBacktrackId___closed__1; +lean_object* l_Lean_PrettyPrinter_registerBacktrackId(lean_object*); +lean_object* l_Lean_PrettyPrinter_backtrackExceptionId; +lean_object* _init_l_Lean_PrettyPrinter_registerBacktrackId___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("backtrackFormatter"); +return x_1; +} +} +lean_object* _init_l_Lean_PrettyPrinter_registerBacktrackId___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_PrettyPrinter_registerBacktrackId___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_registerBacktrackId(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_PrettyPrinter_registerBacktrackId___closed__2; +x_3 = l_Lean_registerInternalExceptionId(x_2, x_1); +return x_3; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_InternalExceptionId(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_PrettyPrinter_Backtrack(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_mk_io_result(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_InternalExceptionId(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_PrettyPrinter_registerBacktrackId___closed__1 = _init_l_Lean_PrettyPrinter_registerBacktrackId___closed__1(); +lean_mark_persistent(l_Lean_PrettyPrinter_registerBacktrackId___closed__1); +l_Lean_PrettyPrinter_registerBacktrackId___closed__2 = _init_l_Lean_PrettyPrinter_registerBacktrackId___closed__2(); +lean_mark_persistent(l_Lean_PrettyPrinter_registerBacktrackId___closed__2); +res = l_Lean_PrettyPrinter_registerBacktrackId(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +l_Lean_PrettyPrinter_backtrackExceptionId = lean_io_result_get_value(res); +lean_mark_persistent(l_Lean_PrettyPrinter_backtrackExceptionId); +lean_dec_ref(res); +return lean_mk_io_result(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/PrettyPrinter/Formatter.c b/stage0/stdlib/Lean/PrettyPrinter/Formatter.c index 24dee6ebd0..071e744ab4 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Formatter.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Formatter.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Lean.PrettyPrinter.Formatter -// Imports: Init Lean.CoreM Lean.Parser.Extension Lean.KeyedDeclsAttribute Lean.ParserCompiler.Attribute +// Imports: Init Lean.CoreM Lean.Parser.Extension Lean.KeyedDeclsAttribute Lean.ParserCompiler.Attribute Lean.PrettyPrinter.Backtrack #include #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -16,44 +16,38 @@ extern "C" { lean_object* l_List_reverse___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_strLitNoAntiquot_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Core_getConstInfo___closed__5; -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2(lean_object*); extern lean_object* l_Lean_Parser_builtinTokenTable; extern lean_object* l_Lean_Name_toString___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_ite___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_visitArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_fieldIdxKind; -lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg(lean_object*); lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_getStackSize___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_concat(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_numLitNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__4; -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_setExpected_formatter___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__12; lean_object* l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter___closed__3; lean_object* l_Lean_PrettyPrinter_Formatter_nonReservedSymbol_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_ExceptT_Monad___rarg(lean_object*); extern lean_object* l_Lean_nullKind; lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__4(lean_object*); -lean_object* l_StateT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_many_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__8; lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg(lean_object*); uint8_t lean_name_eq(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_formatTerm(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_Traverser_up(lean_object*); extern lean_object* l_Lean_KeyedDeclsAttribute_Def_inhabited___closed__2; lean_object* lean_mk_antiquot_formatter(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_map___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___lambda__1___closed__1; -lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -70,9 +64,12 @@ lean_object* l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___lambda__1__ lean_object* l_Lean_Core_addContext(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); uint8_t l_Array_isEqvAux___main___at_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_io_mk_ref(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4; lean_object* l_Lean_Parser_mkParserState(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_orelse(lean_object*); lean_object* lean_io_ref_get(lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_throwBacktrack(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__6; @@ -81,6 +78,7 @@ lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1 lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__2; lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParserOfStack_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_getStack(lean_object*); @@ -93,11 +91,10 @@ lean_object* l_List_range(lean_object*); lean_object* l_Lean_Parser_tokenFn(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__1; -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_lookahead_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__3; extern lean_object* l_String_splitAux___main___closed__1; -lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_try_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -109,13 +106,13 @@ lean_object* l_Lean_PrettyPrinter_Formatter_fieldIdx_formatter(lean_object*, lea lean_object* l_Lean_PrettyPrinter_Formatter_sepBy_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__1; lean_object* lean_io_ref_take(lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_symbolNoWs_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_liftCoreM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_nameLitKind; -lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_LocalContext_Inhabited___closed__1; lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5; lean_object* l_Lean_PrettyPrinter_Formatter_liftCoreM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_optional_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -123,16 +120,16 @@ lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__9; lean_object* l_Lean_PrettyPrinter_Formatter_getStack___boxed(lean_object*); lean_object* l___private_Lean_PrettyPrinter_Formatter_1__regTraceClasses(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg(lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_trailingNode_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_concatArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_getStackSize(lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_formatterForKind(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__6; lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__10; lean_object* l_Lean_PrettyPrinter_Formatter_withAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Nat_forMAux___main___at_Lean_PrettyPrinter_Formatter_many_formatter___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_String_trimRight(lean_object*); uint8_t l_Array_anyRangeMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -141,23 +138,24 @@ lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___boxed(lean_ lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_checkWsBefore_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2(lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__4; lean_object* l_Lean_PrettyPrinter_Formatter_setExpected_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_strLitNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_EnvExtension_Inhabited___rarg___closed__1; extern lean_object* l_Lean_numLitKind; lean_object* lean_nat_sub(lean_object*, lean_object*); extern lean_object* l_Lean_choiceKind___closed__2; -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParserOfStack_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_strLitKind; -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__2; lean_object* l_Array_shrink___main___rarg(lean_object*, lean_object*); +lean_object* l_StateRefT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_push___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_visitAtom(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_formatterForKind___closed__3; lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__6; lean_object* l_Lean_PrettyPrinter_Formatter_unquotedSymbol_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -166,21 +164,19 @@ lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__5; lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__3; lean_object* l_Lean_PrettyPrinter_Formatter_toggleInsideQuot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_mkHashMapImp___rarg(lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_node_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_lift___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__2(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Formatter_checkKind___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_pushNone_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__13; -lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_identEq_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Char_HasRepr___closed__1; lean_object* l_ReaderT_lift___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_StateT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getId(lean_object*); lean_object* l_ReaderT_lift___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_termParser___closed__2; @@ -192,7 +188,7 @@ lean_object* l_Lean_ParserCompiler_registerCombinatorAttribute(lean_object*, lea lean_object* l_Lean_PrettyPrinter_Formatter_symbol_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg(lean_object*); lean_object* l_Lean_KeyedDeclsAttribute_getValues___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_formatterAttribute; lean_object* l_Lean_PrettyPrinter_Formatter_formatterForKind___closed__1; @@ -206,10 +202,9 @@ lean_object* l_Lean_PrettyPrinter_Formatter_mkAntiquot_formatter_x27___boxed(lea lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_formatterAttribute___spec__1___closed__1; lean_object* l_ReaderT_map___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__3(lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__11; lean_object* l_Lean_PrettyPrinter_Formatter_pushToken___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__2; -lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_FileMap_ofString(lean_object*); extern lean_object* l_Lean_Format_Inhabited; lean_object* l_Lean_PrettyPrinter_Formatter_visitAtom___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -218,6 +213,7 @@ lean_object* l_Lean_PrettyPrinter_Formatter_setExpected_formatter(lean_object*); lean_object* l_ReaderT_bind___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__6; lean_object* l_Lean_PrettyPrinter_Formatter_pushNone_formatter(lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_formatterAttribute___spec__1___closed__2; extern lean_object* l_Lean_quotedSymbolKind; lean_object* l_Lean_PrettyPrinter_Formatter_ite(lean_object*, lean_object*); @@ -228,9 +224,10 @@ lean_object* l_List_forM___main___at_Lean_PrettyPrinter_Formatter_sepBy_formatte lean_object* l_Lean_PrettyPrinter_Formatter_nameLitNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_withPosition_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_formatterForKind___closed__2; +lean_object* l_Lean_PrettyPrinter_Formatter_orelse___closed__1; lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__10; lean_object* l_Lean_PrettyPrinter_formatCommand___closed__2; -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCombinatorFormatterAttribute___closed__1; lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__3; lean_object* l_ReaderT_bind___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__4(lean_object*, lean_object*); @@ -239,6 +236,7 @@ lean_object* l_Lean_PrettyPrinter_Formatter_getStack___rarg___boxed(lean_object* lean_object* l_Lean_Syntax_Traverser_fromSyntax(lean_object*); lean_object* l_Lean_PrettyPrinter_formatCommand___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_symbolNoWs_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__3; lean_object* l_Lean_PrettyPrinter_Formatter_withPosition_formatter___closed__1; @@ -246,6 +244,7 @@ lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__ extern lean_object* l_Lean_formatDataValue___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_setStack___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_FormatterM_orelse___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___lambda__1___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_parseToken___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_identKind; @@ -253,37 +252,37 @@ lean_object* l_Lean_PrettyPrinter_Formatter_parseToken___closed__1; lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__11; lean_object* l_Lean_PrettyPrinter_formatterAttribute___closed__3; extern lean_object* l_Lean_Syntax_inhabited; +lean_object* l_Lean_PrettyPrinter_FormatterM_orelse(lean_object*); lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_getStack___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__7; lean_object* l_Lean_PrettyPrinter_formatCommand(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_push(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_Traverser_down(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_formatterAttribute___closed__5; -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__4___boxed(lean_object*); extern lean_object* l_Lean_Format_getWidth___closed__1; -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_pushToken(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getArgs(lean_object*); lean_object* l_Array_isEqvAux___main___at_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getKind(lean_object*); uint8_t l_Lean_Parser_isValidSyntaxNodeKind(lean_object*, lean_object*); -lean_object* l_StateT_Monad___rarg(lean_object*); lean_object* lean_panic_fn(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_getStackSize___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_format___closed__3; lean_object* l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__4; lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3; +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_fieldIdx_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_getEnv(lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_getEnv(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Core_getOptions(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_liftCoreM(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__2; @@ -292,11 +291,12 @@ lean_object* l_Std_PersistentHashMap_empty___at_Lean_PrettyPrinter_formatterAttr lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_anyRangeMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_pushNone_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_concat___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_setStack(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__5; -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed(lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_parseToken(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCombinatorFormatterAttribute___closed__3; extern lean_object* l_Lean_ParserCompiler_CombinatorAttribute_Inhabited___closed__3; @@ -318,26 +318,25 @@ lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Formatte lean_object* l_Lean_PrettyPrinter_Formatter_rawIdent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_rawIdent_formatter___boxed(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_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_throwError(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_charLitNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__3; lean_object* l_Lean_PrettyPrinter_Formatter_concat___lambda__1(lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_formatterAttribute___closed__4; lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); extern lean_object* l_Lean_mkOptionalNode___closed__2; -lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_mod(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_symbol_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__2; lean_object* l_Lean_Syntax_formatStxAux___main(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__8; -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_sepBy1_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); lean_object* l_Lean_KeyedDeclsAttribute_init___rarg(lean_object*, lean_object*, lean_object*); @@ -346,6 +345,8 @@ lean_object* l_Lean_PrettyPrinter_Formatter_checkKind(lean_object*, lean_object* lean_object* l_Lean_PrettyPrinter_Formatter_nameLitNoAntiquot_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__9; lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Formatter_checkKind___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_PrettyPrinter_backtrackExceptionId; +lean_object* l_StateRefT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_inhabited___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_throwError___rarg(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*); @@ -356,9 +357,9 @@ extern lean_object* l_String_Inhabited; lean_object* l_Lean_PrettyPrinter_Formatter_throwError___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_Traverser_left(lean_object*); lean_object* l_Lean_Core_getTraceState___rarg(lean_object*, lean_object*); -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_throwBacktrack___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_format___closed__1; -lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_getStackSize___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__4; @@ -367,16 +368,13 @@ lean_object* l_Lean_PrettyPrinter_format___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_formatTerm___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__2; -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_andthen_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__1; extern lean_object* l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; lean_object* l_Lean_PrettyPrinter_mkCombinatorFormatterAttribute___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_nonReservedSymbol_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter(lean_object*); +lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___boxed(lean_object*); -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1(lean_object*); uint8_t lean_string_dec_eq(lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_monadInhabited___rarg(lean_object*, lean_object*); @@ -384,6 +382,168 @@ lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter(lean_object lean_object* l_Lean_PrettyPrinter_formatterAttribute___closed__2; lean_object* l_Array_foldl___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_pushNone_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_FormatterM_orelse___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; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_io_ref_get(x_4, x_7); +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_11 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_10); +if (lean_obj_tag(x_11) == 0) +{ +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_11; +} +else +{ +lean_object* x_12; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_13 = !lean_is_exclusive(x_11); +if (x_13 == 0) +{ +lean_object* x_14; +x_14 = lean_ctor_get(x_11, 0); +lean_dec(x_14); +return x_11; +} +else +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_11, 1); +lean_inc(x_15); +lean_dec(x_11); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_12); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_11); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_18 = lean_ctor_get(x_11, 1); +x_19 = lean_ctor_get(x_11, 0); +lean_dec(x_19); +x_20 = lean_ctor_get(x_12, 0); +lean_inc(x_20); +x_21 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_22 = lean_nat_dec_eq(x_21, x_20); +lean_dec(x_20); +if (x_22 == 0) +{ +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_11; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_free_object(x_11); +lean_dec(x_12); +x_23 = lean_io_ref_set(x_4, x_9, x_18); +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +lean_dec(x_23); +x_25 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_24); +return x_25; +} +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_26 = lean_ctor_get(x_11, 1); +lean_inc(x_26); +lean_dec(x_11); +x_27 = lean_ctor_get(x_12, 0); +lean_inc(x_27); +x_28 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_29 = lean_nat_dec_eq(x_28, x_27); +lean_dec(x_27); +if (x_29 == 0) +{ +lean_object* x_30; +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_12); +lean_ctor_set(x_30, 1, x_26); +return x_30; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_12); +x_31 = lean_io_ref_set(x_4, x_9, x_26); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_32); +return x_33; +} +} +} +} +} +} +lean_object* l_Lean_PrettyPrinter_FormatterM_orelse(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_FormatterM_orelse___rarg), 7, 0); +return x_2; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Formatter_orelse___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_FormatterM_orelse___rarg), 7, 0); +return x_1; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_orelse(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_PrettyPrinter_Formatter_orelse___closed__1; +return x_2; +} +} lean_object* _init_l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__1() { _start: { @@ -803,20 +963,70 @@ x_4 = l_Lean_ParserCompiler_registerCombinatorAttribute(x_2, x_3, x_1); return x_4; } } -lean_object* l_StateT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* _init_l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg___closed__1() { _start: { -lean_object* x_5; lean_object* x_6; lean_object* x_7; -lean_inc(x_1); -x_5 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_5, 0, x_1); -lean_ctor_set(x_5, 1, x_1); -x_6 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_6, 0, x_5); -x_7 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_7, 0, x_6); -lean_ctor_set(x_7, 1, x_4); -return x_7; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg___closed__1; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_throwBacktrack(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg), 1, 0); +return x_6; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_throwBacktrack___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Lean_PrettyPrinter_Formatter_throwBacktrack(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_6; +} +} +lean_object* l_StateRefT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_io_ref_get(x_1, x_4); +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +return x_5; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_ctor_get(x_5, 0); +x_8 = lean_ctor_get(x_5, 1); +lean_inc(x_8); +lean_inc(x_7); +lean_dec(x_5); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_7); +lean_ctor_set(x_9, 1, x_8); +return x_9; +} } } lean_object* l_ReaderT_lift___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___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) { @@ -842,206 +1052,52 @@ lean_object* x_8; x_8 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { -lean_object* x_9; -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) -{ -uint8_t x_10; -lean_dec(x_1); -x_10 = !lean_is_exclusive(x_8); -if (x_10 == 0) -{ -lean_object* x_11; uint8_t x_12; -x_11 = lean_ctor_get(x_8, 0); -lean_dec(x_11); -x_12 = !lean_is_exclusive(x_9); -if (x_12 == 0) +uint8_t x_9; +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) { +lean_object* x_10; lean_object* x_11; +x_10 = lean_ctor_get(x_8, 0); +x_11 = lean_apply_1(x_1, x_10); +lean_ctor_set(x_8, 0, x_11); return x_8; } else { -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_9, 0); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_12 = lean_ctor_get(x_8, 0); +x_13 = lean_ctor_get(x_8, 1); lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_8, 0, x_14); -return x_8; -} -} -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_8, 1); -lean_inc(x_15); +lean_inc(x_12); lean_dec(x_8); -x_16 = lean_ctor_get(x_9, 0); -lean_inc(x_16); -if (lean_is_exclusive(x_9)) { - lean_ctor_release(x_9, 0); - x_17 = x_9; -} else { - lean_dec_ref(x_9); - x_17 = lean_box(0); -} -if (lean_is_scalar(x_17)) { - x_18 = lean_alloc_ctor(0, 1, 0); -} else { - x_18 = x_17; -} -lean_ctor_set(x_18, 0, x_16); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_15); -return x_19; +x_14 = lean_apply_1(x_1, x_12); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_13); +return x_15; } } else { -uint8_t x_20; -x_20 = !lean_is_exclusive(x_9); -if (x_20 == 0) -{ -uint8_t x_21; -x_21 = !lean_is_exclusive(x_8); -if (x_21 == 0) -{ -lean_object* x_22; lean_object* x_23; uint8_t x_24; -x_22 = lean_ctor_get(x_9, 0); -x_23 = lean_ctor_get(x_8, 0); -lean_dec(x_23); -x_24 = !lean_is_exclusive(x_22); -if (x_24 == 0) -{ -lean_object* x_25; lean_object* x_26; -x_25 = lean_ctor_get(x_22, 0); -x_26 = lean_apply_1(x_1, x_25); -lean_ctor_set(x_22, 0, x_26); -return x_8; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_27 = lean_ctor_get(x_22, 0); -x_28 = lean_ctor_get(x_22, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_22); -x_29 = lean_apply_1(x_1, x_27); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -lean_ctor_set(x_9, 0, x_30); -return x_8; -} -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_31 = lean_ctor_get(x_9, 0); -x_32 = lean_ctor_get(x_8, 1); -lean_inc(x_32); -lean_dec(x_8); -x_33 = lean_ctor_get(x_31, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_31, 1); -lean_inc(x_34); -if (lean_is_exclusive(x_31)) { - lean_ctor_release(x_31, 0); - lean_ctor_release(x_31, 1); - x_35 = x_31; -} else { - lean_dec_ref(x_31); - x_35 = lean_box(0); -} -x_36 = lean_apply_1(x_1, x_33); -if (lean_is_scalar(x_35)) { - x_37 = lean_alloc_ctor(0, 2, 0); -} else { - x_37 = x_35; -} -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_34); -lean_ctor_set(x_9, 0, x_37); -x_38 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_38, 0, x_9); -lean_ctor_set(x_38, 1, x_32); -return x_38; -} -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_39 = lean_ctor_get(x_9, 0); -lean_inc(x_39); -lean_dec(x_9); -x_40 = lean_ctor_get(x_8, 1); -lean_inc(x_40); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - lean_ctor_release(x_8, 1); - x_41 = x_8; -} else { - lean_dec_ref(x_8); - x_41 = lean_box(0); -} -x_42 = lean_ctor_get(x_39, 0); -lean_inc(x_42); -x_43 = lean_ctor_get(x_39, 1); -lean_inc(x_43); -if (lean_is_exclusive(x_39)) { - lean_ctor_release(x_39, 0); - lean_ctor_release(x_39, 1); - x_44 = x_39; -} else { - lean_dec_ref(x_39); - x_44 = lean_box(0); -} -x_45 = lean_apply_1(x_1, x_42); -if (lean_is_scalar(x_44)) { - x_46 = lean_alloc_ctor(0, 2, 0); -} else { - x_46 = x_44; -} -lean_ctor_set(x_46, 0, x_45); -lean_ctor_set(x_46, 1, x_43); -x_47 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_47, 0, x_46); -if (lean_is_scalar(x_41)) { - x_48 = lean_alloc_ctor(0, 2, 0); -} else { - x_48 = x_41; -} -lean_ctor_set(x_48, 0, x_47); -lean_ctor_set(x_48, 1, x_40); -return x_48; -} -} -} -else -{ -uint8_t x_49; +uint8_t x_16; lean_dec(x_1); -x_49 = !lean_is_exclusive(x_8); -if (x_49 == 0) +x_16 = !lean_is_exclusive(x_8); +if (x_16 == 0) { return x_8; } else { -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = lean_ctor_get(x_8, 0); -x_51 = lean_ctor_get(x_8, 1); -lean_inc(x_51); -lean_inc(x_50); +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_8, 0); +x_18 = lean_ctor_get(x_8, 1); +lean_inc(x_18); +lean_inc(x_17); lean_dec(x_8); -x_52 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_52, 0, x_50); -lean_ctor_set(x_52, 1, x_51); -return x_52; +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; } } } @@ -1066,134 +1122,162 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_7; -x_7 = !lean_is_exclusive(x_3); -if (x_7 == 0) +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_io_ref_take(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 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_3, 0); -lean_dec(x_8); -lean_ctor_set(x_3, 0, x_1); -x_9 = lean_box(0); -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_3); -x_11 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_11, 0, x_10); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_11); -lean_ctor_set(x_12, 1, x_6); +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_8, 0); +lean_dec(x_11); +lean_ctor_set(x_8, 0, x_1); +x_12 = lean_io_ref_set(x_3, x_8, x_9); +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_12, 0); +lean_dec(x_14); +x_15 = lean_box(0); +lean_ctor_set(x_12, 0, x_15); return x_12; } else { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_13 = lean_ctor_get(x_3, 1); -x_14 = lean_ctor_get(x_3, 2); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_3); -x_15 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_15, 0, x_1); -lean_ctor_set(x_15, 1, x_13); -lean_ctor_set(x_15, 2, x_14); -x_16 = lean_box(0); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_15); -x_18 = lean_alloc_ctor(1, 1, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_12, 1); +lean_inc(x_16); +lean_dec(x_12); +x_17 = lean_box(0); +x_18 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_18, 0, x_17); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_6); -return x_19; +lean_ctor_set(x_18, 1, x_16); +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_object* x_24; lean_object* x_25; lean_object* x_26; +x_19 = lean_ctor_get(x_8, 1); +x_20 = lean_ctor_get(x_8, 2); +lean_inc(x_20); +lean_inc(x_19); +lean_dec(x_8); +x_21 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_21, 0, x_1); +lean_ctor_set(x_21, 1, x_19); +lean_ctor_set(x_21, 2, x_20); +x_22 = lean_io_ref_set(x_3, x_21, x_9); +x_23 = lean_ctor_get(x_22, 1); +lean_inc(x_23); +if (lean_is_exclusive(x_22)) { + lean_ctor_release(x_22, 0); + lean_ctor_release(x_22, 1); + x_24 = x_22; +} else { + lean_dec_ref(x_22); + x_24 = lean_box(0); +} +x_25 = lean_box(0); +if (lean_is_scalar(x_24)) { + x_26 = lean_alloc_ctor(0, 2, 0); +} else { + x_26 = x_24; +} +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_23); +return x_26; } } } lean_object* l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -uint8_t x_8; -x_8 = !lean_is_exclusive(x_4); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; uint8_t x_11; -x_9 = lean_ctor_get(x_4, 0); -x_10 = lean_apply_1(x_2, x_9); -x_11 = !lean_is_exclusive(x_10); +lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; +x_8 = lean_io_ref_take(x_4, x_7); +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +x_11 = !lean_is_exclusive(x_9); if (x_11 == 0) { -lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_12 = lean_ctor_get(x_10, 1); -lean_ctor_set(x_4, 0, x_12); -lean_ctor_set(x_10, 1, x_4); -x_13 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_13, 0, x_10); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_14, 1, x_7); -return x_14; -} -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_10, 0); -x_16 = lean_ctor_get(x_10, 1); -lean_inc(x_16); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; +x_12 = lean_ctor_get(x_9, 0); +x_13 = lean_apply_1(x_2, x_12); +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); lean_inc(x_15); -lean_dec(x_10); -lean_ctor_set(x_4, 0, x_16); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_15); -lean_ctor_set(x_17, 1, x_4); -x_18 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_18, 0, x_17); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_7); -return x_19; +lean_dec(x_13); +lean_ctor_set(x_9, 0, x_15); +x_16 = lean_io_ref_set(x_4, x_9, x_10); +x_17 = !lean_is_exclusive(x_16); +if (x_17 == 0) +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_16, 0); +lean_dec(x_18); +lean_ctor_set(x_16, 0, x_14); +return x_16; +} +else +{ +lean_object* x_19; lean_object* x_20; +x_19 = lean_ctor_get(x_16, 1); +lean_inc(x_19); +lean_dec(x_16); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_14); +lean_ctor_set(x_20, 1, x_19); +return x_20; } } else { -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_20 = lean_ctor_get(x_4, 0); -x_21 = lean_ctor_get(x_4, 1); -x_22 = lean_ctor_get(x_4, 2); +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_21 = lean_ctor_get(x_9, 0); +x_22 = lean_ctor_get(x_9, 1); +x_23 = lean_ctor_get(x_9, 2); +lean_inc(x_23); lean_inc(x_22); lean_inc(x_21); -lean_inc(x_20); -lean_dec(x_4); -x_23 = lean_apply_1(x_2, x_20); -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); +lean_dec(x_9); +x_24 = lean_apply_1(x_2, x_21); +x_25 = lean_ctor_get(x_24, 0); lean_inc(x_25); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - x_26 = x_23; -} else { - lean_dec_ref(x_23); - x_26 = lean_box(0); -} +x_26 = lean_ctor_get(x_24, 1); +lean_inc(x_26); +lean_dec(x_24); x_27 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_27, 0, x_25); -lean_ctor_set(x_27, 1, x_21); -lean_ctor_set(x_27, 2, x_22); -if (lean_is_scalar(x_26)) { - x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_22); +lean_ctor_set(x_27, 2, x_23); +x_28 = lean_io_ref_set(x_4, x_27, x_10); +x_29 = lean_ctor_get(x_28, 1); +lean_inc(x_29); +if (lean_is_exclusive(x_28)) { + lean_ctor_release(x_28, 0); + lean_ctor_release(x_28, 1); + x_30 = x_28; } else { - x_28 = x_26; + lean_dec_ref(x_28); + x_30 = lean_box(0); } -lean_ctor_set(x_28, 0, x_24); -lean_ctor_set(x_28, 1, x_27); -x_29 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_29, 0, x_28); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_7); -return x_30; +if (lean_is_scalar(x_30)) { + x_31 = lean_alloc_ctor(0, 2, 0); +} else { + x_31 = x_30; +} +lean_ctor_set(x_31, 0, x_25); +lean_ctor_set(x_31, 1, x_29); +return x_31; } } } @@ -1201,7 +1285,7 @@ lean_object* _init_l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___cl _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_StateT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1___boxed), 4, 0); +x_1 = lean_alloc_closure((void*)(l_StateRefT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1___boxed), 4, 0); return x_1; } } @@ -1273,13 +1357,14 @@ x_1 = l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__7; return x_1; } } -lean_object* l_StateT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_StateRefT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_StateT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1(x_1, x_2, x_3, x_4); +x_5 = l_StateRefT_get___at_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___spec__1(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -1308,6 +1393,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); return x_7; } @@ -1319,6 +1405,7 @@ lean_object* x_8; x_8 = l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); return x_8; } @@ -1326,18 +1413,35 @@ return x_8; lean_object* l_Lean_PrettyPrinter_Formatter_getStack___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_ctor_get(x_1, 2); -lean_inc(x_5); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; +lean_object* x_5; uint8_t x_6; +x_5 = lean_io_ref_get(x_1, x_4); +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; +x_7 = lean_ctor_get(x_5, 0); +x_8 = lean_ctor_get(x_7, 2); +lean_inc(x_8); +lean_dec(x_7); +lean_ctor_set(x_5, 0, x_8); +return x_5; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = lean_ctor_get(x_5, 0); +x_10 = lean_ctor_get(x_5, 1); +lean_inc(x_10); +lean_inc(x_9); +lean_dec(x_5); +x_11 = lean_ctor_get(x_9, 2); +lean_inc(x_11); +lean_dec(x_9); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_10); +return x_12; +} } } lean_object* l_Lean_PrettyPrinter_Formatter_getStack(lean_object* x_1) { @@ -1355,6 +1459,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Formatter_getStack___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -1370,130 +1475,32 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_getStackSize___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -lean_object* x_5; lean_object* x_6; uint8_t x_7; +lean_object* x_5; uint8_t x_6; x_5 = l_Lean_PrettyPrinter_Formatter_getStack___rarg(x_1, x_2, x_3, x_4); -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -x_7 = !lean_is_exclusive(x_6); -if (x_7 == 0) +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) { -uint8_t x_8; -x_8 = !lean_is_exclusive(x_5); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; uint8_t x_11; -x_9 = lean_ctor_get(x_6, 0); -x_10 = lean_ctor_get(x_5, 0); -lean_dec(x_10); -x_11 = !lean_is_exclusive(x_9); -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; -x_12 = lean_ctor_get(x_9, 0); -x_13 = lean_array_get_size(x_12); -lean_dec(x_12); -lean_ctor_set(x_9, 0, x_13); +lean_object* x_7; lean_object* x_8; +x_7 = lean_ctor_get(x_5, 0); +x_8 = lean_array_get_size(x_7); +lean_dec(x_7); +lean_ctor_set(x_5, 0, x_8); return x_5; } else { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_14 = lean_ctor_get(x_9, 0); -x_15 = lean_ctor_get(x_9, 1); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_9); -x_16 = lean_array_get_size(x_14); -lean_dec(x_14); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_15); -lean_ctor_set(x_6, 0, x_17); -return x_5; -} -} -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; -x_18 = lean_ctor_get(x_6, 0); -x_19 = lean_ctor_get(x_5, 1); -lean_inc(x_19); +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = lean_ctor_get(x_5, 0); +x_10 = lean_ctor_get(x_5, 1); +lean_inc(x_10); +lean_inc(x_9); lean_dec(x_5); -x_20 = lean_ctor_get(x_18, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_18, 1); -lean_inc(x_21); -if (lean_is_exclusive(x_18)) { - lean_ctor_release(x_18, 0); - lean_ctor_release(x_18, 1); - x_22 = x_18; -} else { - lean_dec_ref(x_18); - x_22 = lean_box(0); -} -x_23 = lean_array_get_size(x_20); -lean_dec(x_20); -if (lean_is_scalar(x_22)) { - x_24 = lean_alloc_ctor(0, 2, 0); -} else { - x_24 = x_22; -} -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_21); -lean_ctor_set(x_6, 0, x_24); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_6); -lean_ctor_set(x_25, 1, x_19); -return x_25; -} -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_26 = lean_ctor_get(x_6, 0); -lean_inc(x_26); -lean_dec(x_6); -x_27 = lean_ctor_get(x_5, 1); -lean_inc(x_27); -if (lean_is_exclusive(x_5)) { - lean_ctor_release(x_5, 0); - lean_ctor_release(x_5, 1); - x_28 = x_5; -} else { - lean_dec_ref(x_5); - x_28 = lean_box(0); -} -x_29 = lean_ctor_get(x_26, 0); -lean_inc(x_29); -x_30 = lean_ctor_get(x_26, 1); -lean_inc(x_30); -if (lean_is_exclusive(x_26)) { - lean_ctor_release(x_26, 0); - lean_ctor_release(x_26, 1); - x_31 = x_26; -} else { - lean_dec_ref(x_26); - x_31 = lean_box(0); -} -x_32 = lean_array_get_size(x_29); -lean_dec(x_29); -if (lean_is_scalar(x_31)) { - x_33 = lean_alloc_ctor(0, 2, 0); -} else { - x_33 = x_31; -} -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_30); -x_34 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_34, 0, x_33); -if (lean_is_scalar(x_28)) { - x_35 = lean_alloc_ctor(0, 2, 0); -} else { - x_35 = x_28; -} -lean_ctor_set(x_35, 0, x_34); -lean_ctor_set(x_35, 1, x_27); -return x_35; +x_11 = lean_array_get_size(x_9); +lean_dec(x_9); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_10); +return x_12; } } } @@ -1512,6 +1519,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Formatter_getStackSize___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -1527,47 +1535,76 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_setStack(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_7; -x_7 = !lean_is_exclusive(x_3); -if (x_7 == 0) +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_io_ref_take(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 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_3, 2); -lean_dec(x_8); -lean_ctor_set(x_3, 2, x_1); -x_9 = lean_box(0); -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_3); -x_11 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_11, 0, x_10); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_11); -lean_ctor_set(x_12, 1, x_6); +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_8, 2); +lean_dec(x_11); +lean_ctor_set(x_8, 2, x_1); +x_12 = lean_io_ref_set(x_3, x_8, x_9); +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_12, 0); +lean_dec(x_14); +x_15 = lean_box(0); +lean_ctor_set(x_12, 0, x_15); return x_12; } else { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_13 = lean_ctor_get(x_3, 0); -x_14 = lean_ctor_get(x_3, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_3); -x_15 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_15, 0, x_13); -lean_ctor_set(x_15, 1, x_14); -lean_ctor_set(x_15, 2, x_1); -x_16 = lean_box(0); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_15); -x_18 = lean_alloc_ctor(1, 1, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_12, 1); +lean_inc(x_16); +lean_dec(x_12); +x_17 = lean_box(0); +x_18 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_18, 0, x_17); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_6); -return x_19; +lean_ctor_set(x_18, 1, x_16); +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_object* x_24; lean_object* x_25; lean_object* x_26; +x_19 = lean_ctor_get(x_8, 0); +x_20 = lean_ctor_get(x_8, 1); +lean_inc(x_20); +lean_inc(x_19); +lean_dec(x_8); +x_21 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_20); +lean_ctor_set(x_21, 2, x_1); +x_22 = lean_io_ref_set(x_3, x_21, x_9); +x_23 = lean_ctor_get(x_22, 1); +lean_inc(x_23); +if (lean_is_exclusive(x_22)) { + lean_ctor_release(x_22, 0); + lean_ctor_release(x_22, 1); + x_24 = x_22; +} else { + lean_dec_ref(x_22); + x_24 = lean_box(0); +} +x_25 = lean_box(0); +if (lean_is_scalar(x_24)) { + x_26 = lean_alloc_ctor(0, 2, 0); +} else { + x_26 = x_24; +} +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_23); +return x_26; } } } @@ -1578,6 +1615,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_setStack(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); return x_7; } @@ -1585,50 +1623,79 @@ return x_7; lean_object* l_Lean_PrettyPrinter_Formatter_push(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_7; -x_7 = !lean_is_exclusive(x_3); -if (x_7 == 0) +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_io_ref_take(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 0) { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_ctor_get(x_3, 2); -x_9 = lean_array_push(x_8, x_1); -lean_ctor_set(x_3, 2, x_9); -x_10 = lean_box(0); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_3); -x_12 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_12, 0, x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_6); +lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_11 = lean_ctor_get(x_8, 2); +x_12 = lean_array_push(x_11, x_1); +lean_ctor_set(x_8, 2, x_12); +x_13 = lean_io_ref_set(x_3, x_8, x_9); +x_14 = !lean_is_exclusive(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 0); +lean_dec(x_15); +x_16 = lean_box(0); +lean_ctor_set(x_13, 0, x_16); return x_13; } else { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_14 = lean_ctor_get(x_3, 0); -x_15 = lean_ctor_get(x_3, 1); -x_16 = lean_ctor_get(x_3, 2); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_3); -x_17 = lean_array_push(x_16, x_1); -x_18 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_18, 0, x_14); -lean_ctor_set(x_18, 1, x_15); -lean_ctor_set(x_18, 2, x_17); -x_19 = lean_box(0); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -x_21 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_21, 0, x_20); -x_22 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_22, 1, x_6); -return x_22; +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 1); +lean_inc(x_17); +lean_dec(x_13); +x_18 = lean_box(0); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +return x_19; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_20 = lean_ctor_get(x_8, 0); +x_21 = lean_ctor_get(x_8, 1); +x_22 = lean_ctor_get(x_8, 2); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_8); +x_23 = lean_array_push(x_22, x_1); +x_24 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_24, 0, x_20); +lean_ctor_set(x_24, 1, x_21); +lean_ctor_set(x_24, 2, x_23); +x_25 = lean_io_ref_set(x_3, x_24, x_9); +x_26 = lean_ctor_get(x_25, 1); +lean_inc(x_26); +if (lean_is_exclusive(x_25)) { + lean_ctor_release(x_25, 0); + lean_ctor_release(x_25, 1); + x_27 = x_25; +} else { + lean_dec_ref(x_25); + x_27 = lean_box(0); +} +x_28 = lean_box(0); +if (lean_is_scalar(x_27)) { + x_29 = lean_alloc_ctor(0, 2, 0); +} else { + x_29 = x_27; +} +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_26); +return x_29; } } } @@ -1639,193 +1706,299 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_push(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); return x_7; } } -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -uint8_t x_5; -x_5 = !lean_is_exclusive(x_1); -if (x_5 == 0) +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_io_ref_get(x_1, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +lean_dec(x_6); +x_8 = !lean_is_exclusive(x_5); +if (x_8 == 0) { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_6 = lean_ctor_get(x_1, 0); -x_7 = l_Lean_Syntax_Traverser_left(x_6); -lean_ctor_set(x_1, 0, x_7); -x_8 = lean_box(0); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_1); -x_10 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_10, 0, x_9); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_4); +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_5, 0); +lean_dec(x_9); +x_10 = lean_ctor_get(x_7, 0); +lean_inc(x_10); +lean_dec(x_7); +lean_ctor_set(x_5, 0, x_10); +return x_5; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_5, 1); +lean_inc(x_11); +lean_dec(x_5); +x_12 = lean_ctor_get(x_7, 0); +lean_inc(x_12); +lean_dec(x_7); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_11); +return x_13; +} +} +} +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg___boxed), 4, 0); +return x_2; +} +} +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_io_ref_take(x_1, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = !lean_is_exclusive(x_6); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_9 = lean_ctor_get(x_6, 0); +x_10 = l_Lean_Syntax_Traverser_left(x_9); +lean_ctor_set(x_6, 0, x_10); +x_11 = lean_io_ref_set(x_1, x_6, x_7); +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_11, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set(x_11, 0, x_14); return x_11; } else { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_12 = lean_ctor_get(x_1, 0); -x_13 = lean_ctor_get(x_1, 1); -x_14 = lean_ctor_get(x_1, 2); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_1); -x_15 = l_Lean_Syntax_Traverser_left(x_12); -x_16 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_13); -lean_ctor_set(x_16, 2, x_14); -x_17 = lean_box(0); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_16); -x_19 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_19, 0, x_18); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_4); -return x_20; +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_11, 1); +lean_inc(x_15); +lean_dec(x_11); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +return x_17; +} +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_18 = lean_ctor_get(x_6, 0); +x_19 = lean_ctor_get(x_6, 1); +x_20 = lean_ctor_get(x_6, 2); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_6); +x_21 = l_Lean_Syntax_Traverser_left(x_18); +x_22 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_19); +lean_ctor_set(x_22, 2, x_20); +x_23 = lean_io_ref_set(x_1, x_22, x_7); +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +if (lean_is_exclusive(x_23)) { + lean_ctor_release(x_23, 0); + lean_ctor_release(x_23, 1); + x_25 = x_23; +} else { + lean_dec_ref(x_23); + x_25 = lean_box(0); +} +x_26 = lean_box(0); +if (lean_is_scalar(x_25)) { + x_27 = lean_alloc_ctor(0, 2, 0); +} else { + x_27 = x_25; +} +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_24); +return x_27; } } } -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1(lean_object* x_1) { +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -lean_dec(x_5); -x_7 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_7, 0, x_6); -lean_ctor_set(x_7, 1, x_1); -x_8 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_8, 0, x_7); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_4); -return x_9; -} -} -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg___boxed), 4, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg___boxed), 4, 0); return x_2; } } lean_object* l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_7; -x_7 = !lean_is_exclusive(x_3); -if (x_7 == 0) +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_io_ref_take(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 0) { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_ctor_get(x_3, 0); -x_9 = l_Lean_Syntax_Traverser_down(x_8, x_1); -lean_ctor_set(x_3, 0, x_9); -x_10 = lean_box(0); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_3); -x_12 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_12, 0, x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_6); +lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_11 = lean_ctor_get(x_8, 0); +x_12 = l_Lean_Syntax_Traverser_down(x_11, x_1); +lean_ctor_set(x_8, 0, x_12); +x_13 = lean_io_ref_set(x_3, x_8, x_9); +x_14 = !lean_is_exclusive(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 0); +lean_dec(x_15); +x_16 = lean_box(0); +lean_ctor_set(x_13, 0, x_16); return x_13; } else { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_14 = lean_ctor_get(x_3, 0); -x_15 = lean_ctor_get(x_3, 1); -x_16 = lean_ctor_get(x_3, 2); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_3); -x_17 = l_Lean_Syntax_Traverser_down(x_14, x_1); -x_18 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_15); -lean_ctor_set(x_18, 2, x_16); -x_19 = lean_box(0); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -x_21 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_21, 0, x_20); -x_22 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_22, 1, x_6); -return x_22; +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 1); +lean_inc(x_17); +lean_dec(x_13); +x_18 = lean_box(0); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +return x_19; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_20 = lean_ctor_get(x_8, 0); +x_21 = lean_ctor_get(x_8, 1); +x_22 = lean_ctor_get(x_8, 2); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_8); +x_23 = l_Lean_Syntax_Traverser_down(x_20, x_1); +x_24 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_21); +lean_ctor_set(x_24, 2, x_22); +x_25 = lean_io_ref_set(x_3, x_24, x_9); +x_26 = lean_ctor_get(x_25, 1); +lean_inc(x_26); +if (lean_is_exclusive(x_25)) { + lean_ctor_release(x_25, 0); + lean_ctor_release(x_25, 1); + x_27 = x_25; +} else { + lean_dec_ref(x_25); + x_27 = lean_box(0); +} +x_28 = lean_box(0); +if (lean_is_scalar(x_27)) { + x_29 = lean_alloc_ctor(0, 2, 0); +} else { + x_29 = x_27; +} +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_26); +return x_29; } } } lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -uint8_t x_5; -x_5 = !lean_is_exclusive(x_1); -if (x_5 == 0) +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_io_ref_take(x_1, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = !lean_is_exclusive(x_6); +if (x_8 == 0) { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_6 = lean_ctor_get(x_1, 0); -x_7 = l_Lean_Syntax_Traverser_up(x_6); -lean_ctor_set(x_1, 0, x_7); -x_8 = lean_box(0); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_1); -x_10 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_10, 0, x_9); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_4); +lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_9 = lean_ctor_get(x_6, 0); +x_10 = l_Lean_Syntax_Traverser_up(x_9); +lean_ctor_set(x_6, 0, x_10); +x_11 = lean_io_ref_set(x_1, x_6, x_7); +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_11, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set(x_11, 0, x_14); return x_11; } else { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_12 = lean_ctor_get(x_1, 0); -x_13 = lean_ctor_get(x_1, 1); -x_14 = lean_ctor_get(x_1, 2); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_1); -x_15 = l_Lean_Syntax_Traverser_up(x_12); -x_16 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_13); -lean_ctor_set(x_16, 2, x_14); -x_17 = lean_box(0); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_16); -x_19 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_19, 0, x_18); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_4); -return x_20; +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_11, 1); +lean_inc(x_15); +lean_dec(x_11); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +return x_17; +} +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_18 = lean_ctor_get(x_6, 0); +x_19 = lean_ctor_get(x_6, 1); +x_20 = lean_ctor_get(x_6, 2); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_6); +x_21 = l_Lean_Syntax_Traverser_up(x_18); +x_22 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_19); +lean_ctor_set(x_22, 2, x_20); +x_23 = lean_io_ref_set(x_1, x_22, x_7); +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +if (lean_is_exclusive(x_23)) { + lean_ctor_release(x_23, 0); + lean_ctor_release(x_23, 1); + x_25 = x_23; +} else { + lean_dec_ref(x_23); + x_25 = lean_box(0); +} +x_26 = lean_box(0); +if (lean_is_scalar(x_25)) { + x_27 = lean_alloc_ctor(0, 2, 0); +} else { + x_27 = x_25; +} +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_24); +return x_27; } } } @@ -1840,281 +2013,125 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_visitArgs(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; -x_18 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -lean_dec(x_19); -x_21 = lean_ctor_get(x_18, 1); -lean_inc(x_21); -lean_dec(x_18); -x_22 = lean_ctor_get(x_20, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_20, 1); -lean_inc(x_23); -lean_dec(x_20); -x_24 = l_Lean_Syntax_getArgs(x_22); -lean_dec(x_22); -x_25 = lean_array_get_size(x_24); -lean_dec(x_24); -x_26 = lean_unsigned_to_nat(0u); -x_27 = lean_nat_dec_lt(x_26, x_25); -if (x_27 == 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; uint8_t x_13; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = l_Lean_Syntax_getArgs(x_8); +lean_dec(x_8); +x_11 = lean_array_get_size(x_10); +lean_dec(x_10); +x_12 = lean_unsigned_to_nat(0u); +x_13 = lean_nat_dec_lt(x_12, x_11); +if (x_13 == 0) { -lean_object* x_28; -lean_dec(x_25); +lean_object* x_14; +lean_dec(x_11); lean_dec(x_2); lean_dec(x_1); -x_28 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_23, x_4, x_5, x_21); +x_14 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_9); lean_dec(x_5); lean_dec(x_4); -return x_28; +lean_dec(x_3); +return x_14; } else { -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_29 = lean_unsigned_to_nat(1u); -x_30 = lean_nat_sub(x_25, x_29); -lean_dec(x_25); -x_31 = l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__3(x_30, x_2, x_23, x_4, x_5, x_21); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -lean_dec(x_32); -x_34 = lean_ctor_get(x_31, 1); -lean_inc(x_34); -lean_dec(x_31); -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_unsigned_to_nat(1u); +x_16 = lean_nat_sub(x_11, x_15); +lean_dec(x_11); +x_17 = l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__3(x_16, x_2, x_3, x_4, x_5, x_9); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); lean_inc(x_5); lean_inc(x_4); -x_36 = lean_apply_5(x_1, x_2, x_35, x_4, x_5, x_34); -if (lean_obj_tag(x_36) == 0) +lean_inc(x_3); +x_19 = lean_apply_5(x_1, x_2, x_3, x_4, x_5, x_18); +if (lean_obj_tag(x_19) == 0) { -lean_object* x_37; -x_37 = lean_ctor_get(x_36, 0); -lean_inc(x_37); -if (lean_obj_tag(x_37) == 0) -{ -lean_object* x_38; uint8_t x_39; -x_38 = lean_ctor_get(x_36, 1); -lean_inc(x_38); -lean_dec(x_36); -x_39 = !lean_is_exclusive(x_37); -if (x_39 == 0) -{ -x_7 = x_37; -x_8 = x_38; -goto block_17; -} -else -{ -lean_object* x_40; lean_object* x_41; -x_40 = lean_ctor_get(x_37, 0); -lean_inc(x_40); -lean_dec(x_37); -x_41 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_41, 0, x_40); -x_7 = x_41; -x_8 = x_38; -goto block_17; -} -} -else -{ -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; -x_42 = lean_ctor_get(x_37, 0); -lean_inc(x_42); -lean_dec(x_37); -x_43 = lean_ctor_get(x_36, 1); -lean_inc(x_43); -lean_dec(x_36); -x_44 = lean_ctor_get(x_42, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_42, 1); -lean_inc(x_45); -lean_dec(x_42); -x_46 = l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__4___rarg(x_45, x_4, x_5, x_43); -x_47 = lean_ctor_get(x_46, 0); -lean_inc(x_47); -x_48 = !lean_is_exclusive(x_47); -if (x_48 == 0) -{ -lean_object* x_49; lean_object* x_50; uint8_t x_51; -x_49 = lean_ctor_get(x_47, 0); -x_50 = lean_ctor_get(x_46, 1); -lean_inc(x_50); -lean_dec(x_46); -x_51 = !lean_is_exclusive(x_49); -if (x_51 == 0) -{ -lean_object* x_52; -x_52 = lean_ctor_get(x_49, 0); -lean_dec(x_52); -lean_ctor_set(x_49, 0, x_44); -x_7 = x_47; -x_8 = x_50; -goto block_17; -} -else -{ -lean_object* x_53; lean_object* x_54; -x_53 = lean_ctor_get(x_49, 1); -lean_inc(x_53); -lean_dec(x_49); -x_54 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_54, 0, x_44); -lean_ctor_set(x_54, 1, x_53); -lean_ctor_set(x_47, 0, x_54); -x_7 = x_47; -x_8 = x_50; -goto block_17; -} -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_55 = lean_ctor_get(x_47, 0); -lean_inc(x_55); -lean_dec(x_47); -x_56 = lean_ctor_get(x_46, 1); -lean_inc(x_56); -lean_dec(x_46); -x_57 = lean_ctor_get(x_55, 1); -lean_inc(x_57); -if (lean_is_exclusive(x_55)) { - lean_ctor_release(x_55, 0); - lean_ctor_release(x_55, 1); - x_58 = x_55; -} else { - lean_dec_ref(x_55); - x_58 = lean_box(0); -} -if (lean_is_scalar(x_58)) { - x_59 = lean_alloc_ctor(0, 2, 0); -} else { - x_59 = x_58; -} -lean_ctor_set(x_59, 0, x_44); -lean_ctor_set(x_59, 1, x_57); -x_60 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_60, 0, x_59); -x_7 = x_60; -x_8 = x_56; -goto block_17; -} -} -} -else -{ -uint8_t x_61; +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_20 = lean_ctor_get(x_19, 1); +lean_inc(x_20); +lean_dec(x_19); +x_21 = l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__4___rarg(x_3, x_4, x_5, x_20); +x_22 = lean_ctor_get(x_21, 1); +lean_inc(x_22); +lean_dec(x_21); +x_23 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_22); lean_dec(x_5); lean_dec(x_4); -x_61 = !lean_is_exclusive(x_36); -if (x_61 == 0) -{ -return x_36; +lean_dec(x_3); +return x_23; } else { -lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_62 = lean_ctor_get(x_36, 0); -x_63 = lean_ctor_get(x_36, 1); -lean_inc(x_63); -lean_inc(x_62); -lean_dec(x_36); -x_64 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -return x_64; -} -} -} -block_17: -{ -if (lean_obj_tag(x_7) == 0) -{ -uint8_t x_9; +uint8_t x_24; lean_dec(x_5); lean_dec(x_4); -x_9 = !lean_is_exclusive(x_7); -if (x_9 == 0) +lean_dec(x_3); +x_24 = !lean_is_exclusive(x_19); +if (x_24 == 0) { -lean_object* x_10; -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_7); -lean_ctor_set(x_10, 1, x_8); -return x_10; +return x_19; } else { -lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_11 = lean_ctor_get(x_7, 0); -lean_inc(x_11); -lean_dec(x_7); -x_12 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_12, 0, x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_8); -return x_13; -} -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_7, 0); -lean_inc(x_14); -lean_dec(x_7); -x_15 = lean_ctor_get(x_14, 1); -lean_inc(x_15); -lean_dec(x_14); -x_16 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_15, x_4, x_5, x_8); -lean_dec(x_5); -lean_dec(x_4); -return x_16; +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_19, 0); +x_26 = lean_ctor_get(x_19, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_19); +x_27 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +return x_27; } } } } -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +} +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___boxed(lean_object* x_1) { +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1(x_1); +x_2 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1(x_1); lean_dec(x_1); return x_2; } } -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___boxed(lean_object* x_1) { +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2(x_1); +x_2 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2(x_1); lean_dec(x_1); return x_2; } @@ -2126,6 +2143,7 @@ lean_object* x_7; x_7 = l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__3(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); return x_7; } @@ -2137,6 +2155,7 @@ lean_object* x_5; x_5 = l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__4___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -2152,154 +2171,71 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_fold(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; 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_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; x_8 = l_Lean_PrettyPrinter_Formatter_getStackSize___rarg(x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); +x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 1); -lean_inc(x_11); lean_dec(x_8); -x_12 = lean_ctor_get(x_10, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); -lean_dec(x_10); lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); -x_14 = lean_apply_5(x_2, x_3, x_13, x_5, x_6, x_11); -if (lean_obj_tag(x_14) == 0) +x_11 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_10); +if (lean_obj_tag(x_11) == 0) { -lean_object* x_15; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -if (lean_obj_tag(x_15) == 0) -{ -uint8_t x_16; -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_1); -x_16 = !lean_is_exclusive(x_14); -if (x_16 == 0) -{ -lean_object* x_17; uint8_t x_18; -x_17 = lean_ctor_get(x_14, 0); -lean_dec(x_17); -x_18 = !lean_is_exclusive(x_15); -if (x_18 == 0) -{ -return x_14; -} -else -{ -lean_object* x_19; lean_object* x_20; -x_19 = lean_ctor_get(x_15, 0); -lean_inc(x_19); -lean_dec(x_15); -x_20 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_14, 0, x_20); -return x_14; -} -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_14, 1); -lean_inc(x_21); -lean_dec(x_14); -x_22 = lean_ctor_get(x_15, 0); -lean_inc(x_22); -if (lean_is_exclusive(x_15)) { - lean_ctor_release(x_15, 0); - x_23 = x_15; -} else { - lean_dec_ref(x_15); - x_23 = lean_box(0); -} -if (lean_is_scalar(x_23)) { - x_24 = lean_alloc_ctor(0, 1, 0); -} else { - x_24 = x_23; -} -lean_ctor_set(x_24, 0, x_22); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_21); -return x_25; -} -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_26 = lean_ctor_get(x_15, 0); -lean_inc(x_26); -lean_dec(x_15); -x_27 = lean_ctor_get(x_14, 1); -lean_inc(x_27); -lean_dec(x_14); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -x_29 = l_Lean_PrettyPrinter_Formatter_getStack___rarg(x_28, x_5, x_6, x_27); -x_30 = lean_ctor_get(x_29, 0); -lean_inc(x_30); -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -lean_dec(x_30); -x_32 = lean_ctor_get(x_29, 1); -lean_inc(x_32); -lean_dec(x_29); -x_33 = lean_ctor_get(x_31, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_31, 1); -lean_inc(x_34); -lean_dec(x_31); -x_35 = lean_array_get_size(x_33); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_12 = lean_ctor_get(x_11, 1); lean_inc(x_12); -x_36 = l_Array_extract___rarg(x_33, x_12, x_35); -lean_dec(x_35); -x_37 = lean_apply_1(x_1, x_36); -x_38 = l_Array_shrink___main___rarg(x_33, x_12); -lean_dec(x_12); -x_39 = lean_array_push(x_38, x_37); -x_40 = l_Lean_PrettyPrinter_Formatter_setStack(x_39, x_3, x_34, x_5, x_6, x_32); +lean_dec(x_11); +x_13 = l_Lean_PrettyPrinter_Formatter_getStack___rarg(x_4, x_5, x_6, x_12); +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = lean_array_get_size(x_14); +lean_inc(x_9); +x_17 = l_Array_extract___rarg(x_14, x_9, x_16); +lean_dec(x_16); +x_18 = lean_apply_1(x_1, x_17); +x_19 = l_Array_shrink___main___rarg(x_14, x_9); +lean_dec(x_9); +x_20 = lean_array_push(x_19, x_18); +x_21 = l_Lean_PrettyPrinter_Formatter_setStack(x_20, x_3, x_4, x_5, x_6, x_15); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); -return x_40; -} +return x_21; } else { -uint8_t x_41; -lean_dec(x_12); +uint8_t x_22; +lean_dec(x_9); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_41 = !lean_is_exclusive(x_14); -if (x_41 == 0) +x_22 = !lean_is_exclusive(x_11); +if (x_22 == 0) { -return x_14; +return x_11; } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = lean_ctor_get(x_14, 0); -x_43 = lean_ctor_get(x_14, 1); -lean_inc(x_43); -lean_inc(x_42); -lean_dec(x_14); -x_44 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_44, 0, x_42); -lean_ctor_set(x_44, 1, x_43); -return x_44; +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_11, 0); +x_24 = lean_ctor_get(x_11, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_11); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; } } } @@ -2360,65 +2296,8 @@ _start: { lean_object* x_7; x_7 = lean_apply_3(x_1, x_4, x_5, x_6); -if (lean_obj_tag(x_7) == 0) -{ -uint8_t x_8; -x_8 = !lean_is_exclusive(x_7); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_9 = lean_ctor_get(x_7, 0); -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_3); -x_11 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_7, 0, x_11); 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); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_12); -lean_ctor_set(x_14, 1, x_3); -x_15 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_15, 0, 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; -} -} -else -{ -uint8_t x_17; -lean_dec(x_3); -x_17 = !lean_is_exclusive(x_7); -if (x_17 == 0) -{ -return x_7; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_7, 0); -x_19 = lean_ctor_get(x_7, 1); -lean_inc(x_19); -lean_inc(x_18); -lean_dec(x_7); -x_20 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_20, 0, x_18); -lean_ctor_set(x_20, 1, x_19); -return x_20; -} -} -} } lean_object* l_Lean_PrettyPrinter_Formatter_liftCoreM(lean_object* x_1) { _start: @@ -2433,99 +2312,54 @@ _start: { lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_liftCoreM___rarg(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_PrettyPrinter_Formatter_getEnv___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___rarg(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_5; uint8_t x_6; -x_5 = l_Lean_Core_getEnv___rarg(x_3, x_4); -x_6 = !lean_is_exclusive(x_5); -if (x_6 == 0) -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; -x_7 = lean_ctor_get(x_5, 0); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_1); -x_9 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_5, 0, x_9); -return x_5; -} -else -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_10 = lean_ctor_get(x_5, 0); -x_11 = lean_ctor_get(x_5, 1); -lean_inc(x_11); -lean_inc(x_10); -lean_dec(x_5); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_10); -lean_ctor_set(x_12, 1, x_1); -x_13 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_13, 0, x_12); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_14, 1, x_11); -return x_14; +lean_object* x_3; +x_3 = l_Lean_Core_getEnv___rarg(x_1, x_2); +return x_3; } } -} -lean_object* l_Lean_PrettyPrinter_Formatter_getEnv(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Formatter_getEnv(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_getEnv___rarg___boxed), 4, 0); -return x_2; +lean_object* x_4; +x_4 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_getEnv___rarg___boxed), 2, 0); +return x_4; } } -lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___rarg___boxed(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_getEnv___rarg(x_1, x_2, x_3, x_4); +lean_object* x_3; +x_3 = l_Lean_PrettyPrinter_Formatter_getEnv___rarg(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_PrettyPrinter_Formatter_getEnv(x_1, x_2, x_3); lean_dec(x_3); lean_dec(x_2); -return x_5; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_getEnv___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_getEnv(x_1); lean_dec(x_1); -return x_2; +return x_4; } } lean_object* l_Lean_PrettyPrinter_Formatter_throwError___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) { _start: { -lean_object* x_7; uint8_t x_8; +lean_object* x_7; x_7 = l_Lean_Core_throwError___rarg(x_1, x_4, x_5, x_6); -x_8 = !lean_is_exclusive(x_7); -if (x_8 == 0) -{ return x_7; } -else -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_9 = lean_ctor_get(x_7, 0); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -lean_inc(x_9); -lean_dec(x_7); -x_11 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_11, 0, x_9); -lean_ctor_set(x_11, 1, x_10); -return x_11; -} -} } lean_object* l_Lean_PrettyPrinter_Formatter_throwError(lean_object* x_1) { _start: @@ -2550,81 +2384,137 @@ return x_7; lean_object* l_Lean_PrettyPrinter_Formatter_orelse_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_io_ref_get(x_4, x_7); +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_8 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_8) == 0) +x_11 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_10); +if (lean_obj_tag(x_11) == 0) { -lean_object* x_9; -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) -{ -lean_object* x_10; lean_object* x_11; lean_dec(x_9); -x_10 = lean_ctor_get(x_8, 1); -lean_inc(x_10); -lean_dec(x_8); -x_11 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_10); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); return x_11; } else { -uint8_t x_12; +lean_object* x_12; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +lean_dec(x_9); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_12 = !lean_is_exclusive(x_8); -if (x_12 == 0) +x_13 = !lean_is_exclusive(x_11); +if (x_13 == 0) { -lean_object* x_13; -x_13 = lean_ctor_get(x_8, 0); -lean_dec(x_13); -return x_8; +lean_object* x_14; +x_14 = lean_ctor_get(x_11, 0); +lean_dec(x_14); +return x_11; } else { -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_8, 1); -lean_inc(x_14); -lean_dec(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_9); -lean_ctor_set(x_15, 1, x_14); -return x_15; -} +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_11, 1); +lean_inc(x_15); +lean_dec(x_11); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_12); +lean_ctor_set(x_16, 1, x_15); +return x_16; } } else { -uint8_t x_16; +uint8_t x_17; +x_17 = !lean_is_exclusive(x_11); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_18 = lean_ctor_get(x_11, 1); +x_19 = lean_ctor_get(x_11, 0); +lean_dec(x_19); +x_20 = lean_ctor_get(x_12, 0); +lean_inc(x_20); +x_21 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_22 = lean_nat_dec_eq(x_21, x_20); +lean_dec(x_20); +if (x_22 == 0) +{ +lean_dec(x_9); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_16 = !lean_is_exclusive(x_8); -if (x_16 == 0) -{ -return x_8; +return x_11; } else { -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_8, 0); -x_18 = lean_ctor_get(x_8, 1); -lean_inc(x_18); -lean_inc(x_17); -lean_dec(x_8); -x_19 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; +lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_free_object(x_11); +lean_dec(x_12); +x_23 = lean_io_ref_set(x_4, x_9, x_18); +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +lean_dec(x_23); +x_25 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_24); +return x_25; +} +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_26 = lean_ctor_get(x_11, 1); +lean_inc(x_26); +lean_dec(x_11); +x_27 = lean_ctor_get(x_12, 0); +lean_inc(x_27); +x_28 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_29 = lean_nat_dec_eq(x_28, x_27); +lean_dec(x_27); +if (x_29 == 0) +{ +lean_object* x_30; +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_12); +lean_ctor_set(x_30, 1, x_26); +return x_30; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_12); +x_31 = lean_io_ref_set(x_4, x_9, x_26); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_32); +return x_33; +} +} } } } @@ -2670,53 +2560,45 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_formatterForKind(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_7 = l_Lean_PrettyPrinter_Formatter_getEnv___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = l_Lean_Core_getEnv___rarg(x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_dec(x_9); -x_13 = l_Lean_PrettyPrinter_formatterAttribute; -x_14 = l_Lean_KeyedDeclsAttribute_getValues___rarg(x_13, x_11, x_1); -lean_dec(x_11); -if (lean_obj_tag(x_14) == 0) +x_10 = l_Lean_PrettyPrinter_formatterAttribute; +x_11 = l_Lean_KeyedDeclsAttribute_getValues___rarg(x_10, x_8, x_1); +lean_dec(x_8); +if (lean_obj_tag(x_11) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_15 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_15, 0, x_1); -x_16 = l_Lean_PrettyPrinter_Formatter_formatterForKind___closed__3; -x_17 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_15); -x_18 = l_Lean_Core_getConstInfo___closed__5; -x_19 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -x_20 = l_Lean_PrettyPrinter_Formatter_throwError___rarg(x_19, x_2, x_12, x_4, x_5, x_10); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +lean_dec(x_3); +lean_dec(x_2); +x_12 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_12, 0, x_1); +x_13 = l_Lean_PrettyPrinter_Formatter_formatterForKind___closed__3; +x_14 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_14, 0, x_13); +lean_ctor_set(x_14, 1, x_12); +x_15 = l_Lean_Core_getConstInfo___closed__5; +x_16 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +x_17 = l_Lean_Core_throwError___rarg(x_16, x_4, x_5, x_9); lean_dec(x_5); lean_dec(x_4); -lean_dec(x_12); -lean_dec(x_2); -return x_20; +return x_17; } else { -lean_object* x_21; lean_object* x_22; +lean_object* x_18; lean_object* x_19; lean_dec(x_1); -x_21 = lean_ctor_get(x_14, 0); -lean_inc(x_21); -lean_dec(x_14); -x_22 = lean_apply_5(x_21, x_2, x_12, x_4, x_5, x_10); -return x_22; +x_18 = lean_ctor_get(x_11, 0); +lean_inc(x_18); +lean_dec(x_11); +x_19 = lean_apply_5(x_18, x_2, x_3, x_4, x_5, x_9); +return x_19; } } } @@ -2737,138 +2619,66 @@ x_9 = lean_nat_dec_lt(x_2, x_8); lean_dec(x_8); if (x_9 == 0) { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +lean_object* x_10; lean_object* x_11; lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); x_10 = lean_box(0); x_11 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_4); -x_12 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_12, 0, x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_7); -return x_13; +lean_ctor_set(x_11, 1, x_7); +return x_11; } else { -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_array_fget(x_1, x_2); -x_15 = l_Lean_Syntax_getKind(x_14); +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_array_fget(x_1, x_2); +x_13 = l_Lean_Syntax_getKind(x_12); lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); -x_16 = l_Lean_PrettyPrinter_Formatter_formatterForKind(x_15, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_16) == 0) +x_14 = l_Lean_PrettyPrinter_Formatter_formatterForKind(x_13, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_14) == 0) { -lean_object* x_17; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -if (lean_obj_tag(x_17) == 0) -{ -uint8_t x_18; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_16 = lean_unsigned_to_nat(1u); +x_17 = lean_nat_add(x_2, x_16); lean_dec(x_2); -x_18 = !lean_is_exclusive(x_16); -if (x_18 == 0) -{ -lean_object* x_19; uint8_t x_20; -x_19 = lean_ctor_get(x_16, 0); -lean_dec(x_19); -x_20 = !lean_is_exclusive(x_17); -if (x_20 == 0) -{ -return x_16; -} -else -{ -lean_object* x_21; lean_object* x_22; -x_21 = lean_ctor_get(x_17, 0); -lean_inc(x_21); -lean_dec(x_17); -x_22 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_16, 0, x_22); -return x_16; -} -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_23 = lean_ctor_get(x_16, 1); -lean_inc(x_23); -lean_dec(x_16); -x_24 = lean_ctor_get(x_17, 0); -lean_inc(x_24); -if (lean_is_exclusive(x_17)) { - lean_ctor_release(x_17, 0); - x_25 = x_17; -} else { - lean_dec_ref(x_17); - x_25 = lean_box(0); -} -if (lean_is_scalar(x_25)) { - x_26 = lean_alloc_ctor(0, 1, 0); -} else { - x_26 = x_25; -} -lean_ctor_set(x_26, 0, x_24); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_23); -return x_27; -} -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_28 = lean_ctor_get(x_17, 0); -lean_inc(x_28); -lean_dec(x_17); -x_29 = lean_ctor_get(x_16, 1); -lean_inc(x_29); -lean_dec(x_16); -x_30 = lean_ctor_get(x_28, 1); -lean_inc(x_30); -lean_dec(x_28); -x_31 = lean_unsigned_to_nat(1u); -x_32 = lean_nat_add(x_2, x_31); -lean_dec(x_2); -x_2 = x_32; -x_4 = x_30; -x_7 = x_29; +x_2 = x_17; +x_7 = x_15; goto _start; } -} else { -uint8_t x_34; +uint8_t x_19; lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_34 = !lean_is_exclusive(x_16); -if (x_34 == 0) +x_19 = !lean_is_exclusive(x_14); +if (x_19 == 0) { -return x_16; +return x_14; } else { -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_16, 0); -x_36 = lean_ctor_get(x_16, 1); -lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_16); -x_37 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); -return x_37; +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_14, 0); +x_21 = lean_ctor_get(x_14, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_14); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +return x_22; } } } @@ -2967,112 +2777,45 @@ _start: lean_object* x_8; lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); x_8 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { -lean_object* x_9; +lean_object* x_9; lean_object* x_10; lean_object* x_11; x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +x_11 = lean_apply_6(x_2, x_9, x_3, x_4, x_5, x_6, x_10); +return x_11; +} +else { -uint8_t x_10; +uint8_t x_12; lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_10 = !lean_is_exclusive(x_8); -if (x_10 == 0) -{ -lean_object* x_11; uint8_t x_12; -x_11 = lean_ctor_get(x_8, 0); -lean_dec(x_11); -x_12 = !lean_is_exclusive(x_9); +x_12 = !lean_is_exclusive(x_8); if (x_12 == 0) { return x_8; } else { -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_9, 0); +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_8, 0); +x_14 = lean_ctor_get(x_8, 1); +lean_inc(x_14); lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_8, 0, x_14); -return x_8; -} -} -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_8, 1); -lean_inc(x_15); lean_dec(x_8); -x_16 = lean_ctor_get(x_9, 0); -lean_inc(x_16); -if (lean_is_exclusive(x_9)) { - lean_ctor_release(x_9, 0); - x_17 = x_9; -} else { - lean_dec_ref(x_9); - x_17 = lean_box(0); -} -if (lean_is_scalar(x_17)) { - x_18 = lean_alloc_ctor(0, 1, 0); -} else { - x_18 = x_17; -} -lean_ctor_set(x_18, 0, x_16); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_15); -return x_19; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_20 = lean_ctor_get(x_9, 0); -lean_inc(x_20); -lean_dec(x_9); -x_21 = lean_ctor_get(x_8, 1); -lean_inc(x_21); -lean_dec(x_8); -x_22 = lean_ctor_get(x_20, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_20, 1); -lean_inc(x_23); -lean_dec(x_20); -x_24 = lean_apply_6(x_2, x_22, x_3, x_23, x_5, x_6, x_21); -return x_24; -} -} -else -{ -uint8_t x_25; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_25 = !lean_is_exclusive(x_8); -if (x_25 == 0) -{ -return x_8; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_8, 0); -x_27 = lean_ctor_get(x_8, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_8); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -return x_28; +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +return x_15; } } } @@ -3106,7 +2849,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__1; -x_2 = lean_unsigned_to_nat(214u); +x_2 = lean_unsigned_to_nat(223u); x_3 = lean_unsigned_to_nat(6u); x_4 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__2; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -3116,472 +2859,257 @@ return x_5; lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___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) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; x_8 = l_Lean_PrettyPrinter_Formatter_getStackSize___rarg(x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); +x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 1); -lean_inc(x_11); lean_dec(x_8); -x_12 = lean_ctor_get(x_10, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); -lean_dec(x_10); -x_14 = l_Lean_Syntax_getArgs(x_2); -x_15 = lean_unsigned_to_nat(0u); +x_11 = l_Lean_Syntax_getArgs(x_2); +x_12 = lean_unsigned_to_nat(0u); lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); -x_16 = l_Array_forMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__1(x_14, x_15, x_3, x_13, x_5, x_6, x_11); -lean_dec(x_14); -if (lean_obj_tag(x_16) == 0) +x_13 = l_Array_forMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__1(x_11, x_12, x_3, x_4, x_5, x_6, x_10); +lean_dec(x_11); +if (lean_obj_tag(x_13) == 0) { -lean_object* x_17; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_14 = lean_ctor_get(x_13, 1); +lean_inc(x_14); +lean_dec(x_13); +x_15 = l_Lean_PrettyPrinter_Formatter_getStack___rarg(x_4, x_5, x_6, x_14); +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -if (lean_obj_tag(x_17) == 0) +lean_dec(x_15); +x_18 = lean_array_get_size(x_16); +x_19 = lean_nat_dec_lt(x_9, x_18); +if (x_19 == 0) { -uint8_t x_18; -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_dec(x_18); lean_dec(x_1); -x_18 = !lean_is_exclusive(x_16); -if (x_18 == 0) -{ -lean_object* x_19; uint8_t x_20; -x_19 = lean_ctor_get(x_16, 0); -lean_dec(x_19); -x_20 = !lean_is_exclusive(x_17); -if (x_20 == 0) -{ -return x_16; -} -else -{ -lean_object* x_21; lean_object* x_22; -x_21 = lean_ctor_get(x_17, 0); -lean_inc(x_21); -lean_dec(x_17); -x_22 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_16, 0, x_22); -return x_16; -} -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_23 = lean_ctor_get(x_16, 1); -lean_inc(x_23); +x_20 = lean_unsigned_to_nat(1u); +x_21 = lean_nat_add(x_9, x_20); +lean_dec(x_9); +x_22 = l_Array_extract___rarg(x_16, x_12, x_21); +lean_dec(x_21); lean_dec(x_16); -x_24 = lean_ctor_get(x_17, 0); -lean_inc(x_24); -if (lean_is_exclusive(x_17)) { - lean_ctor_release(x_17, 0); - x_25 = x_17; -} else { - lean_dec_ref(x_17); - x_25 = lean_box(0); -} -if (lean_is_scalar(x_25)) { - x_26 = lean_alloc_ctor(0, 1, 0); -} else { - x_26 = x_25; -} -lean_ctor_set(x_26, 0, x_24); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_23); -return x_27; -} +x_23 = l_Lean_PrettyPrinter_Formatter_setStack(x_22, x_3, x_4, x_5, x_6, x_17); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +return x_23; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; -x_28 = lean_ctor_get(x_17, 0); -lean_inc(x_28); -lean_dec(x_17); -x_29 = lean_ctor_get(x_16, 1); -lean_inc(x_29); +uint8_t x_24; +x_24 = lean_nat_dec_le(x_18, x_18); +if (x_24 == 0) +{ +uint8_t x_25; +lean_inc(x_9); +x_25 = l_Array_anyRangeMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__2(x_9, x_16, x_16, x_18, x_9); +lean_dec(x_18); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_dec(x_1); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_add(x_9, x_26); +lean_dec(x_9); +x_28 = l_Array_extract___rarg(x_16, x_12, x_27); +lean_dec(x_27); lean_dec(x_16); -x_30 = lean_ctor_get(x_28, 1); -lean_inc(x_30); -lean_dec(x_28); -x_31 = l_Lean_PrettyPrinter_Formatter_getStack___rarg(x_30, x_5, x_6, x_29); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -lean_dec(x_32); -x_34 = lean_ctor_get(x_31, 1); -lean_inc(x_34); -lean_dec(x_31); -x_35 = lean_ctor_get(x_33, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -lean_dec(x_33); -x_37 = lean_array_get_size(x_35); -x_38 = lean_nat_dec_lt(x_12, x_37); -if (x_38 == 0) -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; -lean_dec(x_37); -lean_dec(x_1); -x_39 = lean_unsigned_to_nat(1u); -x_40 = lean_nat_add(x_12, x_39); -lean_dec(x_12); -x_41 = l_Array_extract___rarg(x_35, x_15, x_40); -lean_dec(x_40); -lean_dec(x_35); -x_42 = l_Lean_PrettyPrinter_Formatter_setStack(x_41, x_3, x_36, x_5, x_6, x_34); +x_29 = l_Lean_PrettyPrinter_Formatter_setStack(x_28, x_3, x_4, x_5, x_6, x_17); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); -return x_42; +return x_29; } else { -uint8_t x_43; -x_43 = lean_nat_dec_le(x_37, x_37); -if (x_43 == 0) -{ -uint8_t x_44; -lean_inc(x_12); -x_44 = l_Array_anyRangeMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__2(x_12, x_35, x_35, x_37, x_12); -lean_dec(x_37); -if (x_44 == 0) -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -lean_dec(x_1); -x_45 = lean_unsigned_to_nat(1u); -x_46 = lean_nat_add(x_12, x_45); -lean_dec(x_12); -x_47 = l_Array_extract___rarg(x_35, x_15, x_46); -lean_dec(x_46); -lean_dec(x_35); -x_48 = l_Lean_PrettyPrinter_Formatter_setStack(x_47, x_3, x_36, x_5, x_6, x_34); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -return x_48; -} -else -{ -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; -x_49 = l_PUnit_Inhabited; -x_50 = l_monadInhabited___rarg(x_1, x_49); -x_51 = lean_alloc_closure((void*)(l_ReaderT_inhabited___rarg___boxed), 2, 1); -lean_closure_set(x_51, 0, x_50); -x_52 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__3; -x_53 = lean_panic_fn(x_51, x_52); +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_30 = l_PUnit_Inhabited; +x_31 = l_monadInhabited___rarg(x_1, x_30); +x_32 = lean_alloc_closure((void*)(l_ReaderT_inhabited___rarg___boxed), 2, 1); +lean_closure_set(x_32, 0, x_31); +x_33 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__3; +x_34 = lean_panic_fn(x_32, x_33); lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); -x_54 = lean_apply_5(x_53, x_3, x_36, x_5, x_6, x_34); -if (lean_obj_tag(x_54) == 0) +x_35 = lean_apply_5(x_34, x_3, x_4, x_5, x_6, x_17); +if (lean_obj_tag(x_35) == 0) { -lean_object* x_55; -x_55 = lean_ctor_get(x_54, 0); -lean_inc(x_55); +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_36 = lean_ctor_get(x_35, 1); +lean_inc(x_36); +lean_dec(x_35); +x_37 = lean_unsigned_to_nat(1u); +x_38 = lean_nat_add(x_9, x_37); +lean_dec(x_9); +x_39 = l_Array_extract___rarg(x_16, x_12, x_38); +lean_dec(x_38); +lean_dec(x_16); +x_40 = l_Lean_PrettyPrinter_Formatter_setStack(x_39, x_3, x_4, x_5, x_6, x_36); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +return x_40; +} +else +{ +uint8_t x_41; +lean_dec(x_16); +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_41 = !lean_is_exclusive(x_35); +if (x_41 == 0) +{ +return x_35; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = lean_ctor_get(x_35, 0); +x_43 = lean_ctor_get(x_35, 1); +lean_inc(x_43); +lean_inc(x_42); +lean_dec(x_35); +x_44 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_44, 0, x_42); +lean_ctor_set(x_44, 1, x_43); +return x_44; +} +} +} +} +else +{ +uint8_t x_45; +lean_inc(x_9); +x_45 = l_Array_anyRangeMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__3(x_9, x_16, lean_box(0), x_16, x_18, x_9); +lean_dec(x_18); +if (x_45 == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +lean_dec(x_1); +x_46 = lean_unsigned_to_nat(1u); +x_47 = lean_nat_add(x_9, x_46); +lean_dec(x_9); +x_48 = l_Array_extract___rarg(x_16, x_12, x_47); +lean_dec(x_47); +lean_dec(x_16); +x_49 = l_Lean_PrettyPrinter_Formatter_setStack(x_48, x_3, x_4, x_5, x_6, x_17); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +return x_49; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_50 = l_PUnit_Inhabited; +x_51 = l_monadInhabited___rarg(x_1, x_50); +x_52 = lean_alloc_closure((void*)(l_ReaderT_inhabited___rarg___boxed), 2, 1); +lean_closure_set(x_52, 0, x_51); +x_53 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__3; +x_54 = lean_panic_fn(x_52, x_53); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_55 = lean_apply_5(x_54, x_3, x_4, x_5, x_6, x_17); if (lean_obj_tag(x_55) == 0) { -uint8_t x_56; -lean_dec(x_35); -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_56 = !lean_is_exclusive(x_54); -if (x_56 == 0) -{ -lean_object* x_57; uint8_t x_58; -x_57 = lean_ctor_get(x_54, 0); -lean_dec(x_57); -x_58 = !lean_is_exclusive(x_55); -if (x_58 == 0) -{ -return x_54; -} -else -{ -lean_object* x_59; lean_object* x_60; -x_59 = lean_ctor_get(x_55, 0); -lean_inc(x_59); +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; +x_56 = lean_ctor_get(x_55, 1); +lean_inc(x_56); lean_dec(x_55); -x_60 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_60, 0, x_59); -lean_ctor_set(x_54, 0, x_60); -return x_54; -} -} -else -{ -lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -x_61 = lean_ctor_get(x_54, 1); -lean_inc(x_61); -lean_dec(x_54); -x_62 = lean_ctor_get(x_55, 0); -lean_inc(x_62); -if (lean_is_exclusive(x_55)) { - lean_ctor_release(x_55, 0); - x_63 = x_55; -} else { - lean_dec_ref(x_55); - x_63 = lean_box(0); -} -if (lean_is_scalar(x_63)) { - x_64 = lean_alloc_ctor(0, 1, 0); -} else { - x_64 = x_63; -} -lean_ctor_set(x_64, 0, x_62); -x_65 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_65, 0, x_64); -lean_ctor_set(x_65, 1, x_61); -return x_65; -} -} -else -{ -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; -x_66 = lean_ctor_get(x_55, 0); -lean_inc(x_66); -lean_dec(x_55); -x_67 = lean_ctor_get(x_54, 1); -lean_inc(x_67); -lean_dec(x_54); -x_68 = lean_ctor_get(x_66, 1); -lean_inc(x_68); -lean_dec(x_66); -x_69 = lean_unsigned_to_nat(1u); -x_70 = lean_nat_add(x_12, x_69); -lean_dec(x_12); -x_71 = l_Array_extract___rarg(x_35, x_15, x_70); -lean_dec(x_70); -lean_dec(x_35); -x_72 = l_Lean_PrettyPrinter_Formatter_setStack(x_71, x_3, x_68, x_5, x_6, x_67); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -return x_72; -} -} -else -{ -uint8_t x_73; -lean_dec(x_35); -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_73 = !lean_is_exclusive(x_54); -if (x_73 == 0) -{ -return x_54; -} -else -{ -lean_object* x_74; lean_object* x_75; lean_object* x_76; -x_74 = lean_ctor_get(x_54, 0); -x_75 = lean_ctor_get(x_54, 1); -lean_inc(x_75); -lean_inc(x_74); -lean_dec(x_54); -x_76 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_76, 0, x_74); -lean_ctor_set(x_76, 1, x_75); -return x_76; -} -} -} -} -else -{ -uint8_t x_77; -lean_inc(x_12); -x_77 = l_Array_anyRangeMAux___main___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__3(x_12, x_35, lean_box(0), x_35, x_37, x_12); -lean_dec(x_37); -if (x_77 == 0) -{ -lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; -lean_dec(x_1); -x_78 = lean_unsigned_to_nat(1u); -x_79 = lean_nat_add(x_12, x_78); -lean_dec(x_12); -x_80 = l_Array_extract___rarg(x_35, x_15, x_79); -lean_dec(x_79); -lean_dec(x_35); -x_81 = l_Lean_PrettyPrinter_Formatter_setStack(x_80, x_3, x_36, x_5, x_6, x_34); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -return x_81; -} -else -{ -lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; -x_82 = l_PUnit_Inhabited; -x_83 = l_monadInhabited___rarg(x_1, x_82); -x_84 = lean_alloc_closure((void*)(l_ReaderT_inhabited___rarg___boxed), 2, 1); -lean_closure_set(x_84, 0, x_83); -x_85 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__3; -x_86 = lean_panic_fn(x_84, x_85); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_3); -x_87 = lean_apply_5(x_86, x_3, x_36, x_5, x_6, x_34); -if (lean_obj_tag(x_87) == 0) -{ -lean_object* x_88; -x_88 = lean_ctor_get(x_87, 0); -lean_inc(x_88); -if (lean_obj_tag(x_88) == 0) -{ -uint8_t x_89; -lean_dec(x_35); -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_89 = !lean_is_exclusive(x_87); -if (x_89 == 0) -{ -lean_object* x_90; uint8_t x_91; -x_90 = lean_ctor_get(x_87, 0); -lean_dec(x_90); -x_91 = !lean_is_exclusive(x_88); -if (x_91 == 0) -{ -return x_87; -} -else -{ -lean_object* x_92; lean_object* x_93; -x_92 = lean_ctor_get(x_88, 0); -lean_inc(x_92); -lean_dec(x_88); -x_93 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_93, 0, x_92); -lean_ctor_set(x_87, 0, x_93); -return x_87; -} -} -else -{ -lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; -x_94 = lean_ctor_get(x_87, 1); -lean_inc(x_94); -lean_dec(x_87); -x_95 = lean_ctor_get(x_88, 0); -lean_inc(x_95); -if (lean_is_exclusive(x_88)) { - lean_ctor_release(x_88, 0); - x_96 = x_88; -} else { - lean_dec_ref(x_88); - x_96 = lean_box(0); -} -if (lean_is_scalar(x_96)) { - x_97 = lean_alloc_ctor(0, 1, 0); -} else { - x_97 = x_96; -} -lean_ctor_set(x_97, 0, x_95); -x_98 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_98, 0, x_97); -lean_ctor_set(x_98, 1, x_94); -return x_98; -} -} -else -{ -lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; -x_99 = lean_ctor_get(x_88, 0); -lean_inc(x_99); -lean_dec(x_88); -x_100 = lean_ctor_get(x_87, 1); -lean_inc(x_100); -lean_dec(x_87); -x_101 = lean_ctor_get(x_99, 1); -lean_inc(x_101); -lean_dec(x_99); -x_102 = lean_unsigned_to_nat(1u); -x_103 = lean_nat_add(x_12, x_102); -lean_dec(x_12); -x_104 = l_Array_extract___rarg(x_35, x_15, x_103); -lean_dec(x_103); -lean_dec(x_35); -x_105 = l_Lean_PrettyPrinter_Formatter_setStack(x_104, x_3, x_101, x_5, x_6, x_100); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -return x_105; -} -} -else -{ -uint8_t x_106; -lean_dec(x_35); -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_106 = !lean_is_exclusive(x_87); -if (x_106 == 0) -{ -return x_87; -} -else -{ -lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_107 = lean_ctor_get(x_87, 0); -x_108 = lean_ctor_get(x_87, 1); -lean_inc(x_108); -lean_inc(x_107); -lean_dec(x_87); -x_109 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_109, 0, x_107); -lean_ctor_set(x_109, 1, x_108); -return x_109; -} -} -} -} -} -} -} -else -{ -uint8_t x_110; -lean_dec(x_12); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_1); -x_110 = !lean_is_exclusive(x_16); -if (x_110 == 0) -{ -return x_16; -} -else -{ -lean_object* x_111; lean_object* x_112; lean_object* x_113; -x_111 = lean_ctor_get(x_16, 0); -x_112 = lean_ctor_get(x_16, 1); -lean_inc(x_112); -lean_inc(x_111); +x_57 = lean_unsigned_to_nat(1u); +x_58 = lean_nat_add(x_9, x_57); +lean_dec(x_9); +x_59 = l_Array_extract___rarg(x_16, x_12, x_58); +lean_dec(x_58); lean_dec(x_16); -x_113 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_113, 0, x_111); -lean_ctor_set(x_113, 1, x_112); -return x_113; +x_60 = l_Lean_PrettyPrinter_Formatter_setStack(x_59, x_3, x_4, x_5, x_6, x_56); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +return x_60; +} +else +{ +uint8_t x_61; +lean_dec(x_16); +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_61 = !lean_is_exclusive(x_55); +if (x_61 == 0) +{ +return x_55; +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_55, 0); +x_63 = lean_ctor_get(x_55, 1); +lean_inc(x_63); +lean_inc(x_62); +lean_dec(x_55); +x_64 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +return x_64; +} +} +} +} +} +} +else +{ +uint8_t x_65; +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_65 = !lean_is_exclusive(x_13); +if (x_65 == 0) +{ +return x_13; +} +else +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_13, 0); +x_67 = lean_ctor_get(x_13, 1); +lean_inc(x_67); +lean_inc(x_66); +lean_dec(x_13); +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; } } } @@ -3600,7 +3128,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__1; -x_2 = l_ExceptT_Monad___rarg(x_1); +x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } } @@ -3609,34 +3137,25 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__2; -x_2 = l_StateT_Monad___rarg(x_1); +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___boxed), 7, 1); +lean_closure_set(x_2, 0, x_1); return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___boxed), 7, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___boxed), 1, 0); +return x_1; } } lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5() { _start: { -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___boxed), 1, 0); -return x_1; -} -} -lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__6() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5; -x_2 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4; +x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4; +x_2 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__3; x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__4___rarg), 7, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); @@ -3646,49 +3165,41 @@ return x_3; lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_dec(x_9); -x_13 = l_Lean_Syntax_getKind(x_11); -x_14 = l_Lean_choiceKind___closed__2; -x_15 = lean_name_eq(x_13, x_14); -if (x_15 == 0) +x_10 = l_Lean_Syntax_getKind(x_8); +x_11 = l_Lean_choiceKind___closed__2; +x_12 = lean_name_eq(x_10, x_11); +if (x_12 == 0) { -lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_16 = l_Lean_Name_toString___closed__1; -x_17 = l_Lean_Name_toStringWithSep___main(x_16, x_1); -x_18 = lean_box(0); -x_19 = 1; -x_20 = lean_box(x_19); -x_21 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_mkAntiquot_formatter_x27___boxed), 8, 3); -lean_closure_set(x_21, 0, x_17); -lean_closure_set(x_21, 1, x_18); -lean_closure_set(x_21, 2, x_20); -x_22 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_formatterForKind), 6, 1); -lean_closure_set(x_22, 0, x_13); -x_23 = l_Lean_PrettyPrinter_Formatter_orelse_formatter(x_21, x_22, x_2, x_12, x_4, x_5, x_10); -return x_23; +lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_13 = l_Lean_Name_toString___closed__1; +x_14 = l_Lean_Name_toStringWithSep___main(x_13, x_1); +x_15 = lean_box(0); +x_16 = 1; +x_17 = lean_box(x_16); +x_18 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_mkAntiquot_formatter_x27___boxed), 8, 3); +lean_closure_set(x_18, 0, x_14); +lean_closure_set(x_18, 1, x_15); +lean_closure_set(x_18, 2, x_17); +x_19 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_formatterForKind), 6, 1); +lean_closure_set(x_19, 0, x_10); +x_20 = l_Lean_PrettyPrinter_Formatter_orelse_formatter(x_18, x_19, x_2, x_3, x_4, x_5, x_9); +return x_20; } else { -lean_object* x_24; lean_object* x_25; -lean_dec(x_13); +lean_object* x_21; lean_object* x_22; +lean_dec(x_10); lean_dec(x_1); -x_24 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__6; -x_25 = l_Lean_PrettyPrinter_Formatter_visitArgs(x_24, x_2, x_12, x_4, x_5, x_10); -return x_25; +x_21 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5; +x_22 = l_Lean_PrettyPrinter_Formatter_visitArgs(x_21, x_2, x_3, x_4, x_5, x_9); +return x_22; } } } @@ -3739,27 +3250,34 @@ return x_8; lean_object* l_Lean_PrettyPrinter_Formatter_categoryParserOfStack_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_7 = lean_ctor_get(x_3, 0); -lean_inc(x_7); -x_8 = lean_ctor_get(x_7, 1); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_7 = lean_io_ref_get(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_8); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 2); -lean_inc(x_10); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); lean_dec(x_7); -x_11 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_10); -lean_dec(x_10); -x_12 = lean_nat_sub(x_11, x_1); +x_10 = lean_ctor_get(x_8, 0); +lean_inc(x_10); +lean_dec(x_8); +x_11 = lean_ctor_get(x_10, 1); +lean_inc(x_11); +x_12 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_11); lean_dec(x_11); -x_13 = l_Lean_Syntax_getArg(x_9, x_12); -lean_dec(x_12); -lean_dec(x_9); -x_14 = l_Lean_Syntax_getId(x_13); +x_13 = lean_ctor_get(x_10, 2); +lean_inc(x_13); +lean_dec(x_10); +x_14 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_13); lean_dec(x_13); -x_15 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter(x_14, x_2, x_3, x_4, x_5, x_6); -return x_15; +x_15 = lean_nat_sub(x_14, x_1); +lean_dec(x_14); +x_16 = l_Lean_Syntax_getArg(x_12, x_15); +lean_dec(x_15); +lean_dec(x_12); +x_17 = l_Lean_Syntax_getId(x_16); +lean_dec(x_16); +x_18 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter(x_17, x_2, x_3, x_4, x_5, x_9); +return x_18; } } lean_object* l_Lean_PrettyPrinter_Formatter_categoryParserOfStack_formatter___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) { @@ -3793,110 +3311,43 @@ _start: lean_object* x_8; lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); x_8 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { -lean_object* x_9; -x_9 = lean_ctor_get(x_8, 0); +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_8, 1); lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) +lean_dec(x_8); +x_10 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_9); +return x_10; +} +else { -uint8_t x_10; +uint8_t x_11; lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_10 = !lean_is_exclusive(x_8); -if (x_10 == 0) -{ -lean_object* x_11; uint8_t x_12; -x_11 = lean_ctor_get(x_8, 0); -lean_dec(x_11); -x_12 = !lean_is_exclusive(x_9); -if (x_12 == 0) +x_11 = !lean_is_exclusive(x_8); +if (x_11 == 0) { return x_8; } else { -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_9, 0); +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_8, 0); +x_13 = lean_ctor_get(x_8, 1); lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_8, 0, x_14); -return x_8; -} -} -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_8, 1); -lean_inc(x_15); +lean_inc(x_12); lean_dec(x_8); -x_16 = lean_ctor_get(x_9, 0); -lean_inc(x_16); -if (lean_is_exclusive(x_9)) { - lean_ctor_release(x_9, 0); - x_17 = x_9; -} else { - lean_dec_ref(x_9); - x_17 = lean_box(0); -} -if (lean_is_scalar(x_17)) { - x_18 = lean_alloc_ctor(0, 1, 0); -} else { - x_18 = x_17; -} -lean_ctor_set(x_18, 0, x_16); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_15); -return x_19; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_20 = lean_ctor_get(x_9, 0); -lean_inc(x_20); -lean_dec(x_9); -x_21 = lean_ctor_get(x_8, 1); -lean_inc(x_21); -lean_dec(x_8); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = lean_apply_5(x_1, x_3, x_22, x_5, x_6, x_21); -return x_23; -} -} -else -{ -uint8_t x_24; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_1); -x_24 = !lean_is_exclusive(x_8); -if (x_24 == 0) -{ -return x_8; -} -else -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = lean_ctor_get(x_8, 0); -x_26 = lean_ctor_get(x_8, 1); -lean_inc(x_26); -lean_inc(x_25); -lean_dec(x_8); -x_27 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_27, 0, x_25); -lean_ctor_set(x_27, 1, x_26); -return x_27; +x_14 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_14, 0, x_12); +lean_ctor_set(x_14, 1, x_13); +return x_14; } } } @@ -3939,136 +3390,116 @@ x_21 = lean_io_ref_set(x_6, x_12, x_14); x_22 = !lean_is_exclusive(x_21); if (x_22 == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_object* x_23; lean_object* x_24; x_23 = lean_ctor_get(x_21, 0); lean_dec(x_23); x_24 = lean_box(0); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_4); -x_26 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_21, 0, x_26); +lean_ctor_set(x_21, 0, x_24); return x_21; } else { -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_27 = lean_ctor_get(x_21, 1); -lean_inc(x_27); +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_21, 1); +lean_inc(x_25); lean_dec(x_21); -x_28 = lean_box(0); -x_29 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_29, 0, x_28); -lean_ctor_set(x_29, 1, x_4); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_31, 1, x_27); -return x_31; +x_26 = lean_box(0); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_25); +return x_27; } } else { -uint8_t 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; lean_object* x_43; -x_32 = lean_ctor_get_uint8(x_13, sizeof(void*)*1); -x_33 = lean_ctor_get(x_13, 0); -lean_inc(x_33); +uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_28 = lean_ctor_get_uint8(x_13, sizeof(void*)*1); +x_29 = lean_ctor_get(x_13, 0); +lean_inc(x_29); lean_dec(x_13); -x_34 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_34, 0, x_1); -lean_ctor_set(x_34, 1, x_9); -x_35 = l_Std_PersistentArray_push___rarg(x_33, x_34); -x_36 = lean_alloc_ctor(0, 1, 1); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set_uint8(x_36, sizeof(void*)*1, x_32); -lean_ctor_set(x_12, 2, x_36); -x_37 = lean_io_ref_set(x_6, x_12, x_14); -x_38 = lean_ctor_get(x_37, 1); -lean_inc(x_38); -if (lean_is_exclusive(x_37)) { - lean_ctor_release(x_37, 0); - lean_ctor_release(x_37, 1); - x_39 = x_37; +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_1); +lean_ctor_set(x_30, 1, x_9); +x_31 = l_Std_PersistentArray_push___rarg(x_29, x_30); +x_32 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set_uint8(x_32, sizeof(void*)*1, x_28); +lean_ctor_set(x_12, 2, x_32); +x_33 = lean_io_ref_set(x_6, x_12, x_14); +x_34 = lean_ctor_get(x_33, 1); +lean_inc(x_34); +if (lean_is_exclusive(x_33)) { + lean_ctor_release(x_33, 0); + lean_ctor_release(x_33, 1); + x_35 = x_33; } else { - lean_dec_ref(x_37); - x_39 = lean_box(0); + lean_dec_ref(x_33); + x_35 = lean_box(0); } -x_40 = lean_box(0); -x_41 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_41, 0, x_40); -lean_ctor_set(x_41, 1, x_4); -x_42 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_42, 0, x_41); -if (lean_is_scalar(x_39)) { - x_43 = lean_alloc_ctor(0, 2, 0); +x_36 = lean_box(0); +if (lean_is_scalar(x_35)) { + x_37 = lean_alloc_ctor(0, 2, 0); } else { - x_43 = x_39; + x_37 = x_35; } -lean_ctor_set(x_43, 0, x_42); -lean_ctor_set(x_43, 1, x_38); -return x_43; +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_34); +return x_37; } } else { -lean_object* x_44; lean_object* x_45; uint8_t x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; 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_44 = lean_ctor_get(x_12, 0); -x_45 = lean_ctor_get(x_12, 1); -lean_inc(x_45); -lean_inc(x_44); +lean_object* x_38; lean_object* x_39; uint8_t x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_38 = lean_ctor_get(x_12, 0); +x_39 = lean_ctor_get(x_12, 1); +lean_inc(x_39); +lean_inc(x_38); lean_dec(x_12); -x_46 = lean_ctor_get_uint8(x_13, sizeof(void*)*1); -x_47 = lean_ctor_get(x_13, 0); -lean_inc(x_47); +x_40 = lean_ctor_get_uint8(x_13, sizeof(void*)*1); +x_41 = lean_ctor_get(x_13, 0); +lean_inc(x_41); if (lean_is_exclusive(x_13)) { lean_ctor_release(x_13, 0); - x_48 = x_13; + x_42 = x_13; } else { lean_dec_ref(x_13); - x_48 = lean_box(0); + x_42 = lean_box(0); } -x_49 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_49, 0, x_1); -lean_ctor_set(x_49, 1, x_9); -x_50 = l_Std_PersistentArray_push___rarg(x_47, x_49); -if (lean_is_scalar(x_48)) { - x_51 = lean_alloc_ctor(0, 1, 1); +x_43 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_43, 0, x_1); +lean_ctor_set(x_43, 1, x_9); +x_44 = l_Std_PersistentArray_push___rarg(x_41, x_43); +if (lean_is_scalar(x_42)) { + x_45 = lean_alloc_ctor(0, 1, 1); } else { - x_51 = x_48; + x_45 = x_42; +} +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set_uint8(x_45, sizeof(void*)*1, x_40); +x_46 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_46, 0, x_38); +lean_ctor_set(x_46, 1, x_39); +lean_ctor_set(x_46, 2, x_45); +x_47 = lean_io_ref_set(x_6, x_46, x_14); +x_48 = lean_ctor_get(x_47, 1); +lean_inc(x_48); +if (lean_is_exclusive(x_47)) { + lean_ctor_release(x_47, 0); + lean_ctor_release(x_47, 1); + x_49 = x_47; +} else { + lean_dec_ref(x_47); + x_49 = lean_box(0); +} +x_50 = lean_box(0); +if (lean_is_scalar(x_49)) { + x_51 = lean_alloc_ctor(0, 2, 0); +} else { + x_51 = x_49; } lean_ctor_set(x_51, 0, x_50); -lean_ctor_set_uint8(x_51, sizeof(void*)*1, x_46); -x_52 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_52, 0, x_44); -lean_ctor_set(x_52, 1, x_45); -lean_ctor_set(x_52, 2, x_51); -x_53 = lean_io_ref_set(x_6, x_52, x_14); -x_54 = lean_ctor_get(x_53, 1); -lean_inc(x_54); -if (lean_is_exclusive(x_53)) { - lean_ctor_release(x_53, 0); - lean_ctor_release(x_53, 1); - x_55 = x_53; -} else { - lean_dec_ref(x_53); - x_55 = lean_box(0); -} -x_56 = lean_box(0); -x_57 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_57, 0, x_56); -lean_ctor_set(x_57, 1, x_4); -x_58 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_58, 0, x_57); -if (lean_is_scalar(x_55)) { - x_59 = lean_alloc_ctor(0, 2, 0); -} else { - x_59 = x_55; -} -lean_ctor_set(x_59, 0, x_58); -lean_ctor_set(x_59, 1, x_54); -return x_59; +lean_ctor_set(x_51, 1, x_48); +return x_51; } } } @@ -4147,19 +3578,19 @@ return x_3; lean_object* _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__5() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = lean_box(0); -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string("unexpected node kind '"); +return x_1; } } lean_object* _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__6() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("unexpected node kind '"); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__7() { @@ -4167,7 +3598,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__6; -x_2 = lean_alloc_ctor(2, 1, 0); +x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -4175,19 +3606,19 @@ return x_2; lean_object* _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__8() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__7; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string("', expected '"); +return x_1; } } lean_object* _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__9() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("', expected '"); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__8; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__10() { @@ -4195,16 +3626,6 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__9; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__11() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__10; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -4213,524 +3634,221 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_checkKind(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; uint8_t x_9; -x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) +lean_object* x_7; uint8_t x_8; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); +x_8 = !lean_is_exclusive(x_7); +if (x_8 == 0) { -lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; -x_10 = lean_ctor_get(x_8, 0); -x_11 = lean_ctor_get(x_7, 1); -lean_inc(x_11); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - lean_ctor_release(x_7, 1); - x_12 = x_7; -} else { - lean_dec_ref(x_7); - x_12 = lean_box(0); +lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_9 = lean_ctor_get(x_7, 0); +x_10 = lean_ctor_get(x_7, 1); +x_11 = l_Lean_Syntax_getKind(x_9); +x_12 = lean_name_eq(x_1, x_11); +if (x_12 == 0) +{ +uint8_t x_13; lean_object* x_14; lean_object* x_35; lean_object* x_36; uint8_t x_37; +lean_free_object(x_7); +x_35 = l_Lean_Core_getTraceState___rarg(x_5, x_10); +x_36 = lean_ctor_get(x_35, 0); +lean_inc(x_36); +x_37 = lean_ctor_get_uint8(x_36, sizeof(void*)*1); +lean_dec(x_36); +if (x_37 == 0) +{ +lean_object* x_38; uint8_t x_39; +x_38 = lean_ctor_get(x_35, 1); +lean_inc(x_38); +lean_dec(x_35); +x_39 = 0; +x_13 = x_39; +x_14 = x_38; +goto block_34; } -x_13 = !lean_is_exclusive(x_10); +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; uint8_t x_45; +x_40 = lean_ctor_get(x_35, 1); +lean_inc(x_40); +lean_dec(x_35); +x_41 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; +x_42 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Formatter_checkKind___spec__2(x_41, x_4, x_5, x_40); +x_43 = lean_ctor_get(x_42, 0); +lean_inc(x_43); +x_44 = lean_ctor_get(x_42, 1); +lean_inc(x_44); +lean_dec(x_42); +x_45 = lean_unbox(x_43); +lean_dec(x_43); +x_13 = x_45; +x_14 = x_44; +goto block_34; +} +block_34: +{ if (x_13 == 0) { -lean_object* x_14; lean_object* x_15; uint8_t x_16; -x_14 = lean_ctor_get(x_10, 0); -x_15 = l_Lean_Syntax_getKind(x_14); -x_16 = lean_name_eq(x_1, x_15); -if (x_16 == 0) +lean_object* x_15; +lean_dec(x_11); +lean_dec(x_1); +x_15 = l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg(x_14); +return x_15; +} +else { -lean_object* x_17; lean_object* x_18; lean_object* x_48; lean_object* x_49; uint8_t x_50; -x_48 = l_Lean_Core_getTraceState___rarg(x_5, x_11); -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get_uint8(x_49, sizeof(void*)*1); -lean_dec(x_49); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_16 = l_Lean_Name_toString___closed__1; +x_17 = l_Lean_Name_toStringWithSep___main(x_16, x_11); +x_18 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_18, 0, x_17); +x_19 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_19, 0, x_18); +x_20 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__7; +x_21 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_19); +x_22 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__10; +x_23 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_23, 0, x_21); +lean_ctor_set(x_23, 1, x_22); +x_24 = l_Lean_Name_toStringWithSep___main(x_16, x_1); +x_25 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_25, 0, x_24); +x_26 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_26, 0, x_25); +x_27 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_27, 0, x_23); +lean_ctor_set(x_27, 1, x_26); +x_28 = l_Lean_Core_getConstInfo___closed__5; +x_29 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +x_30 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; +x_31 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Formatter_checkKind___spec__1(x_30, x_29, x_2, x_3, x_4, x_5, x_14); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg(x_32); +return x_33; +} +} +} +else +{ +lean_object* x_46; +lean_dec(x_11); +lean_dec(x_1); +x_46 = lean_box(0); +lean_ctor_set(x_7, 0, x_46); +return x_7; +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; uint8_t x_50; +x_47 = lean_ctor_get(x_7, 0); +x_48 = lean_ctor_get(x_7, 1); +lean_inc(x_48); +lean_inc(x_47); +lean_dec(x_7); +x_49 = l_Lean_Syntax_getKind(x_47); +x_50 = lean_name_eq(x_1, x_49); if (x_50 == 0) { -lean_object* x_51; uint8_t x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_48, 1); -lean_inc(x_51); -lean_dec(x_48); -x_52 = 0; -x_53 = lean_box(x_52); -lean_ctor_set(x_10, 0, x_53); -x_17 = x_8; -x_18 = x_51; -goto block_47; +uint8_t x_51; lean_object* x_52; lean_object* x_73; lean_object* x_74; uint8_t x_75; +x_73 = l_Lean_Core_getTraceState___rarg(x_5, x_48); +x_74 = lean_ctor_get(x_73, 0); +lean_inc(x_74); +x_75 = lean_ctor_get_uint8(x_74, sizeof(void*)*1); +lean_dec(x_74); +if (x_75 == 0) +{ +lean_object* x_76; uint8_t x_77; +x_76 = lean_ctor_get(x_73, 1); +lean_inc(x_76); +lean_dec(x_73); +x_77 = 0; +x_51 = x_77; +x_52 = x_76; +goto block_72; } else { -lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_54 = lean_ctor_get(x_48, 1); -lean_inc(x_54); -lean_dec(x_48); -x_55 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; -x_56 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Formatter_checkKind___spec__2(x_55, x_4, x_5, x_54); -x_57 = lean_ctor_get(x_56, 0); -lean_inc(x_57); -x_58 = lean_ctor_get(x_56, 1); -lean_inc(x_58); -lean_dec(x_56); -lean_ctor_set(x_10, 0, x_57); -x_17 = x_8; -x_18 = x_58; -goto block_47; +lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; uint8_t x_83; +x_78 = lean_ctor_get(x_73, 1); +lean_inc(x_78); +lean_dec(x_73); +x_79 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; +x_80 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Formatter_checkKind___spec__2(x_79, x_4, x_5, x_78); +x_81 = lean_ctor_get(x_80, 0); +lean_inc(x_81); +x_82 = lean_ctor_get(x_80, 1); +lean_inc(x_82); +lean_dec(x_80); +x_83 = lean_unbox(x_81); +lean_dec(x_81); +x_51 = x_83; +x_52 = x_82; +goto block_72; } -block_47: +block_72: { -lean_object* x_19; lean_object* x_20; uint8_t x_21; -x_19 = lean_ctor_get(x_17, 0); -lean_inc(x_19); -lean_dec(x_17); -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -x_21 = lean_unbox(x_20); -lean_dec(x_20); -if (x_21 == 0) +if (x_51 == 0) { -lean_object* x_22; lean_object* x_23; -lean_dec(x_19); -lean_dec(x_15); +lean_object* x_53; +lean_dec(x_49); lean_dec(x_1); -x_22 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; -if (lean_is_scalar(x_12)) { - x_23 = lean_alloc_ctor(0, 2, 0); -} else { - x_23 = x_12; -} -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_18); -return x_23; +x_53 = l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg(x_52); +return x_53; } else { -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; 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; uint8_t x_41; -lean_dec(x_12); -x_24 = lean_ctor_get(x_19, 1); -lean_inc(x_24); -lean_dec(x_19); -x_25 = l_Lean_Name_toString___closed__1; -x_26 = l_Lean_Name_toStringWithSep___main(x_25, x_15); -x_27 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_27, 0, x_26); -x_28 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_28, 0, x_27); -x_29 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__8; -x_30 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -x_31 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__11; -x_32 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -x_33 = l_Lean_Name_toStringWithSep___main(x_25, x_1); -x_34 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_34, 0, x_33); -x_35 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_35, 0, x_34); -x_36 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_36, 0, x_32); -lean_ctor_set(x_36, 1, x_35); -x_37 = l_Lean_Core_getConstInfo___closed__5; -x_38 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -x_39 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; -x_40 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Formatter_checkKind___spec__1(x_39, x_38, x_2, x_24, x_4, x_5, x_18); -x_41 = !lean_is_exclusive(x_40); -if (x_41 == 0) -{ -lean_object* x_42; lean_object* x_43; -x_42 = lean_ctor_get(x_40, 0); -lean_dec(x_42); -x_43 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; -lean_ctor_set(x_40, 0, x_43); -return x_40; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_40, 1); -lean_inc(x_44); -lean_dec(x_40); -x_45 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; -x_46 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_46, 0, x_45); -lean_ctor_set(x_46, 1, x_44); -return x_46; -} -} -} -} -else -{ -lean_object* x_59; lean_object* x_60; -lean_dec(x_15); -lean_dec(x_1); -x_59 = lean_box(0); -lean_ctor_set(x_10, 0, x_59); -if (lean_is_scalar(x_12)) { - x_60 = lean_alloc_ctor(0, 2, 0); -} else { - x_60 = x_12; -} -lean_ctor_set(x_60, 0, x_8); -lean_ctor_set(x_60, 1, x_11); -return x_60; -} -} -else -{ -lean_object* x_61; lean_object* x_62; lean_object* x_63; uint8_t x_64; -x_61 = lean_ctor_get(x_10, 0); -x_62 = lean_ctor_get(x_10, 1); -lean_inc(x_62); -lean_inc(x_61); -lean_dec(x_10); -x_63 = l_Lean_Syntax_getKind(x_61); -x_64 = lean_name_eq(x_1, x_63); -if (x_64 == 0) -{ -lean_object* x_65; lean_object* x_66; lean_object* x_94; lean_object* x_95; uint8_t x_96; -x_94 = l_Lean_Core_getTraceState___rarg(x_5, x_11); -x_95 = lean_ctor_get(x_94, 0); -lean_inc(x_95); -x_96 = lean_ctor_get_uint8(x_95, sizeof(void*)*1); -lean_dec(x_95); -if (x_96 == 0) -{ -lean_object* x_97; uint8_t x_98; lean_object* x_99; lean_object* x_100; -x_97 = lean_ctor_get(x_94, 1); -lean_inc(x_97); -lean_dec(x_94); -x_98 = 0; -x_99 = lean_box(x_98); -x_100 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_100, 0, x_99); -lean_ctor_set(x_100, 1, x_62); -lean_ctor_set(x_8, 0, x_100); -x_65 = x_8; -x_66 = x_97; -goto block_93; -} -else -{ -lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_101 = lean_ctor_get(x_94, 1); -lean_inc(x_101); -lean_dec(x_94); -x_102 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; -x_103 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Formatter_checkKind___spec__2(x_102, x_4, x_5, x_101); -x_104 = lean_ctor_get(x_103, 0); -lean_inc(x_104); -x_105 = lean_ctor_get(x_103, 1); -lean_inc(x_105); -lean_dec(x_103); -x_106 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_106, 0, x_104); -lean_ctor_set(x_106, 1, x_62); -lean_ctor_set(x_8, 0, x_106); -x_65 = x_8; -x_66 = x_105; -goto block_93; -} -block_93: -{ -lean_object* x_67; lean_object* x_68; uint8_t x_69; -x_67 = lean_ctor_get(x_65, 0); -lean_inc(x_67); -lean_dec(x_65); -x_68 = lean_ctor_get(x_67, 0); -lean_inc(x_68); -x_69 = lean_unbox(x_68); -lean_dec(x_68); -if (x_69 == 0) -{ -lean_object* x_70; lean_object* x_71; -lean_dec(x_67); -lean_dec(x_63); -lean_dec(x_1); -x_70 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; -if (lean_is_scalar(x_12)) { - x_71 = lean_alloc_ctor(0, 2, 0); -} else { - x_71 = x_12; -} -lean_ctor_set(x_71, 0, x_70); -lean_ctor_set(x_71, 1, x_66); +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; +x_54 = l_Lean_Name_toString___closed__1; +x_55 = l_Lean_Name_toStringWithSep___main(x_54, x_49); +x_56 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_56, 0, x_55); +x_57 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_57, 0, x_56); +x_58 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__7; +x_59 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_59, 0, x_58); +lean_ctor_set(x_59, 1, x_57); +x_60 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__10; +x_61 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_61, 0, x_59); +lean_ctor_set(x_61, 1, x_60); +x_62 = l_Lean_Name_toStringWithSep___main(x_54, x_1); +x_63 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_63, 0, x_62); +x_64 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_64, 0, x_63); +x_65 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_65, 0, x_61); +lean_ctor_set(x_65, 1, x_64); +x_66 = l_Lean_Core_getConstInfo___closed__5; +x_67 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_67, 0, x_65); +lean_ctor_set(x_67, 1, x_66); +x_68 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; +x_69 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Formatter_checkKind___spec__1(x_68, x_67, x_2, x_3, x_4, x_5, x_52); +x_70 = lean_ctor_get(x_69, 1); +lean_inc(x_70); +lean_dec(x_69); +x_71 = l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg(x_70); return x_71; } -else -{ -lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; -lean_dec(x_12); -x_72 = lean_ctor_get(x_67, 1); -lean_inc(x_72); -lean_dec(x_67); -x_73 = l_Lean_Name_toString___closed__1; -x_74 = l_Lean_Name_toStringWithSep___main(x_73, x_63); -x_75 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_75, 0, x_74); -x_76 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_76, 0, x_75); -x_77 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__8; -x_78 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_78, 0, x_77); -lean_ctor_set(x_78, 1, x_76); -x_79 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__11; -x_80 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_80, 0, x_78); -lean_ctor_set(x_80, 1, x_79); -x_81 = l_Lean_Name_toStringWithSep___main(x_73, x_1); -x_82 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_82, 0, x_81); -x_83 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_83, 0, x_82); -x_84 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_84, 0, x_80); -lean_ctor_set(x_84, 1, x_83); -x_85 = l_Lean_Core_getConstInfo___closed__5; -x_86 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_86, 0, x_84); -lean_ctor_set(x_86, 1, x_85); -x_87 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; -x_88 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Formatter_checkKind___spec__1(x_87, x_86, x_2, x_72, x_4, x_5, x_66); -x_89 = lean_ctor_get(x_88, 1); -lean_inc(x_89); -if (lean_is_exclusive(x_88)) { - lean_ctor_release(x_88, 0); - lean_ctor_release(x_88, 1); - x_90 = x_88; -} else { - lean_dec_ref(x_88); - x_90 = lean_box(0); -} -x_91 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; -if (lean_is_scalar(x_90)) { - x_92 = lean_alloc_ctor(0, 2, 0); -} else { - x_92 = x_90; -} -lean_ctor_set(x_92, 0, x_91); -lean_ctor_set(x_92, 1, x_89); -return x_92; -} } } else { -lean_object* x_107; lean_object* x_108; lean_object* x_109; -lean_dec(x_63); +lean_object* x_84; lean_object* x_85; +lean_dec(x_49); lean_dec(x_1); -x_107 = lean_box(0); -x_108 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_108, 0, x_107); -lean_ctor_set(x_108, 1, x_62); -lean_ctor_set(x_8, 0, x_108); -if (lean_is_scalar(x_12)) { - x_109 = lean_alloc_ctor(0, 2, 0); -} else { - x_109 = x_12; -} -lean_ctor_set(x_109, 0, x_8); -lean_ctor_set(x_109, 1, x_11); -return x_109; -} -} -} -else -{ -lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; uint8_t x_117; -x_110 = lean_ctor_get(x_8, 0); -lean_inc(x_110); -lean_dec(x_8); -x_111 = lean_ctor_get(x_7, 1); -lean_inc(x_111); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - lean_ctor_release(x_7, 1); - x_112 = x_7; -} else { - lean_dec_ref(x_7); - x_112 = lean_box(0); -} -x_113 = lean_ctor_get(x_110, 0); -lean_inc(x_113); -x_114 = lean_ctor_get(x_110, 1); -lean_inc(x_114); -if (lean_is_exclusive(x_110)) { - lean_ctor_release(x_110, 0); - lean_ctor_release(x_110, 1); - x_115 = x_110; -} else { - lean_dec_ref(x_110); - x_115 = lean_box(0); -} -x_116 = l_Lean_Syntax_getKind(x_113); -x_117 = lean_name_eq(x_1, x_116); -if (x_117 == 0) -{ -lean_object* x_118; lean_object* x_119; lean_object* x_147; lean_object* x_148; uint8_t x_149; -x_147 = l_Lean_Core_getTraceState___rarg(x_5, x_111); -x_148 = lean_ctor_get(x_147, 0); -lean_inc(x_148); -x_149 = lean_ctor_get_uint8(x_148, sizeof(void*)*1); -lean_dec(x_148); -if (x_149 == 0) -{ -lean_object* x_150; uint8_t x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; -x_150 = lean_ctor_get(x_147, 1); -lean_inc(x_150); -lean_dec(x_147); -x_151 = 0; -x_152 = lean_box(x_151); -if (lean_is_scalar(x_115)) { - x_153 = lean_alloc_ctor(0, 2, 0); -} else { - x_153 = x_115; -} -lean_ctor_set(x_153, 0, x_152); -lean_ctor_set(x_153, 1, x_114); -x_154 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_154, 0, x_153); -x_118 = x_154; -x_119 = x_150; -goto block_146; -} -else -{ -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; -x_155 = lean_ctor_get(x_147, 1); -lean_inc(x_155); -lean_dec(x_147); -x_156 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; -x_157 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Formatter_checkKind___spec__2(x_156, x_4, x_5, x_155); -x_158 = lean_ctor_get(x_157, 0); -lean_inc(x_158); -x_159 = lean_ctor_get(x_157, 1); -lean_inc(x_159); -lean_dec(x_157); -if (lean_is_scalar(x_115)) { - x_160 = lean_alloc_ctor(0, 2, 0); -} else { - x_160 = x_115; -} -lean_ctor_set(x_160, 0, x_158); -lean_ctor_set(x_160, 1, x_114); -x_161 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_161, 0, x_160); -x_118 = x_161; -x_119 = x_159; -goto block_146; -} -block_146: -{ -lean_object* x_120; lean_object* x_121; uint8_t x_122; -x_120 = lean_ctor_get(x_118, 0); -lean_inc(x_120); -lean_dec(x_118); -x_121 = lean_ctor_get(x_120, 0); -lean_inc(x_121); -x_122 = lean_unbox(x_121); -lean_dec(x_121); -if (x_122 == 0) -{ -lean_object* x_123; lean_object* x_124; -lean_dec(x_120); -lean_dec(x_116); -lean_dec(x_1); -x_123 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; -if (lean_is_scalar(x_112)) { - x_124 = lean_alloc_ctor(0, 2, 0); -} else { - x_124 = x_112; -} -lean_ctor_set(x_124, 0, x_123); -lean_ctor_set(x_124, 1, x_119); -return x_124; -} -else -{ -lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; 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_dec(x_112); -x_125 = lean_ctor_get(x_120, 1); -lean_inc(x_125); -lean_dec(x_120); -x_126 = l_Lean_Name_toString___closed__1; -x_127 = l_Lean_Name_toStringWithSep___main(x_126, x_116); -x_128 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_128, 0, x_127); -x_129 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_129, 0, x_128); -x_130 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__8; -x_131 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_131, 0, x_130); -lean_ctor_set(x_131, 1, x_129); -x_132 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__11; -x_133 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_133, 0, x_131); -lean_ctor_set(x_133, 1, x_132); -x_134 = l_Lean_Name_toStringWithSep___main(x_126, x_1); -x_135 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_135, 0, x_134); -x_136 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_136, 0, x_135); -x_137 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_137, 0, x_133); -lean_ctor_set(x_137, 1, x_136); -x_138 = l_Lean_Core_getConstInfo___closed__5; -x_139 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_139, 0, x_137); -lean_ctor_set(x_139, 1, x_138); -x_140 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__4; -x_141 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Formatter_checkKind___spec__1(x_140, x_139, x_2, x_125, x_4, x_5, x_119); -x_142 = lean_ctor_get(x_141, 1); -lean_inc(x_142); -if (lean_is_exclusive(x_141)) { - lean_ctor_release(x_141, 0); - lean_ctor_release(x_141, 1); - x_143 = x_141; -} else { - lean_dec_ref(x_141); - x_143 = lean_box(0); -} -x_144 = l_Lean_PrettyPrinter_Formatter_checkKind___closed__5; -if (lean_is_scalar(x_143)) { - x_145 = lean_alloc_ctor(0, 2, 0); -} else { - x_145 = x_143; -} -lean_ctor_set(x_145, 0, x_144); -lean_ctor_set(x_145, 1, x_142); -return x_145; -} -} -} -else -{ -lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; -lean_dec(x_116); -lean_dec(x_1); -x_162 = lean_box(0); -if (lean_is_scalar(x_115)) { - x_163 = lean_alloc_ctor(0, 2, 0); -} else { - x_163 = x_115; -} -lean_ctor_set(x_163, 0, x_162); -lean_ctor_set(x_163, 1, x_114); -x_164 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_164, 0, x_163); -if (lean_is_scalar(x_112)) { - x_165 = lean_alloc_ctor(0, 2, 0); -} else { - x_165 = x_112; -} -lean_ctor_set(x_165, 0, x_164); -lean_ctor_set(x_165, 1, x_111); -return x_165; +x_84 = lean_box(0); +x_85 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_85, 0, x_84); +lean_ctor_set(x_85, 1, x_48); +return x_85; } } } @@ -4742,6 +3860,7 @@ lean_object* x_8; x_8 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Formatter_checkKind___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); return x_8; } @@ -4763,6 +3882,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_checkKind(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); return x_7; } @@ -4770,81 +3890,43 @@ return x_7; lean_object* l_Lean_PrettyPrinter_Formatter_node_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; +lean_object* x_8; x_8 = l_Lean_PrettyPrinter_Formatter_checkKind(x_1, x_3, x_4, x_5, x_6, x_7); -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) +if (lean_obj_tag(x_8) == 0) { -uint8_t x_10; +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_8, 1); +lean_inc(x_9); +lean_dec(x_8); +x_10 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_2, x_3, x_4, x_5, x_6, x_9); +return x_10; +} +else +{ +uint8_t x_11; lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_10 = !lean_is_exclusive(x_8); -if (x_10 == 0) -{ -lean_object* x_11; uint8_t x_12; -x_11 = lean_ctor_get(x_8, 0); -lean_dec(x_11); -x_12 = !lean_is_exclusive(x_9); -if (x_12 == 0) +x_11 = !lean_is_exclusive(x_8); +if (x_11 == 0) { return x_8; } else { -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_9, 0); +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_8, 0); +x_13 = lean_ctor_get(x_8, 1); lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_8, 0, x_14); -return x_8; -} -} -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_8, 1); -lean_inc(x_15); +lean_inc(x_12); lean_dec(x_8); -x_16 = lean_ctor_get(x_9, 0); -lean_inc(x_16); -if (lean_is_exclusive(x_9)) { - lean_ctor_release(x_9, 0); - x_17 = x_9; -} else { - lean_dec_ref(x_9); - x_17 = lean_box(0); +x_14 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_14, 0, x_12); +lean_ctor_set(x_14, 1, x_13); +return x_14; } -if (lean_is_scalar(x_17)) { - x_18 = lean_alloc_ctor(0, 1, 0); -} else { - x_18 = x_17; -} -lean_ctor_set(x_18, 0, x_16); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_15); -return x_19; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_20 = lean_ctor_get(x_9, 0); -lean_inc(x_20); -lean_dec(x_9); -x_21 = lean_ctor_get(x_8, 1); -lean_inc(x_21); -lean_dec(x_8); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_2, x_3, x_22, x_5, x_6, x_21); -return x_23; } } } @@ -4886,85 +3968,47 @@ return x_1; lean_object* l_Lean_PrettyPrinter_Formatter_trailingNode_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_9; lean_object* x_10; +lean_object* x_9; x_9 = l_Lean_PrettyPrinter_Formatter_checkKind(x_1, x_4, x_5, x_6, x_7, x_8); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -if (lean_obj_tag(x_10) == 0) +if (lean_obj_tag(x_9) == 0) { -uint8_t x_11; +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_10 = lean_ctor_get(x_9, 1); +lean_inc(x_10); +lean_dec(x_9); +x_11 = l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___closed__1; +x_12 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__4___rarg), 7, 2); +lean_closure_set(x_12, 0, x_3); +lean_closure_set(x_12, 1, x_11); +x_13 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_12, x_4, x_5, x_6, x_7, x_10); +return x_13; +} +else +{ +uint8_t x_14; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_11 = !lean_is_exclusive(x_9); -if (x_11 == 0) -{ -lean_object* x_12; uint8_t x_13; -x_12 = lean_ctor_get(x_9, 0); -lean_dec(x_12); -x_13 = !lean_is_exclusive(x_10); -if (x_13 == 0) +x_14 = !lean_is_exclusive(x_9); +if (x_14 == 0) { return x_9; } else { -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_10, 0); -lean_inc(x_14); -lean_dec(x_10); -x_15 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_9, 0, x_15); -return x_9; -} -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_9, 0); x_16 = lean_ctor_get(x_9, 1); lean_inc(x_16); +lean_inc(x_15); lean_dec(x_9); -x_17 = lean_ctor_get(x_10, 0); -lean_inc(x_17); -if (lean_is_exclusive(x_10)) { - lean_ctor_release(x_10, 0); - x_18 = x_10; -} else { - lean_dec_ref(x_10); - x_18 = lean_box(0); +x_17 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_17, 0, x_15); +lean_ctor_set(x_17, 1, x_16); +return x_17; } -if (lean_is_scalar(x_18)) { - x_19 = lean_alloc_ctor(0, 1, 0); -} else { - x_19 = x_18; -} -lean_ctor_set(x_19, 0, x_17); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_16); -return x_20; -} -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_21 = lean_ctor_get(x_10, 0); -lean_inc(x_21); -lean_dec(x_10); -x_22 = lean_ctor_get(x_9, 1); -lean_inc(x_22); -lean_dec(x_9); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___closed__1; -x_25 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Formatter_categoryParser_formatter___spec__4___rarg), 7, 2); -lean_closure_set(x_25, 0, x_3); -lean_closure_set(x_25, 1, x_24); -x_26 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_25, x_4, x_23, x_6, x_7, x_22); -return x_26; } } } @@ -4998,194 +4042,64 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_parseToken(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; uint8_t x_9; -x_7 = l_Lean_PrettyPrinter_Formatter_getEnv___rarg(x_3, x_4, x_5, x_6); -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) +lean_object* x_7; uint8_t x_8; +x_7 = l_Lean_Core_getEnv___rarg(x_5, x_6); +x_8 = !lean_is_exclusive(x_7); +if (x_8 == 0) { -uint8_t x_10; -x_10 = !lean_is_exclusive(x_7); -if (x_10 == 0) -{ -lean_object* x_11; lean_object* x_12; uint8_t x_13; -x_11 = lean_ctor_get(x_8, 0); -x_12 = lean_ctor_get(x_7, 0); -lean_dec(x_12); -x_13 = !lean_is_exclusive(x_11); -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_14 = lean_ctor_get(x_11, 0); -x_15 = l_String_splitAux___main___closed__1; -x_16 = l_Lean_PrettyPrinter_Formatter_parseToken___closed__1; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_9 = lean_ctor_get(x_7, 0); +x_10 = l_String_splitAux___main___closed__1; +x_11 = l_Lean_PrettyPrinter_Formatter_parseToken___closed__1; lean_inc(x_1); -x_17 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_17, 0, x_1); -lean_ctor_set(x_17, 1, x_15); -lean_ctor_set(x_17, 2, x_16); -x_18 = lean_unsigned_to_nat(0u); -x_19 = 0; -x_20 = lean_alloc_ctor(0, 4, 1); -lean_ctor_set(x_20, 0, x_17); -lean_ctor_set(x_20, 1, x_18); -lean_ctor_set(x_20, 2, x_14); -lean_ctor_set(x_20, 3, x_2); -lean_ctor_set_uint8(x_20, sizeof(void*)*4, x_19); -x_21 = l_Lean_Parser_mkParserState(x_1); +x_12 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_12, 0, x_1); +lean_ctor_set(x_12, 1, x_10); +lean_ctor_set(x_12, 2, x_11); +x_13 = lean_unsigned_to_nat(0u); +x_14 = 0; +x_15 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_15, 0, x_12); +lean_ctor_set(x_15, 1, x_13); +lean_ctor_set(x_15, 2, x_9); +lean_ctor_set(x_15, 3, x_2); +lean_ctor_set_uint8(x_15, sizeof(void*)*4, x_14); +x_16 = l_Lean_Parser_mkParserState(x_1); lean_dec(x_1); -x_22 = l_Lean_Parser_tokenFn(x_20, x_21); -lean_ctor_set(x_11, 0, x_22); +x_17 = l_Lean_Parser_tokenFn(x_15, x_16); +lean_ctor_set(x_7, 0, x_17); return x_7; } else { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_23 = lean_ctor_get(x_11, 0); -x_24 = lean_ctor_get(x_11, 1); -lean_inc(x_24); -lean_inc(x_23); -lean_dec(x_11); -x_25 = l_String_splitAux___main___closed__1; -x_26 = l_Lean_PrettyPrinter_Formatter_parseToken___closed__1; -lean_inc(x_1); -x_27 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_27, 0, x_1); -lean_ctor_set(x_27, 1, x_25); -lean_ctor_set(x_27, 2, x_26); -x_28 = lean_unsigned_to_nat(0u); -x_29 = 0; -x_30 = lean_alloc_ctor(0, 4, 1); -lean_ctor_set(x_30, 0, x_27); -lean_ctor_set(x_30, 1, x_28); -lean_ctor_set(x_30, 2, x_23); -lean_ctor_set(x_30, 3, x_2); -lean_ctor_set_uint8(x_30, sizeof(void*)*4, x_29); -x_31 = l_Lean_Parser_mkParserState(x_1); -lean_dec(x_1); -x_32 = l_Lean_Parser_tokenFn(x_30, x_31); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_24); -lean_ctor_set(x_8, 0, x_33); -return x_7; -} -} -else -{ -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; uint8_t x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_34 = lean_ctor_get(x_8, 0); -x_35 = lean_ctor_get(x_7, 1); -lean_inc(x_35); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_18 = lean_ctor_get(x_7, 0); +x_19 = lean_ctor_get(x_7, 1); +lean_inc(x_19); +lean_inc(x_18); lean_dec(x_7); -x_36 = lean_ctor_get(x_34, 0); -lean_inc(x_36); -x_37 = lean_ctor_get(x_34, 1); -lean_inc(x_37); -if (lean_is_exclusive(x_34)) { - lean_ctor_release(x_34, 0); - lean_ctor_release(x_34, 1); - x_38 = x_34; -} else { - lean_dec_ref(x_34); - x_38 = lean_box(0); -} -x_39 = l_String_splitAux___main___closed__1; -x_40 = l_Lean_PrettyPrinter_Formatter_parseToken___closed__1; +x_20 = l_String_splitAux___main___closed__1; +x_21 = l_Lean_PrettyPrinter_Formatter_parseToken___closed__1; lean_inc(x_1); -x_41 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_41, 0, x_1); -lean_ctor_set(x_41, 1, x_39); -lean_ctor_set(x_41, 2, x_40); -x_42 = lean_unsigned_to_nat(0u); -x_43 = 0; -x_44 = lean_alloc_ctor(0, 4, 1); -lean_ctor_set(x_44, 0, x_41); -lean_ctor_set(x_44, 1, x_42); -lean_ctor_set(x_44, 2, x_36); -lean_ctor_set(x_44, 3, x_2); -lean_ctor_set_uint8(x_44, sizeof(void*)*4, x_43); -x_45 = l_Lean_Parser_mkParserState(x_1); +x_22 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_22, 0, x_1); +lean_ctor_set(x_22, 1, x_20); +lean_ctor_set(x_22, 2, x_21); +x_23 = lean_unsigned_to_nat(0u); +x_24 = 0; +x_25 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_25, 0, x_22); +lean_ctor_set(x_25, 1, x_23); +lean_ctor_set(x_25, 2, x_18); +lean_ctor_set(x_25, 3, x_2); +lean_ctor_set_uint8(x_25, sizeof(void*)*4, x_24); +x_26 = l_Lean_Parser_mkParserState(x_1); lean_dec(x_1); -x_46 = l_Lean_Parser_tokenFn(x_44, x_45); -if (lean_is_scalar(x_38)) { - x_47 = lean_alloc_ctor(0, 2, 0); -} else { - x_47 = x_38; -} -lean_ctor_set(x_47, 0, x_46); -lean_ctor_set(x_47, 1, x_37); -lean_ctor_set(x_8, 0, x_47); -x_48 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_48, 0, x_8); -lean_ctor_set(x_48, 1, x_35); -return x_48; -} -} -else -{ -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -x_49 = lean_ctor_get(x_8, 0); -lean_inc(x_49); -lean_dec(x_8); -x_50 = lean_ctor_get(x_7, 1); -lean_inc(x_50); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - lean_ctor_release(x_7, 1); - x_51 = x_7; -} else { - lean_dec_ref(x_7); - x_51 = lean_box(0); -} -x_52 = lean_ctor_get(x_49, 0); -lean_inc(x_52); -x_53 = lean_ctor_get(x_49, 1); -lean_inc(x_53); -if (lean_is_exclusive(x_49)) { - lean_ctor_release(x_49, 0); - lean_ctor_release(x_49, 1); - x_54 = x_49; -} else { - lean_dec_ref(x_49); - x_54 = lean_box(0); -} -x_55 = l_String_splitAux___main___closed__1; -x_56 = l_Lean_PrettyPrinter_Formatter_parseToken___closed__1; -lean_inc(x_1); -x_57 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_57, 0, x_1); -lean_ctor_set(x_57, 1, x_55); -lean_ctor_set(x_57, 2, x_56); -x_58 = lean_unsigned_to_nat(0u); -x_59 = 0; -x_60 = lean_alloc_ctor(0, 4, 1); -lean_ctor_set(x_60, 0, x_57); -lean_ctor_set(x_60, 1, x_58); -lean_ctor_set(x_60, 2, x_52); -lean_ctor_set(x_60, 3, x_2); -lean_ctor_set_uint8(x_60, sizeof(void*)*4, x_59); -x_61 = l_Lean_Parser_mkParserState(x_1); -lean_dec(x_1); -x_62 = l_Lean_Parser_tokenFn(x_60, x_61); -if (lean_is_scalar(x_54)) { - x_63 = lean_alloc_ctor(0, 2, 0); -} else { - x_63 = x_54; -} -lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_53); -x_64 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_64, 0, x_63); -if (lean_is_scalar(x_51)) { - x_65 = lean_alloc_ctor(0, 2, 0); -} else { - x_65 = x_51; -} -lean_ctor_set(x_65, 0, x_64); -lean_ctor_set(x_65, 1, x_50); -return x_65; +x_27 = l_Lean_Parser_tokenFn(x_25, x_26); +x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_19); +return x_28; } } } @@ -5196,402 +4110,397 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_parseToken(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); return x_7; } } lean_object* l_Lean_PrettyPrinter_Formatter_pushToken(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; -x_7 = lean_ctor_get(x_3, 0); -lean_inc(x_7); -x_8 = lean_ctor_get(x_3, 1); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_43; lean_object* x_44; uint8_t x_45; +x_7 = lean_io_ref_get(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_3, 2); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -x_10 = l_String_splitAux___main___closed__1; -x_11 = lean_string_dec_eq(x_8, x_10); -if (x_11 == 0) -{ -lean_object* x_12; uint8_t x_13; -x_12 = l_String_trimRight(x_1); -x_13 = lean_string_dec_eq(x_12, x_1); -lean_dec(x_12); -if (x_13 == 0) -{ -uint8_t x_14; -lean_dec(x_8); -x_14 = !lean_is_exclusive(x_3); -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; -x_15 = lean_ctor_get(x_3, 2); -lean_dec(x_15); -x_16 = lean_ctor_get(x_3, 1); -lean_dec(x_16); -x_17 = lean_ctor_get(x_3, 0); -lean_dec(x_17); -x_18 = l_String_trimLeft(x_1); -x_19 = lean_string_dec_eq(x_18, x_1); -lean_dec(x_18); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; -lean_ctor_set(x_3, 1, x_10); -x_20 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_20, 0, x_1); -x_21 = l_Lean_PrettyPrinter_Formatter_push(x_20, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_2); -return x_21; -} -else -{ -lean_object* x_22; lean_object* x_23; -lean_inc(x_1); -lean_ctor_set(x_3, 1, x_1); -x_22 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_22, 0, x_1); -x_23 = l_Lean_PrettyPrinter_Formatter_push(x_22, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_2); -return x_23; -} -} -else -{ -lean_object* x_24; uint8_t x_25; -lean_dec(x_3); -x_24 = l_String_trimLeft(x_1); -x_25 = lean_string_dec_eq(x_24, x_1); -lean_dec(x_24); -if (x_25 == 0) -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_26, 0, x_7); -lean_ctor_set(x_26, 1, x_10); -lean_ctor_set(x_26, 2, x_9); -x_27 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_27, 0, x_1); -x_28 = l_Lean_PrettyPrinter_Formatter_push(x_27, x_2, x_26, x_4, x_5, x_6); -lean_dec(x_2); -return x_28; -} -else -{ -lean_object* x_29; lean_object* x_30; lean_object* x_31; -lean_inc(x_1); -x_29 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_29, 0, x_7); -lean_ctor_set(x_29, 1, x_1); -lean_ctor_set(x_29, 2, x_9); -x_30 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_30, 0, x_1); -x_31 = l_Lean_PrettyPrinter_Formatter_push(x_30, x_2, x_29, x_4, x_5, x_6); -lean_dec(x_2); -return x_31; -} -} -} -else -{ -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; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; -lean_dec(x_9); lean_dec(x_7); -x_32 = l_String_trimLeft(x_1); -lean_inc(x_2); -lean_inc(x_32); -x_33 = l_Lean_PrettyPrinter_Formatter_parseToken(x_32, x_2, x_3, x_4, x_5, x_6); -x_34 = lean_ctor_get(x_33, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -lean_dec(x_34); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -lean_dec(x_33); -x_37 = lean_ctor_get(x_35, 0); -lean_inc(x_37); -x_38 = lean_ctor_get(x_35, 1); -lean_inc(x_38); -lean_dec(x_35); -lean_inc(x_32); -x_39 = lean_string_append(x_32, x_8); -lean_dec(x_8); -lean_inc(x_2); -x_40 = l_Lean_PrettyPrinter_Formatter_parseToken(x_39, x_2, x_38, x_4, x_5, x_36); -x_41 = lean_ctor_get(x_40, 0); -lean_inc(x_41); -x_42 = lean_ctor_get(x_41, 0); -lean_inc(x_42); -lean_dec(x_41); -x_43 = lean_ctor_get(x_40, 1); +x_43 = lean_ctor_get(x_8, 1); lean_inc(x_43); -lean_dec(x_40); -x_44 = lean_ctor_get(x_42, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_42, 1); -lean_inc(x_45); -lean_dec(x_42); -x_46 = lean_ctor_get(x_37, 1); -lean_inc(x_46); -lean_dec(x_37); -x_47 = lean_ctor_get(x_44, 1); -lean_inc(x_47); -lean_dec(x_44); -x_48 = lean_nat_dec_eq(x_46, x_47); -lean_dec(x_47); +lean_dec(x_8); +x_44 = l_String_splitAux___main___closed__1; +x_45 = lean_string_dec_eq(x_43, x_44); +if (x_45 == 0) +{ +lean_object* x_46; uint8_t x_47; +x_46 = l_String_trimRight(x_1); +x_47 = lean_string_dec_eq(x_46, x_1); lean_dec(x_46); -if (x_48 == 0) +if (x_47 == 0) { -uint8_t x_49; -x_49 = !lean_is_exclusive(x_45); -if (x_49 == 0) +lean_object* x_48; +lean_dec(x_43); +x_48 = lean_box(0); +x_10 = x_48; +goto block_42; +} +else { -lean_object* x_50; uint8_t x_51; -x_50 = lean_ctor_get(x_45, 1); +lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_59; +x_49 = l_String_trimLeft(x_1); +lean_inc(x_2); +lean_inc(x_49); +x_50 = l_Lean_PrettyPrinter_Formatter_parseToken(x_49, x_2, x_3, x_4, x_5, x_9); +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_ctor_get(x_50, 1); +lean_inc(x_52); lean_dec(x_50); -x_51 = lean_string_dec_eq(x_32, x_1); -lean_dec(x_32); -if (x_51 == 0) +lean_inc(x_49); +x_53 = lean_string_append(x_49, x_43); +lean_dec(x_43); +lean_inc(x_2); +x_54 = l_Lean_PrettyPrinter_Formatter_parseToken(x_53, x_2, x_3, x_4, x_5, x_52); +x_55 = lean_ctor_get(x_54, 0); +lean_inc(x_55); +x_56 = lean_ctor_get(x_54, 1); +lean_inc(x_56); +lean_dec(x_54); +x_57 = lean_ctor_get(x_51, 1); +lean_inc(x_57); +lean_dec(x_51); +x_58 = lean_ctor_get(x_55, 1); +lean_inc(x_58); +lean_dec(x_55); +x_59 = lean_nat_dec_eq(x_57, x_58); +lean_dec(x_58); +lean_dec(x_57); +if (x_59 == 0) { -lean_object* x_52; uint8_t x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -lean_ctor_set(x_45, 1, x_10); -x_52 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_52, 0, x_1); -x_53 = 0; -x_54 = l_Lean_Format_flatten___main___closed__1; -x_55 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_55, 0, x_52); -lean_ctor_set(x_55, 1, x_54); -lean_ctor_set_uint8(x_55, sizeof(void*)*2, x_53); -x_56 = l_Lean_PrettyPrinter_Formatter_push(x_55, x_2, x_45, x_4, x_5, x_43); -lean_dec(x_2); -return x_56; -} -else -{ -lean_object* x_57; uint8_t x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; -lean_inc(x_1); -lean_ctor_set(x_45, 1, x_1); -x_57 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_57, 0, x_1); -x_58 = 0; -x_59 = l_Lean_Format_flatten___main___closed__1; -x_60 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_60, 0, x_57); -lean_ctor_set(x_60, 1, x_59); -lean_ctor_set_uint8(x_60, sizeof(void*)*2, x_58); -x_61 = l_Lean_PrettyPrinter_Formatter_push(x_60, x_2, x_45, x_4, x_5, x_43); -lean_dec(x_2); -return x_61; -} -} -else -{ -lean_object* x_62; lean_object* x_63; uint8_t x_64; -x_62 = lean_ctor_get(x_45, 0); -x_63 = lean_ctor_get(x_45, 2); -lean_inc(x_63); +lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63; +x_60 = lean_io_ref_take(x_3, x_56); +x_61 = lean_ctor_get(x_60, 0); +lean_inc(x_61); +x_62 = lean_ctor_get(x_60, 1); lean_inc(x_62); -lean_dec(x_45); -x_64 = lean_string_dec_eq(x_32, x_1); -lean_dec(x_32); -if (x_64 == 0) +lean_dec(x_60); +x_63 = !lean_is_exclusive(x_61); +if (x_63 == 0) { -lean_object* x_65; lean_object* x_66; uint8_t x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; -x_65 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_65, 0, x_62); -lean_ctor_set(x_65, 1, x_10); -lean_ctor_set(x_65, 2, x_63); -x_66 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_66, 0, x_1); -x_67 = 0; -x_68 = l_Lean_Format_flatten___main___closed__1; -x_69 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_69, 0, x_66); -lean_ctor_set(x_69, 1, x_68); -lean_ctor_set_uint8(x_69, sizeof(void*)*2, x_67); -x_70 = l_Lean_PrettyPrinter_Formatter_push(x_69, x_2, x_65, x_4, x_5, x_43); +lean_object* x_64; uint8_t x_65; +x_64 = lean_ctor_get(x_61, 1); +lean_dec(x_64); +x_65 = lean_string_dec_eq(x_49, x_1); +lean_dec(x_49); +if (x_65 == 0) +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +lean_ctor_set(x_61, 1, x_44); +x_66 = lean_io_ref_set(x_3, x_61, x_62); +x_67 = lean_ctor_get(x_66, 1); +lean_inc(x_67); +lean_dec(x_66); +x_68 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_68, 0, x_1); +x_69 = 0; +x_70 = l_Lean_Format_flatten___main___closed__1; +x_71 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_71, 0, x_68); +lean_ctor_set(x_71, 1, x_70); +lean_ctor_set_uint8(x_71, sizeof(void*)*2, x_69); +x_72 = l_Lean_PrettyPrinter_Formatter_push(x_71, x_2, x_3, x_4, x_5, x_67); lean_dec(x_2); -return x_70; +return x_72; } else { -lean_object* x_71; lean_object* x_72; uint8_t x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; +lean_object* x_73; lean_object* x_74; lean_object* x_75; uint8_t x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_inc(x_1); -x_71 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_71, 0, x_62); -lean_ctor_set(x_71, 1, x_1); -lean_ctor_set(x_71, 2, x_63); -x_72 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_72, 0, x_1); -x_73 = 0; -x_74 = l_Lean_Format_flatten___main___closed__1; -x_75 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_75, 0, x_72); -lean_ctor_set(x_75, 1, x_74); -lean_ctor_set_uint8(x_75, sizeof(void*)*2, x_73); -x_76 = l_Lean_PrettyPrinter_Formatter_push(x_75, x_2, x_71, x_4, x_5, x_43); +lean_ctor_set(x_61, 1, x_1); +x_73 = lean_io_ref_set(x_3, x_61, x_62); +x_74 = lean_ctor_get(x_73, 1); +lean_inc(x_74); +lean_dec(x_73); +x_75 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_75, 0, x_1); +x_76 = 0; +x_77 = l_Lean_Format_flatten___main___closed__1; +x_78 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_78, 0, x_75); +lean_ctor_set(x_78, 1, x_77); +lean_ctor_set_uint8(x_78, sizeof(void*)*2, x_76); +x_79 = l_Lean_PrettyPrinter_Formatter_push(x_78, x_2, x_3, x_4, x_5, x_74); lean_dec(x_2); -return x_76; -} +return x_79; } } else { -uint8_t x_77; -x_77 = !lean_is_exclusive(x_45); -if (x_77 == 0) +lean_object* x_80; lean_object* x_81; uint8_t x_82; +x_80 = lean_ctor_get(x_61, 0); +x_81 = lean_ctor_get(x_61, 2); +lean_inc(x_81); +lean_inc(x_80); +lean_dec(x_61); +x_82 = lean_string_dec_eq(x_49, x_1); +lean_dec(x_49); +if (x_82 == 0) { -lean_object* x_78; uint8_t x_79; -x_78 = lean_ctor_get(x_45, 1); -x_79 = lean_string_dec_eq(x_32, x_1); -lean_dec(x_32); -if (x_79 == 0) -{ -lean_object* x_80; lean_object* x_81; -lean_dec(x_78); -lean_ctor_set(x_45, 1, x_10); -x_80 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_80, 0, x_1); -x_81 = l_Lean_PrettyPrinter_Formatter_push(x_80, x_2, x_45, x_4, x_5, x_43); -lean_dec(x_2); -return x_81; -} -else -{ -lean_object* x_82; lean_object* x_83; lean_object* x_84; -lean_inc(x_1); -x_82 = lean_string_append(x_1, x_78); -lean_dec(x_78); -lean_ctor_set(x_45, 1, x_82); -x_83 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_83, 0, x_1); -x_84 = l_Lean_PrettyPrinter_Formatter_push(x_83, x_2, x_45, x_4, x_5, x_43); -lean_dec(x_2); -return x_84; -} -} -else -{ -lean_object* x_85; lean_object* x_86; lean_object* x_87; uint8_t x_88; -x_85 = lean_ctor_get(x_45, 0); -x_86 = lean_ctor_get(x_45, 1); -x_87 = lean_ctor_get(x_45, 2); -lean_inc(x_87); -lean_inc(x_86); +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; uint8_t x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; +x_83 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_83, 0, x_80); +lean_ctor_set(x_83, 1, x_44); +lean_ctor_set(x_83, 2, x_81); +x_84 = lean_io_ref_set(x_3, x_83, x_62); +x_85 = lean_ctor_get(x_84, 1); lean_inc(x_85); -lean_dec(x_45); -x_88 = lean_string_dec_eq(x_32, x_1); -lean_dec(x_32); -if (x_88 == 0) -{ -lean_object* x_89; lean_object* x_90; lean_object* x_91; -lean_dec(x_86); -x_89 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_89, 0, x_85); -lean_ctor_set(x_89, 1, x_10); -lean_ctor_set(x_89, 2, x_87); -x_90 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_90, 0, x_1); -x_91 = l_Lean_PrettyPrinter_Formatter_push(x_90, x_2, x_89, x_4, x_5, x_43); +lean_dec(x_84); +x_86 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_86, 0, x_1); +x_87 = 0; +x_88 = l_Lean_Format_flatten___main___closed__1; +x_89 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_89, 0, x_86); +lean_ctor_set(x_89, 1, x_88); +lean_ctor_set_uint8(x_89, sizeof(void*)*2, x_87); +x_90 = l_Lean_PrettyPrinter_Formatter_push(x_89, x_2, x_3, x_4, x_5, x_85); lean_dec(x_2); -return x_91; +return x_90; } else { -lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; +lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; uint8_t x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_inc(x_1); -x_92 = lean_string_append(x_1, x_86); -lean_dec(x_86); -x_93 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_93, 0, x_85); -lean_ctor_set(x_93, 1, x_92); -lean_ctor_set(x_93, 2, x_87); +x_91 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_91, 0, x_80); +lean_ctor_set(x_91, 1, x_1); +lean_ctor_set(x_91, 2, x_81); +x_92 = lean_io_ref_set(x_3, x_91, x_62); +x_93 = lean_ctor_get(x_92, 1); +lean_inc(x_93); +lean_dec(x_92); x_94 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_94, 0, x_1); -x_95 = l_Lean_PrettyPrinter_Formatter_push(x_94, x_2, x_93, x_4, x_5, x_43); +x_95 = 0; +x_96 = l_Lean_Format_flatten___main___closed__1; +x_97 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_97, 0, x_94); +lean_ctor_set(x_97, 1, x_96); +lean_ctor_set_uint8(x_97, sizeof(void*)*2, x_95); +x_98 = l_Lean_PrettyPrinter_Formatter_push(x_97, x_2, x_3, x_4, x_5, x_93); lean_dec(x_2); -return x_95; -} -} +return x_98; } } } else { -uint8_t x_96; -lean_dec(x_8); -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_3, 2); -lean_dec(x_97); -x_98 = lean_ctor_get(x_3, 1); -lean_dec(x_98); -x_99 = lean_ctor_get(x_3, 0); +lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; +x_99 = lean_io_ref_take(x_3, x_56); +x_100 = lean_ctor_get(x_99, 0); +lean_inc(x_100); +x_101 = lean_ctor_get(x_99, 1); +lean_inc(x_101); lean_dec(x_99); -x_100 = l_String_trimLeft(x_1); -x_101 = lean_string_dec_eq(x_100, x_1); -lean_dec(x_100); -if (x_101 == 0) +x_102 = !lean_is_exclusive(x_100); +if (x_102 == 0) { -lean_object* x_102; lean_object* x_103; -lean_ctor_set(x_3, 1, x_10); -x_102 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_102, 0, x_1); -x_103 = l_Lean_PrettyPrinter_Formatter_push(x_102, x_2, x_3, x_4, x_5, x_6); +lean_object* x_103; uint8_t x_104; +x_103 = lean_ctor_get(x_100, 1); +x_104 = lean_string_dec_eq(x_49, x_1); +lean_dec(x_49); +if (x_104 == 0) +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; +lean_dec(x_103); +lean_ctor_set(x_100, 1, x_44); +x_105 = lean_io_ref_set(x_3, x_100, x_101); +x_106 = lean_ctor_get(x_105, 1); +lean_inc(x_106); +lean_dec(x_105); +x_107 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_107, 0, x_1); +x_108 = l_Lean_PrettyPrinter_Formatter_push(x_107, x_2, x_3, x_4, x_5, x_106); lean_dec(x_2); -return x_103; +return x_108; } else { -lean_object* x_104; lean_object* x_105; +lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_inc(x_1); -lean_ctor_set(x_3, 1, x_1); -x_104 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_104, 0, x_1); -x_105 = l_Lean_PrettyPrinter_Formatter_push(x_104, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_2); -return x_105; -} -} -else -{ -lean_object* x_106; uint8_t x_107; -lean_dec(x_3); -x_106 = l_String_trimLeft(x_1); -x_107 = lean_string_dec_eq(x_106, x_1); -lean_dec(x_106); -if (x_107 == 0) -{ -lean_object* x_108; lean_object* x_109; lean_object* x_110; -x_108 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_108, 0, x_7); -lean_ctor_set(x_108, 1, x_10); -lean_ctor_set(x_108, 2, x_9); -x_109 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_109, 0, x_1); -x_110 = l_Lean_PrettyPrinter_Formatter_push(x_109, x_2, x_108, x_4, x_5, x_6); -lean_dec(x_2); -return x_110; -} -else -{ -lean_object* x_111; lean_object* x_112; lean_object* x_113; -lean_inc(x_1); -x_111 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_111, 0, x_7); -lean_ctor_set(x_111, 1, x_1); -lean_ctor_set(x_111, 2, x_9); +x_109 = lean_string_append(x_1, x_103); +lean_dec(x_103); +lean_ctor_set(x_100, 1, x_109); +x_110 = lean_io_ref_set(x_3, x_100, x_101); +x_111 = lean_ctor_get(x_110, 1); +lean_inc(x_111); +lean_dec(x_110); x_112 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_112, 0, x_1); -x_113 = l_Lean_PrettyPrinter_Formatter_push(x_112, x_2, x_111, x_4, x_5, x_6); +x_113 = l_Lean_PrettyPrinter_Formatter_push(x_112, x_2, x_3, x_4, x_5, x_111); lean_dec(x_2); return x_113; } } +else +{ +lean_object* x_114; lean_object* x_115; lean_object* x_116; uint8_t x_117; +x_114 = lean_ctor_get(x_100, 0); +x_115 = lean_ctor_get(x_100, 1); +x_116 = lean_ctor_get(x_100, 2); +lean_inc(x_116); +lean_inc(x_115); +lean_inc(x_114); +lean_dec(x_100); +x_117 = lean_string_dec_eq(x_49, x_1); +lean_dec(x_49); +if (x_117 == 0) +{ +lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; +lean_dec(x_115); +x_118 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_118, 0, x_114); +lean_ctor_set(x_118, 1, x_44); +lean_ctor_set(x_118, 2, x_116); +x_119 = lean_io_ref_set(x_3, x_118, x_101); +x_120 = lean_ctor_get(x_119, 1); +lean_inc(x_120); +lean_dec(x_119); +x_121 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_121, 0, x_1); +x_122 = l_Lean_PrettyPrinter_Formatter_push(x_121, x_2, x_3, x_4, x_5, x_120); +lean_dec(x_2); +return x_122; +} +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_inc(x_1); +x_123 = lean_string_append(x_1, x_115); +lean_dec(x_115); +x_124 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_124, 0, x_114); +lean_ctor_set(x_124, 1, x_123); +lean_ctor_set(x_124, 2, x_116); +x_125 = lean_io_ref_set(x_3, x_124, x_101); +x_126 = lean_ctor_get(x_125, 1); +lean_inc(x_126); +lean_dec(x_125); +x_127 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_127, 0, x_1); +x_128 = l_Lean_PrettyPrinter_Formatter_push(x_127, x_2, x_3, x_4, x_5, x_126); +lean_dec(x_2); +return x_128; +} +} +} +} +} +else +{ +lean_object* x_129; +lean_dec(x_43); +x_129 = lean_box(0); +x_10 = x_129; +goto block_42; +} +block_42: +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +lean_dec(x_10); +x_11 = lean_io_ref_take(x_3, x_9); +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +lean_dec(x_11); +x_14 = !lean_is_exclusive(x_12); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; uint8_t x_17; +x_15 = lean_ctor_get(x_12, 1); +lean_dec(x_15); +x_16 = l_String_trimLeft(x_1); +x_17 = lean_string_dec_eq(x_16, x_1); +lean_dec(x_16); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_18 = l_String_splitAux___main___closed__1; +lean_ctor_set(x_12, 1, x_18); +x_19 = lean_io_ref_set(x_3, x_12, x_13); +x_20 = lean_ctor_get(x_19, 1); +lean_inc(x_20); +lean_dec(x_19); +x_21 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_21, 0, x_1); +x_22 = l_Lean_PrettyPrinter_Formatter_push(x_21, x_2, x_3, x_4, x_5, x_20); +lean_dec(x_2); +return x_22; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_inc(x_1); +lean_ctor_set(x_12, 1, x_1); +x_23 = lean_io_ref_set(x_3, x_12, x_13); +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +lean_dec(x_23); +x_25 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_25, 0, x_1); +x_26 = l_Lean_PrettyPrinter_Formatter_push(x_25, x_2, x_3, x_4, x_5, x_24); +lean_dec(x_2); +return x_26; +} +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; +x_27 = lean_ctor_get(x_12, 0); +x_28 = lean_ctor_get(x_12, 2); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_12); +x_29 = l_String_trimLeft(x_1); +x_30 = lean_string_dec_eq(x_29, x_1); +lean_dec(x_29); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_31 = l_String_splitAux___main___closed__1; +x_32 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_32, 0, x_27); +lean_ctor_set(x_32, 1, x_31); +lean_ctor_set(x_32, 2, x_28); +x_33 = lean_io_ref_set(x_3, x_32, x_13); +x_34 = lean_ctor_get(x_33, 1); +lean_inc(x_34); +lean_dec(x_33); +x_35 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_35, 0, x_1); +x_36 = l_Lean_PrettyPrinter_Formatter_push(x_35, x_2, x_3, x_4, x_5, x_34); +lean_dec(x_2); +return x_36; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +lean_inc(x_1); +x_37 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_37, 0, x_27); +lean_ctor_set(x_37, 1, x_1); +lean_ctor_set(x_37, 2, x_28); +x_38 = lean_io_ref_set(x_3, x_37, x_13); +x_39 = lean_ctor_get(x_38, 1); +lean_inc(x_39); +lean_dec(x_38); +x_40 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_40, 0, x_1); +x_41 = l_Lean_PrettyPrinter_Formatter_push(x_40, x_2, x_3, x_4, x_5, x_39); +lean_dec(x_2); +return x_41; +} +} } } } @@ -5602,27 +4511,20 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_pushToken(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); return x_7; } } lean_object* l_Lean_PrettyPrinter_Formatter_symbol_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +lean_object* x_7; lean_object* x_8; lean_object* x_9; x_7 = l_Lean_PrettyPrinter_Formatter_pushToken(x_1, x_2, x_3, x_4, x_5, x_6); -x_8 = lean_ctor_get(x_7, 0); +x_8 = lean_ctor_get(x_7, 1); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -x_12 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_11, x_4, x_5, x_10); -return x_12; +x_9 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_8); +return x_9; } } lean_object* l_Lean_PrettyPrinter_Formatter_symbol_formatter___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) { @@ -5632,6 +4534,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_symbol_formatter(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); return x_7; } } @@ -5650,6 +4553,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_symbolNoWs_formatter(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); return x_7; } } @@ -5668,6 +4572,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_nonReservedSymbol_formatter(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); return x_7; } } @@ -5702,101 +4607,76 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); +x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 1); -lean_inc(x_11); lean_dec(x_8); -x_12 = lean_ctor_get(x_10, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); -lean_dec(x_10); -if (lean_obj_tag(x_12) == 2) +if (lean_obj_tag(x_9) == 2) { -lean_object* x_27; lean_object* x_28; uint8_t x_29; -x_27 = lean_ctor_get(x_12, 1); -lean_inc(x_27); -lean_dec(x_12); -x_28 = l_String_trim(x_1); -x_29 = lean_string_dec_eq(x_27, x_28); -lean_dec(x_28); +lean_object* x_24; lean_object* x_25; uint8_t x_26; +x_24 = lean_ctor_get(x_9, 1); +lean_inc(x_24); +lean_dec(x_9); +x_25 = l_String_trim(x_1); +x_26 = lean_string_dec_eq(x_24, x_25); +lean_dec(x_25); +lean_dec(x_24); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_dec(x_1); +x_27 = l_Lean_PrettyPrinter_Formatter_pushToken(x_2, x_3, x_4, x_5, x_6, x_10); +x_28 = lean_ctor_get(x_27, 1); +lean_inc(x_28); lean_dec(x_27); -if (x_29 == 0) +x_29 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_28); +return x_29; +} +else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -lean_dec(x_1); -x_30 = l_Lean_PrettyPrinter_Formatter_pushToken(x_2, x_3, x_13, x_5, x_6, x_11); -x_31 = lean_ctor_get(x_30, 0); +lean_object* x_30; lean_object* x_31; lean_object* x_32; +lean_dec(x_2); +x_30 = l_Lean_PrettyPrinter_Formatter_pushToken(x_1, x_3, x_4, x_5, x_6, x_10); +x_31 = lean_ctor_get(x_30, 1); lean_inc(x_31); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -lean_dec(x_31); -x_33 = lean_ctor_get(x_30, 1); -lean_inc(x_33); lean_dec(x_30); -x_34 = lean_ctor_get(x_32, 1); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_34, x_5, x_6, x_33); -return x_35; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_dec(x_2); -x_36 = l_Lean_PrettyPrinter_Formatter_pushToken(x_1, x_3, x_13, x_5, x_6, x_11); -x_37 = lean_ctor_get(x_36, 0); -lean_inc(x_37); -x_38 = lean_ctor_get(x_37, 0); -lean_inc(x_38); -lean_dec(x_37); -x_39 = lean_ctor_get(x_36, 1); -lean_inc(x_39); -lean_dec(x_36); -x_40 = lean_ctor_get(x_38, 1); -lean_inc(x_40); -lean_dec(x_38); -x_41 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_40, x_5, x_6, x_39); -return x_41; +x_32 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_31); +return x_32; } } else { -lean_object* x_42; +lean_object* x_33; +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_42 = lean_box(0); -x_14 = x_42; -goto block_26; +x_33 = lean_box(0); +x_11 = x_33; +goto block_23; } -block_26: +block_23: { -lean_object* x_15; uint8_t x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -lean_dec(x_14); -x_15 = lean_box(0); -x_16 = 0; -x_17 = lean_unsigned_to_nat(0u); -x_18 = l_Lean_Syntax_formatStxAux___main(x_15, x_16, x_17, x_12); -x_19 = l_Lean_Options_empty; -x_20 = l_Lean_Format_pretty(x_18, x_19); -x_21 = lean_alloc_ctor(2, 1, 0); +lean_object* x_12; uint8_t x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_dec(x_11); +x_12 = lean_box(0); +x_13 = 0; +x_14 = lean_unsigned_to_nat(0u); +x_15 = l_Lean_Syntax_formatStxAux___main(x_12, x_13, x_14, x_9); +x_16 = l_Lean_Options_empty; +x_17 = l_Lean_Format_pretty(x_15, x_16); +x_18 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_18, 0, x_17); +x_19 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_19, 0, x_18); +x_20 = l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__3; +x_21 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_21, 0, x_20); -x_22 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_22, 0, x_21); -x_23 = l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__3; -x_24 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_22); -x_25 = l_Lean_PrettyPrinter_Formatter_throwError___rarg(x_24, x_3, x_13, x_5, x_6, x_11); -lean_dec(x_13); -lean_dec(x_3); -return x_25; +lean_ctor_set(x_21, 1, x_19); +x_22 = l_Lean_Core_throwError___rarg(x_21, x_5, x_6, x_10); +return x_22; } } } @@ -5807,6 +4687,7 @@ lean_object* x_8; x_8 = l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); return x_8; } } @@ -5865,7 +4746,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_1 = l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___lambda__1___closed__1; -x_2 = lean_unsigned_to_nat(313u); +x_2 = lean_unsigned_to_nat(321u); x_3 = lean_unsigned_to_nat(35u); x_4 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -5891,250 +4772,163 @@ return x_1; lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; lean_object* x_8; +lean_object* x_6; lean_object* x_7; x_6 = l_Lean_identKind; x_7 = l_Lean_PrettyPrinter_Formatter_checkKind(x_6, x_1, x_2, x_3, x_4, x_5); -x_8 = lean_ctor_get(x_7, 0); +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; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +x_8 = lean_ctor_get(x_7, 1); lean_inc(x_8); -if (lean_obj_tag(x_8) == 0) -{ -uint8_t x_9; -lean_dec(x_1); -x_9 = !lean_is_exclusive(x_7); -if (x_9 == 0) -{ -lean_object* x_10; uint8_t x_11; -x_10 = lean_ctor_get(x_7, 0); -lean_dec(x_10); -x_11 = !lean_is_exclusive(x_8); -if (x_11 == 0) -{ -return x_7; -} -else -{ -lean_object* x_12; lean_object* x_13; -x_12 = lean_ctor_get(x_8, 0); +lean_dec(x_7); +x_9 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_2, x_3, x_4, x_8); +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 = l_Lean_Syntax_getId(x_10); +x_13 = l_Lean_Name_toString___closed__1; lean_inc(x_12); -lean_dec(x_8); -x_13 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_7, 0, x_13); +x_14 = l_Lean_Name_toStringWithSep___main(x_13, x_12); +lean_inc(x_1); +lean_inc(x_14); +x_15 = l_Lean_PrettyPrinter_Formatter_parseToken(x_14, x_1, x_2, x_3, x_4, x_11); +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_41 = lean_ctor_get(x_16, 0); +lean_inc(x_41); +x_42 = l_Lean_mkOptionalNode___closed__2; +lean_inc(x_10); +x_43 = lean_array_push(x_42, x_10); +x_44 = lean_array_get_size(x_41); +x_45 = lean_array_get_size(x_43); +x_46 = lean_nat_dec_eq(x_44, x_45); +lean_dec(x_45); +lean_dec(x_44); +if (x_46 == 0) +{ +lean_object* x_47; +lean_dec(x_43); +lean_dec(x_41); +lean_dec(x_16); +lean_dec(x_14); +lean_dec(x_10); +x_47 = lean_box(0); +x_18 = x_47; +goto block_40; +} +else +{ +lean_object* x_48; uint8_t x_49; +x_48 = lean_unsigned_to_nat(0u); +x_49 = l_Array_isEqvAux___main___at_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___spec__1(x_10, x_16, lean_box(0), x_41, x_43, x_48); +lean_dec(x_43); +lean_dec(x_41); +lean_dec(x_16); +lean_dec(x_10); +if (x_49 == 0) +{ +lean_object* x_50; +lean_dec(x_14); +x_50 = lean_box(0); +x_18 = x_50; +goto block_40; +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; +lean_dec(x_12); +x_51 = l_Lean_PrettyPrinter_Formatter_pushToken(x_14, x_1, x_2, x_3, x_4, x_17); +x_52 = lean_ctor_get(x_51, 1); +lean_inc(x_52); +lean_dec(x_51); +x_53 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_2, x_3, x_4, x_52); +return x_53; +} +} +block_40: +{ +lean_dec(x_18); +if (lean_obj_tag(x_12) == 1) +{ +lean_object* x_19; +x_19 = lean_ctor_get(x_12, 0); +lean_inc(x_19); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_20 = lean_ctor_get(x_12, 1); +lean_inc(x_20); +lean_dec(x_12); +x_21 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__3; +x_22 = lean_string_append(x_21, x_20); +lean_dec(x_20); +x_23 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__4; +x_24 = lean_string_append(x_22, x_23); +x_25 = l_Lean_PrettyPrinter_Formatter_pushToken(x_24, x_1, x_2, x_3, x_4, x_17); +x_26 = lean_ctor_get(x_25, 1); +lean_inc(x_26); +lean_dec(x_25); +x_27 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_2, x_3, x_4, x_26); +return x_27; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_19); +lean_dec(x_12); +x_28 = l_String_Inhabited; +x_29 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__2; +x_30 = lean_panic_fn(x_28, x_29); +x_31 = l_Lean_PrettyPrinter_Formatter_pushToken(x_30, x_1, x_2, x_3, x_4, x_17); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_2, x_3, x_4, x_32); +return x_33; +} +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +lean_dec(x_12); +x_34 = l_String_Inhabited; +x_35 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__2; +x_36 = lean_panic_fn(x_34, x_35); +x_37 = l_Lean_PrettyPrinter_Formatter_pushToken(x_36, x_1, x_2, x_3, x_4, x_17); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_2, x_3, x_4, x_38); +return x_39; +} +} +} +else +{ +uint8_t x_54; +lean_dec(x_1); +x_54 = !lean_is_exclusive(x_7); +if (x_54 == 0) +{ return x_7; } -} else { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_ctor_get(x_7, 1); -lean_inc(x_14); -lean_dec(x_7); -x_15 = lean_ctor_get(x_8, 0); -lean_inc(x_15); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - x_16 = x_8; -} else { - lean_dec_ref(x_8); - x_16 = lean_box(0); -} -if (lean_is_scalar(x_16)) { - x_17 = lean_alloc_ctor(0, 1, 0); -} else { - x_17 = x_16; -} -lean_ctor_set(x_17, 0, x_15); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_14); -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_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; uint8_t x_74; -x_19 = lean_ctor_get(x_8, 0); -lean_inc(x_19); -lean_dec(x_8); -x_20 = lean_ctor_get(x_7, 1); -lean_inc(x_20); -lean_dec(x_7); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); -lean_dec(x_19); -x_22 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_21, x_3, x_4, x_20); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -lean_dec(x_23); -x_25 = lean_ctor_get(x_22, 1); -lean_inc(x_25); -lean_dec(x_22); -x_26 = lean_ctor_get(x_24, 0); -lean_inc(x_26); -x_27 = lean_ctor_get(x_24, 1); -lean_inc(x_27); -lean_dec(x_24); -x_28 = l_Lean_Syntax_getId(x_26); -x_29 = l_Lean_Name_toString___closed__1; -lean_inc(x_28); -x_30 = l_Lean_Name_toStringWithSep___main(x_29, x_28); -lean_inc(x_1); -lean_inc(x_30); -x_31 = l_Lean_PrettyPrinter_Formatter_parseToken(x_30, x_1, x_27, x_3, x_4, x_25); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -lean_dec(x_32); -x_34 = lean_ctor_get(x_31, 1); -lean_inc(x_34); -lean_dec(x_31); -x_35 = lean_ctor_get(x_33, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -lean_dec(x_33); -x_69 = lean_ctor_get(x_35, 0); -lean_inc(x_69); -x_70 = l_Lean_mkOptionalNode___closed__2; -lean_inc(x_26); -x_71 = lean_array_push(x_70, x_26); -x_72 = lean_array_get_size(x_69); -x_73 = lean_array_get_size(x_71); -x_74 = lean_nat_dec_eq(x_72, x_73); -lean_dec(x_73); -lean_dec(x_72); -if (x_74 == 0) -{ -lean_object* x_75; -lean_dec(x_71); -lean_dec(x_69); -lean_dec(x_35); -lean_dec(x_30); -lean_dec(x_26); -x_75 = lean_box(0); -x_37 = x_75; -goto block_68; -} -else -{ -lean_object* x_76; uint8_t x_77; -x_76 = lean_unsigned_to_nat(0u); -x_77 = l_Array_isEqvAux___main___at_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___spec__1(x_26, x_35, lean_box(0), x_69, x_71, x_76); -lean_dec(x_71); -lean_dec(x_69); -lean_dec(x_35); -lean_dec(x_26); -if (x_77 == 0) -{ -lean_object* x_78; -lean_dec(x_30); -x_78 = lean_box(0); -x_37 = x_78; -goto block_68; -} -else -{ -lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; -lean_dec(x_28); -x_79 = l_Lean_PrettyPrinter_Formatter_pushToken(x_30, x_1, x_36, x_3, x_4, x_34); -x_80 = lean_ctor_get(x_79, 0); -lean_inc(x_80); -x_81 = lean_ctor_get(x_80, 0); -lean_inc(x_81); -lean_dec(x_80); -x_82 = lean_ctor_get(x_79, 1); -lean_inc(x_82); -lean_dec(x_79); -x_83 = lean_ctor_get(x_81, 1); -lean_inc(x_83); -lean_dec(x_81); -x_84 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_83, x_3, x_4, x_82); -return x_84; -} -} -block_68: -{ -lean_dec(x_37); -if (lean_obj_tag(x_28) == 1) -{ -lean_object* x_38; -x_38 = lean_ctor_get(x_28, 0); -lean_inc(x_38); -if (lean_obj_tag(x_38) == 0) -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_39 = lean_ctor_get(x_28, 1); -lean_inc(x_39); -lean_dec(x_28); -x_40 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__3; -x_41 = lean_string_append(x_40, x_39); -lean_dec(x_39); -x_42 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__4; -x_43 = lean_string_append(x_41, x_42); -x_44 = l_Lean_PrettyPrinter_Formatter_pushToken(x_43, x_1, x_36, x_3, x_4, x_34); -x_45 = lean_ctor_get(x_44, 0); -lean_inc(x_45); -x_46 = lean_ctor_get(x_45, 0); -lean_inc(x_46); -lean_dec(x_45); -x_47 = lean_ctor_get(x_44, 1); -lean_inc(x_47); -lean_dec(x_44); -x_48 = lean_ctor_get(x_46, 1); -lean_inc(x_48); -lean_dec(x_46); -x_49 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_48, x_3, x_4, x_47); -return x_49; -} -else -{ -lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; -lean_dec(x_38); -lean_dec(x_28); -x_50 = l_String_Inhabited; -x_51 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__2; -x_52 = lean_panic_fn(x_50, x_51); -x_53 = l_Lean_PrettyPrinter_Formatter_pushToken(x_52, x_1, x_36, x_3, x_4, x_34); -x_54 = lean_ctor_get(x_53, 0); -lean_inc(x_54); -x_55 = lean_ctor_get(x_54, 0); -lean_inc(x_55); -lean_dec(x_54); -x_56 = lean_ctor_get(x_53, 1); +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_7, 0); +x_56 = lean_ctor_get(x_7, 1); lean_inc(x_56); -lean_dec(x_53); -x_57 = lean_ctor_get(x_55, 1); -lean_inc(x_57); -lean_dec(x_55); -x_58 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_57, x_3, x_4, x_56); -return x_58; -} -} -else -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; -lean_dec(x_28); -x_59 = l_String_Inhabited; -x_60 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__2; -x_61 = lean_panic_fn(x_59, x_60); -x_62 = l_Lean_PrettyPrinter_Formatter_pushToken(x_61, x_1, x_36, x_3, x_4, x_34); -x_63 = lean_ctor_get(x_62, 0); -lean_inc(x_63); -x_64 = lean_ctor_get(x_63, 0); -lean_inc(x_64); -lean_dec(x_63); -x_65 = lean_ctor_get(x_62, 1); -lean_inc(x_65); -lean_dec(x_62); -x_66 = lean_ctor_get(x_64, 1); -lean_inc(x_66); -lean_dec(x_64); -x_67 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_66, x_3, x_4, x_65); -return x_67; -} +lean_inc(x_55); +lean_dec(x_7); +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +return x_57; } } } @@ -6159,115 +4953,61 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } lean_object* l_Lean_PrettyPrinter_Formatter_rawIdent_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; lean_object* x_8; +lean_object* x_6; lean_object* x_7; x_6 = l_Lean_identKind; x_7 = l_Lean_PrettyPrinter_Formatter_checkKind(x_6, x_1, x_2, x_3, x_4, x_5); -x_8 = lean_ctor_get(x_7, 0); +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; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_8 = lean_ctor_get(x_7, 1); lean_inc(x_8); -if (lean_obj_tag(x_8) == 0) -{ -uint8_t x_9; -lean_dec(x_1); -x_9 = !lean_is_exclusive(x_7); -if (x_9 == 0) -{ -lean_object* x_10; uint8_t x_11; -x_10 = lean_ctor_get(x_7, 0); -lean_dec(x_10); -x_11 = !lean_is_exclusive(x_8); -if (x_11 == 0) -{ -return x_7; -} -else -{ -lean_object* x_12; lean_object* x_13; -x_12 = lean_ctor_get(x_8, 0); -lean_inc(x_12); -lean_dec(x_8); -x_13 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_7, 0, x_13); -return x_7; -} -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_ctor_get(x_7, 1); -lean_inc(x_14); lean_dec(x_7); -x_15 = lean_ctor_get(x_8, 0); -lean_inc(x_15); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - x_16 = x_8; -} else { - lean_dec_ref(x_8); - x_16 = lean_box(0); -} -if (lean_is_scalar(x_16)) { - x_17 = lean_alloc_ctor(0, 1, 0); -} else { - x_17 = x_16; -} -lean_ctor_set(x_17, 0, x_15); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_14); -return x_18; -} +x_9 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_2, x_3, x_4, x_8); +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 = l_Lean_Syntax_getId(x_10); +lean_dec(x_10); +x_13 = l_Lean_Name_toString___closed__1; +x_14 = l_Lean_Name_toStringWithSep___main(x_13, x_12); +x_15 = l_Lean_PrettyPrinter_Formatter_pushToken(x_14, x_1, x_2, x_3, x_4, x_11); +x_16 = lean_ctor_get(x_15, 1); +lean_inc(x_16); +lean_dec(x_15); +x_17 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_2, x_3, x_4, x_16); +return x_17; } else { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_19 = lean_ctor_get(x_8, 0); -lean_inc(x_19); -lean_dec(x_8); +uint8_t x_18; +lean_dec(x_1); +x_18 = !lean_is_exclusive(x_7); +if (x_18 == 0) +{ +return x_7; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_19 = lean_ctor_get(x_7, 0); x_20 = lean_ctor_get(x_7, 1); lean_inc(x_20); +lean_inc(x_19); lean_dec(x_7); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); -lean_dec(x_19); -x_22 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_21, x_3, x_4, x_20); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -lean_dec(x_23); -x_25 = lean_ctor_get(x_22, 1); -lean_inc(x_25); -lean_dec(x_22); -x_26 = lean_ctor_get(x_24, 0); -lean_inc(x_26); -x_27 = lean_ctor_get(x_24, 1); -lean_inc(x_27); -lean_dec(x_24); -x_28 = l_Lean_Syntax_getId(x_26); -lean_dec(x_26); -x_29 = l_Lean_Name_toString___closed__1; -x_30 = l_Lean_Name_toStringWithSep___main(x_29, x_28); -x_31 = l_Lean_PrettyPrinter_Formatter_pushToken(x_30, x_1, x_27, x_3, x_4, x_25); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -lean_dec(x_32); -x_34 = lean_ctor_get(x_31, 1); -lean_inc(x_34); -lean_dec(x_31); -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); -x_36 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_35, x_3, x_4, x_34); -return x_36; +x_21 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_20); +return x_21; +} } } } @@ -6278,6 +5018,7 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_rawIdent_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -6296,333 +5037,146 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_identEq_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } lean_object* l_Lean_PrettyPrinter_Formatter_visitAtom(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_39; uint8_t x_40; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_dec(x_9); -x_13 = lean_box(0); -x_14 = lean_name_eq(x_1, x_13); -if (x_14 == 0) +x_39 = lean_box(0); +x_40 = lean_name_eq(x_1, x_39); +if (x_40 == 0) { -lean_object* x_15; lean_object* x_16; -x_15 = l_Lean_PrettyPrinter_Formatter_checkKind(x_1, x_2, x_12, x_4, x_5, x_10); -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -if (lean_obj_tag(x_16) == 0) +lean_object* x_41; +x_41 = l_Lean_PrettyPrinter_Formatter_checkKind(x_1, x_2, x_3, x_4, x_5, x_9); +if (lean_obj_tag(x_41) == 0) { -uint8_t x_17; -lean_dec(x_11); +lean_object* x_42; +x_42 = lean_ctor_get(x_41, 1); +lean_inc(x_42); +lean_dec(x_41); +x_10 = x_42; +goto block_38; +} +else +{ +uint8_t x_43; +lean_dec(x_8); lean_dec(x_2); -x_17 = !lean_is_exclusive(x_15); -if (x_17 == 0) +x_43 = !lean_is_exclusive(x_41); +if (x_43 == 0) { -lean_object* x_18; uint8_t x_19; -x_18 = lean_ctor_get(x_15, 0); -lean_dec(x_18); -x_19 = !lean_is_exclusive(x_16); -if (x_19 == 0) -{ -return x_15; +return x_41; } else { -lean_object* x_20; lean_object* x_21; -x_20 = lean_ctor_get(x_16, 0); -lean_inc(x_20); -lean_dec(x_16); -x_21 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_15, 0, x_21); -return x_15; -} -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_22 = lean_ctor_get(x_15, 1); -lean_inc(x_22); -lean_dec(x_15); -x_23 = lean_ctor_get(x_16, 0); -lean_inc(x_23); -if (lean_is_exclusive(x_16)) { - lean_ctor_release(x_16, 0); - x_24 = x_16; -} else { - lean_dec_ref(x_16); - x_24 = lean_box(0); -} -if (lean_is_scalar(x_24)) { - x_25 = lean_alloc_ctor(0, 1, 0); -} else { - x_25 = x_24; -} -lean_ctor_set(x_25, 0, x_23); -x_26 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_26, 1, x_22); -return x_26; -} -} -else -{ -lean_object* x_27; -x_27 = lean_ctor_get(x_16, 0); -lean_inc(x_27); -lean_dec(x_16); -switch (lean_obj_tag(x_11)) { -case 1: -{ -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_28 = lean_ctor_get(x_15, 1); -lean_inc(x_28); -lean_dec(x_15); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = lean_ctor_get(x_11, 1); -lean_inc(x_30); -x_31 = l_Lean_Syntax_inhabited; -x_32 = lean_unsigned_to_nat(0u); -x_33 = lean_array_get(x_31, x_30, x_32); -lean_dec(x_30); -if (lean_obj_tag(x_33) == 2) -{ -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; -lean_dec(x_11); -x_46 = lean_ctor_get(x_33, 1); -lean_inc(x_46); -lean_dec(x_33); -x_47 = l_Lean_PrettyPrinter_Formatter_pushToken(x_46, x_2, x_29, x_4, x_5, x_28); -x_48 = lean_ctor_get(x_47, 0); -lean_inc(x_48); -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -lean_dec(x_48); -x_50 = lean_ctor_get(x_47, 1); -lean_inc(x_50); -lean_dec(x_47); -x_51 = lean_ctor_get(x_49, 1); -lean_inc(x_51); -lean_dec(x_49); -x_52 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_51, x_4, x_5, x_50); -return x_52; -} -else -{ -lean_object* x_53; -lean_dec(x_33); -x_53 = lean_box(0); -x_34 = x_53; -goto block_45; -} -block_45: -{ -lean_object* x_35; uint8_t x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; -lean_dec(x_34); -x_35 = lean_box(0); -x_36 = 0; -x_37 = l_Lean_Syntax_formatStxAux___main(x_35, x_36, x_32, x_11); -x_38 = l_Lean_Options_empty; -x_39 = l_Lean_Format_pretty(x_37, x_38); -x_40 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_40, 0, x_39); -x_41 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_41, 0, x_40); -x_42 = l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__3; -x_43 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_43, 0, x_42); -lean_ctor_set(x_43, 1, x_41); -x_44 = l_Lean_PrettyPrinter_Formatter_throwError___rarg(x_43, x_2, x_29, x_4, x_5, x_28); -lean_dec(x_29); -lean_dec(x_2); -return x_44; -} -} -case 2: -{ -lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; -x_54 = lean_ctor_get(x_15, 1); -lean_inc(x_54); -lean_dec(x_15); -x_55 = lean_ctor_get(x_27, 1); -lean_inc(x_55); -lean_dec(x_27); -x_56 = lean_ctor_get(x_11, 1); -lean_inc(x_56); -lean_dec(x_11); -x_57 = l_Lean_PrettyPrinter_Formatter_pushToken(x_56, x_2, x_55, x_4, x_5, x_54); -x_58 = lean_ctor_get(x_57, 0); -lean_inc(x_58); -x_59 = lean_ctor_get(x_58, 0); -lean_inc(x_59); -lean_dec(x_58); -x_60 = lean_ctor_get(x_57, 1); -lean_inc(x_60); -lean_dec(x_57); -x_61 = lean_ctor_get(x_59, 1); -lean_inc(x_61); -lean_dec(x_59); -x_62 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_61, x_4, x_5, x_60); -return x_62; -} -default: -{ -lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_63 = lean_ctor_get(x_15, 1); -lean_inc(x_63); -lean_dec(x_15); -x_64 = lean_ctor_get(x_27, 1); -lean_inc(x_64); -lean_dec(x_27); -x_65 = lean_box(0); -x_66 = 0; -x_67 = lean_unsigned_to_nat(0u); -x_68 = l_Lean_Syntax_formatStxAux___main(x_65, x_66, x_67, x_11); -x_69 = l_Lean_Options_empty; -x_70 = l_Lean_Format_pretty(x_68, x_69); -x_71 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_71, 0, x_70); -x_72 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_72, 0, x_71); -x_73 = l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__3; -x_74 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_74, 0, x_73); -lean_ctor_set(x_74, 1, x_72); -x_75 = l_Lean_PrettyPrinter_Formatter_throwError___rarg(x_74, x_2, x_64, x_4, x_5, x_63); -lean_dec(x_64); -lean_dec(x_2); -return x_75; -} +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_41, 0); +x_45 = lean_ctor_get(x_41, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_41); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; } } } else { lean_dec(x_1); -switch (lean_obj_tag(x_11)) { +x_10 = x_9; +goto block_38; +} +block_38: +{ +lean_object* x_11; +switch (lean_obj_tag(x_8)) { case 1: { -lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; -x_76 = lean_ctor_get(x_11, 1); -lean_inc(x_76); -x_77 = l_Lean_Syntax_inhabited; -x_78 = lean_unsigned_to_nat(0u); -x_79 = lean_array_get(x_77, x_76, x_78); -lean_dec(x_76); -if (lean_obj_tag(x_79) == 2) +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_24 = lean_ctor_get(x_8, 1); +lean_inc(x_24); +x_25 = l_Lean_Syntax_inhabited; +x_26 = lean_unsigned_to_nat(0u); +x_27 = lean_array_get(x_25, x_24, x_26); +lean_dec(x_24); +if (lean_obj_tag(x_27) == 2) { -lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; -lean_dec(x_11); -x_92 = lean_ctor_get(x_79, 1); -lean_inc(x_92); -lean_dec(x_79); -x_93 = l_Lean_PrettyPrinter_Formatter_pushToken(x_92, x_2, x_12, x_4, x_5, x_10); -x_94 = lean_ctor_get(x_93, 0); -lean_inc(x_94); -x_95 = lean_ctor_get(x_94, 0); -lean_inc(x_95); -lean_dec(x_94); -x_96 = lean_ctor_get(x_93, 1); -lean_inc(x_96); -lean_dec(x_93); -x_97 = lean_ctor_get(x_95, 1); -lean_inc(x_97); -lean_dec(x_95); -x_98 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_97, x_4, x_5, x_96); -return x_98; +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +lean_dec(x_8); +x_28 = lean_ctor_get(x_27, 1); +lean_inc(x_28); +lean_dec(x_27); +x_29 = l_Lean_PrettyPrinter_Formatter_pushToken(x_28, x_2, x_3, x_4, x_5, x_10); +x_30 = lean_ctor_get(x_29, 1); +lean_inc(x_30); +lean_dec(x_29); +x_31 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_30); +return x_31; } else { -lean_object* x_99; -lean_dec(x_79); -x_99 = lean_box(0); -x_80 = x_99; -goto block_91; -} -block_91: -{ -lean_object* x_81; uint8_t 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_dec(x_80); -x_81 = lean_box(0); -x_82 = 0; -x_83 = l_Lean_Syntax_formatStxAux___main(x_81, x_82, x_78, x_11); -x_84 = l_Lean_Options_empty; -x_85 = l_Lean_Format_pretty(x_83, x_84); -x_86 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_86, 0, x_85); -x_87 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_87, 0, x_86); -x_88 = l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__3; -x_89 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_89, 0, x_88); -lean_ctor_set(x_89, 1, x_87); -x_90 = l_Lean_PrettyPrinter_Formatter_throwError___rarg(x_89, x_2, x_12, x_4, x_5, x_10); -lean_dec(x_12); +lean_object* x_32; +lean_dec(x_27); lean_dec(x_2); -return x_90; +x_32 = lean_box(0); +x_11 = x_32; +goto block_23; } } case 2: { -lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_100 = lean_ctor_get(x_11, 1); -lean_inc(x_100); -lean_dec(x_11); -x_101 = l_Lean_PrettyPrinter_Formatter_pushToken(x_100, x_2, x_12, x_4, x_5, x_10); -x_102 = lean_ctor_get(x_101, 0); -lean_inc(x_102); -x_103 = lean_ctor_get(x_102, 0); -lean_inc(x_103); -lean_dec(x_102); -x_104 = lean_ctor_get(x_101, 1); -lean_inc(x_104); -lean_dec(x_101); -x_105 = lean_ctor_get(x_103, 1); -lean_inc(x_105); -lean_dec(x_103); -x_106 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_105, x_4, x_5, x_104); -return x_106; +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_33 = lean_ctor_get(x_8, 1); +lean_inc(x_33); +lean_dec(x_8); +x_34 = l_Lean_PrettyPrinter_Formatter_pushToken(x_33, x_2, x_3, x_4, x_5, x_10); +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_35); +return x_36; } default: { -lean_object* x_107; uint8_t x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; -x_107 = lean_box(0); -x_108 = 0; -x_109 = lean_unsigned_to_nat(0u); -x_110 = l_Lean_Syntax_formatStxAux___main(x_107, x_108, x_109, x_11); -x_111 = l_Lean_Options_empty; -x_112 = l_Lean_Format_pretty(x_110, x_111); -x_113 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_113, 0, x_112); -x_114 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_114, 0, x_113); -x_115 = l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__3; -x_116 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_116, 0, x_115); -lean_ctor_set(x_116, 1, x_114); -x_117 = l_Lean_PrettyPrinter_Formatter_throwError___rarg(x_116, x_2, x_12, x_4, x_5, x_10); -lean_dec(x_12); +lean_object* x_37; lean_dec(x_2); -return x_117; +x_37 = lean_box(0); +x_11 = x_37; +goto block_23; } } +block_23: +{ +lean_object* x_12; uint8_t x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_dec(x_11); +x_12 = lean_box(0); +x_13 = 0; +x_14 = lean_unsigned_to_nat(0u); +x_15 = l_Lean_Syntax_formatStxAux___main(x_12, x_13, x_14, x_8); +x_16 = l_Lean_Options_empty; +x_17 = l_Lean_Format_pretty(x_15, x_16); +x_18 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_18, 0, x_17); +x_19 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_19, 0, x_18); +x_20 = l_Lean_PrettyPrinter_Formatter_unicodeSymbol_formatter___closed__3; +x_21 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_19); +x_22 = l_Lean_Core_throwError___rarg(x_21, x_4, x_5, x_10); +return x_22; +} } } } @@ -6633,6 +5187,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_visitAtom(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); return x_7; } } @@ -6652,6 +5207,7 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_charLitNoAntiquot_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -6671,6 +5227,7 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_strLitNoAntiquot_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -6690,6 +5247,7 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_nameLitNoAntiquot_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -6709,6 +5267,7 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_numLitNoAntiquot_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -6728,6 +5287,7 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_fieldIdx_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -6746,167 +5306,86 @@ lean_dec(x_3); lean_inc(x_1); lean_inc(x_7); lean_inc(x_6); +lean_inc(x_5); lean_inc(x_4); x_13 = lean_apply_5(x_1, x_4, x_5, x_6, x_7, x_8); if (lean_obj_tag(x_13) == 0) { lean_object* x_14; -x_14 = lean_ctor_get(x_13, 0); +x_14 = lean_ctor_get(x_13, 1); lean_inc(x_14); -if (lean_obj_tag(x_14) == 0) -{ -uint8_t x_15; -lean_dec(x_12); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_1); -x_15 = !lean_is_exclusive(x_13); -if (x_15 == 0) -{ -lean_object* x_16; uint8_t x_17; -x_16 = lean_ctor_get(x_13, 0); -lean_dec(x_16); -x_17 = !lean_is_exclusive(x_14); -if (x_17 == 0) -{ -return x_13; -} -else -{ -lean_object* x_18; lean_object* x_19; -x_18 = lean_ctor_get(x_14, 0); -lean_inc(x_18); -lean_dec(x_14); -x_19 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_13, 0, x_19); -return x_13; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_20 = lean_ctor_get(x_13, 1); -lean_inc(x_20); lean_dec(x_13); -x_21 = lean_ctor_get(x_14, 0); -lean_inc(x_21); -if (lean_is_exclusive(x_14)) { - lean_ctor_release(x_14, 0); - x_22 = x_14; -} else { - lean_dec_ref(x_14); - x_22 = lean_box(0); -} -if (lean_is_scalar(x_22)) { - x_23 = lean_alloc_ctor(0, 1, 0); -} else { - x_23 = x_22; -} -lean_ctor_set(x_23, 0, x_21); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_20); -return x_24; -} -} -else -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = lean_ctor_get(x_14, 0); -lean_inc(x_25); -lean_dec(x_14); -x_26 = lean_ctor_get(x_13, 1); -lean_inc(x_26); -lean_dec(x_13); -x_27 = lean_ctor_get(x_25, 1); -lean_inc(x_27); -lean_dec(x_25); x_3 = x_12; -x_5 = x_27; -x_8 = x_26; +x_8 = x_14; goto _start; } -} else { -uint8_t x_29; +uint8_t x_16; lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_29 = !lean_is_exclusive(x_13); -if (x_29 == 0) +x_16 = !lean_is_exclusive(x_13); +if (x_16 == 0) { return x_13; } else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_30 = lean_ctor_get(x_13, 0); -x_31 = lean_ctor_get(x_13, 1); -lean_inc(x_31); -lean_inc(x_30); +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 0); +x_18 = lean_ctor_get(x_13, 1); +lean_inc(x_18); +lean_inc(x_17); lean_dec(x_13); -x_32 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -return x_32; +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; } } } else { -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_object* x_20; lean_object* x_21; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_33 = lean_box(0); -x_34 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_5); -x_35 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_35, 0, x_34); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set(x_36, 1, x_8); -return x_36; +x_20 = lean_box(0); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_8); +return x_21; } } } lean_object* l_Lean_PrettyPrinter_Formatter_many_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 0); +x_10 = l_Lean_Syntax_getArgs(x_8); +lean_dec(x_8); +x_11 = lean_array_get_size(x_10); +lean_dec(x_10); lean_inc(x_11); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_dec(x_9); -x_13 = l_Lean_Syntax_getArgs(x_11); -lean_dec(x_11); -x_14 = lean_array_get_size(x_13); -lean_dec(x_13); -lean_inc(x_14); -x_15 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Formatter_many_formatter___spec__1___boxed), 8, 3); -lean_closure_set(x_15, 0, x_1); -lean_closure_set(x_15, 1, x_14); -lean_closure_set(x_15, 2, x_14); -x_16 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_15, x_2, x_12, x_4, x_5, x_10); -return x_16; +x_12 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Formatter_many_formatter___spec__1___boxed), 8, 3); +lean_closure_set(x_12, 0, x_1); +lean_closure_set(x_12, 1, x_11); +lean_closure_set(x_12, 2, x_11); +x_13 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_12, x_2, x_3, x_4, x_5, x_9); +return x_13; } } lean_object* l_Nat_forMAux___main___at_Lean_PrettyPrinter_Formatter_many_formatter___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, lean_object* x_7, lean_object* x_8) { @@ -6921,36 +5400,28 @@ return x_9; lean_object* l_Lean_PrettyPrinter_Formatter_many1_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_dec(x_9); -x_13 = l_Lean_Syntax_getKind(x_11); -x_14 = l_Lean_nullKind; -x_15 = lean_name_eq(x_13, x_14); -lean_dec(x_13); -if (x_15 == 0) +x_10 = l_Lean_Syntax_getKind(x_8); +x_11 = l_Lean_nullKind; +x_12 = lean_name_eq(x_10, x_11); +lean_dec(x_10); +if (x_12 == 0) { -lean_object* x_16; -x_16 = lean_apply_5(x_1, x_2, x_12, x_4, x_5, x_10); -return x_16; +lean_object* x_13; +x_13 = lean_apply_5(x_1, x_2, x_3, x_4, x_5, x_9); +return x_13; } else { -lean_object* x_17; -x_17 = l_Lean_PrettyPrinter_Formatter_many_formatter(x_1, x_2, x_12, x_4, x_5, x_10); -return x_17; +lean_object* x_14; +x_14 = l_Lean_PrettyPrinter_Formatter_many_formatter(x_1, x_2, x_3, x_4, x_5, x_9); +return x_14; } } } @@ -6967,264 +5438,122 @@ _start: { if (lean_obj_tag(x_3) == 0) { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +lean_object* x_9; lean_object* x_10; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); x_9 = lean_box(0); x_10 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_5); -x_11 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_11, 0, x_10); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_11); -lean_ctor_set(x_12, 1, x_8); -return x_12; +lean_ctor_set(x_10, 1, x_8); +return x_10; } else { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_13 = lean_ctor_get(x_3, 0); -x_14 = lean_ctor_get(x_3, 1); -x_15 = lean_unsigned_to_nat(2u); -x_16 = lean_nat_mod(x_13, x_15); -x_17 = lean_unsigned_to_nat(0u); -x_18 = lean_nat_dec_eq(x_16, x_17); -lean_dec(x_16); -if (x_18 == 0) +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_11 = lean_ctor_get(x_3, 0); +x_12 = lean_ctor_get(x_3, 1); +x_13 = lean_unsigned_to_nat(2u); +x_14 = lean_nat_mod(x_11, x_13); +x_15 = lean_unsigned_to_nat(0u); +x_16 = lean_nat_dec_eq(x_14, x_15); +lean_dec(x_14); +if (x_16 == 0) { -lean_object* x_19; +lean_object* x_17; lean_inc(x_2); lean_inc(x_7); lean_inc(x_6); +lean_inc(x_5); lean_inc(x_4); -x_19 = lean_apply_5(x_2, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_19) == 0) +x_17 = lean_apply_5(x_2, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_20; -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -if (lean_obj_tag(x_20) == 0) -{ -uint8_t x_21; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_21 = !lean_is_exclusive(x_19); -if (x_21 == 0) -{ -lean_object* x_22; uint8_t x_23; -x_22 = lean_ctor_get(x_19, 0); -lean_dec(x_22); -x_23 = !lean_is_exclusive(x_20); -if (x_23 == 0) -{ -return x_19; -} -else -{ -lean_object* x_24; lean_object* x_25; -x_24 = lean_ctor_get(x_20, 0); -lean_inc(x_24); -lean_dec(x_20); -x_25 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_19, 0, x_25); -return x_19; -} -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_26 = lean_ctor_get(x_19, 1); -lean_inc(x_26); -lean_dec(x_19); -x_27 = lean_ctor_get(x_20, 0); -lean_inc(x_27); -if (lean_is_exclusive(x_20)) { - lean_ctor_release(x_20, 0); - x_28 = x_20; -} else { - lean_dec_ref(x_20); - x_28 = lean_box(0); -} -if (lean_is_scalar(x_28)) { - x_29 = lean_alloc_ctor(0, 1, 0); -} else { - x_29 = x_28; -} -lean_ctor_set(x_29, 0, x_27); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_26); -return x_30; -} -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_20, 0); -lean_inc(x_31); -lean_dec(x_20); -x_32 = lean_ctor_get(x_19, 1); -lean_inc(x_32); -lean_dec(x_19); -x_33 = lean_ctor_get(x_31, 1); -lean_inc(x_33); -lean_dec(x_31); -x_3 = x_14; -x_5 = x_33; -x_8 = x_32; +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_3 = x_12; +x_8 = x_18; goto _start; } -} else { -uint8_t x_35; +uint8_t x_20; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_35 = !lean_is_exclusive(x_19); -if (x_35 == 0) +x_20 = !lean_is_exclusive(x_17); +if (x_20 == 0) { -return x_19; +return x_17; } else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_19, 0); -x_37 = lean_ctor_get(x_19, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_19); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_17, 0); +x_22 = lean_ctor_get(x_17, 1); +lean_inc(x_22); +lean_inc(x_21); +lean_dec(x_17); +x_23 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_23, 0, x_21); +lean_ctor_set(x_23, 1, x_22); +return x_23; } } } else { -lean_object* x_39; +lean_object* x_24; lean_inc(x_1); lean_inc(x_7); lean_inc(x_6); +lean_inc(x_5); lean_inc(x_4); -x_39 = lean_apply_5(x_1, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_39) == 0) +x_24 = lean_apply_5(x_1, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_24) == 0) { -lean_object* x_40; -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -if (lean_obj_tag(x_40) == 0) -{ -uint8_t x_41; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_41 = !lean_is_exclusive(x_39); -if (x_41 == 0) -{ -lean_object* x_42; uint8_t x_43; -x_42 = lean_ctor_get(x_39, 0); -lean_dec(x_42); -x_43 = !lean_is_exclusive(x_40); -if (x_43 == 0) -{ -return x_39; -} -else -{ -lean_object* x_44; lean_object* x_45; -x_44 = lean_ctor_get(x_40, 0); -lean_inc(x_44); -lean_dec(x_40); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -lean_ctor_set(x_39, 0, x_45); -return x_39; -} -} -else -{ -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_46 = lean_ctor_get(x_39, 1); -lean_inc(x_46); -lean_dec(x_39); -x_47 = lean_ctor_get(x_40, 0); -lean_inc(x_47); -if (lean_is_exclusive(x_40)) { - lean_ctor_release(x_40, 0); - x_48 = x_40; -} else { - lean_dec_ref(x_40); - x_48 = lean_box(0); -} -if (lean_is_scalar(x_48)) { - x_49 = lean_alloc_ctor(0, 1, 0); -} else { - x_49 = x_48; -} -lean_ctor_set(x_49, 0, x_47); -x_50 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_50, 0, x_49); -lean_ctor_set(x_50, 1, x_46); -return x_50; -} -} -else -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_40, 0); -lean_inc(x_51); -lean_dec(x_40); -x_52 = lean_ctor_get(x_39, 1); -lean_inc(x_52); -lean_dec(x_39); -x_53 = lean_ctor_get(x_51, 1); -lean_inc(x_53); -lean_dec(x_51); -x_3 = x_14; -x_5 = x_53; -x_8 = x_52; +lean_object* x_25; +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +lean_dec(x_24); +x_3 = x_12; +x_8 = x_25; goto _start; } -} else { -uint8_t x_55; +uint8_t x_27; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_55 = !lean_is_exclusive(x_39); -if (x_55 == 0) +x_27 = !lean_is_exclusive(x_24); +if (x_27 == 0) { -return x_39; +return x_24; } else { -lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_56 = lean_ctor_get(x_39, 0); -x_57 = lean_ctor_get(x_39, 1); -lean_inc(x_57); -lean_inc(x_56); -lean_dec(x_39); -x_58 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_58, 0, x_56); -lean_ctor_set(x_58, 1, x_57); -return x_58; +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_24, 0); +x_29 = lean_ctor_get(x_24, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_24); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; } } } @@ -7234,33 +5563,25 @@ return x_58; lean_object* l_Lean_PrettyPrinter_Formatter_sepBy_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); +x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 1); -lean_inc(x_11); lean_dec(x_8); -x_12 = lean_ctor_get(x_10, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); -lean_dec(x_10); -x_14 = l_Lean_Syntax_getArgs(x_12); -lean_dec(x_12); -x_15 = lean_array_get_size(x_14); -lean_dec(x_14); -x_16 = l_List_range(x_15); -x_17 = l_List_reverse___rarg(x_16); -x_18 = lean_alloc_closure((void*)(l_List_forM___main___at_Lean_PrettyPrinter_Formatter_sepBy_formatter___spec__1___boxed), 8, 3); -lean_closure_set(x_18, 0, x_1); -lean_closure_set(x_18, 1, x_2); -lean_closure_set(x_18, 2, x_17); -x_19 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_18, x_3, x_13, x_5, x_6, x_11); -return x_19; +x_11 = l_Lean_Syntax_getArgs(x_9); +lean_dec(x_9); +x_12 = lean_array_get_size(x_11); +lean_dec(x_11); +x_13 = l_List_range(x_12); +x_14 = l_List_reverse___rarg(x_13); +x_15 = lean_alloc_closure((void*)(l_List_forM___main___at_Lean_PrettyPrinter_Formatter_sepBy_formatter___spec__1___boxed), 8, 3); +lean_closure_set(x_15, 0, x_1); +lean_closure_set(x_15, 1, x_2); +lean_closure_set(x_15, 2, x_14); +x_16 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_15, x_3, x_4, x_5, x_6, x_10); +return x_16; } } lean_object* l_List_forM___main___at_Lean_PrettyPrinter_Formatter_sepBy_formatter___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, lean_object* x_7, lean_object* x_8) { @@ -7336,35 +5657,49 @@ return x_7; lean_object* l_Lean_PrettyPrinter_Formatter_checkWsBefore_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -uint8_t x_6; -x_6 = !lean_is_exclusive(x_2); -if (x_6 == 0) +lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_6 = lean_io_ref_take(x_2, x_5); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +lean_dec(x_6); +x_9 = !lean_is_exclusive(x_7); +if (x_9 == 0) { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -x_7 = lean_ctor_get(x_2, 1); -lean_dec(x_7); -x_8 = l_String_splitAux___main___closed__1; -lean_ctor_set(x_2, 1, x_8); -x_9 = l_Lean_Format_flatten___main___closed__1; -x_10 = l_Lean_PrettyPrinter_Formatter_push(x_9, x_1, x_2, x_3, x_4, x_5); -return x_10; +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, 1); +lean_dec(x_10); +x_11 = l_String_splitAux___main___closed__1; +lean_ctor_set(x_7, 1, x_11); +x_12 = lean_io_ref_set(x_2, x_7, x_8); +x_13 = lean_ctor_get(x_12, 1); +lean_inc(x_13); +lean_dec(x_12); +x_14 = l_Lean_Format_flatten___main___closed__1; +x_15 = l_Lean_PrettyPrinter_Formatter_push(x_14, x_1, x_2, x_3, x_4, x_13); +return x_15; } else { -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_11 = lean_ctor_get(x_2, 0); -x_12 = lean_ctor_get(x_2, 2); -lean_inc(x_12); -lean_inc(x_11); -lean_dec(x_2); -x_13 = l_String_splitAux___main___closed__1; -x_14 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_14, 0, x_11); -lean_ctor_set(x_14, 1, x_13); -lean_ctor_set(x_14, 2, x_12); -x_15 = l_Lean_Format_flatten___main___closed__1; -x_16 = l_Lean_PrettyPrinter_Formatter_push(x_15, x_1, x_14, x_3, x_4, x_5); -return x_16; +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_16 = lean_ctor_get(x_7, 0); +x_17 = lean_ctor_get(x_7, 2); +lean_inc(x_17); +lean_inc(x_16); +lean_dec(x_7); +x_18 = l_String_splitAux___main___closed__1; +x_19 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_19, 0, x_16); +lean_ctor_set(x_19, 1, x_18); +lean_ctor_set(x_19, 2, x_17); +x_20 = lean_io_ref_set(x_2, x_19, x_8); +x_21 = lean_ctor_get(x_20, 1); +lean_inc(x_21); +lean_dec(x_20); +x_22 = l_Lean_Format_flatten___main___closed__1; +x_23 = l_Lean_PrettyPrinter_Formatter_push(x_22, x_1, x_2, x_3, x_4, x_21); +return x_23; } } } @@ -7375,359 +5710,264 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_checkWsBefore_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); lean_dec(x_1); return x_6; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg(lean_object* x_1) { _start: { -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___rarg), 1, 0); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_checkPrec_formatter(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_PrettyPrinter_Formatter_checkPrec_formatter(x_1, x_2, x_3, x_4); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___boxed(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg(lean_object* x_1) { _start: { -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter(x_1); -lean_dec(x_1); -return x_2; +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___rarg), 1, 0); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_PrettyPrinter_Formatter_checkStackTop_formatter(x_1, x_2, x_3, x_4); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___boxed(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg(lean_object* x_1) { _start: { -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter(x_1); -lean_dec(x_1); -return x_2; +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg), 1, 0); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_checkColGe_formatter(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter(x_1, x_2, x_3, x_4); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg(lean_object* x_1) { _start: { -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter(x_1); -lean_dec(x_1); -return x_2; +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg), 1, 0); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter(x_1, x_2, x_3, x_4); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___boxed(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg(lean_object* x_1) { _start: { -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter(x_1); +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___rarg), 1, 0); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_PrettyPrinter_Formatter_checkColGe_formatter(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); lean_dec(x_1); -return x_2; +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___rarg), 1, 0); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___rarg), 1, 0); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_PrettyPrinter_Formatter_checkInsideQuot_formatter(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___rarg), 1, 0); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_PrettyPrinter_Formatter_checkOutsideQuot_formatter(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_5; } } lean_object* l_Lean_PrettyPrinter_Formatter_pushNone_formatter___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_1, x_2, x_3, x_4); return x_5; } } @@ -7746,6 +5986,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Formatter_pushNone_formatter___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -7761,133 +6002,50 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter___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) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_8 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); -x_9 = lean_ctor_get(x_8, 0); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_7); +x_9 = lean_ctor_get(x_8, 1); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 1); -lean_inc(x_11); lean_dec(x_8); -x_12 = lean_ctor_get(x_10, 1); -lean_inc(x_12); -lean_dec(x_10); -x_13 = lean_box(0); +x_10 = lean_box(0); lean_inc(x_3); -x_14 = l_Lean_PrettyPrinter_Formatter_visitAtom(x_13, x_3, x_12, x_5, x_6, x_11); -if (lean_obj_tag(x_14) == 0) +x_11 = l_Lean_PrettyPrinter_Formatter_visitAtom(x_10, x_3, x_4, x_5, x_6, x_9); +if (lean_obj_tag(x_11) == 0) { -lean_object* x_15; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -if (lean_obj_tag(x_15) == 0) +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_12 = lean_ctor_get(x_11, 1); +lean_inc(x_12); +lean_dec(x_11); +x_13 = l_Lean_PrettyPrinter_Formatter_push(x_1, x_3, x_4, x_5, x_6, x_12); +lean_dec(x_3); +x_14 = lean_ctor_get(x_13, 1); +lean_inc(x_14); +lean_dec(x_13); +x_15 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_14); +return x_15; +} +else { uint8_t x_16; lean_dec(x_3); lean_dec(x_1); -x_16 = !lean_is_exclusive(x_14); +x_16 = !lean_is_exclusive(x_11); if (x_16 == 0) { -lean_object* x_17; uint8_t x_18; -x_17 = lean_ctor_get(x_14, 0); -lean_dec(x_17); -x_18 = !lean_is_exclusive(x_15); -if (x_18 == 0) -{ -return x_14; +return x_11; } else { -lean_object* x_19; lean_object* x_20; -x_19 = lean_ctor_get(x_15, 0); -lean_inc(x_19); -lean_dec(x_15); -x_20 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_14, 0, x_20); -return x_14; -} -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_14, 1); -lean_inc(x_21); -lean_dec(x_14); -x_22 = lean_ctor_get(x_15, 0); -lean_inc(x_22); -if (lean_is_exclusive(x_15)) { - lean_ctor_release(x_15, 0); - x_23 = x_15; -} else { - lean_dec_ref(x_15); - x_23 = lean_box(0); -} -if (lean_is_scalar(x_23)) { - x_24 = lean_alloc_ctor(0, 1, 0); -} else { - x_24 = x_23; -} -lean_ctor_set(x_24, 0, x_22); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_21); -return x_25; -} -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_26 = lean_ctor_get(x_15, 0); -lean_inc(x_26); -lean_dec(x_15); -x_27 = lean_ctor_get(x_14, 1); -lean_inc(x_27); -lean_dec(x_14); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -x_29 = l_Lean_PrettyPrinter_Formatter_push(x_1, x_3, x_28, x_5, x_6, x_27); -lean_dec(x_3); -x_30 = lean_ctor_get(x_29, 0); -lean_inc(x_30); -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -lean_dec(x_30); -x_32 = lean_ctor_get(x_29, 1); -lean_inc(x_32); -lean_dec(x_29); -x_33 = lean_ctor_get(x_31, 1); -lean_inc(x_33); -lean_dec(x_31); -x_34 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_33, x_5, x_6, x_32); -return x_34; -} -} -else -{ -uint8_t x_35; -lean_dec(x_3); -lean_dec(x_1); -x_35 = !lean_is_exclusive(x_14); -if (x_35 == 0) -{ -return x_14; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_14, 0); -x_37 = lean_ctor_get(x_14, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_14); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_11, 0); +x_18 = lean_ctor_get(x_11, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_11); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; } } } @@ -7927,82 +6085,44 @@ return x_3; lean_object* l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; lean_object* x_8; +lean_object* x_6; lean_object* x_7; x_6 = l_Lean_quotedSymbolKind; x_7 = l_Lean_PrettyPrinter_Formatter_checkKind(x_6, x_1, x_2, x_3, x_4, x_5); -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -if (lean_obj_tag(x_8) == 0) +if (lean_obj_tag(x_7) == 0) { -uint8_t x_9; +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = lean_ctor_get(x_7, 1); +lean_inc(x_8); +lean_dec(x_7); +x_9 = l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter___closed__3; +x_10 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_9, x_1, x_2, x_3, x_4, x_8); +return x_10; +} +else +{ +uint8_t x_11; lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); lean_dec(x_1); -x_9 = !lean_is_exclusive(x_7); -if (x_9 == 0) -{ -lean_object* x_10; uint8_t x_11; -x_10 = lean_ctor_get(x_7, 0); -lean_dec(x_10); -x_11 = !lean_is_exclusive(x_8); +x_11 = !lean_is_exclusive(x_7); if (x_11 == 0) { return x_7; } else { -lean_object* x_12; lean_object* x_13; -x_12 = lean_ctor_get(x_8, 0); +lean_object* x_12; lean_object* x_13; lean_object* x_14; +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_8); -x_13 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_7, 0, x_13); -return x_7; -} -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_ctor_get(x_7, 1); -lean_inc(x_14); lean_dec(x_7); -x_15 = lean_ctor_get(x_8, 0); -lean_inc(x_15); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - x_16 = x_8; -} else { - lean_dec_ref(x_8); - x_16 = lean_box(0); +x_14 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_14, 0, x_12); +lean_ctor_set(x_14, 1, x_13); +return x_14; } -if (lean_is_scalar(x_16)) { - x_17 = lean_alloc_ctor(0, 1, 0); -} else { - x_17 = x_16; -} -lean_ctor_set(x_17, 0, x_15); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_14); -return x_18; -} -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_19 = lean_ctor_get(x_8, 0); -lean_inc(x_19); -lean_dec(x_8); -x_20 = lean_ctor_get(x_7, 1); -lean_inc(x_20); -lean_dec(x_7); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); -lean_dec(x_19); -x_22 = l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter___closed__3; -x_23 = l_Lean_PrettyPrinter_Formatter_concatArgs(x_22, x_1, x_21, x_3, x_4, x_20); -return x_23; } } } @@ -8013,6 +6133,7 @@ lean_object* x_8; x_8 = l_Lean_PrettyPrinter_Formatter_quotedSymbol_formatter___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_2); return x_8; } @@ -8033,6 +6154,7 @@ lean_object* x_6; x_6 = l_Lean_PrettyPrinter_Formatter_unquotedSymbol_formatter(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); return x_6; } } @@ -8104,7 +6226,7 @@ return x_2; lean_object* l_Lean_PrettyPrinter_format(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; x_6 = l_Lean_Parser_builtinTokenTable; x_7 = lean_io_ref_get(x_6, x_5); x_8 = lean_ctor_get(x_7, 0); @@ -8119,101 +6241,160 @@ x_13 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_13, 0, x_10); lean_ctor_set(x_13, 1, x_11); lean_ctor_set(x_13, 2, x_12); -lean_inc(x_4); -lean_inc(x_3); -x_14 = lean_apply_5(x_1, x_8, x_13, x_3, x_4, x_9); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; +x_14 = lean_io_mk_ref(x_13, x_9); x_15 = lean_ctor_get(x_14, 0); lean_inc(x_15); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; -lean_dec(x_15); x_16 = lean_ctor_get(x_14, 1); lean_inc(x_16); lean_dec(x_14); -x_17 = l_Lean_PrettyPrinter_format___closed__3; -x_18 = l_Lean_Core_throwError___rarg(x_17, x_3, x_4, x_16); -lean_dec(x_4); -lean_dec(x_3); -return x_18; -} -else +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_15); +x_17 = lean_apply_5(x_1, x_8, x_15, x_3, x_4, x_16); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_19; uint8_t x_20; +lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_dec(x_4); lean_dec(x_3); -x_19 = lean_ctor_get(x_15, 0); -lean_inc(x_19); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_19 = lean_io_ref_get(x_15, x_18); lean_dec(x_15); -x_20 = !lean_is_exclusive(x_14); +x_20 = !lean_is_exclusive(x_19); if (x_20 == 0) { -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_21 = lean_ctor_get(x_14, 0); -lean_dec(x_21); -x_22 = lean_ctor_get(x_19, 1); +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_21 = lean_ctor_get(x_19, 0); +x_22 = lean_ctor_get(x_21, 2); lean_inc(x_22); -lean_dec(x_19); -x_23 = lean_ctor_get(x_22, 2); -lean_inc(x_23); +lean_dec(x_21); +x_23 = l_Lean_Format_Inhabited; +x_24 = lean_unsigned_to_nat(0u); +x_25 = lean_array_get(x_23, x_22, x_24); lean_dec(x_22); -x_24 = l_Lean_Format_Inhabited; -x_25 = lean_unsigned_to_nat(0u); -x_26 = lean_array_get(x_24, x_23, x_25); -lean_dec(x_23); -lean_ctor_set(x_14, 0, x_26); -return x_14; +lean_ctor_set(x_19, 0, x_25); +return x_19; } else { -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_27 = lean_ctor_get(x_14, 1); +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_26 = lean_ctor_get(x_19, 0); +x_27 = lean_ctor_get(x_19, 1); lean_inc(x_27); -lean_dec(x_14); -x_28 = lean_ctor_get(x_19, 1); -lean_inc(x_28); +lean_inc(x_26); lean_dec(x_19); -x_29 = lean_ctor_get(x_28, 2); -lean_inc(x_29); +x_28 = lean_ctor_get(x_26, 2); +lean_inc(x_28); +lean_dec(x_26); +x_29 = l_Lean_Format_Inhabited; +x_30 = lean_unsigned_to_nat(0u); +x_31 = lean_array_get(x_29, x_28, x_30); lean_dec(x_28); -x_30 = l_Lean_Format_Inhabited; -x_31 = lean_unsigned_to_nat(0u); -x_32 = lean_array_get(x_30, x_29, x_31); -lean_dec(x_29); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_27); -return x_33; -} +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_27); +return x_32; } } else { +lean_object* x_33; +lean_dec(x_15); +x_33 = lean_ctor_get(x_17, 0); +lean_inc(x_33); +if (lean_obj_tag(x_33) == 0) +{ uint8_t x_34; lean_dec(x_4); lean_dec(x_3); -x_34 = !lean_is_exclusive(x_14); +x_34 = !lean_is_exclusive(x_17); if (x_34 == 0) { -return x_14; +lean_object* x_35; +x_35 = lean_ctor_get(x_17, 0); +lean_dec(x_35); +return x_17; } else { -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_14, 0); -x_36 = lean_ctor_get(x_14, 1); +lean_object* x_36; lean_object* x_37; +x_36 = lean_ctor_get(x_17, 1); lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_14); +lean_dec(x_17); x_37 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 0, x_33); lean_ctor_set(x_37, 1, x_36); return x_37; } } +else +{ +uint8_t x_38; +x_38 = !lean_is_exclusive(x_17); +if (x_38 == 0) +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; uint8_t x_43; +x_39 = lean_ctor_get(x_17, 1); +x_40 = lean_ctor_get(x_17, 0); +lean_dec(x_40); +x_41 = lean_ctor_get(x_33, 0); +lean_inc(x_41); +x_42 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_43 = lean_nat_dec_eq(x_42, x_41); +lean_dec(x_41); +if (x_43 == 0) +{ +lean_dec(x_4); +lean_dec(x_3); +return x_17; +} +else +{ +lean_object* x_44; lean_object* x_45; +lean_free_object(x_17); +lean_dec(x_33); +x_44 = l_Lean_PrettyPrinter_format___closed__3; +x_45 = l_Lean_Core_throwError___rarg(x_44, x_3, x_4, x_39); +lean_dec(x_4); +lean_dec(x_3); +return x_45; +} +} +else +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; uint8_t x_49; +x_46 = lean_ctor_get(x_17, 1); +lean_inc(x_46); +lean_dec(x_17); +x_47 = lean_ctor_get(x_33, 0); +lean_inc(x_47); +x_48 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_49 = lean_nat_dec_eq(x_48, x_47); +lean_dec(x_47); +if (x_49 == 0) +{ +lean_object* x_50; +lean_dec(x_4); +lean_dec(x_3); +x_50 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_50, 0, x_33); +lean_ctor_set(x_50, 1, x_46); +return x_50; +} +else +{ +lean_object* x_51; lean_object* x_52; +lean_dec(x_33); +x_51 = l_Lean_PrettyPrinter_format___closed__3; +x_52 = l_Lean_Core_throwError___rarg(x_51, x_3, x_4, x_46); +lean_dec(x_4); +lean_dec(x_3); +return x_52; +} +} +} +} } } lean_object* _init_l_Lean_PrettyPrinter_formatTerm___closed__1() { @@ -8333,6 +6514,7 @@ lean_object* initialize_Lean_CoreM(lean_object*); lean_object* initialize_Lean_Parser_Extension(lean_object*); lean_object* initialize_Lean_KeyedDeclsAttribute(lean_object*); lean_object* initialize_Lean_ParserCompiler_Attribute(lean_object*); +lean_object* initialize_Lean_PrettyPrinter_Backtrack(lean_object*); static bool _G_initialized = false; lean_object* initialize_Lean_PrettyPrinter_Formatter(lean_object* w) { lean_object * res; @@ -8353,6 +6535,11 @@ lean_dec_ref(res); res = initialize_Lean_ParserCompiler_Attribute(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +res = initialize_Lean_PrettyPrinter_Backtrack(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_PrettyPrinter_Formatter_orelse___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_orelse___closed__1(); +lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_orelse___closed__1); l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__1 = _init_l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__1); l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__2 = _init_l_Lean_PrettyPrinter_mkFormatterAttribute___lambda__1___closed__2(); @@ -8419,6 +6606,8 @@ if (lean_io_result_is_error(res)) return res; l_Lean_PrettyPrinter_combinatorFormatterAttribute = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_PrettyPrinter_combinatorFormatterAttribute); lean_dec_ref(res); +l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg___closed__1(); +lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_throwBacktrack___rarg___closed__1); l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__1); l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__2 = _init_l_Lean_PrettyPrinter_Formatter_FormatterM_monadTraverser___closed__2(); @@ -8461,8 +6650,6 @@ l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4 = _init_l_Le lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__4); l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5 = _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__5); -l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__6 = _init_l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__6(); -lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryParser_formatter___closed__6); l_Lean_PrettyPrinter_Formatter_checkKind___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_checkKind___closed__1); l_Lean_PrettyPrinter_Formatter_checkKind___closed__2 = _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__2(); @@ -8483,8 +6670,6 @@ l_Lean_PrettyPrinter_Formatter_checkKind___closed__9 = _init_l_Lean_PrettyPrinte lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_checkKind___closed__9); l_Lean_PrettyPrinter_Formatter_checkKind___closed__10 = _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__10(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_checkKind___closed__10); -l_Lean_PrettyPrinter_Formatter_checkKind___closed__11 = _init_l_Lean_PrettyPrinter_Formatter_checkKind___closed__11(); -lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_checkKind___closed__11); l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___lambda__1___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___lambda__1___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___lambda__1___closed__1); l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___lambda__1___closed__2 = _init_l_Lean_PrettyPrinter_Formatter_trailingNode_formatter___lambda__1___closed__2(); diff --git a/stage0/stdlib/Lean/PrettyPrinter/Meta.c b/stage0/stdlib/Lean/PrettyPrinter/Meta.c index da1e689880..6f9926c629 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Meta.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Meta.c @@ -2864,6 +2864,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_interpretParserDescr___main___elambda__12(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); return x_7; } } @@ -2874,6 +2875,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Formatter_interpretParserDescr___main___elambda__13(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); return x_7; } } diff --git a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c index d375999490..e5f73d076e 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Lean.PrettyPrinter.Parenthesizer -// Imports: Init Lean.CoreM Lean.KeyedDeclsAttribute Lean.Parser.Extension Lean.ParserCompiler.Attribute +// Imports: Init Lean.CoreM Lean.KeyedDeclsAttribute Lean.Parser.Extension Lean.ParserCompiler.Attribute Lean.PrettyPrinter.Backtrack #include #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -13,7 +13,6 @@ #ifdef __cplusplus extern "C" { #endif -lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_reverse___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__14; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitToken___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -28,7 +27,7 @@ extern lean_object* l_Option_HasRepr___rarg___closed__2; lean_object* l_Lean_PrettyPrinter_categoryParenthesizerAttribute___closed__1; lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___lambda__1___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__1; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg(lean_object*); lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___lambda__1___boxed(lean_object*, lean_object*, lean_object*); @@ -41,7 +40,6 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_quotedSymbol_parenthesizer(lean_ lean_object* l_Lean_PrettyPrinter_parenthesize___closed__1; lean_object* l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_withAntiquot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_ExceptT_Monad___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_parenthesizerAttribute___closed__1; extern lean_object* l_Lean_nullKind; lean_object* l_Lean_PrettyPrinter_Parenthesizer_sepBy_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -52,11 +50,11 @@ extern lean_object* l_Option_HasRepr___rarg___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_fieldIdx_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer___boxed(lean_object*); -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; +lean_object* l_StateRefT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_name_eq(lean_object*, lean_object*); @@ -73,7 +71,7 @@ lean_object* l_Lean_PrettyPrinter_categoryParenthesizerAttribute___closed__2; lean_object* l_Lean_Core_getEnv___rarg(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_unicodeSymbol_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_rawIdent_parenthesizer(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_fieldIdx_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Array_empty___closed__1; lean_object* lean_environment_find(lean_object*, lean_object*); @@ -84,17 +82,21 @@ lean_object* l_Lean_Core_addContext(lean_object*, lean_object*, lean_object*, le uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__24; +lean_object* lean_io_mk_ref(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__6; +lean_object* lean_io_ref_get(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__3; lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__7; lean_object* l_Lean_PrettyPrinter_parenthesizerAttribute___closed__4; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__20; lean_object* l_ReaderT_Monad___rarg(lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_parenthesizerAttribute___spec__1; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; +lean_object* l_Lean_PrettyPrinter_ParenthesizerM_orelse(lean_object*); lean_object* l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitToken(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__18; @@ -108,7 +110,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___lambda__1 lean_object* l_Lean_Core_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_range(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_toggleInsideQuot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCombinatorParenthesizerAttribute___closed__1; lean_object* l_Lean_PrettyPrinter_parenthesizeCommand(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_setTailInfo(lean_object*, lean_object*); @@ -116,8 +118,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer(lean_object*, lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__8; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkPrec_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_parenthesizeTerm(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_numLitNoAntiquot_parenthesizer___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__5; @@ -131,6 +132,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___lambda__1 lean_object* l_Lean_Syntax_setHeadInfo(lean_object*, lean_object*); lean_object* l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_LocalContext_Inhabited___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_numLitNoAntiquot_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -146,17 +148,18 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___lambda__1 lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__17; -lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__3; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__2; extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__1; lean_object* l_Lean_PrettyPrinter_parenthesize___closed__3; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_strLitNoAntiquot_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___lambda__2(lean_object*); +lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4; lean_object* l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_mkHashMap___at_Lean_PrettyPrinter_parenthesizerAttribute___spec__2(lean_object*); @@ -165,7 +168,6 @@ lean_object* l_Lean_PrettyPrinter_parenthesizerAttribute; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__27; lean_object* l_Lean_PrettyPrinter_Parenthesizer_setExpected_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_Traverser_setCur(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_parenthesizerAttribute___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__2; @@ -181,21 +183,20 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__1_ lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__2; extern lean_object* l_Lean_Option_format___rarg___closed__1; extern lean_object* l_Lean_EnvExtension_Inhabited___rarg___closed__1; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__23; +lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_identEq_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_choiceKind___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_numLitNoAntiquot_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_ParenthesizerM_orelse___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ite___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__2; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_monadQuotation___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_monadQuotation; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; lean_object* l_Lean_PrettyPrinter_Parenthesizer_rawIdent_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_charLitNoAntiquot_parenthesizer(lean_object*); @@ -203,7 +204,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_strLitNoAntiquot_parenthesizer(l lean_object* l_Lean_PrettyPrinter_Parenthesizer_fieldIdx_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_unquotedSymbol_parenthesizer(lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__1; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_parenthesizerAttribute___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__13; lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__2(lean_object*); @@ -215,7 +216,6 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParserOfStack_parenthesi lean_object* l_Std_mkHashMapImp___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___lambda__1___closed__5; extern lean_object* l_Lean_Unhygienic_MonadQuotation___closed__4; -lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_setExpected_parenthesizer___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__21; lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__1___closed__3; @@ -236,7 +236,7 @@ extern lean_object* l_List_reprAux___main___rarg___closed__1; lean_object* l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(lean_object*); extern lean_object* l_Lean_Parser_maxPrec; lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__1(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_nonReservedSymbol_parenthesizer___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__11; lean_object* l_Lean_ParserCompiler_registerCombinatorAttribute(lean_object*, lean_object*, lean_object*); @@ -244,7 +244,7 @@ lean_object* l_ReaderT_pure___at_Lean_PrettyPrinter_Parenthesizer_monadQuotation lean_object* l_ReaderT_lift___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_KeyedDeclsAttribute_getValues___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_addParenHeuristic(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30; @@ -253,73 +253,76 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2 extern lean_object* l_Lean_mkAppStx___closed__6; lean_object* l_Lean_attrParamSyntaxToIdentifier(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_liftCoreM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse___closed__1; lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_parenthesizerAttribute___spec__1___closed__2; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__13; lean_object* l_Lean_PrettyPrinter_Parenthesizer_symbol_parenthesizer___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__3; +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_pushNone_parenthesizer___boxed(lean_object*); +lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_categoryParenthesizerAttribute___spec__1___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_symbol_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; lean_object* l_ReaderT_map___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__3(lean_object*, lean_object*); -lean_object* l_StateT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_StateRefT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1(lean_object*); lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_parenthesizerAttribute___closed__5; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_symbol_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_fieldIdx_parenthesizer___boxed(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__6; lean_object* l_Lean_PrettyPrinter_Parenthesizer_monadQuotation___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__9; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__2; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg___closed__1; lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_categoryParenthesizerAttribute___spec__1___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitToken___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__3; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute(lean_object*); lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__1; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_nullKind___closed__2; -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__5; lean_object* l_Lean_Syntax_Traverser_fromSyntax(lean_object*); lean_object* l_Lean_PrettyPrinter_mkCombinatorParenthesizerAttribute___closed__3; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getHeadInfo___main(lean_object*); -lean_object* l_StateT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_pushNone_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9; extern lean_object* l_Option_HasRepr___rarg___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_identEq_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_nonReservedSymbol_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__4; +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Format_paren___closed__1; lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_pure___at_Lean_PrettyPrinter_Parenthesizer_monadQuotation___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_unquotedSymbol_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___spec__1(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_Traverser_down(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__1___closed__2; -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_quotedSymbol_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___lambda__1(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_setExpected_parenthesizer(lean_object*); @@ -328,9 +331,8 @@ lean_object* l_Lean_PrettyPrinter_combinatorParenthesizerAttribute; lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__2(lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); extern lean_object* l_Lean_SourceInfo_inhabited___closed__1; -lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__8; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__10; lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__1___boxed(lean_object*); @@ -343,8 +345,8 @@ lean_object* l_Lean_Syntax_Traverser_right(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_monadQuotation___closed__4; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitToken___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_StateT_Monad___rarg(lean_object*); lean_object* lean_panic_fn(lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_nameLitNoAntiquot_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -352,22 +354,21 @@ extern lean_object* l_Lean_Format_paren___closed__2; lean_object* l_Lean_Core_getOptions(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__3; lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_parenthesizerAttribute___spec__1___closed__1; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__1; lean_object* l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_parenthesizeCommand___closed__1; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__9; lean_object* lean_format_group(lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__1; lean_object* l_Lean_Option_format___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__7(lean_object*); -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_nonReservedSymbol_parenthesizer(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__1; lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4(lean_object*); extern lean_object* l_Lean_ParserCompiler_CombinatorAttribute_Inhabited___closed__3; @@ -376,23 +377,21 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_quotedSymbol_parenthesizer___box lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_io_ref_set(lean_object*, lean_object*, lean_object*); extern lean_object* l_PUnit_Inhabited; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__3; +lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_nameLitNoAntiquot_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwError(lean_object*); extern lean_object* l_Lean_Option_format___rarg___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_mkAntiquot_parenthesizer_x27___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_optional_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___boxed(lean_object*); 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*); lean_object* l_Lean_PrettyPrinter_mkCombinatorParenthesizerAttribute(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_symbolNoWs_parenthesizer(lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_symbolNoWs_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(lean_object*); @@ -402,10 +401,10 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer___ lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_List_format___rarg___closed__3; -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__6; lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__4; lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__5; extern lean_object* l_Lean_Format_paren___closed__3; lean_object* l_ReaderT_map___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -418,21 +417,20 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_strLitNoAntiquot_parenthesizer__ lean_object* l_Lean_PrettyPrinter_Parenthesizer_unquotedSymbol_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_formatStxAux___main(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_lift___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__2(lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); lean_object* l_Lean_KeyedDeclsAttribute_init___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___closed__1; lean_object* l_Nat_min(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_many1_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__6; lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_PrettyPrinter_backtrackExceptionId; lean_object* l_Lean_PrettyPrinter_parenthesizeTerm___closed__1; -lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__6; 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_ReaderT_inhabited___rarg___boxed(lean_object*, lean_object*); @@ -447,7 +445,7 @@ lean_object* l_Lean_Core_getTraceState___rarg(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_quotedSymbol_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_categoryParenthesizerAttribute___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_symbolNoWs_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_categoryParenthesizerAttribute___closed__4; lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParserOfStack_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -455,7 +453,7 @@ lean_object* l_Std_mkHashMap___at_Lean_PrettyPrinter_categoryParenthesizerAttrib lean_object* l_Lean_PrettyPrinter_mkCombinatorParenthesizerAttribute___closed__2; lean_object* l_ReaderT_lift___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getTailInfo___main(lean_object*); -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute(lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__4; lean_object* l_List_forM___main___at_Lean_PrettyPrinter_Parenthesizer_sepBy_parenthesizer___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -470,8 +468,9 @@ lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_categoryParenthesizerAttr lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__26; extern lean_object* l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_liftCoreM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_try_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_mk_antiquot_parenthesizer(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__5; @@ -483,6 +482,168 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser; lean_object* l_Lean_PrettyPrinter_Parenthesizer_rawIdent_parenthesizer___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_unicodeSymbol_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_ParenthesizerM_orelse___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; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_io_ref_get(x_4, x_7); +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_11 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_10); +if (lean_obj_tag(x_11) == 0) +{ +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_11; +} +else +{ +lean_object* x_12; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_13 = !lean_is_exclusive(x_11); +if (x_13 == 0) +{ +lean_object* x_14; +x_14 = lean_ctor_get(x_11, 0); +lean_dec(x_14); +return x_11; +} +else +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_11, 1); +lean_inc(x_15); +lean_dec(x_11); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_12); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_11); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_18 = lean_ctor_get(x_11, 1); +x_19 = lean_ctor_get(x_11, 0); +lean_dec(x_19); +x_20 = lean_ctor_get(x_12, 0); +lean_inc(x_20); +x_21 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_22 = lean_nat_dec_eq(x_21, x_20); +lean_dec(x_20); +if (x_22 == 0) +{ +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_11; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_free_object(x_11); +lean_dec(x_12); +x_23 = lean_io_ref_set(x_4, x_9, x_18); +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +lean_dec(x_23); +x_25 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_24); +return x_25; +} +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_26 = lean_ctor_get(x_11, 1); +lean_inc(x_26); +lean_dec(x_11); +x_27 = lean_ctor_get(x_12, 0); +lean_inc(x_27); +x_28 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_29 = lean_nat_dec_eq(x_28, x_27); +lean_dec(x_27); +if (x_29 == 0) +{ +lean_object* x_30; +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_12); +lean_ctor_set(x_30, 1, x_26); +return x_30; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_12); +x_31 = lean_io_ref_set(x_4, x_9, x_26); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_32); +return x_33; +} +} +} +} +} +} +lean_object* l_Lean_PrettyPrinter_ParenthesizerM_orelse(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_ParenthesizerM_orelse___rarg), 7, 0); +return x_2; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_orelse___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_ParenthesizerM_orelse___rarg), 7, 0); +return x_1; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_PrettyPrinter_Parenthesizer_orelse___closed__1; +return x_2; +} +} lean_object* _init_l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__1() { _start: { @@ -1199,20 +1360,70 @@ x_4 = l_Lean_ParserCompiler_registerCombinatorAttribute(x_2, x_3, x_1); return x_4; } } -lean_object* l_StateT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg___closed__1() { _start: { -lean_object* x_5; lean_object* x_6; lean_object* x_7; -lean_inc(x_1); -x_5 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_5, 0, x_1); -lean_ctor_set(x_5, 1, x_1); -x_6 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_6, 0, x_5); -x_7 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_7, 0, x_6); -lean_ctor_set(x_7, 1, x_4); -return x_7; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg___closed__1; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg), 1, 0); +return x_6; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_6; +} +} +lean_object* l_StateRefT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_io_ref_get(x_1, x_4); +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +return x_5; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_ctor_get(x_5, 0); +x_8 = lean_ctor_get(x_5, 1); +lean_inc(x_8); +lean_inc(x_7); +lean_dec(x_5); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_7); +lean_ctor_set(x_9, 1, x_8); +return x_9; +} } } lean_object* l_ReaderT_lift___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___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) { @@ -1238,206 +1449,52 @@ lean_object* x_8; x_8 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { -lean_object* x_9; -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) -{ -uint8_t x_10; -lean_dec(x_1); -x_10 = !lean_is_exclusive(x_8); -if (x_10 == 0) -{ -lean_object* x_11; uint8_t x_12; -x_11 = lean_ctor_get(x_8, 0); -lean_dec(x_11); -x_12 = !lean_is_exclusive(x_9); -if (x_12 == 0) +uint8_t x_9; +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) { +lean_object* x_10; lean_object* x_11; +x_10 = lean_ctor_get(x_8, 0); +x_11 = lean_apply_1(x_1, x_10); +lean_ctor_set(x_8, 0, x_11); return x_8; } else { -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_9, 0); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_12 = lean_ctor_get(x_8, 0); +x_13 = lean_ctor_get(x_8, 1); lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_8, 0, x_14); -return x_8; -} -} -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_8, 1); -lean_inc(x_15); +lean_inc(x_12); lean_dec(x_8); -x_16 = lean_ctor_get(x_9, 0); -lean_inc(x_16); -if (lean_is_exclusive(x_9)) { - lean_ctor_release(x_9, 0); - x_17 = x_9; -} else { - lean_dec_ref(x_9); - x_17 = lean_box(0); -} -if (lean_is_scalar(x_17)) { - x_18 = lean_alloc_ctor(0, 1, 0); -} else { - x_18 = x_17; -} -lean_ctor_set(x_18, 0, x_16); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_15); -return x_19; +x_14 = lean_apply_1(x_1, x_12); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_13); +return x_15; } } else { -uint8_t x_20; -x_20 = !lean_is_exclusive(x_9); -if (x_20 == 0) -{ -uint8_t x_21; -x_21 = !lean_is_exclusive(x_8); -if (x_21 == 0) -{ -lean_object* x_22; lean_object* x_23; uint8_t x_24; -x_22 = lean_ctor_get(x_9, 0); -x_23 = lean_ctor_get(x_8, 0); -lean_dec(x_23); -x_24 = !lean_is_exclusive(x_22); -if (x_24 == 0) -{ -lean_object* x_25; lean_object* x_26; -x_25 = lean_ctor_get(x_22, 0); -x_26 = lean_apply_1(x_1, x_25); -lean_ctor_set(x_22, 0, x_26); -return x_8; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_27 = lean_ctor_get(x_22, 0); -x_28 = lean_ctor_get(x_22, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_22); -x_29 = lean_apply_1(x_1, x_27); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -lean_ctor_set(x_9, 0, x_30); -return x_8; -} -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_31 = lean_ctor_get(x_9, 0); -x_32 = lean_ctor_get(x_8, 1); -lean_inc(x_32); -lean_dec(x_8); -x_33 = lean_ctor_get(x_31, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_31, 1); -lean_inc(x_34); -if (lean_is_exclusive(x_31)) { - lean_ctor_release(x_31, 0); - lean_ctor_release(x_31, 1); - x_35 = x_31; -} else { - lean_dec_ref(x_31); - x_35 = lean_box(0); -} -x_36 = lean_apply_1(x_1, x_33); -if (lean_is_scalar(x_35)) { - x_37 = lean_alloc_ctor(0, 2, 0); -} else { - x_37 = x_35; -} -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_34); -lean_ctor_set(x_9, 0, x_37); -x_38 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_38, 0, x_9); -lean_ctor_set(x_38, 1, x_32); -return x_38; -} -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_39 = lean_ctor_get(x_9, 0); -lean_inc(x_39); -lean_dec(x_9); -x_40 = lean_ctor_get(x_8, 1); -lean_inc(x_40); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - lean_ctor_release(x_8, 1); - x_41 = x_8; -} else { - lean_dec_ref(x_8); - x_41 = lean_box(0); -} -x_42 = lean_ctor_get(x_39, 0); -lean_inc(x_42); -x_43 = lean_ctor_get(x_39, 1); -lean_inc(x_43); -if (lean_is_exclusive(x_39)) { - lean_ctor_release(x_39, 0); - lean_ctor_release(x_39, 1); - x_44 = x_39; -} else { - lean_dec_ref(x_39); - x_44 = lean_box(0); -} -x_45 = lean_apply_1(x_1, x_42); -if (lean_is_scalar(x_44)) { - x_46 = lean_alloc_ctor(0, 2, 0); -} else { - x_46 = x_44; -} -lean_ctor_set(x_46, 0, x_45); -lean_ctor_set(x_46, 1, x_43); -x_47 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_47, 0, x_46); -if (lean_is_scalar(x_41)) { - x_48 = lean_alloc_ctor(0, 2, 0); -} else { - x_48 = x_41; -} -lean_ctor_set(x_48, 0, x_47); -lean_ctor_set(x_48, 1, x_40); -return x_48; -} -} -} -else -{ -uint8_t x_49; +uint8_t x_16; lean_dec(x_1); -x_49 = !lean_is_exclusive(x_8); -if (x_49 == 0) +x_16 = !lean_is_exclusive(x_8); +if (x_16 == 0) { return x_8; } else { -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = lean_ctor_get(x_8, 0); -x_51 = lean_ctor_get(x_8, 1); -lean_inc(x_51); -lean_inc(x_50); +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_8, 0); +x_18 = lean_ctor_get(x_8, 1); +lean_inc(x_18); +lean_inc(x_17); lean_dec(x_8); -x_52 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_52, 0, x_50); -lean_ctor_set(x_52, 1, x_51); -return x_52; +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; } } } @@ -1462,150 +1519,178 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_7; -x_7 = !lean_is_exclusive(x_3); -if (x_7 == 0) +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_io_ref_take(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 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_3, 0); -lean_dec(x_8); -lean_ctor_set(x_3, 0, x_1); -x_9 = lean_box(0); -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_3); -x_11 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_11, 0, x_10); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_11); -lean_ctor_set(x_12, 1, x_6); +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_8, 0); +lean_dec(x_11); +lean_ctor_set(x_8, 0, x_1); +x_12 = lean_io_ref_set(x_3, x_8, x_9); +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_12, 0); +lean_dec(x_14); +x_15 = lean_box(0); +lean_ctor_set(x_12, 0, x_15); return x_12; } else { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_13 = lean_ctor_get(x_3, 1); -x_14 = lean_ctor_get(x_3, 2); -x_15 = lean_ctor_get(x_3, 3); -x_16 = lean_ctor_get(x_3, 4); -x_17 = lean_ctor_get_uint8(x_3, sizeof(void*)*5); +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_12, 1); lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_3); -x_18 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_18, 0, x_1); -lean_ctor_set(x_18, 1, x_13); -lean_ctor_set(x_18, 2, x_14); -lean_ctor_set(x_18, 3, x_15); -lean_ctor_set(x_18, 4, x_16); -lean_ctor_set_uint8(x_18, sizeof(void*)*5, x_17); -x_19 = lean_box(0); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -x_21 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_21, 0, x_20); -x_22 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_22, 1, x_6); -return x_22; +lean_dec(x_12); +x_17 = lean_box(0); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_16); +return x_18; +} +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_19 = lean_ctor_get(x_8, 1); +x_20 = lean_ctor_get(x_8, 2); +x_21 = lean_ctor_get(x_8, 3); +x_22 = lean_ctor_get(x_8, 4); +x_23 = lean_ctor_get_uint8(x_8, sizeof(void*)*5); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_dec(x_8); +x_24 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_24, 0, x_1); +lean_ctor_set(x_24, 1, x_19); +lean_ctor_set(x_24, 2, x_20); +lean_ctor_set(x_24, 3, x_21); +lean_ctor_set(x_24, 4, x_22); +lean_ctor_set_uint8(x_24, sizeof(void*)*5, x_23); +x_25 = lean_io_ref_set(x_3, x_24, x_9); +x_26 = lean_ctor_get(x_25, 1); +lean_inc(x_26); +if (lean_is_exclusive(x_25)) { + lean_ctor_release(x_25, 0); + lean_ctor_release(x_25, 1); + x_27 = x_25; +} else { + lean_dec_ref(x_25); + x_27 = lean_box(0); +} +x_28 = lean_box(0); +if (lean_is_scalar(x_27)) { + x_29 = lean_alloc_ctor(0, 2, 0); +} else { + x_29 = x_27; +} +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_26); +return x_29; } } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -uint8_t x_8; -x_8 = !lean_is_exclusive(x_4); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; uint8_t x_11; -x_9 = lean_ctor_get(x_4, 0); -x_10 = lean_apply_1(x_2, x_9); -x_11 = !lean_is_exclusive(x_10); +lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; +x_8 = lean_io_ref_take(x_4, x_7); +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +x_11 = !lean_is_exclusive(x_9); if (x_11 == 0) { -lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_12 = lean_ctor_get(x_10, 1); -lean_ctor_set(x_4, 0, x_12); -lean_ctor_set(x_10, 1, x_4); -x_13 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_13, 0, x_10); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_14, 1, x_7); -return x_14; -} -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_10, 0); -x_16 = lean_ctor_get(x_10, 1); -lean_inc(x_16); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; +x_12 = lean_ctor_get(x_9, 0); +x_13 = lean_apply_1(x_2, x_12); +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); lean_inc(x_15); -lean_dec(x_10); -lean_ctor_set(x_4, 0, x_16); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_15); -lean_ctor_set(x_17, 1, x_4); -x_18 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_18, 0, x_17); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_7); -return x_19; +lean_dec(x_13); +lean_ctor_set(x_9, 0, x_15); +x_16 = lean_io_ref_set(x_4, x_9, x_10); +x_17 = !lean_is_exclusive(x_16); +if (x_17 == 0) +{ +lean_object* x_18; +x_18 = lean_ctor_get(x_16, 0); +lean_dec(x_18); +lean_ctor_set(x_16, 0, x_14); +return x_16; +} +else +{ +lean_object* x_19; lean_object* x_20; +x_19 = lean_ctor_get(x_16, 1); +lean_inc(x_19); +lean_dec(x_16); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_14); +lean_ctor_set(x_20, 1, x_19); +return x_20; } } else { -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_20 = lean_ctor_get(x_4, 0); -x_21 = lean_ctor_get(x_4, 1); -x_22 = lean_ctor_get(x_4, 2); -x_23 = lean_ctor_get(x_4, 3); -x_24 = lean_ctor_get(x_4, 4); -x_25 = lean_ctor_get_uint8(x_4, sizeof(void*)*5); +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_21 = lean_ctor_get(x_9, 0); +x_22 = lean_ctor_get(x_9, 1); +x_23 = lean_ctor_get(x_9, 2); +x_24 = lean_ctor_get(x_9, 3); +x_25 = lean_ctor_get(x_9, 4); +x_26 = lean_ctor_get_uint8(x_9, sizeof(void*)*5); +lean_inc(x_25); lean_inc(x_24); lean_inc(x_23); lean_inc(x_22); lean_inc(x_21); -lean_inc(x_20); -lean_dec(x_4); -x_26 = lean_apply_1(x_2, x_20); -x_27 = lean_ctor_get(x_26, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); +lean_dec(x_9); +x_27 = lean_apply_1(x_2, x_21); +x_28 = lean_ctor_get(x_27, 0); lean_inc(x_28); -if (lean_is_exclusive(x_26)) { - lean_ctor_release(x_26, 0); - lean_ctor_release(x_26, 1); - x_29 = x_26; -} else { - lean_dec_ref(x_26); - x_29 = lean_box(0); -} +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); x_30 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_21); -lean_ctor_set(x_30, 2, x_22); -lean_ctor_set(x_30, 3, x_23); -lean_ctor_set(x_30, 4, x_24); -lean_ctor_set_uint8(x_30, sizeof(void*)*5, x_25); -if (lean_is_scalar(x_29)) { - x_31 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_22); +lean_ctor_set(x_30, 2, x_23); +lean_ctor_set(x_30, 3, x_24); +lean_ctor_set(x_30, 4, x_25); +lean_ctor_set_uint8(x_30, sizeof(void*)*5, x_26); +x_31 = lean_io_ref_set(x_4, x_30, x_10); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +if (lean_is_exclusive(x_31)) { + lean_ctor_release(x_31, 0); + lean_ctor_release(x_31, 1); + x_33 = x_31; } else { - x_31 = x_29; + lean_dec_ref(x_31); + x_33 = lean_box(0); } -lean_ctor_set(x_31, 0, x_27); -lean_ctor_set(x_31, 1, x_30); -x_32 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_32, 0, x_31); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_7); -return x_33; +if (lean_is_scalar(x_33)) { + x_34 = lean_alloc_ctor(0, 2, 0); +} else { + x_34 = x_33; +} +lean_ctor_set(x_34, 0, x_28); +lean_ctor_set(x_34, 1, x_32); +return x_34; } } } @@ -1613,7 +1698,7 @@ lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraver _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_StateT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1___boxed), 4, 0); +x_1 = lean_alloc_closure((void*)(l_StateRefT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1___boxed), 4, 0); return x_1; } } @@ -1685,13 +1770,14 @@ x_1 = l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed_ return x_1; } } -lean_object* l_StateT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_StateRefT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_StateT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1(x_1, x_2, x_3, x_4); +x_5 = l_StateRefT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -1720,6 +1806,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); return x_7; } @@ -1731,6 +1818,7 @@ lean_object* x_8; x_8 = l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); return x_8; } @@ -1738,402 +1826,543 @@ return x_8; lean_object* l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck(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 = lean_ctor_get(x_3, 1); -lean_inc(x_7); -if (lean_obj_tag(x_7) == 0) -{ -uint8_t x_8; -x_8 = !lean_is_exclusive(x_3); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_9 = lean_ctor_get(x_3, 3); -x_10 = lean_ctor_get(x_3, 1); -lean_dec(x_10); -x_11 = l_Nat_min(x_1, x_1); -x_12 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_12, 0, x_11); +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_io_ref_take(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_8, 1); +lean_inc(x_9); if (lean_obj_tag(x_9) == 0) { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -lean_inc(x_12); -lean_ctor_set(x_3, 3, x_12); -lean_ctor_set(x_3, 1, x_12); -x_13 = lean_box(0); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_14, 1, x_3); +lean_object* x_10; uint8_t x_11; +x_10 = lean_ctor_get(x_7, 1); +lean_inc(x_10); +lean_dec(x_7); +x_11 = !lean_is_exclusive(x_8); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_12 = lean_ctor_get(x_8, 3); +x_13 = lean_ctor_get(x_8, 1); +lean_dec(x_13); +x_14 = l_Nat_min(x_1, x_1); x_15 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_15, 0, 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_6); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_16; uint8_t x_17; +lean_inc(x_15); +lean_ctor_set(x_8, 3, x_15); +lean_ctor_set(x_8, 1, x_15); +x_16 = lean_io_ref_set(x_3, x_8, x_10); +x_17 = !lean_is_exclusive(x_16); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; +x_18 = lean_ctor_get(x_16, 0); +lean_dec(x_18); +x_19 = lean_box(0); +lean_ctor_set(x_16, 0, x_19); return x_16; } else { -uint8_t x_17; -x_17 = !lean_is_exclusive(x_9); -if (x_17 == 0) -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_18 = lean_ctor_get(x_9, 0); -x_19 = l_Nat_min(x_18, x_1); -lean_dec(x_18); -lean_ctor_set(x_9, 0, x_19); -lean_ctor_set(x_3, 1, x_12); -x_20 = lean_box(0); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_3); -x_22 = lean_alloc_ctor(1, 1, 0); +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_16, 1); +lean_inc(x_20); +lean_dec(x_16); +x_21 = lean_box(0); +x_22 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_22, 0, x_21); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_6); -return x_23; +lean_ctor_set(x_22, 1, x_20); +return x_22; +} } 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; -x_24 = lean_ctor_get(x_9, 0); -lean_inc(x_24); -lean_dec(x_9); +uint8_t x_23; +x_23 = !lean_is_exclusive(x_12); +if (x_23 == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_24 = lean_ctor_get(x_12, 0); x_25 = l_Nat_min(x_24, x_1); lean_dec(x_24); -x_26 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_3, 3, x_26); -lean_ctor_set(x_3, 1, x_12); -x_27 = lean_box(0); -x_28 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_28, 0, x_27); -lean_ctor_set(x_28, 1, x_3); -x_29 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_29, 0, x_28); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_6); -return x_30; +lean_ctor_set(x_12, 0, x_25); +lean_ctor_set(x_8, 1, x_15); +x_26 = lean_io_ref_set(x_3, x_8, x_10); +x_27 = !lean_is_exclusive(x_26); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = lean_ctor_get(x_26, 0); +lean_dec(x_28); +x_29 = lean_box(0); +lean_ctor_set(x_26, 0, x_29); +return x_26; } +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_26, 1); +lean_inc(x_30); +lean_dec(x_26); +x_31 = lean_box(0); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_30); +return x_32; } } else { -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; lean_object* x_36; lean_object* x_37; -x_31 = lean_ctor_get(x_3, 0); -x_32 = lean_ctor_get(x_3, 2); -x_33 = lean_ctor_get(x_3, 3); -x_34 = lean_ctor_get(x_3, 4); -x_35 = lean_ctor_get_uint8(x_3, sizeof(void*)*5); -lean_inc(x_34); +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_33 = lean_ctor_get(x_12, 0); lean_inc(x_33); -lean_inc(x_32); -lean_inc(x_31); -lean_dec(x_3); -x_36 = l_Nat_min(x_1, x_1); -x_37 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_37, 0, x_36); -if (lean_obj_tag(x_33) == 0) -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_dec(x_12); +x_34 = l_Nat_min(x_33, x_1); +lean_dec(x_33); +x_35 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_8, 3, x_35); +lean_ctor_set(x_8, 1, x_15); +x_36 = lean_io_ref_set(x_3, x_8, x_10); +x_37 = lean_ctor_get(x_36, 1); lean_inc(x_37); -x_38 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_38, 0, x_31); -lean_ctor_set(x_38, 1, x_37); -lean_ctor_set(x_38, 2, x_32); -lean_ctor_set(x_38, 3, x_37); -lean_ctor_set(x_38, 4, x_34); -lean_ctor_set_uint8(x_38, sizeof(void*)*5, x_35); +if (lean_is_exclusive(x_36)) { + lean_ctor_release(x_36, 0); + lean_ctor_release(x_36, 1); + x_38 = x_36; +} else { + lean_dec_ref(x_36); + x_38 = lean_box(0); +} x_39 = lean_box(0); -x_40 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_38)) { + x_40 = lean_alloc_ctor(0, 2, 0); +} else { + x_40 = x_38; +} lean_ctor_set(x_40, 0, x_39); -lean_ctor_set(x_40, 1, x_38); -x_41 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_41, 0, x_40); -x_42 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_42, 0, x_41); -lean_ctor_set(x_42, 1, x_6); -return x_42; +lean_ctor_set(x_40, 1, x_37); +return x_40; +} +} } else { -lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_43 = lean_ctor_get(x_33, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; uint8_t x_45; lean_object* x_46; lean_object* x_47; +x_41 = lean_ctor_get(x_8, 0); +x_42 = lean_ctor_get(x_8, 2); +x_43 = lean_ctor_get(x_8, 3); +x_44 = lean_ctor_get(x_8, 4); +x_45 = lean_ctor_get_uint8(x_8, sizeof(void*)*5); +lean_inc(x_44); lean_inc(x_43); -if (lean_is_exclusive(x_33)) { - lean_ctor_release(x_33, 0); - x_44 = x_33; +lean_inc(x_42); +lean_inc(x_41); +lean_dec(x_8); +x_46 = l_Nat_min(x_1, x_1); +x_47 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_47, 0, x_46); +if (lean_obj_tag(x_43) == 0) +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +lean_inc(x_47); +x_48 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_48, 0, x_41); +lean_ctor_set(x_48, 1, x_47); +lean_ctor_set(x_48, 2, x_42); +lean_ctor_set(x_48, 3, x_47); +lean_ctor_set(x_48, 4, x_44); +lean_ctor_set_uint8(x_48, sizeof(void*)*5, x_45); +x_49 = lean_io_ref_set(x_3, x_48, x_10); +x_50 = lean_ctor_get(x_49, 1); +lean_inc(x_50); +if (lean_is_exclusive(x_49)) { + lean_ctor_release(x_49, 0); + lean_ctor_release(x_49, 1); + x_51 = x_49; } else { - lean_dec_ref(x_33); - x_44 = lean_box(0); + lean_dec_ref(x_49); + x_51 = lean_box(0); } -x_45 = l_Nat_min(x_43, x_1); -lean_dec(x_43); -if (lean_is_scalar(x_44)) { - x_46 = lean_alloc_ctor(1, 1, 0); +x_52 = lean_box(0); +if (lean_is_scalar(x_51)) { + x_53 = lean_alloc_ctor(0, 2, 0); } else { - x_46 = x_44; -} -lean_ctor_set(x_46, 0, x_45); -x_47 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_47, 0, x_31); -lean_ctor_set(x_47, 1, x_37); -lean_ctor_set(x_47, 2, x_32); -lean_ctor_set(x_47, 3, x_46); -lean_ctor_set(x_47, 4, x_34); -lean_ctor_set_uint8(x_47, sizeof(void*)*5, x_35); -x_48 = lean_box(0); -x_49 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_49, 0, x_48); -lean_ctor_set(x_49, 1, x_47); -x_50 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_50, 0, x_49); -x_51 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_51, 0, x_50); -lean_ctor_set(x_51, 1, x_6); -return x_51; -} + x_53 = x_51; } +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_50); +return x_53; } else { -uint8_t x_52; -x_52 = !lean_is_exclusive(x_3); -if (x_52 == 0) -{ -lean_object* x_53; lean_object* x_54; uint8_t x_55; -x_53 = lean_ctor_get(x_3, 3); -x_54 = lean_ctor_get(x_3, 1); +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_54 = lean_ctor_get(x_43, 0); +lean_inc(x_54); +if (lean_is_exclusive(x_43)) { + lean_ctor_release(x_43, 0); + x_55 = x_43; +} else { + lean_dec_ref(x_43); + x_55 = lean_box(0); +} +x_56 = l_Nat_min(x_54, x_1); lean_dec(x_54); -x_55 = !lean_is_exclusive(x_7); -if (x_55 == 0) -{ -lean_object* x_56; lean_object* x_57; -x_56 = lean_ctor_get(x_7, 0); -x_57 = l_Nat_min(x_56, x_1); -lean_dec(x_56); -lean_ctor_set(x_7, 0, x_57); -if (lean_obj_tag(x_53) == 0) -{ -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_58 = l_Nat_min(x_1, x_1); -x_59 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_59, 0, x_58); -lean_ctor_set(x_3, 3, x_59); -x_60 = lean_box(0); -x_61 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_61, 0, x_60); -lean_ctor_set(x_61, 1, x_3); -x_62 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_62, 0, x_61); -x_63 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_55)) { + x_57 = lean_alloc_ctor(1, 1, 0); +} else { + x_57 = x_55; +} +lean_ctor_set(x_57, 0, x_56); +x_58 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_58, 0, x_41); +lean_ctor_set(x_58, 1, x_47); +lean_ctor_set(x_58, 2, x_42); +lean_ctor_set(x_58, 3, x_57); +lean_ctor_set(x_58, 4, x_44); +lean_ctor_set_uint8(x_58, sizeof(void*)*5, x_45); +x_59 = lean_io_ref_set(x_3, x_58, x_10); +x_60 = lean_ctor_get(x_59, 1); +lean_inc(x_60); +if (lean_is_exclusive(x_59)) { + lean_ctor_release(x_59, 0); + lean_ctor_release(x_59, 1); + x_61 = x_59; +} else { + lean_dec_ref(x_59); + x_61 = lean_box(0); +} +x_62 = lean_box(0); +if (lean_is_scalar(x_61)) { + x_63 = lean_alloc_ctor(0, 2, 0); +} else { + x_63 = x_61; +} lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_6); +lean_ctor_set(x_63, 1, x_60); return x_63; } -else -{ -uint8_t x_64; -x_64 = !lean_is_exclusive(x_53); -if (x_64 == 0) -{ -lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; -x_65 = lean_ctor_get(x_53, 0); -x_66 = l_Nat_min(x_65, x_1); -lean_dec(x_65); -lean_ctor_set(x_53, 0, x_66); -x_67 = lean_box(0); -x_68 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_68, 0, x_67); -lean_ctor_set(x_68, 1, x_3); -x_69 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_69, 0, x_68); -x_70 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_70, 0, x_69); -lean_ctor_set(x_70, 1, x_6); -return x_70; -} -else -{ -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; -x_71 = lean_ctor_get(x_53, 0); -lean_inc(x_71); -lean_dec(x_53); -x_72 = l_Nat_min(x_71, x_1); -lean_dec(x_71); -x_73 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_73, 0, x_72); -lean_ctor_set(x_3, 3, x_73); -x_74 = lean_box(0); -x_75 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_75, 0, x_74); -lean_ctor_set(x_75, 1, x_3); -x_76 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_76, 0, x_75); -x_77 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_77, 0, x_76); -lean_ctor_set(x_77, 1, x_6); -return x_77; -} } } else { -lean_object* x_78; lean_object* x_79; lean_object* x_80; -x_78 = lean_ctor_get(x_7, 0); -lean_inc(x_78); +lean_object* x_64; uint8_t x_65; +x_64 = lean_ctor_get(x_7, 1); +lean_inc(x_64); lean_dec(x_7); -x_79 = l_Nat_min(x_78, x_1); -lean_dec(x_78); -x_80 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_80, 0, x_79); -if (lean_obj_tag(x_53) == 0) +x_65 = !lean_is_exclusive(x_8); +if (x_65 == 0) { -lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; -x_81 = l_Nat_min(x_1, x_1); -x_82 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_82, 0, x_81); -lean_ctor_set(x_3, 3, x_82); -lean_ctor_set(x_3, 1, x_80); -x_83 = lean_box(0); -x_84 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_84, 0, x_83); -lean_ctor_set(x_84, 1, x_3); -x_85 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_85, 0, x_84); -x_86 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_86, 0, x_85); -lean_ctor_set(x_86, 1, x_6); -return x_86; +lean_object* x_66; lean_object* x_67; uint8_t x_68; +x_66 = lean_ctor_get(x_8, 3); +x_67 = lean_ctor_get(x_8, 1); +lean_dec(x_67); +x_68 = !lean_is_exclusive(x_9); +if (x_68 == 0) +{ +lean_object* x_69; lean_object* x_70; +x_69 = lean_ctor_get(x_9, 0); +x_70 = l_Nat_min(x_69, x_1); +lean_dec(x_69); +lean_ctor_set(x_9, 0, x_70); +if (lean_obj_tag(x_66) == 0) +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; uint8_t x_74; +x_71 = l_Nat_min(x_1, x_1); +x_72 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_72, 0, x_71); +lean_ctor_set(x_8, 3, x_72); +x_73 = lean_io_ref_set(x_3, x_8, x_64); +x_74 = !lean_is_exclusive(x_73); +if (x_74 == 0) +{ +lean_object* x_75; lean_object* x_76; +x_75 = lean_ctor_get(x_73, 0); +lean_dec(x_75); +x_76 = lean_box(0); +lean_ctor_set(x_73, 0, x_76); +return x_73; } else { -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; -x_87 = lean_ctor_get(x_53, 0); +lean_object* x_77; lean_object* x_78; lean_object* x_79; +x_77 = lean_ctor_get(x_73, 1); +lean_inc(x_77); +lean_dec(x_73); +x_78 = lean_box(0); +x_79 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_79, 0, x_78); +lean_ctor_set(x_79, 1, x_77); +return x_79; +} +} +else +{ +uint8_t x_80; +x_80 = !lean_is_exclusive(x_66); +if (x_80 == 0) +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; uint8_t x_84; +x_81 = lean_ctor_get(x_66, 0); +x_82 = l_Nat_min(x_81, x_1); +lean_dec(x_81); +lean_ctor_set(x_66, 0, x_82); +x_83 = lean_io_ref_set(x_3, x_8, x_64); +x_84 = !lean_is_exclusive(x_83); +if (x_84 == 0) +{ +lean_object* x_85; lean_object* x_86; +x_85 = lean_ctor_get(x_83, 0); +lean_dec(x_85); +x_86 = lean_box(0); +lean_ctor_set(x_83, 0, x_86); +return x_83; +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; +x_87 = lean_ctor_get(x_83, 1); lean_inc(x_87); -if (lean_is_exclusive(x_53)) { - lean_ctor_release(x_53, 0); - x_88 = x_53; -} else { - lean_dec_ref(x_53); - x_88 = lean_box(0); +lean_dec(x_83); +x_88 = lean_box(0); +x_89 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_89, 0, x_88); +lean_ctor_set(x_89, 1, x_87); +return x_89; } -x_89 = l_Nat_min(x_87, x_1); -lean_dec(x_87); -if (lean_is_scalar(x_88)) { - x_90 = lean_alloc_ctor(1, 1, 0); -} else { - x_90 = x_88; } -lean_ctor_set(x_90, 0, x_89); -lean_ctor_set(x_3, 3, x_90); -lean_ctor_set(x_3, 1, x_80); -x_91 = lean_box(0); -x_92 = lean_alloc_ctor(0, 2, 0); +else +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; +x_90 = lean_ctor_get(x_66, 0); +lean_inc(x_90); +lean_dec(x_66); +x_91 = l_Nat_min(x_90, x_1); +lean_dec(x_90); +x_92 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_92, 0, x_91); -lean_ctor_set(x_92, 1, x_3); -x_93 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_93, 0, x_92); -x_94 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_94, 0, x_93); -lean_ctor_set(x_94, 1, x_6); -return x_94; +lean_ctor_set(x_8, 3, x_92); +x_93 = lean_io_ref_set(x_3, x_8, x_64); +x_94 = lean_ctor_get(x_93, 1); +lean_inc(x_94); +if (lean_is_exclusive(x_93)) { + lean_ctor_release(x_93, 0); + lean_ctor_release(x_93, 1); + x_95 = x_93; +} else { + lean_dec_ref(x_93); + x_95 = lean_box(0); +} +x_96 = lean_box(0); +if (lean_is_scalar(x_95)) { + x_97 = lean_alloc_ctor(0, 2, 0); +} else { + x_97 = x_95; +} +lean_ctor_set(x_97, 0, x_96); +lean_ctor_set(x_97, 1, x_94); +return x_97; } } } else { -lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; uint8_t x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; -x_95 = lean_ctor_get(x_3, 0); -x_96 = lean_ctor_get(x_3, 2); -x_97 = lean_ctor_get(x_3, 3); -x_98 = lean_ctor_get(x_3, 4); -x_99 = lean_ctor_get_uint8(x_3, sizeof(void*)*5); +lean_object* x_98; lean_object* x_99; lean_object* x_100; +x_98 = lean_ctor_get(x_9, 0); lean_inc(x_98); -lean_inc(x_97); -lean_inc(x_96); -lean_inc(x_95); -lean_dec(x_3); -x_100 = lean_ctor_get(x_7, 0); -lean_inc(x_100); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - x_101 = x_7; -} else { - lean_dec_ref(x_7); - x_101 = lean_box(0); -} -x_102 = l_Nat_min(x_100, x_1); -lean_dec(x_100); -if (lean_is_scalar(x_101)) { - x_103 = lean_alloc_ctor(1, 1, 0); -} else { - x_103 = x_101; -} -lean_ctor_set(x_103, 0, x_102); -if (lean_obj_tag(x_97) == 0) +lean_dec(x_9); +x_99 = l_Nat_min(x_98, x_1); +lean_dec(x_98); +x_100 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_100, 0, x_99); +if (lean_obj_tag(x_66) == 0) { -lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; -x_104 = l_Nat_min(x_1, x_1); -x_105 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_105, 0, x_104); -x_106 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_106, 0, x_95); -lean_ctor_set(x_106, 1, x_103); -lean_ctor_set(x_106, 2, x_96); -lean_ctor_set(x_106, 3, x_105); -lean_ctor_set(x_106, 4, x_98); -lean_ctor_set_uint8(x_106, sizeof(void*)*5, x_99); -x_107 = lean_box(0); -x_108 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_108, 0, x_107); -lean_ctor_set(x_108, 1, x_106); -x_109 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_109, 0, x_108); -x_110 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_110, 0, x_109); -lean_ctor_set(x_110, 1, x_6); -return x_110; +lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_101 = l_Nat_min(x_1, x_1); +x_102 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_102, 0, x_101); +lean_ctor_set(x_8, 3, x_102); +lean_ctor_set(x_8, 1, x_100); +x_103 = lean_io_ref_set(x_3, x_8, x_64); +x_104 = lean_ctor_get(x_103, 1); +lean_inc(x_104); +if (lean_is_exclusive(x_103)) { + lean_ctor_release(x_103, 0); + lean_ctor_release(x_103, 1); + x_105 = x_103; +} else { + lean_dec_ref(x_103); + x_105 = lean_box(0); +} +x_106 = lean_box(0); +if (lean_is_scalar(x_105)) { + x_107 = lean_alloc_ctor(0, 2, 0); +} else { + x_107 = x_105; +} +lean_ctor_set(x_107, 0, x_106); +lean_ctor_set(x_107, 1, x_104); +return x_107; } else { -lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; -x_111 = lean_ctor_get(x_97, 0); -lean_inc(x_111); -if (lean_is_exclusive(x_97)) { - lean_ctor_release(x_97, 0); - x_112 = x_97; +lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; +x_108 = lean_ctor_get(x_66, 0); +lean_inc(x_108); +if (lean_is_exclusive(x_66)) { + lean_ctor_release(x_66, 0); + x_109 = x_66; } else { - lean_dec_ref(x_97); - x_112 = lean_box(0); + lean_dec_ref(x_66); + x_109 = lean_box(0); } -x_113 = l_Nat_min(x_111, x_1); -lean_dec(x_111); -if (lean_is_scalar(x_112)) { - x_114 = lean_alloc_ctor(1, 1, 0); +x_110 = l_Nat_min(x_108, x_1); +lean_dec(x_108); +if (lean_is_scalar(x_109)) { + x_111 = lean_alloc_ctor(1, 1, 0); } else { + x_111 = x_109; +} +lean_ctor_set(x_111, 0, x_110); +lean_ctor_set(x_8, 3, x_111); +lean_ctor_set(x_8, 1, x_100); +x_112 = lean_io_ref_set(x_3, x_8, x_64); +x_113 = lean_ctor_get(x_112, 1); +lean_inc(x_113); +if (lean_is_exclusive(x_112)) { + lean_ctor_release(x_112, 0); + lean_ctor_release(x_112, 1); x_114 = x_112; +} else { + lean_dec_ref(x_112); + x_114 = lean_box(0); } -lean_ctor_set(x_114, 0, x_113); -x_115 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_115, 0, x_95); -lean_ctor_set(x_115, 1, x_103); -lean_ctor_set(x_115, 2, x_96); -lean_ctor_set(x_115, 3, x_114); -lean_ctor_set(x_115, 4, x_98); -lean_ctor_set_uint8(x_115, sizeof(void*)*5, x_99); -x_116 = lean_box(0); -x_117 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_117, 0, x_116); -lean_ctor_set(x_117, 1, x_115); -x_118 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_118, 0, x_117); -x_119 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_119, 0, x_118); -lean_ctor_set(x_119, 1, x_6); -return x_119; +x_115 = lean_box(0); +if (lean_is_scalar(x_114)) { + x_116 = lean_alloc_ctor(0, 2, 0); +} else { + x_116 = x_114; +} +lean_ctor_set(x_116, 0, x_115); +lean_ctor_set(x_116, 1, x_113); +return x_116; +} +} +} +else +{ +lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; uint8_t x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; +x_117 = lean_ctor_get(x_8, 0); +x_118 = lean_ctor_get(x_8, 2); +x_119 = lean_ctor_get(x_8, 3); +x_120 = lean_ctor_get(x_8, 4); +x_121 = lean_ctor_get_uint8(x_8, sizeof(void*)*5); +lean_inc(x_120); +lean_inc(x_119); +lean_inc(x_118); +lean_inc(x_117); +lean_dec(x_8); +x_122 = lean_ctor_get(x_9, 0); +lean_inc(x_122); +if (lean_is_exclusive(x_9)) { + lean_ctor_release(x_9, 0); + x_123 = x_9; +} else { + lean_dec_ref(x_9); + x_123 = lean_box(0); +} +x_124 = l_Nat_min(x_122, x_1); +lean_dec(x_122); +if (lean_is_scalar(x_123)) { + x_125 = lean_alloc_ctor(1, 1, 0); +} else { + x_125 = x_123; +} +lean_ctor_set(x_125, 0, x_124); +if (lean_obj_tag(x_119) == 0) +{ +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; +x_126 = l_Nat_min(x_1, x_1); +x_127 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_127, 0, x_126); +x_128 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_128, 0, x_117); +lean_ctor_set(x_128, 1, x_125); +lean_ctor_set(x_128, 2, x_118); +lean_ctor_set(x_128, 3, x_127); +lean_ctor_set(x_128, 4, x_120); +lean_ctor_set_uint8(x_128, sizeof(void*)*5, x_121); +x_129 = lean_io_ref_set(x_3, x_128, x_64); +x_130 = lean_ctor_get(x_129, 1); +lean_inc(x_130); +if (lean_is_exclusive(x_129)) { + lean_ctor_release(x_129, 0); + lean_ctor_release(x_129, 1); + x_131 = x_129; +} else { + lean_dec_ref(x_129); + x_131 = lean_box(0); +} +x_132 = lean_box(0); +if (lean_is_scalar(x_131)) { + x_133 = lean_alloc_ctor(0, 2, 0); +} else { + x_133 = x_131; +} +lean_ctor_set(x_133, 0, x_132); +lean_ctor_set(x_133, 1, x_130); +return x_133; +} +else +{ +lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; +x_134 = lean_ctor_get(x_119, 0); +lean_inc(x_134); +if (lean_is_exclusive(x_119)) { + lean_ctor_release(x_119, 0); + x_135 = x_119; +} else { + lean_dec_ref(x_119); + x_135 = lean_box(0); +} +x_136 = l_Nat_min(x_134, x_1); +lean_dec(x_134); +if (lean_is_scalar(x_135)) { + x_137 = lean_alloc_ctor(1, 1, 0); +} else { + x_137 = x_135; +} +lean_ctor_set(x_137, 0, x_136); +x_138 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_138, 0, x_117); +lean_ctor_set(x_138, 1, x_125); +lean_ctor_set(x_138, 2, x_118); +lean_ctor_set(x_138, 3, x_137); +lean_ctor_set(x_138, 4, x_120); +lean_ctor_set_uint8(x_138, sizeof(void*)*5, x_121); +x_139 = lean_io_ref_set(x_3, x_138, x_64); +x_140 = lean_ctor_get(x_139, 1); +lean_inc(x_140); +if (lean_is_exclusive(x_139)) { + lean_ctor_release(x_139, 0); + lean_ctor_release(x_139, 1); + x_141 = x_139; +} else { + lean_dec_ref(x_139); + x_141 = lean_box(0); +} +x_142 = lean_box(0); +if (lean_is_scalar(x_141)) { + x_143 = lean_alloc_ctor(0, 2, 0); +} else { + x_143 = x_141; +} +lean_ctor_set(x_143, 0, x_142); +lean_ctor_set(x_143, 1, x_140); +return x_143; } } } @@ -2146,218 +2375,324 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); return x_7; } } -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -uint8_t x_5; -x_5 = !lean_is_exclusive(x_1); -if (x_5 == 0) +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_io_ref_get(x_1, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +lean_dec(x_6); +x_8 = !lean_is_exclusive(x_5); +if (x_8 == 0) { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_6 = lean_ctor_get(x_1, 0); -x_7 = l_Lean_Syntax_Traverser_left(x_6); -lean_ctor_set(x_1, 0, x_7); -x_8 = lean_box(0); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_1); -x_10 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_10, 0, x_9); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_4); +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_5, 0); +lean_dec(x_9); +x_10 = lean_ctor_get(x_7, 0); +lean_inc(x_10); +lean_dec(x_7); +lean_ctor_set(x_5, 0, x_10); +return x_5; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_5, 1); +lean_inc(x_11); +lean_dec(x_5); +x_12 = lean_ctor_get(x_7, 0); +lean_inc(x_12); +lean_dec(x_7); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_11); +return x_13; +} +} +} +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg___boxed), 4, 0); +return x_2; +} +} +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_io_ref_take(x_1, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = !lean_is_exclusive(x_6); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_9 = lean_ctor_get(x_6, 0); +x_10 = l_Lean_Syntax_Traverser_left(x_9); +lean_ctor_set(x_6, 0, x_10); +x_11 = lean_io_ref_set(x_1, x_6, x_7); +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_11, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set(x_11, 0, x_14); return x_11; } else { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_12 = lean_ctor_get(x_1, 0); -x_13 = lean_ctor_get(x_1, 1); -x_14 = lean_ctor_get(x_1, 2); -x_15 = lean_ctor_get(x_1, 3); -x_16 = lean_ctor_get(x_1, 4); -x_17 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); -lean_inc(x_16); +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_11, 1); lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_1); -x_18 = l_Lean_Syntax_Traverser_left(x_12); -x_19 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_13); -lean_ctor_set(x_19, 2, x_14); -lean_ctor_set(x_19, 3, x_15); -lean_ctor_set(x_19, 4, x_16); -lean_ctor_set_uint8(x_19, sizeof(void*)*5, x_17); -x_20 = lean_box(0); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_19); -x_22 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_22, 0, x_21); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_4); -return x_23; +lean_dec(x_11); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +return x_17; +} +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_18 = lean_ctor_get(x_6, 0); +x_19 = lean_ctor_get(x_6, 1); +x_20 = lean_ctor_get(x_6, 2); +x_21 = lean_ctor_get(x_6, 3); +x_22 = lean_ctor_get(x_6, 4); +x_23 = lean_ctor_get_uint8(x_6, sizeof(void*)*5); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_6); +x_24 = l_Lean_Syntax_Traverser_left(x_18); +x_25 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_19); +lean_ctor_set(x_25, 2, x_20); +lean_ctor_set(x_25, 3, x_21); +lean_ctor_set(x_25, 4, x_22); +lean_ctor_set_uint8(x_25, sizeof(void*)*5, x_23); +x_26 = lean_io_ref_set(x_1, x_25, x_7); +x_27 = lean_ctor_get(x_26, 1); +lean_inc(x_27); +if (lean_is_exclusive(x_26)) { + lean_ctor_release(x_26, 0); + lean_ctor_release(x_26, 1); + x_28 = x_26; +} else { + lean_dec_ref(x_26); + x_28 = lean_box(0); +} +x_29 = lean_box(0); +if (lean_is_scalar(x_28)) { + x_30 = lean_alloc_ctor(0, 2, 0); +} else { + x_30 = x_28; +} +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_27); +return x_30; } } } -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1(lean_object* x_1) { +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -lean_dec(x_5); -x_7 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_7, 0, x_6); -lean_ctor_set(x_7, 1, x_1); -x_8 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_8, 0, x_7); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_4); -return x_9; -} -} -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg___boxed), 4, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg___boxed), 4, 0); return x_2; } } lean_object* l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_7; -x_7 = !lean_is_exclusive(x_3); -if (x_7 == 0) +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_io_ref_take(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 0) { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_ctor_get(x_3, 0); -x_9 = l_Lean_Syntax_Traverser_down(x_8, x_1); -lean_ctor_set(x_3, 0, x_9); -x_10 = lean_box(0); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_3); -x_12 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_12, 0, x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_6); +lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_11 = lean_ctor_get(x_8, 0); +x_12 = l_Lean_Syntax_Traverser_down(x_11, x_1); +lean_ctor_set(x_8, 0, x_12); +x_13 = lean_io_ref_set(x_3, x_8, x_9); +x_14 = !lean_is_exclusive(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 0); +lean_dec(x_15); +x_16 = lean_box(0); +lean_ctor_set(x_13, 0, x_16); return x_13; } else { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_14 = lean_ctor_get(x_3, 0); -x_15 = lean_ctor_get(x_3, 1); -x_16 = lean_ctor_get(x_3, 2); -x_17 = lean_ctor_get(x_3, 3); -x_18 = lean_ctor_get(x_3, 4); -x_19 = lean_ctor_get_uint8(x_3, sizeof(void*)*5); -lean_inc(x_18); +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 1); lean_inc(x_17); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_3); -x_20 = l_Lean_Syntax_Traverser_down(x_14, x_1); -x_21 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_15); -lean_ctor_set(x_21, 2, x_16); -lean_ctor_set(x_21, 3, x_17); -lean_ctor_set(x_21, 4, x_18); -lean_ctor_set_uint8(x_21, sizeof(void*)*5, x_19); -x_22 = lean_box(0); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -x_24 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_24, 0, x_23); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_6); -return x_25; +lean_dec(x_13); +x_18 = lean_box(0); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +return x_19; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_20 = lean_ctor_get(x_8, 0); +x_21 = lean_ctor_get(x_8, 1); +x_22 = lean_ctor_get(x_8, 2); +x_23 = lean_ctor_get(x_8, 3); +x_24 = lean_ctor_get(x_8, 4); +x_25 = lean_ctor_get_uint8(x_8, sizeof(void*)*5); +lean_inc(x_24); +lean_inc(x_23); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_8); +x_26 = l_Lean_Syntax_Traverser_down(x_20, x_1); +x_27 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_21); +lean_ctor_set(x_27, 2, x_22); +lean_ctor_set(x_27, 3, x_23); +lean_ctor_set(x_27, 4, x_24); +lean_ctor_set_uint8(x_27, sizeof(void*)*5, x_25); +x_28 = lean_io_ref_set(x_3, x_27, x_9); +x_29 = lean_ctor_get(x_28, 1); +lean_inc(x_29); +if (lean_is_exclusive(x_28)) { + lean_ctor_release(x_28, 0); + lean_ctor_release(x_28, 1); + x_30 = x_28; +} else { + lean_dec_ref(x_28); + x_30 = lean_box(0); +} +x_31 = lean_box(0); +if (lean_is_scalar(x_30)) { + x_32 = lean_alloc_ctor(0, 2, 0); +} else { + x_32 = x_30; +} +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_29); +return x_32; } } } lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -uint8_t x_5; -x_5 = !lean_is_exclusive(x_1); -if (x_5 == 0) +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_io_ref_take(x_1, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = !lean_is_exclusive(x_6); +if (x_8 == 0) { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_6 = lean_ctor_get(x_1, 0); -x_7 = l_Lean_Syntax_Traverser_up(x_6); -lean_ctor_set(x_1, 0, x_7); -x_8 = lean_box(0); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_1); -x_10 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_10, 0, x_9); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_4); +lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_9 = lean_ctor_get(x_6, 0); +x_10 = l_Lean_Syntax_Traverser_up(x_9); +lean_ctor_set(x_6, 0, x_10); +x_11 = lean_io_ref_set(x_1, x_6, x_7); +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_11, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set(x_11, 0, x_14); return x_11; } else { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_12 = lean_ctor_get(x_1, 0); -x_13 = lean_ctor_get(x_1, 1); -x_14 = lean_ctor_get(x_1, 2); -x_15 = lean_ctor_get(x_1, 3); -x_16 = lean_ctor_get(x_1, 4); -x_17 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); -lean_inc(x_16); +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_11, 1); lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_1); -x_18 = l_Lean_Syntax_Traverser_up(x_12); -x_19 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_13); -lean_ctor_set(x_19, 2, x_14); -lean_ctor_set(x_19, 3, x_15); -lean_ctor_set(x_19, 4, x_16); -lean_ctor_set_uint8(x_19, sizeof(void*)*5, x_17); -x_20 = lean_box(0); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_19); -x_22 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_22, 0, x_21); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_4); -return x_23; +lean_dec(x_11); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +return x_17; +} +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_18 = lean_ctor_get(x_6, 0); +x_19 = lean_ctor_get(x_6, 1); +x_20 = lean_ctor_get(x_6, 2); +x_21 = lean_ctor_get(x_6, 3); +x_22 = lean_ctor_get(x_6, 4); +x_23 = lean_ctor_get_uint8(x_6, sizeof(void*)*5); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_6); +x_24 = l_Lean_Syntax_Traverser_up(x_18); +x_25 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_19); +lean_ctor_set(x_25, 2, x_20); +lean_ctor_set(x_25, 3, x_21); +lean_ctor_set(x_25, 4, x_22); +lean_ctor_set_uint8(x_25, sizeof(void*)*5, x_23); +x_26 = lean_io_ref_set(x_1, x_25, x_7); +x_27 = lean_ctor_get(x_26, 1); +lean_inc(x_27); +if (lean_is_exclusive(x_26)) { + lean_ctor_release(x_26, 0); + lean_ctor_release(x_26, 1); + x_28 = x_26; +} else { + lean_dec_ref(x_26); + x_28 = lean_box(0); +} +x_29 = lean_box(0); +if (lean_is_scalar(x_28)) { + x_30 = lean_alloc_ctor(0, 2, 0); +} else { + x_30 = x_28; +} +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_27); +return x_30; } } } @@ -2372,281 +2707,125 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitArgs(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; -x_18 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -lean_dec(x_19); -x_21 = lean_ctor_get(x_18, 1); -lean_inc(x_21); -lean_dec(x_18); -x_22 = lean_ctor_get(x_20, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_20, 1); -lean_inc(x_23); -lean_dec(x_20); -x_24 = l_Lean_Syntax_getArgs(x_22); -lean_dec(x_22); -x_25 = lean_array_get_size(x_24); -lean_dec(x_24); -x_26 = lean_unsigned_to_nat(0u); -x_27 = lean_nat_dec_lt(x_26, x_25); -if (x_27 == 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; uint8_t x_13; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = l_Lean_Syntax_getArgs(x_8); +lean_dec(x_8); +x_11 = lean_array_get_size(x_10); +lean_dec(x_10); +x_12 = lean_unsigned_to_nat(0u); +x_13 = lean_nat_dec_lt(x_12, x_11); +if (x_13 == 0) { -lean_object* x_28; -lean_dec(x_25); +lean_object* x_14; +lean_dec(x_11); lean_dec(x_2); lean_dec(x_1); -x_28 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_23, x_4, x_5, x_21); +x_14 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_9); lean_dec(x_5); lean_dec(x_4); -return x_28; +lean_dec(x_3); +return x_14; } else { -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_29 = lean_unsigned_to_nat(1u); -x_30 = lean_nat_sub(x_25, x_29); -lean_dec(x_25); -x_31 = l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__3(x_30, x_2, x_23, x_4, x_5, x_21); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -lean_dec(x_32); -x_34 = lean_ctor_get(x_31, 1); -lean_inc(x_34); -lean_dec(x_31); -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_unsigned_to_nat(1u); +x_16 = lean_nat_sub(x_11, x_15); +lean_dec(x_11); +x_17 = l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__3(x_16, x_2, x_3, x_4, x_5, x_9); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); lean_inc(x_5); lean_inc(x_4); -x_36 = lean_apply_5(x_1, x_2, x_35, x_4, x_5, x_34); -if (lean_obj_tag(x_36) == 0) +lean_inc(x_3); +x_19 = lean_apply_5(x_1, x_2, x_3, x_4, x_5, x_18); +if (lean_obj_tag(x_19) == 0) { -lean_object* x_37; -x_37 = lean_ctor_get(x_36, 0); -lean_inc(x_37); -if (lean_obj_tag(x_37) == 0) -{ -lean_object* x_38; uint8_t x_39; -x_38 = lean_ctor_get(x_36, 1); -lean_inc(x_38); -lean_dec(x_36); -x_39 = !lean_is_exclusive(x_37); -if (x_39 == 0) -{ -x_7 = x_37; -x_8 = x_38; -goto block_17; -} -else -{ -lean_object* x_40; lean_object* x_41; -x_40 = lean_ctor_get(x_37, 0); -lean_inc(x_40); -lean_dec(x_37); -x_41 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_41, 0, x_40); -x_7 = x_41; -x_8 = x_38; -goto block_17; -} -} -else -{ -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; -x_42 = lean_ctor_get(x_37, 0); -lean_inc(x_42); -lean_dec(x_37); -x_43 = lean_ctor_get(x_36, 1); -lean_inc(x_43); -lean_dec(x_36); -x_44 = lean_ctor_get(x_42, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_42, 1); -lean_inc(x_45); -lean_dec(x_42); -x_46 = l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4___rarg(x_45, x_4, x_5, x_43); -x_47 = lean_ctor_get(x_46, 0); -lean_inc(x_47); -x_48 = !lean_is_exclusive(x_47); -if (x_48 == 0) -{ -lean_object* x_49; lean_object* x_50; uint8_t x_51; -x_49 = lean_ctor_get(x_47, 0); -x_50 = lean_ctor_get(x_46, 1); -lean_inc(x_50); -lean_dec(x_46); -x_51 = !lean_is_exclusive(x_49); -if (x_51 == 0) -{ -lean_object* x_52; -x_52 = lean_ctor_get(x_49, 0); -lean_dec(x_52); -lean_ctor_set(x_49, 0, x_44); -x_7 = x_47; -x_8 = x_50; -goto block_17; -} -else -{ -lean_object* x_53; lean_object* x_54; -x_53 = lean_ctor_get(x_49, 1); -lean_inc(x_53); -lean_dec(x_49); -x_54 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_54, 0, x_44); -lean_ctor_set(x_54, 1, x_53); -lean_ctor_set(x_47, 0, x_54); -x_7 = x_47; -x_8 = x_50; -goto block_17; -} -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_55 = lean_ctor_get(x_47, 0); -lean_inc(x_55); -lean_dec(x_47); -x_56 = lean_ctor_get(x_46, 1); -lean_inc(x_56); -lean_dec(x_46); -x_57 = lean_ctor_get(x_55, 1); -lean_inc(x_57); -if (lean_is_exclusive(x_55)) { - lean_ctor_release(x_55, 0); - lean_ctor_release(x_55, 1); - x_58 = x_55; -} else { - lean_dec_ref(x_55); - x_58 = lean_box(0); -} -if (lean_is_scalar(x_58)) { - x_59 = lean_alloc_ctor(0, 2, 0); -} else { - x_59 = x_58; -} -lean_ctor_set(x_59, 0, x_44); -lean_ctor_set(x_59, 1, x_57); -x_60 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_60, 0, x_59); -x_7 = x_60; -x_8 = x_56; -goto block_17; -} -} -} -else -{ -uint8_t x_61; +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_20 = lean_ctor_get(x_19, 1); +lean_inc(x_20); +lean_dec(x_19); +x_21 = l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4___rarg(x_3, x_4, x_5, x_20); +x_22 = lean_ctor_get(x_21, 1); +lean_inc(x_22); +lean_dec(x_21); +x_23 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_22); lean_dec(x_5); lean_dec(x_4); -x_61 = !lean_is_exclusive(x_36); -if (x_61 == 0) -{ -return x_36; +lean_dec(x_3); +return x_23; } else { -lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_62 = lean_ctor_get(x_36, 0); -x_63 = lean_ctor_get(x_36, 1); -lean_inc(x_63); -lean_inc(x_62); -lean_dec(x_36); -x_64 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -return x_64; -} -} -} -block_17: -{ -if (lean_obj_tag(x_7) == 0) -{ -uint8_t x_9; +uint8_t x_24; lean_dec(x_5); lean_dec(x_4); -x_9 = !lean_is_exclusive(x_7); -if (x_9 == 0) +lean_dec(x_3); +x_24 = !lean_is_exclusive(x_19); +if (x_24 == 0) { -lean_object* x_10; -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_7); -lean_ctor_set(x_10, 1, x_8); -return x_10; +return x_19; } else { -lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_11 = lean_ctor_get(x_7, 0); -lean_inc(x_11); -lean_dec(x_7); -x_12 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_12, 0, x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_8); -return x_13; -} -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_7, 0); -lean_inc(x_14); -lean_dec(x_7); -x_15 = lean_ctor_get(x_14, 1); -lean_inc(x_15); -lean_dec(x_14); -x_16 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_15, x_4, x_5, x_8); -lean_dec(x_5); -lean_dec(x_4); -return x_16; +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_19, 0); +x_26 = lean_ctor_get(x_19, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_19); +x_27 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +return x_27; } } } } -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +} +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___boxed(lean_object* x_1) { +lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1(x_1); +x_2 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1(x_1); lean_dec(x_1); return x_2; } } -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___boxed(lean_object* x_1) { +lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2(x_1); +x_2 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2(x_1); lean_dec(x_1); return x_2; } @@ -2658,6 +2837,7 @@ lean_object* x_7; x_7 = l_Lean_Syntax_MonadTraverser_goDown___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__3(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); return x_7; } @@ -2669,6 +2849,7 @@ lean_object* x_5; x_5 = l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -2684,16 +2865,11 @@ return x_2; lean_object* l_ReaderT_pure___at_Lean_PrettyPrinter_Parenthesizer_monadQuotation___spec__1___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) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_object* x_7; x_7 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_7, 0, x_1); -lean_ctor_set(x_7, 1, x_3); -x_8 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_8, 0, x_7); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_6); -return x_9; +lean_ctor_set(x_7, 1, x_6); +return x_7; } } lean_object* l_ReaderT_pure___at_Lean_PrettyPrinter_Parenthesizer_monadQuotation___spec__1(lean_object* x_1) { @@ -2769,6 +2945,7 @@ lean_object* x_7; x_7 = l_ReaderT_pure___at_Lean_PrettyPrinter_Parenthesizer_monadQuotation___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); return x_7; } @@ -2776,23 +2953,45 @@ return x_7; lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); -x_6 = lean_ctor_get(x_5, 2); -lean_inc(x_6); +lean_object* x_5; uint8_t x_6; +x_5 = lean_io_ref_get(x_1, x_4); +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_5, 0); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +lean_dec(x_7); +x_9 = lean_ctor_get(x_8, 2); +lean_inc(x_9); +lean_dec(x_8); +x_10 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_9); +lean_dec(x_9); +lean_ctor_set(x_5, 0, x_10); +return x_5; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_11 = lean_ctor_get(x_5, 0); +x_12 = lean_ctor_get(x_5, 1); +lean_inc(x_12); +lean_inc(x_11); lean_dec(x_5); -x_7 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_6); -lean_dec(x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_1); -x_9 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_9, 0, x_8); -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_4); -return x_10; +x_13 = lean_ctor_get(x_11, 0); +lean_inc(x_13); +lean_dec(x_11); +x_14 = lean_ctor_get(x_13, 2); +lean_inc(x_14); +lean_dec(x_13); +x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(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_12); +return x_16; +} } } lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1(lean_object* x_1) { @@ -2803,65 +3002,7 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_P return x_2; } } -lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -uint8_t x_7; -x_7 = !lean_is_exclusive(x_3); -if (x_7 == 0) -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_ctor_get(x_3, 0); -x_9 = l_Lean_Syntax_Traverser_setCur(x_8, x_1); -lean_ctor_set(x_3, 0, x_9); -x_10 = lean_box(0); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_3); -x_12 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_12, 0, x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_6); -return x_13; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_14 = lean_ctor_get(x_3, 0); -x_15 = lean_ctor_get(x_3, 1); -x_16 = lean_ctor_get(x_3, 2); -x_17 = lean_ctor_get(x_3, 3); -x_18 = lean_ctor_get(x_3, 4); -x_19 = lean_ctor_get_uint8(x_3, sizeof(void*)*5); -lean_inc(x_18); -lean_inc(x_17); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_3); -x_20 = l_Lean_Syntax_Traverser_setCur(x_14, x_1); -x_21 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_15); -lean_ctor_set(x_21, 2, x_16); -lean_ctor_set(x_21, 3, x_17); -lean_ctor_set(x_21, 4, x_18); -lean_ctor_set_uint8(x_21, sizeof(void*)*5, x_19); -x_22 = lean_box(0); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -x_24 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_24, 0, x_23); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_6); -return x_25; -} -} -} -lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { 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; uint8_t x_15; @@ -2899,140 +3040,120 @@ x_21 = lean_io_ref_set(x_6, x_12, x_14); x_22 = !lean_is_exclusive(x_21); if (x_22 == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_object* x_23; lean_object* x_24; x_23 = lean_ctor_get(x_21, 0); lean_dec(x_23); x_24 = lean_box(0); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_4); -x_26 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_21, 0, x_26); +lean_ctor_set(x_21, 0, x_24); return x_21; } else { -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_27 = lean_ctor_get(x_21, 1); -lean_inc(x_27); +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_21, 1); +lean_inc(x_25); lean_dec(x_21); -x_28 = lean_box(0); -x_29 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_29, 0, x_28); -lean_ctor_set(x_29, 1, x_4); -x_30 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_31, 1, x_27); -return x_31; +x_26 = lean_box(0); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_25); +return x_27; } } else { -uint8_t 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; lean_object* x_43; -x_32 = lean_ctor_get_uint8(x_13, sizeof(void*)*1); -x_33 = lean_ctor_get(x_13, 0); -lean_inc(x_33); +uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_28 = lean_ctor_get_uint8(x_13, sizeof(void*)*1); +x_29 = lean_ctor_get(x_13, 0); +lean_inc(x_29); lean_dec(x_13); -x_34 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_34, 0, x_1); -lean_ctor_set(x_34, 1, x_9); -x_35 = l_Std_PersistentArray_push___rarg(x_33, x_34); -x_36 = lean_alloc_ctor(0, 1, 1); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set_uint8(x_36, sizeof(void*)*1, x_32); -lean_ctor_set(x_12, 2, x_36); -x_37 = lean_io_ref_set(x_6, x_12, x_14); -x_38 = lean_ctor_get(x_37, 1); -lean_inc(x_38); -if (lean_is_exclusive(x_37)) { - lean_ctor_release(x_37, 0); - lean_ctor_release(x_37, 1); - x_39 = x_37; +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_1); +lean_ctor_set(x_30, 1, x_9); +x_31 = l_Std_PersistentArray_push___rarg(x_29, x_30); +x_32 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set_uint8(x_32, sizeof(void*)*1, x_28); +lean_ctor_set(x_12, 2, x_32); +x_33 = lean_io_ref_set(x_6, x_12, x_14); +x_34 = lean_ctor_get(x_33, 1); +lean_inc(x_34); +if (lean_is_exclusive(x_33)) { + lean_ctor_release(x_33, 0); + lean_ctor_release(x_33, 1); + x_35 = x_33; } else { - lean_dec_ref(x_37); - x_39 = lean_box(0); + lean_dec_ref(x_33); + x_35 = lean_box(0); } -x_40 = lean_box(0); -x_41 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_41, 0, x_40); -lean_ctor_set(x_41, 1, x_4); -x_42 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_42, 0, x_41); -if (lean_is_scalar(x_39)) { - x_43 = lean_alloc_ctor(0, 2, 0); +x_36 = lean_box(0); +if (lean_is_scalar(x_35)) { + x_37 = lean_alloc_ctor(0, 2, 0); } else { - x_43 = x_39; + x_37 = x_35; } -lean_ctor_set(x_43, 0, x_42); -lean_ctor_set(x_43, 1, x_38); -return x_43; +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_34); +return x_37; } } else { -lean_object* x_44; lean_object* x_45; uint8_t x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; 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_44 = lean_ctor_get(x_12, 0); -x_45 = lean_ctor_get(x_12, 1); -lean_inc(x_45); -lean_inc(x_44); +lean_object* x_38; lean_object* x_39; uint8_t x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_38 = lean_ctor_get(x_12, 0); +x_39 = lean_ctor_get(x_12, 1); +lean_inc(x_39); +lean_inc(x_38); lean_dec(x_12); -x_46 = lean_ctor_get_uint8(x_13, sizeof(void*)*1); -x_47 = lean_ctor_get(x_13, 0); -lean_inc(x_47); +x_40 = lean_ctor_get_uint8(x_13, sizeof(void*)*1); +x_41 = lean_ctor_get(x_13, 0); +lean_inc(x_41); if (lean_is_exclusive(x_13)) { lean_ctor_release(x_13, 0); - x_48 = x_13; + x_42 = x_13; } else { lean_dec_ref(x_13); - x_48 = lean_box(0); + x_42 = lean_box(0); } -x_49 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_49, 0, x_1); -lean_ctor_set(x_49, 1, x_9); -x_50 = l_Std_PersistentArray_push___rarg(x_47, x_49); -if (lean_is_scalar(x_48)) { - x_51 = lean_alloc_ctor(0, 1, 1); +x_43 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_43, 0, x_1); +lean_ctor_set(x_43, 1, x_9); +x_44 = l_Std_PersistentArray_push___rarg(x_41, x_43); +if (lean_is_scalar(x_42)) { + x_45 = lean_alloc_ctor(0, 1, 1); } else { - x_51 = x_48; + x_45 = x_42; +} +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set_uint8(x_45, sizeof(void*)*1, x_40); +x_46 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_46, 0, x_38); +lean_ctor_set(x_46, 1, x_39); +lean_ctor_set(x_46, 2, x_45); +x_47 = lean_io_ref_set(x_6, x_46, x_14); +x_48 = lean_ctor_get(x_47, 1); +lean_inc(x_48); +if (lean_is_exclusive(x_47)) { + lean_ctor_release(x_47, 0); + lean_ctor_release(x_47, 1); + x_49 = x_47; +} else { + lean_dec_ref(x_47); + x_49 = lean_box(0); +} +x_50 = lean_box(0); +if (lean_is_scalar(x_49)) { + x_51 = lean_alloc_ctor(0, 2, 0); +} else { + x_51 = x_49; } lean_ctor_set(x_51, 0, x_50); -lean_ctor_set_uint8(x_51, sizeof(void*)*1, x_46); -x_52 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_52, 0, x_44); -lean_ctor_set(x_52, 1, x_45); -lean_ctor_set(x_52, 2, x_51); -x_53 = lean_io_ref_set(x_6, x_52, x_14); -x_54 = lean_ctor_get(x_53, 1); -lean_inc(x_54); -if (lean_is_exclusive(x_53)) { - lean_ctor_release(x_53, 0); - lean_ctor_release(x_53, 1); - x_55 = x_53; -} else { - lean_dec_ref(x_53); - x_55 = lean_box(0); -} -x_56 = lean_box(0); -x_57 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_57, 0, x_56); -lean_ctor_set(x_57, 1, x_4); -x_58 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_58, 0, x_57); -if (lean_is_scalar(x_55)) { - x_59 = lean_alloc_ctor(0, 2, 0); -} else { - x_59 = x_55; -} -lean_ctor_set(x_59, 0, x_58); -lean_ctor_set(x_59, 1, x_54); -return x_59; +lean_ctor_set(x_51, 1, x_48); +return x_51; } } } -lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; uint8_t x_6; @@ -3066,61 +3187,177 @@ return x_14; } } } +lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_io_ref_take(x_3, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_11 = lean_ctor_get(x_8, 0); +x_12 = l_Lean_Syntax_Traverser_setCur(x_11, x_1); +lean_ctor_set(x_8, 0, x_12); +x_13 = lean_io_ref_set(x_3, x_8, x_9); +x_14 = !lean_is_exclusive(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 0); +lean_dec(x_15); +x_16 = lean_box(0); +lean_ctor_set(x_13, 0, x_16); +return x_13; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 1); +lean_inc(x_17); +lean_dec(x_13); +x_18 = lean_box(0); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +return x_19; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_20 = lean_ctor_get(x_8, 0); +x_21 = lean_ctor_get(x_8, 1); +x_22 = lean_ctor_get(x_8, 2); +x_23 = lean_ctor_get(x_8, 3); +x_24 = lean_ctor_get(x_8, 4); +x_25 = lean_ctor_get_uint8(x_8, sizeof(void*)*5); +lean_inc(x_24); +lean_inc(x_23); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_8); +x_26 = l_Lean_Syntax_Traverser_setCur(x_20, x_1); +x_27 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_21); +lean_ctor_set(x_27, 2, x_22); +lean_ctor_set(x_27, 3, x_23); +lean_ctor_set(x_27, 4, x_24); +lean_ctor_set_uint8(x_27, sizeof(void*)*5, x_25); +x_28 = lean_io_ref_set(x_3, x_27, x_9); +x_29 = lean_ctor_get(x_28, 1); +lean_inc(x_29); +if (lean_is_exclusive(x_28)) { + lean_ctor_release(x_28, 0); + lean_ctor_release(x_28, 1); + x_30 = x_28; +} else { + lean_dec_ref(x_28); + x_30 = lean_box(0); +} +x_31 = lean_box(0); +if (lean_is_scalar(x_30)) { + x_32 = lean_alloc_ctor(0, 2, 0); +} else { + x_32 = x_30; +} +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_29); +return x_32; +} +} +} lean_object* l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -uint8_t x_5; -x_5 = !lean_is_exclusive(x_1); -if (x_5 == 0) +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_io_ref_take(x_1, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = !lean_is_exclusive(x_6); +if (x_8 == 0) { -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_6 = lean_ctor_get(x_1, 0); -x_7 = l_Lean_Syntax_Traverser_right(x_6); -lean_ctor_set(x_1, 0, x_7); -x_8 = lean_box(0); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_1); -x_10 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_10, 0, x_9); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_4); +lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_9 = lean_ctor_get(x_6, 0); +x_10 = l_Lean_Syntax_Traverser_right(x_9); +lean_ctor_set(x_6, 0, x_10); +x_11 = lean_io_ref_set(x_1, x_6, x_7); +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_11, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set(x_11, 0, x_14); return x_11; } else { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_12 = lean_ctor_get(x_1, 0); -x_13 = lean_ctor_get(x_1, 1); -x_14 = lean_ctor_get(x_1, 2); -x_15 = lean_ctor_get(x_1, 3); -x_16 = lean_ctor_get(x_1, 4); -x_17 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); -lean_inc(x_16); +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_11, 1); lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_1); -x_18 = l_Lean_Syntax_Traverser_right(x_12); -x_19 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_13); -lean_ctor_set(x_19, 2, x_14); -lean_ctor_set(x_19, 3, x_15); -lean_ctor_set(x_19, 4, x_16); -lean_ctor_set_uint8(x_19, sizeof(void*)*5, x_17); -x_20 = lean_box(0); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_19); -x_22 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_22, 0, x_21); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_4); -return x_23; +lean_dec(x_11); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +return x_17; +} +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_18 = lean_ctor_get(x_6, 0); +x_19 = lean_ctor_get(x_6, 1); +x_20 = lean_ctor_get(x_6, 2); +x_21 = lean_ctor_get(x_6, 3); +x_22 = lean_ctor_get(x_6, 4); +x_23 = lean_ctor_get_uint8(x_6, sizeof(void*)*5); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_6); +x_24 = l_Lean_Syntax_Traverser_right(x_18); +x_25 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_19); +lean_ctor_set(x_25, 2, x_20); +lean_ctor_set(x_25, 3, x_21); +lean_ctor_set(x_25, 4, x_22); +lean_ctor_set_uint8(x_25, sizeof(void*)*5, x_23); +x_26 = lean_io_ref_set(x_1, x_25, x_7); +x_27 = lean_ctor_get(x_26, 1); +lean_inc(x_27); +if (lean_is_exclusive(x_26)) { + lean_ctor_release(x_26, 0); + lean_ctor_release(x_26, 1); + x_28 = x_26; +} else { + lean_dec_ref(x_26); + x_28 = lean_box(0); +} +x_29 = lean_box(0); +if (lean_is_scalar(x_28)) { + x_30 = lean_alloc_ctor(0, 2, 0); +} else { + x_30 = x_28; +} +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_27); +return x_30; } } } @@ -3219,22 +3456,13 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__1; -x_2 = l_ExceptT_Monad___rarg(x_1); +x_2 = l_ReaderT_Monad___rarg(x_1); return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__3() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__2; -x_2 = l_StateT_Monad___rarg(x_1); -return x_2; -} -} -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); x_2 = l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__5; @@ -3242,7 +3470,7 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4() { _start: { lean_object* x_1; @@ -3250,37 +3478,37 @@ x_1 = lean_mk_string("parenthesize"); return x_1; } } +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__3; +x_2 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; -x_3 = lean_name_mk_string(x_1, x_2); +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__2; +x_2 = l_PUnit_Inhabited; +x_3 = l_monadInhabited___rarg(x_1, x_2); return x_3; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__3; -x_2 = l_PUnit_Inhabited; -x_3 = l_monadInhabited___rarg(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8() { -_start: -{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; x_2 = lean_alloc_closure((void*)(l_ReaderT_inhabited___rarg___boxed), 2, 1); lean_closure_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8() { _start: { lean_object* x_1; @@ -3288,7 +3516,7 @@ x_1 = lean_mk_string("Lean.PrettyPrinter.Parenthesizer"); return x_1; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9() { _start: { lean_object* x_1; @@ -3296,19 +3524,19 @@ x_1 = lean_mk_string("maybeParenthesize: visited a syntax tree without precedenc return x_1; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9; -x_2 = lean_unsigned_to_nat(198u); +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; +x_2 = lean_unsigned_to_nat(206u); x_3 = lean_unsigned_to_nat(4u); -x_4 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; +x_4 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__9; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); return x_5; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11() { _start: { lean_object* x_1; lean_object* x_2; @@ -3318,7 +3546,7 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__13() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12() { _start: { lean_object* x_1; @@ -3326,27 +3554,27 @@ x_1 = lean_mk_string("parenthesized: "); return x_1; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__14() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__13() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__13; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__14() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__14; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__13; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15() { _start: { lean_object* x_1; lean_object* x_2; @@ -3356,7 +3584,7 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__17() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16() { _start: { lean_object* x_1; @@ -3364,12 +3592,22 @@ x_1 = lean_mk_string("...precedences are "); return x_1; } } +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__17() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__18() { _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__17; -x_2 = lean_alloc_ctor(2, 1, 0); +x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -3377,19 +3615,19 @@ return x_2; lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__18; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string(" >? "); +return x_1; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__20() { _start: { -lean_object* x_1; -x_1 = lean_mk_string(" >? "); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__21() { @@ -3397,7 +3635,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__20; -x_2 = lean_alloc_ctor(2, 1, 0); +x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -3405,19 +3643,19 @@ return x_2; lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__21; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string(" <=? "); +return x_1; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__23() { _start: { -lean_object* x_1; -x_1 = lean_mk_string(" <=? "); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__24() { @@ -3425,7 +3663,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__23; -x_2 = lean_alloc_ctor(2, 1, 0); +x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -3433,19 +3671,19 @@ return x_2; lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__24; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string("parenthesizing (cont := "); +return x_1; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__26() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("parenthesizing (cont := "); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__27() { @@ -3453,22 +3691,12 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__26; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__27; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28() { _start: { lean_object* x_1; lean_object* x_2; @@ -3478,7 +3706,7 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -3488,11 +3716,11 @@ x_3 = lean_string_append(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31() { +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; x_2 = l_List_reprAux___main___rarg___closed__1; x_3 = lean_string_append(x_1, x_2); return x_3; @@ -3501,17797 +3729,2413 @@ return x_3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize(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; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_10 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_6, x_7, x_8, x_9); +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_10 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_6, x_7, x_8, x_9); x_11 = lean_ctor_get(x_10, 0); lean_inc(x_11); -x_12 = lean_ctor_get(x_11, 0); +x_12 = lean_ctor_get(x_10, 1); lean_inc(x_12); -lean_dec(x_11); -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); lean_dec(x_10); -x_14 = lean_ctor_get(x_12, 0); +x_13 = l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___rarg(x_6, x_7, x_8, x_12); +x_14 = lean_ctor_get(x_13, 0); lean_inc(x_14); -x_15 = lean_ctor_get(x_12, 1); +x_15 = lean_ctor_get(x_13, 1); lean_inc(x_15); -lean_dec(x_12); -x_16 = l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___rarg(x_15, x_7, x_8, x_13); +lean_dec(x_13); +x_16 = lean_io_ref_get(x_6, x_15); x_17 = lean_ctor_get(x_16, 0); lean_inc(x_17); -x_18 = !lean_is_exclusive(x_17); -if (x_18 == 0) -{ -lean_object* x_19; lean_object* x_20; uint8_t x_21; -x_19 = lean_ctor_get(x_17, 0); -x_20 = lean_ctor_get(x_16, 1); -lean_inc(x_20); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); lean_dec(x_16); -x_21 = !lean_is_exclusive(x_19); -if (x_21 == 0) +x_19 = !lean_is_exclusive(x_17); +if (x_19 == 0) { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_223; lean_object* x_224; lean_object* x_225; uint8_t x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_3374; lean_object* x_3375; lean_object* x_3493; lean_object* x_3494; uint8_t x_3495; -x_22 = lean_ctor_get(x_19, 0); -x_23 = lean_ctor_get(x_19, 1); -x_223 = lean_ctor_get(x_23, 0); -lean_inc(x_223); -x_224 = lean_box(0); -x_225 = lean_box(0); -x_226 = 0; -x_227 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_227, 0, x_223); -lean_ctor_set(x_227, 1, x_224); -lean_ctor_set(x_227, 2, x_225); -lean_ctor_set(x_227, 3, x_224); -lean_ctor_set(x_227, 4, x_224); -lean_ctor_set_uint8(x_227, sizeof(void*)*5, x_226); -x_3493 = l_Lean_Core_getTraceState___rarg(x_8, x_20); -x_3494 = lean_ctor_get(x_3493, 0); -lean_inc(x_3494); -x_3495 = lean_ctor_get_uint8(x_3494, sizeof(void*)*1); -lean_dec(x_3494); -if (x_3495 == 0) +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_367; lean_object* x_368; lean_object* x_414; lean_object* x_415; uint8_t x_416; +x_20 = lean_ctor_get(x_17, 1); +x_21 = lean_ctor_get(x_17, 2); +x_22 = lean_ctor_get(x_17, 3); +x_23 = lean_ctor_get(x_17, 4); +x_24 = lean_ctor_get_uint8(x_17, sizeof(void*)*5); +x_25 = lean_box(0); +x_26 = lean_box(0); +x_27 = 0; +lean_ctor_set(x_17, 4, x_25); +lean_ctor_set(x_17, 3, x_25); +lean_ctor_set(x_17, 2, x_26); +lean_ctor_set(x_17, 1, x_25); +lean_ctor_set_uint8(x_17, sizeof(void*)*5, x_27); +x_28 = lean_io_ref_set(x_6, x_17, x_18); +x_29 = lean_ctor_get(x_28, 1); +lean_inc(x_29); +lean_dec(x_28); +x_414 = l_Lean_Core_getTraceState___rarg(x_8, x_29); +x_415 = lean_ctor_get(x_414, 0); +lean_inc(x_415); +x_416 = lean_ctor_get_uint8(x_415, sizeof(void*)*1); +lean_dec(x_415); +if (x_416 == 0) { -lean_object* x_3496; lean_object* x_3497; -x_3496 = lean_ctor_get(x_3493, 1); -lean_inc(x_3496); -lean_dec(x_3493); -x_3497 = lean_box(x_226); -lean_ctor_set(x_19, 1, x_227); -lean_ctor_set(x_19, 0, x_3497); -x_3374 = x_17; -x_3375 = x_3496; -goto block_3492; +lean_object* x_417; +x_417 = lean_ctor_get(x_414, 1); +lean_inc(x_417); +lean_dec(x_414); +x_367 = x_27; +x_368 = x_417; +goto block_413; } else { -lean_object* x_3498; lean_object* x_3499; lean_object* x_3500; lean_object* x_3501; lean_object* x_3502; -x_3498 = lean_ctor_get(x_3493, 1); -lean_inc(x_3498); -lean_dec(x_3493); -x_3499 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3500 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3499, x_7, x_8, x_3498); -x_3501 = lean_ctor_get(x_3500, 0); -lean_inc(x_3501); -x_3502 = lean_ctor_get(x_3500, 1); -lean_inc(x_3502); -lean_dec(x_3500); -lean_ctor_set(x_19, 1, x_227); -lean_ctor_set(x_19, 0, x_3501); -x_3374 = x_17; -x_3375 = x_3502; -goto block_3492; -} -block_222: -{ -lean_object* x_25; uint8_t x_26; -x_25 = lean_ctor_get(x_24, 0); -lean_inc(x_25); -x_26 = !lean_is_exclusive(x_25); -if (x_26 == 0) -{ -lean_object* x_27; uint8_t x_28; -x_27 = lean_ctor_get(x_25, 0); -x_28 = !lean_is_exclusive(x_27); -if (x_28 == 0) -{ -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_27, 1); -x_30 = lean_ctor_get(x_27, 0); -lean_dec(x_30); -x_31 = lean_ctor_get_uint8(x_23, sizeof(void*)*5); -if (x_31 == 0) -{ -lean_object* x_32; -x_32 = lean_ctor_get(x_29, 4); -lean_inc(x_32); -if (lean_obj_tag(x_32) == 0) -{ -uint8_t x_33; -x_33 = !lean_is_exclusive(x_24); -if (x_33 == 0) -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; uint8_t x_39; -x_34 = lean_ctor_get(x_24, 0); -lean_dec(x_34); -x_35 = lean_ctor_get(x_29, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_29, 1); -lean_inc(x_36); -x_37 = lean_ctor_get(x_29, 2); -lean_inc(x_37); -x_38 = lean_ctor_get_uint8(x_29, sizeof(void*)*5); -lean_dec(x_29); -x_39 = !lean_is_exclusive(x_23); -if (x_39 == 0) -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_40 = lean_ctor_get(x_23, 4); -lean_dec(x_40); -x_41 = lean_ctor_get(x_23, 2); -lean_dec(x_41); -x_42 = lean_ctor_get(x_23, 1); -lean_dec(x_42); -x_43 = lean_ctor_get(x_23, 0); -lean_dec(x_43); -x_44 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_44, 0, x_3); -lean_ctor_set(x_23, 4, x_44); -lean_ctor_set(x_23, 2, x_37); -lean_ctor_set(x_23, 1, x_36); -lean_ctor_set(x_23, 0, x_35); -lean_ctor_set_uint8(x_23, sizeof(void*)*5, x_38); -x_45 = lean_box(0); -lean_ctor_set(x_27, 1, x_23); -lean_ctor_set(x_27, 0, x_45); -return x_24; -} -else -{ -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_46 = lean_ctor_get(x_23, 3); -lean_inc(x_46); -lean_dec(x_23); -x_47 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_47, 0, x_3); -x_48 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_48, 0, x_35); -lean_ctor_set(x_48, 1, x_36); -lean_ctor_set(x_48, 2, x_37); -lean_ctor_set(x_48, 3, x_46); -lean_ctor_set(x_48, 4, x_47); -lean_ctor_set_uint8(x_48, sizeof(void*)*5, x_38); -x_49 = lean_box(0); -lean_ctor_set(x_27, 1, x_48); -lean_ctor_set(x_27, 0, x_49); -return x_24; -} -} -else -{ -lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; uint8_t x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_50 = lean_ctor_get(x_24, 1); -lean_inc(x_50); -lean_dec(x_24); -x_51 = lean_ctor_get(x_29, 0); -lean_inc(x_51); -x_52 = lean_ctor_get(x_29, 1); -lean_inc(x_52); -x_53 = lean_ctor_get(x_29, 2); -lean_inc(x_53); -x_54 = lean_ctor_get_uint8(x_29, sizeof(void*)*5); -lean_dec(x_29); -x_55 = lean_ctor_get(x_23, 3); -lean_inc(x_55); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_56 = x_23; -} else { - lean_dec_ref(x_23); - x_56 = lean_box(0); -} -x_57 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_57, 0, x_3); -if (lean_is_scalar(x_56)) { - x_58 = lean_alloc_ctor(0, 5, 1); -} else { - x_58 = x_56; -} -lean_ctor_set(x_58, 0, x_51); -lean_ctor_set(x_58, 1, x_52); -lean_ctor_set(x_58, 2, x_53); -lean_ctor_set(x_58, 3, x_55); -lean_ctor_set(x_58, 4, x_57); -lean_ctor_set_uint8(x_58, sizeof(void*)*5, x_54); -x_59 = lean_box(0); -lean_ctor_set(x_27, 1, x_58); -lean_ctor_set(x_27, 0, x_59); -x_60 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_60, 0, x_25); -lean_ctor_set(x_60, 1, x_50); -return x_60; -} -} -else -{ -uint8_t x_61; -x_61 = !lean_is_exclusive(x_24); -if (x_61 == 0) -{ -lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; uint8_t x_67; -x_62 = lean_ctor_get(x_24, 0); -lean_dec(x_62); -x_63 = lean_ctor_get(x_29, 0); -lean_inc(x_63); -x_64 = lean_ctor_get(x_29, 1); -lean_inc(x_64); -x_65 = lean_ctor_get(x_29, 2); -lean_inc(x_65); -x_66 = lean_ctor_get_uint8(x_29, sizeof(void*)*5); -lean_dec(x_29); -x_67 = !lean_is_exclusive(x_23); -if (x_67 == 0) -{ -lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; uint8_t x_72; -x_68 = lean_ctor_get(x_23, 4); -lean_dec(x_68); -x_69 = lean_ctor_get(x_23, 2); -lean_dec(x_69); -x_70 = lean_ctor_get(x_23, 1); -lean_dec(x_70); -x_71 = lean_ctor_get(x_23, 0); -lean_dec(x_71); -x_72 = !lean_is_exclusive(x_32); -if (x_72 == 0) -{ -lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_73 = lean_ctor_get(x_32, 0); -x_74 = l_Nat_min(x_73, x_3); -lean_dec(x_3); -lean_dec(x_73); -lean_ctor_set(x_32, 0, x_74); -lean_ctor_set(x_23, 4, x_32); -lean_ctor_set(x_23, 2, x_65); -lean_ctor_set(x_23, 1, x_64); -lean_ctor_set(x_23, 0, x_63); -lean_ctor_set_uint8(x_23, sizeof(void*)*5, x_66); -x_75 = lean_box(0); -lean_ctor_set(x_27, 1, x_23); -lean_ctor_set(x_27, 0, x_75); -return x_24; -} -else -{ -lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; -x_76 = lean_ctor_get(x_32, 0); -lean_inc(x_76); -lean_dec(x_32); -x_77 = l_Nat_min(x_76, x_3); -lean_dec(x_3); -lean_dec(x_76); -x_78 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_78, 0, x_77); -lean_ctor_set(x_23, 4, x_78); -lean_ctor_set(x_23, 2, x_65); -lean_ctor_set(x_23, 1, x_64); -lean_ctor_set(x_23, 0, x_63); -lean_ctor_set_uint8(x_23, sizeof(void*)*5, x_66); -x_79 = lean_box(0); -lean_ctor_set(x_27, 1, x_23); -lean_ctor_set(x_27, 0, x_79); -return x_24; -} -} -else -{ -lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; -x_80 = lean_ctor_get(x_23, 3); -lean_inc(x_80); -lean_dec(x_23); -x_81 = lean_ctor_get(x_32, 0); -lean_inc(x_81); -if (lean_is_exclusive(x_32)) { - lean_ctor_release(x_32, 0); - x_82 = x_32; -} else { - lean_dec_ref(x_32); - x_82 = lean_box(0); -} -x_83 = l_Nat_min(x_81, x_3); -lean_dec(x_3); -lean_dec(x_81); -if (lean_is_scalar(x_82)) { - x_84 = lean_alloc_ctor(1, 1, 0); -} else { - x_84 = x_82; -} -lean_ctor_set(x_84, 0, x_83); -x_85 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_85, 0, x_63); -lean_ctor_set(x_85, 1, x_64); -lean_ctor_set(x_85, 2, x_65); -lean_ctor_set(x_85, 3, x_80); -lean_ctor_set(x_85, 4, x_84); -lean_ctor_set_uint8(x_85, sizeof(void*)*5, x_66); -x_86 = lean_box(0); -lean_ctor_set(x_27, 1, x_85); -lean_ctor_set(x_27, 0, x_86); -return x_24; -} -} -else -{ -lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; uint8_t x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; -x_87 = lean_ctor_get(x_24, 1); -lean_inc(x_87); -lean_dec(x_24); -x_88 = lean_ctor_get(x_29, 0); -lean_inc(x_88); -x_89 = lean_ctor_get(x_29, 1); -lean_inc(x_89); -x_90 = lean_ctor_get(x_29, 2); -lean_inc(x_90); -x_91 = lean_ctor_get_uint8(x_29, sizeof(void*)*5); -lean_dec(x_29); -x_92 = lean_ctor_get(x_23, 3); -lean_inc(x_92); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_93 = x_23; -} else { - lean_dec_ref(x_23); - x_93 = lean_box(0); -} -x_94 = lean_ctor_get(x_32, 0); -lean_inc(x_94); -if (lean_is_exclusive(x_32)) { - lean_ctor_release(x_32, 0); - x_95 = x_32; -} else { - lean_dec_ref(x_32); - x_95 = lean_box(0); -} -x_96 = l_Nat_min(x_94, x_3); -lean_dec(x_3); -lean_dec(x_94); -if (lean_is_scalar(x_95)) { - x_97 = lean_alloc_ctor(1, 1, 0); -} else { - x_97 = x_95; -} -lean_ctor_set(x_97, 0, x_96); -if (lean_is_scalar(x_93)) { - x_98 = lean_alloc_ctor(0, 5, 1); -} else { - x_98 = x_93; -} -lean_ctor_set(x_98, 0, x_88); -lean_ctor_set(x_98, 1, x_89); -lean_ctor_set(x_98, 2, x_90); -lean_ctor_set(x_98, 3, x_92); -lean_ctor_set(x_98, 4, x_97); -lean_ctor_set_uint8(x_98, sizeof(void*)*5, x_91); -x_99 = lean_box(0); -lean_ctor_set(x_27, 1, x_98); -lean_ctor_set(x_27, 0, x_99); -x_100 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_100, 0, x_25); -lean_ctor_set(x_100, 1, x_87); -return x_100; -} -} -} -else -{ -uint8_t x_101; -lean_dec(x_3); -x_101 = !lean_is_exclusive(x_24); -if (x_101 == 0) -{ -lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; uint8_t x_106; uint8_t x_107; -x_102 = lean_ctor_get(x_24, 0); -lean_dec(x_102); -x_103 = lean_ctor_get(x_29, 0); -lean_inc(x_103); -x_104 = lean_ctor_get(x_29, 1); -lean_inc(x_104); -x_105 = lean_ctor_get(x_29, 2); -lean_inc(x_105); -x_106 = lean_ctor_get_uint8(x_29, sizeof(void*)*5); -lean_dec(x_29); -x_107 = !lean_is_exclusive(x_23); -if (x_107 == 0) -{ -lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; -x_108 = lean_ctor_get(x_23, 2); -lean_dec(x_108); -x_109 = lean_ctor_get(x_23, 1); -lean_dec(x_109); -x_110 = lean_ctor_get(x_23, 0); -lean_dec(x_110); -lean_ctor_set(x_23, 2, x_105); -lean_ctor_set(x_23, 1, x_104); -lean_ctor_set(x_23, 0, x_103); -lean_ctor_set_uint8(x_23, sizeof(void*)*5, x_106); -x_111 = lean_box(0); -lean_ctor_set(x_27, 1, x_23); -lean_ctor_set(x_27, 0, x_111); -return x_24; -} -else -{ -lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; -x_112 = lean_ctor_get(x_23, 3); -x_113 = lean_ctor_get(x_23, 4); -lean_inc(x_113); -lean_inc(x_112); -lean_dec(x_23); -x_114 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_114, 0, x_103); -lean_ctor_set(x_114, 1, x_104); -lean_ctor_set(x_114, 2, x_105); -lean_ctor_set(x_114, 3, x_112); -lean_ctor_set(x_114, 4, x_113); -lean_ctor_set_uint8(x_114, sizeof(void*)*5, x_106); -x_115 = lean_box(0); -lean_ctor_set(x_27, 1, x_114); -lean_ctor_set(x_27, 0, x_115); -return x_24; -} -} -else -{ -lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; uint8_t x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; -x_116 = lean_ctor_get(x_24, 1); -lean_inc(x_116); -lean_dec(x_24); -x_117 = lean_ctor_get(x_29, 0); -lean_inc(x_117); -x_118 = lean_ctor_get(x_29, 1); -lean_inc(x_118); -x_119 = lean_ctor_get(x_29, 2); -lean_inc(x_119); -x_120 = lean_ctor_get_uint8(x_29, sizeof(void*)*5); -lean_dec(x_29); -x_121 = lean_ctor_get(x_23, 3); -lean_inc(x_121); -x_122 = lean_ctor_get(x_23, 4); -lean_inc(x_122); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_123 = x_23; -} else { - lean_dec_ref(x_23); - x_123 = lean_box(0); -} -if (lean_is_scalar(x_123)) { - x_124 = lean_alloc_ctor(0, 5, 1); -} else { - x_124 = x_123; -} -lean_ctor_set(x_124, 0, x_117); -lean_ctor_set(x_124, 1, x_118); -lean_ctor_set(x_124, 2, x_119); -lean_ctor_set(x_124, 3, x_121); -lean_ctor_set(x_124, 4, x_122); -lean_ctor_set_uint8(x_124, sizeof(void*)*5, x_120); -x_125 = lean_box(0); -lean_ctor_set(x_27, 1, x_124); -lean_ctor_set(x_27, 0, x_125); -x_126 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_126, 0, x_25); -lean_ctor_set(x_126, 1, x_116); -return x_126; -} -} -} -else -{ -lean_object* x_127; uint8_t x_128; -x_127 = lean_ctor_get(x_27, 1); -lean_inc(x_127); -lean_dec(x_27); -x_128 = lean_ctor_get_uint8(x_23, sizeof(void*)*5); -if (x_128 == 0) -{ -lean_object* x_129; -x_129 = lean_ctor_get(x_127, 4); -lean_inc(x_129); -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; uint8_t x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; -x_130 = lean_ctor_get(x_24, 1); -lean_inc(x_130); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_131 = x_24; -} else { - lean_dec_ref(x_24); - x_131 = lean_box(0); -} -x_132 = lean_ctor_get(x_127, 0); -lean_inc(x_132); -x_133 = lean_ctor_get(x_127, 1); -lean_inc(x_133); -x_134 = lean_ctor_get(x_127, 2); -lean_inc(x_134); -x_135 = lean_ctor_get_uint8(x_127, sizeof(void*)*5); -lean_dec(x_127); -x_136 = lean_ctor_get(x_23, 3); -lean_inc(x_136); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_137 = x_23; -} else { - lean_dec_ref(x_23); - x_137 = lean_box(0); -} -x_138 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_138, 0, x_3); -if (lean_is_scalar(x_137)) { - x_139 = lean_alloc_ctor(0, 5, 1); -} else { - x_139 = x_137; -} -lean_ctor_set(x_139, 0, x_132); -lean_ctor_set(x_139, 1, x_133); -lean_ctor_set(x_139, 2, x_134); -lean_ctor_set(x_139, 3, x_136); -lean_ctor_set(x_139, 4, x_138); -lean_ctor_set_uint8(x_139, sizeof(void*)*5, x_135); -x_140 = lean_box(0); -x_141 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_141, 0, x_140); -lean_ctor_set(x_141, 1, x_139); -lean_ctor_set(x_25, 0, x_141); -if (lean_is_scalar(x_131)) { - x_142 = lean_alloc_ctor(0, 2, 0); -} else { - x_142 = x_131; -} -lean_ctor_set(x_142, 0, x_25); -lean_ctor_set(x_142, 1, x_130); -return x_142; -} -else -{ -lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; uint8_t x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; -x_143 = lean_ctor_get(x_24, 1); -lean_inc(x_143); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_144 = x_24; -} else { - lean_dec_ref(x_24); - x_144 = lean_box(0); -} -x_145 = lean_ctor_get(x_127, 0); -lean_inc(x_145); -x_146 = lean_ctor_get(x_127, 1); -lean_inc(x_146); -x_147 = lean_ctor_get(x_127, 2); -lean_inc(x_147); -x_148 = lean_ctor_get_uint8(x_127, sizeof(void*)*5); -lean_dec(x_127); -x_149 = lean_ctor_get(x_23, 3); -lean_inc(x_149); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_150 = x_23; -} else { - lean_dec_ref(x_23); - x_150 = lean_box(0); -} -x_151 = lean_ctor_get(x_129, 0); -lean_inc(x_151); -if (lean_is_exclusive(x_129)) { - lean_ctor_release(x_129, 0); - x_152 = x_129; -} else { - lean_dec_ref(x_129); - x_152 = lean_box(0); -} -x_153 = l_Nat_min(x_151, x_3); -lean_dec(x_3); -lean_dec(x_151); -if (lean_is_scalar(x_152)) { - x_154 = lean_alloc_ctor(1, 1, 0); -} else { - x_154 = x_152; -} -lean_ctor_set(x_154, 0, x_153); -if (lean_is_scalar(x_150)) { - x_155 = lean_alloc_ctor(0, 5, 1); -} else { - x_155 = x_150; -} -lean_ctor_set(x_155, 0, x_145); -lean_ctor_set(x_155, 1, x_146); -lean_ctor_set(x_155, 2, x_147); -lean_ctor_set(x_155, 3, x_149); -lean_ctor_set(x_155, 4, x_154); -lean_ctor_set_uint8(x_155, sizeof(void*)*5, x_148); -x_156 = lean_box(0); -x_157 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_157, 0, x_156); -lean_ctor_set(x_157, 1, x_155); -lean_ctor_set(x_25, 0, x_157); -if (lean_is_scalar(x_144)) { - x_158 = lean_alloc_ctor(0, 2, 0); -} else { - x_158 = x_144; -} -lean_ctor_set(x_158, 0, x_25); -lean_ctor_set(x_158, 1, x_143); -return x_158; -} -} -else -{ -lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; uint8_t x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; -lean_dec(x_3); -x_159 = lean_ctor_get(x_24, 1); -lean_inc(x_159); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_160 = x_24; -} else { - lean_dec_ref(x_24); - x_160 = lean_box(0); -} -x_161 = lean_ctor_get(x_127, 0); -lean_inc(x_161); -x_162 = lean_ctor_get(x_127, 1); -lean_inc(x_162); -x_163 = lean_ctor_get(x_127, 2); -lean_inc(x_163); -x_164 = lean_ctor_get_uint8(x_127, sizeof(void*)*5); -lean_dec(x_127); -x_165 = lean_ctor_get(x_23, 3); -lean_inc(x_165); -x_166 = lean_ctor_get(x_23, 4); -lean_inc(x_166); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_167 = x_23; -} else { - lean_dec_ref(x_23); - x_167 = lean_box(0); -} -if (lean_is_scalar(x_167)) { - x_168 = lean_alloc_ctor(0, 5, 1); -} else { - x_168 = x_167; -} -lean_ctor_set(x_168, 0, x_161); -lean_ctor_set(x_168, 1, x_162); -lean_ctor_set(x_168, 2, x_163); -lean_ctor_set(x_168, 3, x_165); -lean_ctor_set(x_168, 4, x_166); -lean_ctor_set_uint8(x_168, sizeof(void*)*5, x_164); -x_169 = lean_box(0); -x_170 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_170, 0, x_169); -lean_ctor_set(x_170, 1, x_168); -lean_ctor_set(x_25, 0, x_170); -if (lean_is_scalar(x_160)) { - x_171 = lean_alloc_ctor(0, 2, 0); -} else { - x_171 = x_160; -} -lean_ctor_set(x_171, 0, x_25); -lean_ctor_set(x_171, 1, x_159); -return x_171; -} -} -} -else -{ -lean_object* x_172; lean_object* x_173; lean_object* x_174; uint8_t x_175; -x_172 = lean_ctor_get(x_25, 0); -lean_inc(x_172); -lean_dec(x_25); -x_173 = lean_ctor_get(x_172, 1); -lean_inc(x_173); -if (lean_is_exclusive(x_172)) { - lean_ctor_release(x_172, 0); - lean_ctor_release(x_172, 1); - x_174 = x_172; -} else { - lean_dec_ref(x_172); - x_174 = lean_box(0); -} -x_175 = lean_ctor_get_uint8(x_23, sizeof(void*)*5); -if (x_175 == 0) -{ -lean_object* x_176; -x_176 = lean_ctor_get(x_173, 4); -lean_inc(x_176); -if (lean_obj_tag(x_176) == 0) -{ -lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; uint8_t x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; -x_177 = lean_ctor_get(x_24, 1); -lean_inc(x_177); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_178 = x_24; -} else { - lean_dec_ref(x_24); - x_178 = lean_box(0); -} -x_179 = lean_ctor_get(x_173, 0); -lean_inc(x_179); -x_180 = lean_ctor_get(x_173, 1); -lean_inc(x_180); -x_181 = lean_ctor_get(x_173, 2); -lean_inc(x_181); -x_182 = lean_ctor_get_uint8(x_173, sizeof(void*)*5); -lean_dec(x_173); -x_183 = lean_ctor_get(x_23, 3); -lean_inc(x_183); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_184 = x_23; -} else { - lean_dec_ref(x_23); - x_184 = lean_box(0); -} -x_185 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_185, 0, x_3); -if (lean_is_scalar(x_184)) { - x_186 = lean_alloc_ctor(0, 5, 1); -} else { - x_186 = x_184; -} -lean_ctor_set(x_186, 0, x_179); -lean_ctor_set(x_186, 1, x_180); -lean_ctor_set(x_186, 2, x_181); -lean_ctor_set(x_186, 3, x_183); -lean_ctor_set(x_186, 4, x_185); -lean_ctor_set_uint8(x_186, sizeof(void*)*5, x_182); -x_187 = lean_box(0); -if (lean_is_scalar(x_174)) { - x_188 = lean_alloc_ctor(0, 2, 0); -} else { - x_188 = x_174; -} -lean_ctor_set(x_188, 0, x_187); -lean_ctor_set(x_188, 1, x_186); -x_189 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_189, 0, x_188); -if (lean_is_scalar(x_178)) { - x_190 = lean_alloc_ctor(0, 2, 0); -} else { - x_190 = x_178; -} -lean_ctor_set(x_190, 0, x_189); -lean_ctor_set(x_190, 1, x_177); -return x_190; -} -else -{ -lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; uint8_t x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; -x_191 = lean_ctor_get(x_24, 1); -lean_inc(x_191); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_192 = x_24; -} else { - lean_dec_ref(x_24); - x_192 = lean_box(0); -} -x_193 = lean_ctor_get(x_173, 0); -lean_inc(x_193); -x_194 = lean_ctor_get(x_173, 1); -lean_inc(x_194); -x_195 = lean_ctor_get(x_173, 2); -lean_inc(x_195); -x_196 = lean_ctor_get_uint8(x_173, sizeof(void*)*5); -lean_dec(x_173); -x_197 = lean_ctor_get(x_23, 3); -lean_inc(x_197); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_198 = x_23; -} else { - lean_dec_ref(x_23); - x_198 = lean_box(0); -} -x_199 = lean_ctor_get(x_176, 0); -lean_inc(x_199); -if (lean_is_exclusive(x_176)) { - lean_ctor_release(x_176, 0); - x_200 = x_176; -} else { - lean_dec_ref(x_176); - x_200 = lean_box(0); -} -x_201 = l_Nat_min(x_199, x_3); -lean_dec(x_3); -lean_dec(x_199); -if (lean_is_scalar(x_200)) { - x_202 = lean_alloc_ctor(1, 1, 0); -} else { - x_202 = x_200; -} -lean_ctor_set(x_202, 0, x_201); -if (lean_is_scalar(x_198)) { - x_203 = lean_alloc_ctor(0, 5, 1); -} else { - x_203 = x_198; -} -lean_ctor_set(x_203, 0, x_193); -lean_ctor_set(x_203, 1, x_194); -lean_ctor_set(x_203, 2, x_195); -lean_ctor_set(x_203, 3, x_197); -lean_ctor_set(x_203, 4, x_202); -lean_ctor_set_uint8(x_203, sizeof(void*)*5, x_196); -x_204 = lean_box(0); -if (lean_is_scalar(x_174)) { - x_205 = lean_alloc_ctor(0, 2, 0); -} else { - x_205 = x_174; -} -lean_ctor_set(x_205, 0, x_204); -lean_ctor_set(x_205, 1, x_203); -x_206 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_206, 0, x_205); -if (lean_is_scalar(x_192)) { - x_207 = lean_alloc_ctor(0, 2, 0); -} else { - x_207 = x_192; -} -lean_ctor_set(x_207, 0, x_206); -lean_ctor_set(x_207, 1, x_191); -return x_207; -} -} -else -{ -lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; uint8_t x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; -lean_dec(x_3); -x_208 = lean_ctor_get(x_24, 1); -lean_inc(x_208); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_209 = x_24; -} else { - lean_dec_ref(x_24); - x_209 = lean_box(0); -} -x_210 = lean_ctor_get(x_173, 0); -lean_inc(x_210); -x_211 = lean_ctor_get(x_173, 1); -lean_inc(x_211); -x_212 = lean_ctor_get(x_173, 2); -lean_inc(x_212); -x_213 = lean_ctor_get_uint8(x_173, sizeof(void*)*5); -lean_dec(x_173); -x_214 = lean_ctor_get(x_23, 3); -lean_inc(x_214); -x_215 = lean_ctor_get(x_23, 4); -lean_inc(x_215); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - lean_ctor_release(x_23, 1); - lean_ctor_release(x_23, 2); - lean_ctor_release(x_23, 3); - lean_ctor_release(x_23, 4); - x_216 = x_23; -} else { - lean_dec_ref(x_23); - x_216 = lean_box(0); -} -if (lean_is_scalar(x_216)) { - x_217 = lean_alloc_ctor(0, 5, 1); -} else { - x_217 = x_216; -} -lean_ctor_set(x_217, 0, x_210); -lean_ctor_set(x_217, 1, x_211); -lean_ctor_set(x_217, 2, x_212); -lean_ctor_set(x_217, 3, x_214); -lean_ctor_set(x_217, 4, x_215); -lean_ctor_set_uint8(x_217, sizeof(void*)*5, x_213); -x_218 = lean_box(0); -if (lean_is_scalar(x_174)) { - x_219 = lean_alloc_ctor(0, 2, 0); -} else { - x_219 = x_174; -} -lean_ctor_set(x_219, 0, x_218); -lean_ctor_set(x_219, 1, x_217); -x_220 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_220, 0, x_219); -if (lean_is_scalar(x_209)) { - x_221 = lean_alloc_ctor(0, 2, 0); -} else { - x_221 = x_209; -} -lean_ctor_set(x_221, 0, x_220); -lean_ctor_set(x_221, 1, x_208); -return x_221; -} -} -} -block_3373: -{ -lean_object* x_230; uint8_t x_231; -x_230 = lean_ctor_get(x_228, 0); -lean_inc(x_230); -lean_dec(x_228); -x_231 = !lean_is_exclusive(x_230); -if (x_231 == 0) -{ -lean_object* x_232; lean_object* x_233; lean_object* x_234; -x_232 = lean_ctor_get(x_230, 1); -x_233 = lean_ctor_get(x_230, 0); -lean_dec(x_233); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_5); -x_234 = lean_apply_5(x_4, x_5, x_232, x_7, x_8, x_229); -if (lean_obj_tag(x_234) == 0) -{ -lean_object* x_235; -x_235 = lean_ctor_get(x_234, 0); -lean_inc(x_235); -if (lean_obj_tag(x_235) == 0) -{ -uint8_t x_236; -lean_free_object(x_230); -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_236 = !lean_is_exclusive(x_234); -if (x_236 == 0) -{ -lean_object* x_237; uint8_t x_238; -x_237 = lean_ctor_get(x_234, 0); -lean_dec(x_237); -x_238 = !lean_is_exclusive(x_235); -if (x_238 == 0) -{ -return x_234; -} -else -{ -lean_object* x_239; lean_object* x_240; -x_239 = lean_ctor_get(x_235, 0); -lean_inc(x_239); -lean_dec(x_235); -x_240 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_240, 0, x_239); -lean_ctor_set(x_234, 0, x_240); -return x_234; -} -} -else -{ -lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; -x_241 = lean_ctor_get(x_234, 1); -lean_inc(x_241); -lean_dec(x_234); -x_242 = lean_ctor_get(x_235, 0); -lean_inc(x_242); -if (lean_is_exclusive(x_235)) { - lean_ctor_release(x_235, 0); - x_243 = x_235; -} else { - lean_dec_ref(x_235); - x_243 = lean_box(0); -} -if (lean_is_scalar(x_243)) { - x_244 = lean_alloc_ctor(0, 1, 0); -} else { - x_244 = x_243; -} -lean_ctor_set(x_244, 0, x_242); -x_245 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_245, 0, x_244); -lean_ctor_set(x_245, 1, x_241); -return x_245; -} -} -else -{ -uint8_t x_246; -x_246 = !lean_is_exclusive(x_235); -if (x_246 == 0) -{ -lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; -x_247 = lean_ctor_get(x_235, 0); -x_248 = lean_ctor_get(x_247, 1); -lean_inc(x_248); -if (lean_is_exclusive(x_247)) { - lean_ctor_release(x_247, 0); - lean_ctor_release(x_247, 1); - x_249 = x_247; -} else { - lean_dec_ref(x_247); - x_249 = lean_box(0); -} -x_250 = lean_ctor_get(x_248, 3); -lean_inc(x_250); -if (lean_obj_tag(x_250) == 0) -{ -lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; -lean_dec(x_249); -lean_free_object(x_235); -lean_free_object(x_230); -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_251 = lean_ctor_get(x_234, 1); -lean_inc(x_251); -lean_dec(x_234); -x_252 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; -x_253 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; -x_254 = lean_panic_fn(x_252, x_253); -x_255 = lean_apply_5(x_254, x_5, x_248, x_7, x_8, x_251); -return x_255; -} -else -{ -lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_2280; lean_object* x_2281; lean_object* x_2387; lean_object* x_2388; uint8_t x_2389; -x_256 = lean_ctor_get(x_234, 1); -lean_inc(x_256); -if (lean_is_exclusive(x_234)) { - lean_ctor_release(x_234, 0); - lean_ctor_release(x_234, 1); - x_257 = x_234; -} else { - lean_dec_ref(x_234); - x_257 = lean_box(0); -} -x_258 = lean_ctor_get(x_248, 4); -lean_inc(x_258); -x_259 = lean_ctor_get(x_250, 0); -lean_inc(x_259); -lean_dec(x_250); -x_2387 = l_Lean_Core_getTraceState___rarg(x_8, x_256); -x_2388 = lean_ctor_get(x_2387, 0); -lean_inc(x_2388); -x_2389 = lean_ctor_get_uint8(x_2388, sizeof(void*)*1); -lean_dec(x_2388); -if (x_2389 == 0) -{ -lean_object* x_2390; lean_object* x_2391; -x_2390 = lean_ctor_get(x_2387, 1); -lean_inc(x_2390); -lean_dec(x_2387); -x_2391 = lean_box(x_226); -lean_ctor_set(x_230, 1, x_248); -lean_ctor_set(x_230, 0, x_2391); -lean_ctor_set(x_235, 0, x_230); -x_2280 = x_235; -x_2281 = x_2390; -goto block_2386; -} -else -{ -lean_object* x_2392; lean_object* x_2393; lean_object* x_2394; lean_object* x_2395; lean_object* x_2396; -x_2392 = lean_ctor_get(x_2387, 1); -lean_inc(x_2392); -lean_dec(x_2387); -x_2393 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2394 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2393, x_7, x_8, x_2392); -x_2395 = lean_ctor_get(x_2394, 0); -lean_inc(x_2395); -x_2396 = lean_ctor_get(x_2394, 1); -lean_inc(x_2396); -lean_dec(x_2394); -lean_ctor_set(x_230, 1, x_248); -lean_ctor_set(x_230, 0, x_2395); -lean_ctor_set(x_235, 0, x_230); -x_2280 = x_235; -x_2281 = x_2396; -goto block_2386; -} -block_2279: -{ -uint8_t x_262; -x_262 = !lean_is_exclusive(x_260); -if (x_262 == 0) -{ -lean_object* x_263; uint8_t x_264; -x_263 = lean_ctor_get(x_260, 0); -x_264 = !lean_is_exclusive(x_263); -if (x_264 == 0) -{ -lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_329; uint8_t x_1452; -x_265 = lean_ctor_get(x_263, 1); -x_266 = lean_ctor_get(x_263, 0); -lean_dec(x_266); -x_1452 = lean_nat_dec_lt(x_259, x_3); -lean_dec(x_259); -if (x_1452 == 0) -{ -if (lean_obj_tag(x_258) == 0) -{ -lean_object* x_1453; lean_object* x_1454; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_1453 = lean_box(0); -lean_ctor_set(x_263, 0, x_1453); -if (lean_is_scalar(x_257)) { - x_1454 = lean_alloc_ctor(0, 2, 0); -} else { - x_1454 = x_257; -} -lean_ctor_set(x_1454, 0, x_260); -lean_ctor_set(x_1454, 1, x_261); -x_24 = x_1454; -goto block_222; -} -else -{ -lean_object* x_1455; -x_1455 = lean_ctor_get(x_23, 1); -lean_inc(x_1455); -if (lean_obj_tag(x_1455) == 0) -{ -lean_object* x_1456; lean_object* x_1457; -lean_dec(x_258); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_1456 = lean_box(0); -lean_ctor_set(x_263, 0, x_1456); -if (lean_is_scalar(x_257)) { - x_1457 = lean_alloc_ctor(0, 2, 0); -} else { - x_1457 = x_257; -} -lean_ctor_set(x_1457, 0, x_260); -lean_ctor_set(x_1457, 1, x_261); -x_24 = x_1457; -goto block_222; -} -else -{ -lean_object* x_1458; lean_object* x_1459; lean_object* x_1460; uint8_t x_1461; -x_1458 = lean_ctor_get(x_258, 0); -lean_inc(x_1458); -lean_dec(x_258); -x_1459 = lean_ctor_get(x_1455, 0); -lean_inc(x_1459); -lean_dec(x_1455); -x_1460 = lean_ctor_get(x_23, 2); -lean_inc(x_1460); -x_1461 = lean_name_eq(x_1, x_1460); -lean_dec(x_1460); -if (x_1461 == 0) -{ -lean_object* x_1462; lean_object* x_1463; -lean_dec(x_1459); -lean_dec(x_1458); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_1462 = lean_box(0); -lean_ctor_set(x_263, 0, x_1462); -if (lean_is_scalar(x_257)) { - x_1463 = lean_alloc_ctor(0, 2, 0); -} else { - x_1463 = x_257; -} -lean_ctor_set(x_1463, 0, x_260); -lean_ctor_set(x_1463, 1, x_261); -x_24 = x_1463; -goto block_222; -} -else -{ -uint8_t x_1464; -x_1464 = lean_nat_dec_le(x_1458, x_1459); -lean_dec(x_1459); -lean_dec(x_1458); -if (x_1464 == 0) -{ -lean_object* x_1465; lean_object* x_1466; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_1465 = lean_box(0); -lean_ctor_set(x_263, 0, x_1465); -if (lean_is_scalar(x_257)) { - x_1466 = lean_alloc_ctor(0, 2, 0); -} else { - x_1466 = x_257; -} -lean_ctor_set(x_1466, 0, x_260); -lean_ctor_set(x_1466, 1, x_261); -x_24 = x_1466; -goto block_222; -} -else -{ -lean_object* x_1467; -lean_free_object(x_263); -lean_free_object(x_260); -lean_dec(x_257); -x_1467 = lean_box(0); -x_329 = x_1467; -goto block_1451; -} -} -} -} -} -else -{ -lean_object* x_1468; -lean_free_object(x_263); -lean_free_object(x_260); -lean_dec(x_258); -lean_dec(x_257); -x_1468 = lean_box(0); -x_329 = x_1468; -goto block_1451; -} -block_328: -{ -lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; uint8_t x_273; -x_269 = lean_ctor_get(x_267, 0); -lean_inc(x_269); -lean_dec(x_267); -x_270 = lean_ctor_get(x_269, 1); -lean_inc(x_270); -lean_dec(x_269); -x_271 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_270, x_7, x_8, x_268); -lean_dec(x_8); -lean_dec(x_7); -x_272 = lean_ctor_get(x_271, 0); -lean_inc(x_272); -x_273 = !lean_is_exclusive(x_272); -if (x_273 == 0) -{ -lean_object* x_274; uint8_t x_275; -x_274 = lean_ctor_get(x_272, 0); -x_275 = !lean_is_exclusive(x_274); -if (x_275 == 0) -{ -lean_object* x_276; lean_object* x_277; uint8_t x_278; -x_276 = lean_ctor_get(x_274, 1); -x_277 = lean_ctor_get(x_274, 0); -lean_dec(x_277); -x_278 = !lean_is_exclusive(x_271); -if (x_278 == 0) -{ -lean_object* x_279; uint8_t x_280; -x_279 = lean_ctor_get(x_271, 0); -lean_dec(x_279); -x_280 = !lean_is_exclusive(x_276); -if (x_280 == 0) -{ -lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; -x_281 = lean_ctor_get(x_276, 4); -lean_dec(x_281); -x_282 = lean_ctor_get(x_276, 2); -lean_dec(x_282); -x_283 = lean_ctor_get(x_276, 1); -lean_dec(x_283); -x_284 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -lean_ctor_set(x_276, 4, x_224); -lean_ctor_set(x_276, 2, x_1); -lean_ctor_set(x_276, 1, x_284); -x_285 = lean_box(0); -lean_ctor_set(x_274, 0, x_285); -x_24 = x_271; -goto block_222; -} -else -{ -lean_object* x_286; lean_object* x_287; uint8_t x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; -x_286 = lean_ctor_get(x_276, 0); -x_287 = lean_ctor_get(x_276, 3); -x_288 = lean_ctor_get_uint8(x_276, sizeof(void*)*5); -lean_inc(x_287); -lean_inc(x_286); -lean_dec(x_276); -x_289 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -x_290 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_290, 0, x_286); -lean_ctor_set(x_290, 1, x_289); -lean_ctor_set(x_290, 2, x_1); -lean_ctor_set(x_290, 3, x_287); -lean_ctor_set(x_290, 4, x_224); -lean_ctor_set_uint8(x_290, sizeof(void*)*5, x_288); -x_291 = lean_box(0); -lean_ctor_set(x_274, 1, x_290); -lean_ctor_set(x_274, 0, x_291); -x_24 = x_271; -goto block_222; -} -} -else -{ -lean_object* x_292; lean_object* x_293; lean_object* x_294; uint8_t x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; -x_292 = lean_ctor_get(x_271, 1); -lean_inc(x_292); -lean_dec(x_271); -x_293 = lean_ctor_get(x_276, 0); -lean_inc(x_293); -x_294 = lean_ctor_get(x_276, 3); -lean_inc(x_294); -x_295 = lean_ctor_get_uint8(x_276, sizeof(void*)*5); -if (lean_is_exclusive(x_276)) { - lean_ctor_release(x_276, 0); - lean_ctor_release(x_276, 1); - lean_ctor_release(x_276, 2); - lean_ctor_release(x_276, 3); - lean_ctor_release(x_276, 4); - x_296 = x_276; -} else { - lean_dec_ref(x_276); - x_296 = lean_box(0); -} -x_297 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_296)) { - x_298 = lean_alloc_ctor(0, 5, 1); -} else { - x_298 = x_296; -} -lean_ctor_set(x_298, 0, x_293); -lean_ctor_set(x_298, 1, x_297); -lean_ctor_set(x_298, 2, x_1); -lean_ctor_set(x_298, 3, x_294); -lean_ctor_set(x_298, 4, x_224); -lean_ctor_set_uint8(x_298, sizeof(void*)*5, x_295); -x_299 = lean_box(0); -lean_ctor_set(x_274, 1, x_298); -lean_ctor_set(x_274, 0, x_299); -x_300 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_300, 0, x_272); -lean_ctor_set(x_300, 1, x_292); -x_24 = x_300; -goto block_222; -} -} -else -{ -lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; uint8_t x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; -x_301 = lean_ctor_get(x_274, 1); -lean_inc(x_301); -lean_dec(x_274); -x_302 = lean_ctor_get(x_271, 1); -lean_inc(x_302); -if (lean_is_exclusive(x_271)) { - lean_ctor_release(x_271, 0); - lean_ctor_release(x_271, 1); - x_303 = x_271; -} else { - lean_dec_ref(x_271); - x_303 = lean_box(0); -} -x_304 = lean_ctor_get(x_301, 0); -lean_inc(x_304); -x_305 = lean_ctor_get(x_301, 3); -lean_inc(x_305); -x_306 = lean_ctor_get_uint8(x_301, sizeof(void*)*5); -if (lean_is_exclusive(x_301)) { - lean_ctor_release(x_301, 0); - lean_ctor_release(x_301, 1); - lean_ctor_release(x_301, 2); - lean_ctor_release(x_301, 3); - lean_ctor_release(x_301, 4); - x_307 = x_301; -} else { - lean_dec_ref(x_301); - x_307 = lean_box(0); -} -x_308 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_307)) { - x_309 = lean_alloc_ctor(0, 5, 1); -} else { - x_309 = x_307; -} -lean_ctor_set(x_309, 0, x_304); -lean_ctor_set(x_309, 1, x_308); -lean_ctor_set(x_309, 2, x_1); -lean_ctor_set(x_309, 3, x_305); -lean_ctor_set(x_309, 4, x_224); -lean_ctor_set_uint8(x_309, sizeof(void*)*5, x_306); -x_310 = lean_box(0); -x_311 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_311, 0, x_310); -lean_ctor_set(x_311, 1, x_309); -lean_ctor_set(x_272, 0, x_311); -if (lean_is_scalar(x_303)) { - x_312 = lean_alloc_ctor(0, 2, 0); -} else { - x_312 = x_303; -} -lean_ctor_set(x_312, 0, x_272); -lean_ctor_set(x_312, 1, x_302); -x_24 = x_312; -goto block_222; -} -} -else -{ -lean_object* x_313; lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; uint8_t 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_313 = lean_ctor_get(x_272, 0); -lean_inc(x_313); -lean_dec(x_272); -x_314 = lean_ctor_get(x_313, 1); -lean_inc(x_314); -if (lean_is_exclusive(x_313)) { - lean_ctor_release(x_313, 0); - lean_ctor_release(x_313, 1); - x_315 = x_313; -} else { - lean_dec_ref(x_313); - x_315 = lean_box(0); -} -x_316 = lean_ctor_get(x_271, 1); -lean_inc(x_316); -if (lean_is_exclusive(x_271)) { - lean_ctor_release(x_271, 0); - lean_ctor_release(x_271, 1); - x_317 = x_271; -} else { - lean_dec_ref(x_271); - x_317 = lean_box(0); -} -x_318 = lean_ctor_get(x_314, 0); -lean_inc(x_318); -x_319 = lean_ctor_get(x_314, 3); -lean_inc(x_319); -x_320 = lean_ctor_get_uint8(x_314, sizeof(void*)*5); -if (lean_is_exclusive(x_314)) { - lean_ctor_release(x_314, 0); - lean_ctor_release(x_314, 1); - lean_ctor_release(x_314, 2); - lean_ctor_release(x_314, 3); - lean_ctor_release(x_314, 4); - x_321 = x_314; -} else { - lean_dec_ref(x_314); - x_321 = lean_box(0); -} -x_322 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_321)) { - x_323 = lean_alloc_ctor(0, 5, 1); -} else { - x_323 = x_321; -} -lean_ctor_set(x_323, 0, x_318); -lean_ctor_set(x_323, 1, x_322); -lean_ctor_set(x_323, 2, x_1); -lean_ctor_set(x_323, 3, x_319); -lean_ctor_set(x_323, 4, x_224); -lean_ctor_set_uint8(x_323, sizeof(void*)*5, x_320); -x_324 = lean_box(0); -if (lean_is_scalar(x_315)) { - x_325 = lean_alloc_ctor(0, 2, 0); -} else { - x_325 = x_315; -} -lean_ctor_set(x_325, 0, x_324); -lean_ctor_set(x_325, 1, x_323); -x_326 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_326, 0, x_325); -if (lean_is_scalar(x_317)) { - x_327 = lean_alloc_ctor(0, 2, 0); -} else { - x_327 = x_317; -} -lean_ctor_set(x_327, 0, x_326); -lean_ctor_set(x_327, 1, x_316); -x_24 = x_327; -goto block_222; -} -} -block_1451: -{ -lean_object* x_330; uint8_t x_331; -lean_dec(x_329); -x_330 = lean_unsigned_to_nat(0u); -x_331 = lean_nat_dec_lt(x_330, x_22); -lean_dec(x_22); -if (x_331 == 0) -{ -lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; -x_332 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_265, x_7, x_8, x_261); -x_333 = lean_ctor_get(x_332, 0); -lean_inc(x_333); -x_334 = lean_ctor_get(x_333, 0); -lean_inc(x_334); -lean_dec(x_333); -x_335 = lean_ctor_get(x_332, 1); -lean_inc(x_335); -lean_dec(x_332); -x_336 = lean_ctor_get(x_334, 0); -lean_inc(x_336); -x_337 = lean_ctor_get(x_334, 1); -lean_inc(x_337); -lean_dec(x_334); -x_338 = l_Lean_Syntax_getHeadInfo___main(x_336); -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; uint8_t x_347; -x_339 = lean_apply_1(x_2, x_336); -x_340 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_339, x_5, x_337, x_7, x_8, x_335); -x_341 = lean_ctor_get(x_340, 0); -lean_inc(x_341); -x_342 = lean_ctor_get(x_341, 0); -lean_inc(x_342); -lean_dec(x_341); -x_343 = lean_ctor_get(x_340, 1); -lean_inc(x_343); -lean_dec(x_340); -x_344 = lean_ctor_get(x_342, 1); -lean_inc(x_344); -lean_dec(x_342); -x_345 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_344, x_7, x_8, x_343); -x_346 = lean_ctor_get(x_345, 0); -lean_inc(x_346); -x_347 = !lean_is_exclusive(x_346); -if (x_347 == 0) -{ -lean_object* x_348; lean_object* x_349; uint8_t x_350; -x_348 = lean_ctor_get(x_346, 0); -x_349 = lean_ctor_get(x_345, 1); -lean_inc(x_349); -lean_dec(x_345); -x_350 = !lean_is_exclusive(x_348); -if (x_350 == 0) -{ -lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_391; lean_object* x_392; uint8_t x_393; -x_351 = lean_ctor_get(x_348, 0); -x_391 = l_Lean_Core_getTraceState___rarg(x_8, x_349); -x_392 = lean_ctor_get(x_391, 0); -lean_inc(x_392); -x_393 = lean_ctor_get_uint8(x_392, sizeof(void*)*1); -lean_dec(x_392); -if (x_393 == 0) -{ -lean_object* x_394; lean_object* x_395; -x_394 = lean_ctor_get(x_391, 1); -lean_inc(x_394); -lean_dec(x_391); -x_395 = lean_box(x_226); -lean_ctor_set(x_348, 0, x_395); -x_352 = x_346; -x_353 = x_394; -goto block_390; -} -else -{ -lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; -x_396 = lean_ctor_get(x_391, 1); -lean_inc(x_396); -lean_dec(x_391); -x_397 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_398 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_397, x_7, x_8, x_396); -x_399 = lean_ctor_get(x_398, 0); -lean_inc(x_399); -x_400 = lean_ctor_get(x_398, 1); -lean_inc(x_400); -lean_dec(x_398); -lean_ctor_set(x_348, 0, x_399); -x_352 = x_346; -x_353 = x_400; -goto block_390; -} -block_390: -{ -uint8_t x_354; -x_354 = !lean_is_exclusive(x_352); -if (x_354 == 0) -{ -lean_object* x_355; lean_object* x_356; uint8_t x_357; -x_355 = lean_ctor_get(x_352, 0); -x_356 = lean_ctor_get(x_355, 0); -lean_inc(x_356); -x_357 = lean_unbox(x_356); -lean_dec(x_356); -if (x_357 == 0) -{ -uint8_t x_358; -lean_dec(x_351); -lean_dec(x_5); -x_358 = !lean_is_exclusive(x_355); -if (x_358 == 0) -{ -lean_object* x_359; lean_object* x_360; -x_359 = lean_ctor_get(x_355, 0); -lean_dec(x_359); -x_360 = lean_box(0); -lean_ctor_set(x_355, 0, x_360); -x_267 = x_352; -x_268 = x_353; -goto block_328; -} -else -{ -lean_object* x_361; lean_object* x_362; lean_object* x_363; -x_361 = lean_ctor_get(x_355, 1); -lean_inc(x_361); -lean_dec(x_355); -x_362 = lean_box(0); -x_363 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_363, 0, x_362); -lean_ctor_set(x_363, 1, x_361); -lean_ctor_set(x_352, 0, x_363); -x_267 = x_352; -x_268 = x_353; -goto block_328; -} -} -else -{ -lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; -lean_free_object(x_352); -x_364 = lean_ctor_get(x_355, 1); -lean_inc(x_364); -lean_dec(x_355); -x_365 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_351); -x_366 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_366, 0, x_365); -x_367 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_368 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_368, 0, x_367); -lean_ctor_set(x_368, 1, x_366); -x_369 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_370 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_369, x_368, x_5, x_364, x_7, x_8, x_353); -lean_dec(x_5); -x_371 = lean_ctor_get(x_370, 0); -lean_inc(x_371); -x_372 = lean_ctor_get(x_370, 1); -lean_inc(x_372); -lean_dec(x_370); -x_267 = x_371; -x_268 = x_372; -goto block_328; -} -} -else -{ -lean_object* x_373; lean_object* x_374; uint8_t x_375; -x_373 = lean_ctor_get(x_352, 0); -lean_inc(x_373); -lean_dec(x_352); -x_374 = lean_ctor_get(x_373, 0); -lean_inc(x_374); -x_375 = lean_unbox(x_374); -lean_dec(x_374); -if (x_375 == 0) -{ -lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; -lean_dec(x_351); -lean_dec(x_5); -x_376 = lean_ctor_get(x_373, 1); -lean_inc(x_376); -if (lean_is_exclusive(x_373)) { - lean_ctor_release(x_373, 0); - lean_ctor_release(x_373, 1); - x_377 = x_373; -} else { - lean_dec_ref(x_373); - x_377 = lean_box(0); -} -x_378 = lean_box(0); -if (lean_is_scalar(x_377)) { - x_379 = lean_alloc_ctor(0, 2, 0); -} else { - x_379 = x_377; -} -lean_ctor_set(x_379, 0, x_378); -lean_ctor_set(x_379, 1, x_376); -x_380 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_380, 0, x_379); -x_267 = x_380; -x_268 = x_353; -goto block_328; -} -else -{ -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; -x_381 = lean_ctor_get(x_373, 1); -lean_inc(x_381); -lean_dec(x_373); -x_382 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_351); -x_383 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_383, 0, x_382); -x_384 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_385 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_385, 0, x_384); -lean_ctor_set(x_385, 1, x_383); -x_386 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_387 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_386, x_385, x_5, x_381, x_7, x_8, x_353); -lean_dec(x_5); -x_388 = lean_ctor_get(x_387, 0); -lean_inc(x_388); -x_389 = lean_ctor_get(x_387, 1); -lean_inc(x_389); -lean_dec(x_387); -x_267 = x_388; -x_268 = x_389; -goto block_328; -} -} -} -} -else -{ -lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_424; lean_object* x_425; uint8_t x_426; -x_401 = lean_ctor_get(x_348, 0); -x_402 = lean_ctor_get(x_348, 1); -lean_inc(x_402); -lean_inc(x_401); -lean_dec(x_348); -x_424 = l_Lean_Core_getTraceState___rarg(x_8, x_349); -x_425 = lean_ctor_get(x_424, 0); -lean_inc(x_425); -x_426 = lean_ctor_get_uint8(x_425, sizeof(void*)*1); -lean_dec(x_425); -if (x_426 == 0) -{ -lean_object* x_427; lean_object* x_428; lean_object* x_429; -x_427 = lean_ctor_get(x_424, 1); -lean_inc(x_427); -lean_dec(x_424); -x_428 = lean_box(x_226); -x_429 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_429, 0, x_428); -lean_ctor_set(x_429, 1, x_402); -lean_ctor_set(x_346, 0, x_429); -x_403 = x_346; -x_404 = x_427; -goto block_423; -} -else -{ -lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; -x_430 = lean_ctor_get(x_424, 1); -lean_inc(x_430); -lean_dec(x_424); -x_431 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_432 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_431, x_7, x_8, x_430); -x_433 = lean_ctor_get(x_432, 0); -lean_inc(x_433); -x_434 = lean_ctor_get(x_432, 1); -lean_inc(x_434); -lean_dec(x_432); -x_435 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_435, 0, x_433); -lean_ctor_set(x_435, 1, x_402); -lean_ctor_set(x_346, 0, x_435); -x_403 = x_346; -x_404 = x_434; -goto block_423; -} -block_423: -{ -lean_object* x_405; lean_object* x_406; lean_object* x_407; uint8_t x_408; -x_405 = lean_ctor_get(x_403, 0); -lean_inc(x_405); -if (lean_is_exclusive(x_403)) { - lean_ctor_release(x_403, 0); - x_406 = x_403; -} else { - lean_dec_ref(x_403); - x_406 = lean_box(0); -} -x_407 = lean_ctor_get(x_405, 0); -lean_inc(x_407); -x_408 = lean_unbox(x_407); -lean_dec(x_407); -if (x_408 == 0) -{ -lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; -lean_dec(x_401); -lean_dec(x_5); -x_409 = lean_ctor_get(x_405, 1); -lean_inc(x_409); -if (lean_is_exclusive(x_405)) { - lean_ctor_release(x_405, 0); - lean_ctor_release(x_405, 1); - x_410 = x_405; -} else { - lean_dec_ref(x_405); - x_410 = lean_box(0); -} -x_411 = lean_box(0); -if (lean_is_scalar(x_410)) { - x_412 = lean_alloc_ctor(0, 2, 0); -} else { - x_412 = x_410; -} -lean_ctor_set(x_412, 0, x_411); -lean_ctor_set(x_412, 1, x_409); -if (lean_is_scalar(x_406)) { - x_413 = lean_alloc_ctor(1, 1, 0); -} else { - x_413 = x_406; -} -lean_ctor_set(x_413, 0, x_412); -x_267 = x_413; -x_268 = x_404; -goto block_328; -} -else -{ -lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; -lean_dec(x_406); -x_414 = lean_ctor_get(x_405, 1); -lean_inc(x_414); -lean_dec(x_405); -x_415 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_401); -x_416 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_416, 0, x_415); -x_417 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_418 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_418, 0, x_417); -lean_ctor_set(x_418, 1, x_416); -x_419 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_420 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_419, x_418, x_5, x_414, x_7, x_8, x_404); -lean_dec(x_5); +lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; uint8_t x_423; +x_418 = lean_ctor_get(x_414, 1); +lean_inc(x_418); +lean_dec(x_414); +x_419 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_420 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_419, x_7, x_8, x_418); x_421 = lean_ctor_get(x_420, 0); lean_inc(x_421); x_422 = lean_ctor_get(x_420, 1); lean_inc(x_422); lean_dec(x_420); -x_267 = x_421; -x_268 = x_422; -goto block_328; +x_423 = lean_unbox(x_421); +lean_dec(x_421); +x_367 = x_423; +x_368 = x_422; +goto block_413; +} +block_366: +{ +lean_object* x_31; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_31 = lean_apply_5(x_4, x_5, x_6, x_7, x_8, x_30); +if (lean_obj_tag(x_31) == 0) +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_io_ref_get(x_6, x_32); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_34, 3); +lean_inc(x_35); +if (lean_obj_tag(x_35) == 0) +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +lean_dec(x_34); +lean_dec(x_23); +lean_dec(x_22); +lean_dec(x_21); +lean_dec(x_20); +lean_dec(x_14); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_36 = lean_ctor_get(x_33, 1); +lean_inc(x_36); +lean_dec(x_33); +x_37 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7; +x_38 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; +x_39 = lean_panic_fn(x_37, x_38); +x_40 = lean_apply_5(x_39, x_5, x_6, x_7, x_8, x_36); +return x_40; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_325; lean_object* x_326; lean_object* x_352; lean_object* x_353; uint8_t x_354; +x_41 = lean_ctor_get(x_33, 1); +lean_inc(x_41); +lean_dec(x_33); +x_42 = lean_ctor_get(x_34, 4); +lean_inc(x_42); +lean_dec(x_34); +x_43 = lean_ctor_get(x_35, 0); +lean_inc(x_43); +if (lean_is_exclusive(x_35)) { + lean_ctor_release(x_35, 0); + x_44 = x_35; +} else { + lean_dec_ref(x_35); + x_44 = lean_box(0); +} +x_352 = l_Lean_Core_getTraceState___rarg(x_8, x_41); +x_353 = lean_ctor_get(x_352, 0); +lean_inc(x_353); +x_354 = lean_ctor_get_uint8(x_353, sizeof(void*)*1); +lean_dec(x_353); +if (x_354 == 0) +{ +lean_object* x_355; +x_355 = lean_ctor_get(x_352, 1); +lean_inc(x_355); +lean_dec(x_352); +x_325 = x_27; +x_326 = x_355; +goto block_351; +} +else +{ +lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_object* x_360; uint8_t x_361; +x_356 = lean_ctor_get(x_352, 1); +lean_inc(x_356); +lean_dec(x_352); +x_357 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_358 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_357, x_7, x_8, x_356); +x_359 = lean_ctor_get(x_358, 0); +lean_inc(x_359); +x_360 = lean_ctor_get(x_358, 1); +lean_inc(x_360); +lean_dec(x_358); +x_361 = lean_unbox(x_359); +lean_dec(x_359); +x_325 = x_361; +x_326 = x_360; +goto block_351; +} +block_324: +{ +lean_object* x_46; lean_object* x_144; lean_object* x_165; lean_object* x_191; uint8_t x_317; +x_317 = lean_nat_dec_lt(x_43, x_3); +lean_dec(x_43); +if (x_317 == 0) +{ +if (lean_obj_tag(x_42) == 0) +{ +lean_dec(x_21); +lean_dec(x_20); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_46 = x_45; +goto block_143; +} +else +{ +if (lean_obj_tag(x_20) == 0) +{ +lean_dec(x_42); +lean_dec(x_21); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_46 = x_45; +goto block_143; +} +else +{ +lean_object* x_318; lean_object* x_319; uint8_t x_320; +x_318 = lean_ctor_get(x_42, 0); +lean_inc(x_318); +lean_dec(x_42); +x_319 = lean_ctor_get(x_20, 0); +lean_inc(x_319); +lean_dec(x_20); +x_320 = lean_name_eq(x_1, x_21); +lean_dec(x_21); +if (x_320 == 0) +{ +lean_dec(x_319); +lean_dec(x_318); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_46 = x_45; +goto block_143; +} +else +{ +uint8_t x_321; +x_321 = lean_nat_dec_le(x_318, x_319); +lean_dec(x_319); +lean_dec(x_318); +if (x_321 == 0) +{ +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_46 = x_45; +goto block_143; +} +else +{ +lean_object* x_322; +x_322 = lean_box(0); +x_191 = x_322; +goto block_316; +} } } } } else { -lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_462; lean_object* x_463; uint8_t x_464; -x_436 = lean_ctor_get(x_346, 0); -lean_inc(x_436); -lean_dec(x_346); -x_437 = lean_ctor_get(x_345, 1); -lean_inc(x_437); -lean_dec(x_345); -x_438 = lean_ctor_get(x_436, 0); +lean_object* x_323; +lean_dec(x_42); +lean_dec(x_21); +lean_dec(x_20); +x_323 = lean_box(0); +x_191 = x_323; +goto block_316; +} +block_143: +{ +lean_object* x_47; lean_object* x_48; +x_47 = lean_io_ref_get(x_6, x_46); +x_48 = lean_ctor_get(x_47, 0); +lean_inc(x_48); +if (x_24 == 0) +{ +lean_object* x_49; +lean_dec(x_23); +x_49 = lean_ctor_get(x_48, 4); +lean_inc(x_49); +lean_dec(x_48); +if (lean_obj_tag(x_49) == 0) +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_50 = lean_ctor_get(x_47, 1); +lean_inc(x_50); +lean_dec(x_47); +if (lean_is_scalar(x_44)) { + x_51 = lean_alloc_ctor(1, 1, 0); +} else { + x_51 = x_44; +} +lean_ctor_set(x_51, 0, x_3); +x_52 = lean_io_ref_take(x_6, x_50); +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +lean_dec(x_52); +x_55 = !lean_is_exclusive(x_53); +if (x_55 == 0) +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_59; +x_56 = lean_ctor_get(x_53, 4); +lean_dec(x_56); +x_57 = lean_ctor_get(x_53, 3); +lean_dec(x_57); +lean_ctor_set(x_53, 4, x_51); +lean_ctor_set(x_53, 3, x_22); +x_58 = lean_io_ref_set(x_6, x_53, x_54); +lean_dec(x_6); +x_59 = !lean_is_exclusive(x_58); +if (x_59 == 0) +{ +lean_object* x_60; lean_object* x_61; +x_60 = lean_ctor_get(x_58, 0); +lean_dec(x_60); +x_61 = lean_box(0); +lean_ctor_set(x_58, 0, x_61); +return x_58; +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_58, 1); +lean_inc(x_62); +lean_dec(x_58); +x_63 = lean_box(0); +x_64 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_64, 0, x_63); +lean_ctor_set(x_64, 1, x_62); +return x_64; +} +} +else +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; uint8_t x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; +x_65 = lean_ctor_get(x_53, 0); +x_66 = lean_ctor_get(x_53, 1); +x_67 = lean_ctor_get(x_53, 2); +x_68 = lean_ctor_get_uint8(x_53, sizeof(void*)*5); +lean_inc(x_67); +lean_inc(x_66); +lean_inc(x_65); +lean_dec(x_53); +x_69 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_69, 0, x_65); +lean_ctor_set(x_69, 1, x_66); +lean_ctor_set(x_69, 2, x_67); +lean_ctor_set(x_69, 3, x_22); +lean_ctor_set(x_69, 4, x_51); +lean_ctor_set_uint8(x_69, sizeof(void*)*5, x_68); +x_70 = lean_io_ref_set(x_6, x_69, x_54); +lean_dec(x_6); +x_71 = lean_ctor_get(x_70, 1); +lean_inc(x_71); +if (lean_is_exclusive(x_70)) { + lean_ctor_release(x_70, 0); + lean_ctor_release(x_70, 1); + x_72 = x_70; +} else { + lean_dec_ref(x_70); + x_72 = lean_box(0); +} +x_73 = lean_box(0); +if (lean_is_scalar(x_72)) { + x_74 = lean_alloc_ctor(0, 2, 0); +} else { + x_74 = x_72; +} +lean_ctor_set(x_74, 0, x_73); +lean_ctor_set(x_74, 1, x_71); +return x_74; +} +} +else +{ +lean_object* x_75; uint8_t x_76; +lean_dec(x_44); +x_75 = lean_ctor_get(x_47, 1); +lean_inc(x_75); +lean_dec(x_47); +x_76 = !lean_is_exclusive(x_49); +if (x_76 == 0) +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; uint8_t x_82; +x_77 = lean_ctor_get(x_49, 0); +x_78 = l_Nat_min(x_77, x_3); +lean_dec(x_3); +lean_dec(x_77); +lean_ctor_set(x_49, 0, x_78); +x_79 = lean_io_ref_take(x_6, x_75); +x_80 = lean_ctor_get(x_79, 0); +lean_inc(x_80); +x_81 = lean_ctor_get(x_79, 1); +lean_inc(x_81); +lean_dec(x_79); +x_82 = !lean_is_exclusive(x_80); +if (x_82 == 0) +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; uint8_t x_86; +x_83 = lean_ctor_get(x_80, 4); +lean_dec(x_83); +x_84 = lean_ctor_get(x_80, 3); +lean_dec(x_84); +lean_ctor_set(x_80, 4, x_49); +lean_ctor_set(x_80, 3, x_22); +x_85 = lean_io_ref_set(x_6, x_80, x_81); +lean_dec(x_6); +x_86 = !lean_is_exclusive(x_85); +if (x_86 == 0) +{ +lean_object* x_87; lean_object* x_88; +x_87 = lean_ctor_get(x_85, 0); +lean_dec(x_87); +x_88 = lean_box(0); +lean_ctor_set(x_85, 0, x_88); +return x_85; +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; +x_89 = lean_ctor_get(x_85, 1); +lean_inc(x_89); +lean_dec(x_85); +x_90 = lean_box(0); +x_91 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_91, 0, x_90); +lean_ctor_set(x_91, 1, x_89); +return x_91; +} +} +else +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; uint8_t x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; +x_92 = lean_ctor_get(x_80, 0); +x_93 = lean_ctor_get(x_80, 1); +x_94 = lean_ctor_get(x_80, 2); +x_95 = lean_ctor_get_uint8(x_80, sizeof(void*)*5); +lean_inc(x_94); +lean_inc(x_93); +lean_inc(x_92); +lean_dec(x_80); +x_96 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_96, 0, x_92); +lean_ctor_set(x_96, 1, x_93); +lean_ctor_set(x_96, 2, x_94); +lean_ctor_set(x_96, 3, x_22); +lean_ctor_set(x_96, 4, x_49); +lean_ctor_set_uint8(x_96, sizeof(void*)*5, x_95); +x_97 = lean_io_ref_set(x_6, x_96, x_81); +lean_dec(x_6); +x_98 = lean_ctor_get(x_97, 1); +lean_inc(x_98); +if (lean_is_exclusive(x_97)) { + lean_ctor_release(x_97, 0); + lean_ctor_release(x_97, 1); + x_99 = x_97; +} else { + lean_dec_ref(x_97); + x_99 = lean_box(0); +} +x_100 = lean_box(0); +if (lean_is_scalar(x_99)) { + x_101 = lean_alloc_ctor(0, 2, 0); +} else { + x_101 = x_99; +} +lean_ctor_set(x_101, 0, x_100); +lean_ctor_set(x_101, 1, x_98); +return x_101; +} +} +else +{ +lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_102 = lean_ctor_get(x_49, 0); +lean_inc(x_102); +lean_dec(x_49); +x_103 = l_Nat_min(x_102, x_3); +lean_dec(x_3); +lean_dec(x_102); +x_104 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_104, 0, x_103); +x_105 = lean_io_ref_take(x_6, x_75); +x_106 = lean_ctor_get(x_105, 0); +lean_inc(x_106); +x_107 = lean_ctor_get(x_105, 1); +lean_inc(x_107); +lean_dec(x_105); +x_108 = lean_ctor_get(x_106, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_106, 1); +lean_inc(x_109); +x_110 = lean_ctor_get(x_106, 2); +lean_inc(x_110); +x_111 = lean_ctor_get_uint8(x_106, sizeof(void*)*5); +if (lean_is_exclusive(x_106)) { + lean_ctor_release(x_106, 0); + lean_ctor_release(x_106, 1); + lean_ctor_release(x_106, 2); + lean_ctor_release(x_106, 3); + lean_ctor_release(x_106, 4); + x_112 = x_106; +} else { + lean_dec_ref(x_106); + x_112 = lean_box(0); +} +if (lean_is_scalar(x_112)) { + x_113 = lean_alloc_ctor(0, 5, 1); +} else { + x_113 = x_112; +} +lean_ctor_set(x_113, 0, x_108); +lean_ctor_set(x_113, 1, x_109); +lean_ctor_set(x_113, 2, x_110); +lean_ctor_set(x_113, 3, x_22); +lean_ctor_set(x_113, 4, x_104); +lean_ctor_set_uint8(x_113, sizeof(void*)*5, x_111); +x_114 = lean_io_ref_set(x_6, x_113, x_107); +lean_dec(x_6); +x_115 = lean_ctor_get(x_114, 1); +lean_inc(x_115); +if (lean_is_exclusive(x_114)) { + lean_ctor_release(x_114, 0); + lean_ctor_release(x_114, 1); + x_116 = x_114; +} else { + lean_dec_ref(x_114); + x_116 = lean_box(0); +} +x_117 = lean_box(0); +if (lean_is_scalar(x_116)) { + x_118 = lean_alloc_ctor(0, 2, 0); +} else { + x_118 = x_116; +} +lean_ctor_set(x_118, 0, x_117); +lean_ctor_set(x_118, 1, x_115); +return x_118; +} +} +} +else +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; uint8_t x_123; +lean_dec(x_48); +lean_dec(x_44); +lean_dec(x_3); +x_119 = lean_ctor_get(x_47, 1); +lean_inc(x_119); +lean_dec(x_47); +x_120 = lean_io_ref_take(x_6, x_119); +x_121 = lean_ctor_get(x_120, 0); +lean_inc(x_121); +x_122 = lean_ctor_get(x_120, 1); +lean_inc(x_122); +lean_dec(x_120); +x_123 = !lean_is_exclusive(x_121); +if (x_123 == 0) +{ +lean_object* x_124; lean_object* x_125; lean_object* x_126; uint8_t x_127; +x_124 = lean_ctor_get(x_121, 4); +lean_dec(x_124); +x_125 = lean_ctor_get(x_121, 3); +lean_dec(x_125); +lean_ctor_set(x_121, 4, x_23); +lean_ctor_set(x_121, 3, x_22); +x_126 = lean_io_ref_set(x_6, x_121, x_122); +lean_dec(x_6); +x_127 = !lean_is_exclusive(x_126); +if (x_127 == 0) +{ +lean_object* x_128; lean_object* x_129; +x_128 = lean_ctor_get(x_126, 0); +lean_dec(x_128); +x_129 = lean_box(0); +lean_ctor_set(x_126, 0, x_129); +return x_126; +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_130 = lean_ctor_get(x_126, 1); +lean_inc(x_130); +lean_dec(x_126); +x_131 = lean_box(0); +x_132 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_132, 0, x_131); +lean_ctor_set(x_132, 1, x_130); +return x_132; +} +} +else +{ +lean_object* x_133; lean_object* x_134; lean_object* x_135; uint8_t x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; +x_133 = lean_ctor_get(x_121, 0); +x_134 = lean_ctor_get(x_121, 1); +x_135 = lean_ctor_get(x_121, 2); +x_136 = lean_ctor_get_uint8(x_121, sizeof(void*)*5); +lean_inc(x_135); +lean_inc(x_134); +lean_inc(x_133); +lean_dec(x_121); +x_137 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_137, 0, x_133); +lean_ctor_set(x_137, 1, x_134); +lean_ctor_set(x_137, 2, x_135); +lean_ctor_set(x_137, 3, x_22); +lean_ctor_set(x_137, 4, x_23); +lean_ctor_set_uint8(x_137, sizeof(void*)*5, x_136); +x_138 = lean_io_ref_set(x_6, x_137, x_122); +lean_dec(x_6); +x_139 = lean_ctor_get(x_138, 1); +lean_inc(x_139); +if (lean_is_exclusive(x_138)) { + lean_ctor_release(x_138, 0); + lean_ctor_release(x_138, 1); + x_140 = x_138; +} else { + lean_dec_ref(x_138); + x_140 = lean_box(0); +} +x_141 = lean_box(0); +if (lean_is_scalar(x_140)) { + x_142 = lean_alloc_ctor(0, 2, 0); +} else { + x_142 = x_140; +} +lean_ctor_set(x_142, 0, x_141); +lean_ctor_set(x_142, 1, x_139); +return x_142; +} +} +} +block_164: +{ +lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; uint8_t x_150; +x_145 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_6, x_7, x_8, x_144); +lean_dec(x_8); +lean_dec(x_7); +x_146 = lean_ctor_get(x_145, 1); +lean_inc(x_146); +lean_dec(x_145); +x_147 = lean_io_ref_take(x_6, x_146); +x_148 = lean_ctor_get(x_147, 0); +lean_inc(x_148); +x_149 = lean_ctor_get(x_147, 1); +lean_inc(x_149); +lean_dec(x_147); +x_150 = !lean_is_exclusive(x_148); +if (x_150 == 0) +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; +x_151 = lean_ctor_get(x_148, 4); +lean_dec(x_151); +x_152 = lean_ctor_get(x_148, 2); +lean_dec(x_152); +x_153 = lean_ctor_get(x_148, 1); +lean_dec(x_153); +x_154 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +lean_ctor_set(x_148, 4, x_25); +lean_ctor_set(x_148, 2, x_1); +lean_ctor_set(x_148, 1, x_154); +x_155 = lean_io_ref_set(x_6, x_148, x_149); +x_156 = lean_ctor_get(x_155, 1); +lean_inc(x_156); +lean_dec(x_155); +x_46 = x_156; +goto block_143; +} +else +{ +lean_object* x_157; lean_object* x_158; uint8_t x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; +x_157 = lean_ctor_get(x_148, 0); +x_158 = lean_ctor_get(x_148, 3); +x_159 = lean_ctor_get_uint8(x_148, sizeof(void*)*5); +lean_inc(x_158); +lean_inc(x_157); +lean_dec(x_148); +x_160 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; +x_161 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_161, 0, x_157); +lean_ctor_set(x_161, 1, x_160); +lean_ctor_set(x_161, 2, x_1); +lean_ctor_set(x_161, 3, x_158); +lean_ctor_set(x_161, 4, x_25); +lean_ctor_set_uint8(x_161, sizeof(void*)*5, x_159); +x_162 = lean_io_ref_set(x_6, x_161, x_149); +x_163 = lean_ctor_get(x_162, 1); +lean_inc(x_163); +lean_dec(x_162); +x_46 = x_163; +goto block_143; +} +} +block_190: +{ +lean_object* x_166; lean_object* x_167; lean_object* x_168; uint8_t x_169; lean_object* x_170; lean_object* x_180; lean_object* x_181; uint8_t x_182; +x_166 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_6, x_7, x_8, x_165); +x_167 = lean_ctor_get(x_166, 0); +lean_inc(x_167); +x_168 = lean_ctor_get(x_166, 1); +lean_inc(x_168); +lean_dec(x_166); +x_180 = l_Lean_Core_getTraceState___rarg(x_8, x_168); +x_181 = lean_ctor_get(x_180, 0); +lean_inc(x_181); +x_182 = lean_ctor_get_uint8(x_181, sizeof(void*)*1); +lean_dec(x_181); +if (x_182 == 0) +{ +lean_object* x_183; +x_183 = lean_ctor_get(x_180, 1); +lean_inc(x_183); +lean_dec(x_180); +x_169 = x_27; +x_170 = x_183; +goto block_179; +} +else +{ +lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; uint8_t x_189; +x_184 = lean_ctor_get(x_180, 1); +lean_inc(x_184); +lean_dec(x_180); +x_185 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_186 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_185, x_7, x_8, x_184); +x_187 = lean_ctor_get(x_186, 0); +lean_inc(x_187); +x_188 = lean_ctor_get(x_186, 1); +lean_inc(x_188); +lean_dec(x_186); +x_189 = lean_unbox(x_187); +lean_dec(x_187); +x_169 = x_189; +x_170 = x_188; +goto block_179; +} +block_179: +{ +if (x_169 == 0) +{ +lean_dec(x_167); +lean_dec(x_5); +x_144 = x_170; +goto block_164; +} +else +{ +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; +x_171 = lean_unsigned_to_nat(0u); +x_172 = l_Lean_Syntax_formatStxAux___main(x_25, x_27, x_171, x_167); +x_173 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_173, 0, x_172); +x_174 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__14; +x_175 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_175, 0, x_174); +lean_ctor_set(x_175, 1, x_173); +x_176 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_177 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_176, x_175, x_5, x_6, x_7, x_8, x_170); +lean_dec(x_5); +x_178 = lean_ctor_get(x_177, 1); +lean_inc(x_178); +lean_dec(x_177); +x_144 = x_178; +goto block_164; +} +} +} +block_316: +{ +lean_object* x_192; uint8_t x_193; +lean_dec(x_191); +x_192 = lean_unsigned_to_nat(0u); +x_193 = lean_nat_dec_lt(x_192, x_14); +lean_dec(x_14); +if (x_193 == 0) +{ +lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; +x_194 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_6, x_7, x_8, x_45); +x_195 = lean_ctor_get(x_194, 0); +lean_inc(x_195); +x_196 = lean_ctor_get(x_194, 1); +lean_inc(x_196); +lean_dec(x_194); +x_197 = l_Lean_Syntax_getHeadInfo___main(x_195); +if (lean_obj_tag(x_197) == 0) +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; +x_198 = lean_apply_1(x_2, x_195); +x_199 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_198, x_5, x_6, x_7, x_8, x_196); +x_200 = lean_ctor_get(x_199, 1); +lean_inc(x_200); +lean_dec(x_199); +x_165 = x_200; +goto block_190; +} +else +{ +lean_object* x_201; lean_object* x_202; +x_201 = lean_ctor_get(x_197, 0); +lean_inc(x_201); +lean_dec(x_197); +x_202 = l_Lean_Syntax_getTailInfo___main(x_195); +if (lean_obj_tag(x_202) == 0) +{ +lean_object* x_203; lean_object* x_204; lean_object* x_205; +lean_dec(x_201); +x_203 = lean_apply_1(x_2, x_195); +x_204 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_203, x_5, x_6, x_7, x_8, x_196); +x_205 = lean_ctor_get(x_204, 1); +lean_inc(x_205); +lean_dec(x_204); +x_165 = x_205; +goto block_190; +} +else +{ +lean_object* x_206; uint8_t x_207; +x_206 = lean_ctor_get(x_202, 0); +lean_inc(x_206); +lean_dec(x_202); +x_207 = !lean_is_exclusive(x_201); +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_201, 0); +x_209 = lean_ctor_get(x_201, 1); +x_210 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; +lean_inc(x_209); +lean_ctor_set(x_201, 0, x_210); +x_211 = l_Lean_Syntax_setHeadInfo(x_195, x_201); +x_212 = !lean_is_exclusive(x_206); +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; lean_object* x_220; lean_object* x_221; lean_object* x_222; +x_213 = lean_ctor_get(x_206, 1); +x_214 = lean_ctor_get(x_206, 2); +lean_inc(x_213); +lean_ctor_set(x_206, 2, x_210); +x_215 = l_Lean_Syntax_setTailInfo(x_211, x_206); +x_216 = lean_apply_1(x_2, x_215); +x_217 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_217, 0, x_208); +lean_ctor_set(x_217, 1, x_209); +lean_ctor_set(x_217, 2, x_210); +x_218 = l_Lean_Syntax_setHeadInfo(x_216, x_217); +x_219 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_219, 0, x_210); +lean_ctor_set(x_219, 1, x_213); +lean_ctor_set(x_219, 2, x_214); +x_220 = l_Lean_Syntax_setTailInfo(x_218, x_219); +x_221 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_220, x_5, x_6, x_7, x_8, x_196); +x_222 = lean_ctor_get(x_221, 1); +lean_inc(x_222); +lean_dec(x_221); +x_165 = x_222; +goto block_190; +} +else +{ +lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; +x_223 = lean_ctor_get(x_206, 0); +x_224 = lean_ctor_get(x_206, 1); +x_225 = lean_ctor_get(x_206, 2); +lean_inc(x_225); +lean_inc(x_224); +lean_inc(x_223); +lean_dec(x_206); +lean_inc(x_224); +x_226 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_226, 0, x_223); +lean_ctor_set(x_226, 1, x_224); +lean_ctor_set(x_226, 2, x_210); +x_227 = l_Lean_Syntax_setTailInfo(x_211, x_226); +x_228 = lean_apply_1(x_2, x_227); +x_229 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_229, 0, x_208); +lean_ctor_set(x_229, 1, x_209); +lean_ctor_set(x_229, 2, x_210); +x_230 = l_Lean_Syntax_setHeadInfo(x_228, x_229); +x_231 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_231, 0, x_210); +lean_ctor_set(x_231, 1, x_224); +lean_ctor_set(x_231, 2, x_225); +x_232 = l_Lean_Syntax_setTailInfo(x_230, x_231); +x_233 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_232, x_5, x_6, x_7, x_8, x_196); +x_234 = lean_ctor_get(x_233, 1); +lean_inc(x_234); +lean_dec(x_233); +x_165 = x_234; +goto block_190; +} +} +else +{ +lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; +x_235 = lean_ctor_get(x_201, 0); +x_236 = lean_ctor_get(x_201, 1); +x_237 = lean_ctor_get(x_201, 2); +lean_inc(x_237); +lean_inc(x_236); +lean_inc(x_235); +lean_dec(x_201); +x_238 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; +lean_inc(x_236); +x_239 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_239, 0, x_238); +lean_ctor_set(x_239, 1, x_236); +lean_ctor_set(x_239, 2, x_237); +x_240 = l_Lean_Syntax_setHeadInfo(x_195, x_239); +x_241 = lean_ctor_get(x_206, 0); +lean_inc(x_241); +x_242 = lean_ctor_get(x_206, 1); +lean_inc(x_242); +x_243 = lean_ctor_get(x_206, 2); +lean_inc(x_243); +if (lean_is_exclusive(x_206)) { + lean_ctor_release(x_206, 0); + lean_ctor_release(x_206, 1); + lean_ctor_release(x_206, 2); + x_244 = x_206; +} else { + lean_dec_ref(x_206); + x_244 = lean_box(0); +} +lean_inc(x_242); +if (lean_is_scalar(x_244)) { + x_245 = lean_alloc_ctor(0, 3, 0); +} else { + x_245 = x_244; +} +lean_ctor_set(x_245, 0, x_241); +lean_ctor_set(x_245, 1, x_242); +lean_ctor_set(x_245, 2, x_238); +x_246 = l_Lean_Syntax_setTailInfo(x_240, x_245); +x_247 = lean_apply_1(x_2, x_246); +x_248 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_248, 0, x_235); +lean_ctor_set(x_248, 1, x_236); +lean_ctor_set(x_248, 2, x_238); +x_249 = l_Lean_Syntax_setHeadInfo(x_247, x_248); +x_250 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_250, 0, x_238); +lean_ctor_set(x_250, 1, x_242); +lean_ctor_set(x_250, 2, x_243); +x_251 = l_Lean_Syntax_setTailInfo(x_249, x_250); +x_252 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_251, x_5, x_6, x_7, x_8, x_196); +x_253 = lean_ctor_get(x_252, 1); +lean_inc(x_253); +lean_dec(x_252); +x_165 = x_253; +goto block_190; +} +} +} +} +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; +x_254 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_6, x_7, x_8, x_45); +x_255 = lean_ctor_get(x_254, 1); +lean_inc(x_255); +lean_dec(x_254); +x_256 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_6, x_7, x_8, x_255); +x_257 = lean_ctor_get(x_256, 0); +lean_inc(x_257); +x_258 = lean_ctor_get(x_256, 1); +lean_inc(x_258); +lean_dec(x_256); +x_259 = l_Lean_Syntax_getHeadInfo___main(x_257); +if (lean_obj_tag(x_259) == 0) +{ +lean_object* x_260; lean_object* x_261; lean_object* x_262; +x_260 = lean_apply_1(x_2, x_257); +x_261 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_260, x_5, x_6, x_7, x_8, x_258); +x_262 = lean_ctor_get(x_261, 1); +lean_inc(x_262); +lean_dec(x_261); +x_165 = x_262; +goto block_190; +} +else +{ +lean_object* x_263; lean_object* x_264; +x_263 = lean_ctor_get(x_259, 0); +lean_inc(x_263); +lean_dec(x_259); +x_264 = l_Lean_Syntax_getTailInfo___main(x_257); +if (lean_obj_tag(x_264) == 0) +{ +lean_object* x_265; lean_object* x_266; lean_object* x_267; +lean_dec(x_263); +x_265 = lean_apply_1(x_2, x_257); +x_266 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_265, x_5, x_6, x_7, x_8, x_258); +x_267 = lean_ctor_get(x_266, 1); +lean_inc(x_267); +lean_dec(x_266); +x_165 = x_267; +goto block_190; +} +else +{ +lean_object* x_268; uint8_t x_269; +x_268 = lean_ctor_get(x_264, 0); +lean_inc(x_268); +lean_dec(x_264); +x_269 = !lean_is_exclusive(x_263); +if (x_269 == 0) +{ +lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; uint8_t x_274; +x_270 = lean_ctor_get(x_263, 0); +x_271 = lean_ctor_get(x_263, 1); +x_272 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; +lean_inc(x_271); +lean_ctor_set(x_263, 0, x_272); +x_273 = l_Lean_Syntax_setHeadInfo(x_257, x_263); +x_274 = !lean_is_exclusive(x_268); +if (x_274 == 0) +{ +lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; +x_275 = lean_ctor_get(x_268, 1); +x_276 = lean_ctor_get(x_268, 2); +lean_inc(x_275); +lean_ctor_set(x_268, 2, x_272); +x_277 = l_Lean_Syntax_setTailInfo(x_273, x_268); +x_278 = lean_apply_1(x_2, x_277); +x_279 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_279, 0, x_270); +lean_ctor_set(x_279, 1, x_271); +lean_ctor_set(x_279, 2, x_272); +x_280 = l_Lean_Syntax_setHeadInfo(x_278, x_279); +x_281 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_281, 0, x_272); +lean_ctor_set(x_281, 1, x_275); +lean_ctor_set(x_281, 2, x_276); +x_282 = l_Lean_Syntax_setTailInfo(x_280, x_281); +x_283 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_282, x_5, x_6, x_7, x_8, x_258); +x_284 = lean_ctor_get(x_283, 1); +lean_inc(x_284); +lean_dec(x_283); +x_165 = x_284; +goto block_190; +} +else +{ +lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; +x_285 = lean_ctor_get(x_268, 0); +x_286 = lean_ctor_get(x_268, 1); +x_287 = lean_ctor_get(x_268, 2); +lean_inc(x_287); +lean_inc(x_286); +lean_inc(x_285); +lean_dec(x_268); +lean_inc(x_286); +x_288 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_288, 0, x_285); +lean_ctor_set(x_288, 1, x_286); +lean_ctor_set(x_288, 2, x_272); +x_289 = l_Lean_Syntax_setTailInfo(x_273, x_288); +x_290 = lean_apply_1(x_2, x_289); +x_291 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_291, 0, x_270); +lean_ctor_set(x_291, 1, x_271); +lean_ctor_set(x_291, 2, x_272); +x_292 = l_Lean_Syntax_setHeadInfo(x_290, x_291); +x_293 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_293, 0, x_272); +lean_ctor_set(x_293, 1, x_286); +lean_ctor_set(x_293, 2, x_287); +x_294 = l_Lean_Syntax_setTailInfo(x_292, x_293); +x_295 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_294, x_5, x_6, x_7, x_8, x_258); +x_296 = lean_ctor_get(x_295, 1); +lean_inc(x_296); +lean_dec(x_295); +x_165 = x_296; +goto block_190; +} +} +else +{ +lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; lean_object* x_314; lean_object* x_315; +x_297 = lean_ctor_get(x_263, 0); +x_298 = lean_ctor_get(x_263, 1); +x_299 = lean_ctor_get(x_263, 2); +lean_inc(x_299); +lean_inc(x_298); +lean_inc(x_297); +lean_dec(x_263); +x_300 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; +lean_inc(x_298); +x_301 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_301, 0, x_300); +lean_ctor_set(x_301, 1, x_298); +lean_ctor_set(x_301, 2, x_299); +x_302 = l_Lean_Syntax_setHeadInfo(x_257, x_301); +x_303 = lean_ctor_get(x_268, 0); +lean_inc(x_303); +x_304 = lean_ctor_get(x_268, 1); +lean_inc(x_304); +x_305 = lean_ctor_get(x_268, 2); +lean_inc(x_305); +if (lean_is_exclusive(x_268)) { + lean_ctor_release(x_268, 0); + lean_ctor_release(x_268, 1); + lean_ctor_release(x_268, 2); + x_306 = x_268; +} else { + lean_dec_ref(x_268); + x_306 = lean_box(0); +} +lean_inc(x_304); +if (lean_is_scalar(x_306)) { + x_307 = lean_alloc_ctor(0, 3, 0); +} else { + x_307 = x_306; +} +lean_ctor_set(x_307, 0, x_303); +lean_ctor_set(x_307, 1, x_304); +lean_ctor_set(x_307, 2, x_300); +x_308 = l_Lean_Syntax_setTailInfo(x_302, x_307); +x_309 = lean_apply_1(x_2, x_308); +x_310 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_310, 0, x_297); +lean_ctor_set(x_310, 1, x_298); +lean_ctor_set(x_310, 2, x_300); +x_311 = l_Lean_Syntax_setHeadInfo(x_309, x_310); +x_312 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_312, 0, x_300); +lean_ctor_set(x_312, 1, x_304); +lean_ctor_set(x_312, 2, x_305); +x_313 = l_Lean_Syntax_setTailInfo(x_311, x_312); +x_314 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_313, x_5, x_6, x_7, x_8, x_258); +x_315 = lean_ctor_get(x_314, 1); +lean_inc(x_315); +lean_dec(x_314); +x_165 = x_315; +goto block_190; +} +} +} +} +} +} +block_351: +{ +if (x_325 == 0) +{ +x_45 = x_326; +goto block_324; +} +else +{ +lean_object* x_327; lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; +lean_inc(x_3); +x_327 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); +x_328 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_328, 0, x_327); +x_329 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__18; +x_330 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_330, 0, x_329); +lean_ctor_set(x_330, 1, x_328); +x_331 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__21; +x_332 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_332, 0, x_330); +lean_ctor_set(x_332, 1, x_331); +lean_inc(x_43); +x_333 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_43); +x_334 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_334, 0, x_333); +x_335 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_335, 0, x_332); +lean_ctor_set(x_335, 1, x_334); +x_336 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; +x_337 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_337, 0, x_335); +lean_ctor_set(x_337, 1, x_336); +lean_inc(x_1); +lean_inc(x_42); +x_338 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_338, 0, x_42); +lean_ctor_set(x_338, 1, x_1); +x_339 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_338); +x_340 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_340, 0, x_339); +x_341 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_341, 0, x_337); +lean_ctor_set(x_341, 1, x_340); +x_342 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__24; +x_343 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_343, 0, x_341); +lean_ctor_set(x_343, 1, x_342); +lean_inc(x_21); +lean_inc(x_20); +x_344 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_344, 0, x_20); +lean_ctor_set(x_344, 1, x_21); +x_345 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_344); +x_346 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_346, 0, x_345); +x_347 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_347, 0, x_343); +lean_ctor_set(x_347, 1, x_346); +x_348 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_349 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_348, x_347, x_5, x_6, x_7, x_8, x_326); +x_350 = lean_ctor_get(x_349, 1); +lean_inc(x_350); +lean_dec(x_349); +x_45 = x_350; +goto block_324; +} +} +} +} +else +{ +uint8_t x_362; +lean_dec(x_23); +lean_dec(x_22); +lean_dec(x_21); +lean_dec(x_20); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_362 = !lean_is_exclusive(x_31); +if (x_362 == 0) +{ +return x_31; +} +else +{ +lean_object* x_363; lean_object* x_364; lean_object* x_365; +x_363 = lean_ctor_get(x_31, 0); +x_364 = lean_ctor_get(x_31, 1); +lean_inc(x_364); +lean_inc(x_363); +lean_dec(x_31); +x_365 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_365, 0, x_363); +lean_ctor_set(x_365, 1, x_364); +return x_365; +} +} +} +block_413: +{ +if (x_367 == 0) +{ +lean_dec(x_11); +x_30 = x_368; +goto block_366; +} +else +{ +lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; +x_369 = l_Lean_Name_toString___closed__1; +lean_inc(x_21); +x_370 = l_Lean_Name_toStringWithSep___main(x_369, x_21); +x_371 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_371, 0, x_11); +x_372 = l_Lean_MessageData_ofList___closed__3; +x_373 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_373, 0, x_372); +lean_ctor_set(x_373, 1, x_371); +x_374 = lean_unsigned_to_nat(2u); +x_375 = lean_alloc_ctor(7, 2, 0); +lean_ctor_set(x_375, 0, x_374); +lean_ctor_set(x_375, 1, x_373); +if (lean_obj_tag(x_20) == 0) +{ +lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; +x_376 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30; +x_377 = lean_string_append(x_376, x_370); +lean_dec(x_370); +x_378 = l_Option_HasRepr___rarg___closed__3; +x_379 = lean_string_append(x_377, x_378); +x_380 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_380, 0, x_379); +x_381 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_381, 0, x_380); +x_382 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__27; +x_383 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_383, 0, x_382); +lean_ctor_set(x_383, 1, x_381); +x_384 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; +x_385 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_385, 0, x_383); +lean_ctor_set(x_385, 1, x_384); +x_386 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_386, 0, x_385); +lean_ctor_set(x_386, 1, x_375); +x_387 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_388 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_387, x_386, x_5, x_6, x_7, x_8, x_368); +x_389 = lean_ctor_get(x_388, 1); +lean_inc(x_389); +lean_dec(x_388); +x_30 = x_389; +goto block_366; +} +else +{ +lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; +x_390 = lean_ctor_get(x_20, 0); +lean_inc(x_390); +x_391 = l_Nat_repr(x_390); +x_392 = l_addParenHeuristic(x_391); +lean_dec(x_391); +x_393 = l_Option_HasRepr___rarg___closed__2; +x_394 = lean_string_append(x_393, x_392); +lean_dec(x_392); +x_395 = l_Option_HasRepr___rarg___closed__3; +x_396 = lean_string_append(x_394, x_395); +x_397 = l_Prod_HasRepr___rarg___closed__1; +x_398 = lean_string_append(x_397, x_396); +lean_dec(x_396); +x_399 = l_List_reprAux___main___rarg___closed__1; +x_400 = lean_string_append(x_398, x_399); +x_401 = lean_string_append(x_400, x_370); +lean_dec(x_370); +x_402 = lean_string_append(x_401, x_395); +x_403 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_403, 0, x_402); +x_404 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_404, 0, x_403); +x_405 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__27; +x_406 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_406, 0, x_405); +lean_ctor_set(x_406, 1, x_404); +x_407 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; +x_408 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_408, 0, x_406); +lean_ctor_set(x_408, 1, x_407); +x_409 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_409, 0, x_408); +lean_ctor_set(x_409, 1, x_375); +x_410 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_411 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_410, x_409, x_5, x_6, x_7, x_8, x_368); +x_412 = lean_ctor_get(x_411, 1); +lean_inc(x_412); +lean_dec(x_411); +x_30 = x_412; +goto block_366; +} +} +} +} +else +{ +lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; uint8_t x_429; lean_object* x_430; lean_object* x_431; uint8_t x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; uint8_t x_670; lean_object* x_671; lean_object* x_717; lean_object* x_718; uint8_t x_719; +x_424 = lean_ctor_get(x_17, 0); +x_425 = lean_ctor_get(x_17, 1); +x_426 = lean_ctor_get(x_17, 2); +x_427 = lean_ctor_get(x_17, 3); +x_428 = lean_ctor_get(x_17, 4); +x_429 = lean_ctor_get_uint8(x_17, sizeof(void*)*5); +lean_inc(x_428); +lean_inc(x_427); +lean_inc(x_426); +lean_inc(x_425); +lean_inc(x_424); +lean_dec(x_17); +x_430 = lean_box(0); +x_431 = lean_box(0); +x_432 = 0; +x_433 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_433, 0, x_424); +lean_ctor_set(x_433, 1, x_430); +lean_ctor_set(x_433, 2, x_431); +lean_ctor_set(x_433, 3, x_430); +lean_ctor_set(x_433, 4, x_430); +lean_ctor_set_uint8(x_433, sizeof(void*)*5, x_432); +x_434 = lean_io_ref_set(x_6, x_433, x_18); +x_435 = lean_ctor_get(x_434, 1); +lean_inc(x_435); +lean_dec(x_434); +x_717 = l_Lean_Core_getTraceState___rarg(x_8, x_435); +x_718 = lean_ctor_get(x_717, 0); +lean_inc(x_718); +x_719 = lean_ctor_get_uint8(x_718, sizeof(void*)*1); +lean_dec(x_718); +if (x_719 == 0) +{ +lean_object* x_720; +x_720 = lean_ctor_get(x_717, 1); +lean_inc(x_720); +lean_dec(x_717); +x_670 = x_432; +x_671 = x_720; +goto block_716; +} +else +{ +lean_object* x_721; lean_object* x_722; lean_object* x_723; lean_object* x_724; lean_object* x_725; uint8_t x_726; +x_721 = lean_ctor_get(x_717, 1); +lean_inc(x_721); +lean_dec(x_717); +x_722 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_723 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_722, x_7, x_8, x_721); +x_724 = lean_ctor_get(x_723, 0); +lean_inc(x_724); +x_725 = lean_ctor_get(x_723, 1); +lean_inc(x_725); +lean_dec(x_723); +x_726 = lean_unbox(x_724); +lean_dec(x_724); +x_670 = x_726; +x_671 = x_725; +goto block_716; +} +block_669: +{ +lean_object* x_437; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_437 = lean_apply_5(x_4, x_5, x_6, x_7, x_8, x_436); +if (lean_obj_tag(x_437) == 0) +{ +lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; +x_438 = lean_ctor_get(x_437, 1); lean_inc(x_438); -x_439 = lean_ctor_get(x_436, 1); -lean_inc(x_439); -if (lean_is_exclusive(x_436)) { - lean_ctor_release(x_436, 0); - lean_ctor_release(x_436, 1); - x_440 = x_436; -} else { - lean_dec_ref(x_436); - x_440 = lean_box(0); -} -x_462 = l_Lean_Core_getTraceState___rarg(x_8, x_437); -x_463 = lean_ctor_get(x_462, 0); -lean_inc(x_463); -x_464 = lean_ctor_get_uint8(x_463, sizeof(void*)*1); -lean_dec(x_463); -if (x_464 == 0) +lean_dec(x_437); +x_439 = lean_io_ref_get(x_6, x_438); +x_440 = lean_ctor_get(x_439, 0); +lean_inc(x_440); +x_441 = lean_ctor_get(x_440, 3); +lean_inc(x_441); +if (lean_obj_tag(x_441) == 0) { -lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; -x_465 = lean_ctor_get(x_462, 1); -lean_inc(x_465); -lean_dec(x_462); -x_466 = lean_box(x_226); -if (lean_is_scalar(x_440)) { - x_467 = lean_alloc_ctor(0, 2, 0); -} else { - x_467 = x_440; -} -lean_ctor_set(x_467, 0, x_466); -lean_ctor_set(x_467, 1, x_439); -x_468 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_468, 0, x_467); -x_441 = x_468; -x_442 = x_465; -goto block_461; +lean_object* x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; lean_object* x_446; +lean_dec(x_440); +lean_dec(x_428); +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_425); +lean_dec(x_14); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_442 = lean_ctor_get(x_439, 1); +lean_inc(x_442); +lean_dec(x_439); +x_443 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__7; +x_444 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__10; +x_445 = lean_panic_fn(x_443, x_444); +x_446 = lean_apply_5(x_445, x_5, x_6, x_7, x_8, x_442); +return x_446; } else { -lean_object* x_469; lean_object* x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; -x_469 = lean_ctor_get(x_462, 1); -lean_inc(x_469); -lean_dec(x_462); -x_470 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_471 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_470, x_7, x_8, x_469); -x_472 = lean_ctor_get(x_471, 0); -lean_inc(x_472); -x_473 = lean_ctor_get(x_471, 1); -lean_inc(x_473); -lean_dec(x_471); -if (lean_is_scalar(x_440)) { - x_474 = lean_alloc_ctor(0, 2, 0); -} else { - x_474 = x_440; -} -lean_ctor_set(x_474, 0, x_472); -lean_ctor_set(x_474, 1, x_439); -x_475 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_475, 0, x_474); -x_441 = x_475; -x_442 = x_473; -goto block_461; -} -block_461: -{ -lean_object* x_443; lean_object* x_444; lean_object* x_445; uint8_t x_446; -x_443 = lean_ctor_get(x_441, 0); -lean_inc(x_443); +lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; uint8_t x_628; lean_object* x_629; lean_object* x_655; lean_object* x_656; uint8_t x_657; +x_447 = lean_ctor_get(x_439, 1); +lean_inc(x_447); +lean_dec(x_439); +x_448 = lean_ctor_get(x_440, 4); +lean_inc(x_448); +lean_dec(x_440); +x_449 = lean_ctor_get(x_441, 0); +lean_inc(x_449); if (lean_is_exclusive(x_441)) { lean_ctor_release(x_441, 0); - x_444 = x_441; + x_450 = x_441; } else { lean_dec_ref(x_441); - x_444 = lean_box(0); + x_450 = lean_box(0); } -x_445 = lean_ctor_get(x_443, 0); -lean_inc(x_445); -x_446 = lean_unbox(x_445); -lean_dec(x_445); -if (x_446 == 0) +x_655 = l_Lean_Core_getTraceState___rarg(x_8, x_447); +x_656 = lean_ctor_get(x_655, 0); +lean_inc(x_656); +x_657 = lean_ctor_get_uint8(x_656, sizeof(void*)*1); +lean_dec(x_656); +if (x_657 == 0) { -lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; -lean_dec(x_438); -lean_dec(x_5); -x_447 = lean_ctor_get(x_443, 1); -lean_inc(x_447); -if (lean_is_exclusive(x_443)) { - lean_ctor_release(x_443, 0); - lean_ctor_release(x_443, 1); - x_448 = x_443; -} else { - lean_dec_ref(x_443); - x_448 = lean_box(0); -} -x_449 = lean_box(0); -if (lean_is_scalar(x_448)) { - x_450 = lean_alloc_ctor(0, 2, 0); -} else { - x_450 = x_448; -} -lean_ctor_set(x_450, 0, x_449); -lean_ctor_set(x_450, 1, x_447); -if (lean_is_scalar(x_444)) { - x_451 = lean_alloc_ctor(1, 1, 0); -} else { - x_451 = x_444; -} -lean_ctor_set(x_451, 0, x_450); -x_267 = x_451; -x_268 = x_442; -goto block_328; +lean_object* x_658; +x_658 = lean_ctor_get(x_655, 1); +lean_inc(x_658); +lean_dec(x_655); +x_628 = x_432; +x_629 = x_658; +goto block_654; } else { -lean_object* x_452; lean_object* x_453; lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; lean_object* x_460; -lean_dec(x_444); -x_452 = lean_ctor_get(x_443, 1); -lean_inc(x_452); -lean_dec(x_443); -x_453 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_438); -x_454 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_454, 0, x_453); -x_455 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_456 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_456, 0, x_455); -lean_ctor_set(x_456, 1, x_454); -x_457 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_458 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_457, x_456, x_5, x_452, x_7, x_8, x_442); +lean_object* x_659; lean_object* x_660; lean_object* x_661; lean_object* x_662; lean_object* x_663; uint8_t x_664; +x_659 = lean_ctor_get(x_655, 1); +lean_inc(x_659); +lean_dec(x_655); +x_660 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_661 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_660, x_7, x_8, x_659); +x_662 = lean_ctor_get(x_661, 0); +lean_inc(x_662); +x_663 = lean_ctor_get(x_661, 1); +lean_inc(x_663); +lean_dec(x_661); +x_664 = lean_unbox(x_662); +lean_dec(x_662); +x_628 = x_664; +x_629 = x_663; +goto block_654; +} +block_627: +{ +lean_object* x_452; lean_object* x_507; lean_object* x_522; lean_object* x_548; uint8_t x_620; +x_620 = lean_nat_dec_lt(x_449, x_3); +lean_dec(x_449); +if (x_620 == 0) +{ +if (lean_obj_tag(x_448) == 0) +{ +lean_dec(x_426); +lean_dec(x_425); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_452 = x_451; +goto block_506; +} +else +{ +if (lean_obj_tag(x_425) == 0) +{ +lean_dec(x_448); +lean_dec(x_426); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_452 = x_451; +goto block_506; +} +else +{ +lean_object* x_621; lean_object* x_622; uint8_t x_623; +x_621 = lean_ctor_get(x_448, 0); +lean_inc(x_621); +lean_dec(x_448); +x_622 = lean_ctor_get(x_425, 0); +lean_inc(x_622); +lean_dec(x_425); +x_623 = lean_name_eq(x_1, x_426); +lean_dec(x_426); +if (x_623 == 0) +{ +lean_dec(x_622); +lean_dec(x_621); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_452 = x_451; +goto block_506; +} +else +{ +uint8_t x_624; +x_624 = lean_nat_dec_le(x_621, x_622); +lean_dec(x_622); +lean_dec(x_621); +if (x_624 == 0) +{ +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_452 = x_451; +goto block_506; +} +else +{ +lean_object* x_625; +x_625 = lean_box(0); +x_548 = x_625; +goto block_619; +} +} +} +} +} +else +{ +lean_object* x_626; +lean_dec(x_448); +lean_dec(x_426); +lean_dec(x_425); +x_626 = lean_box(0); +x_548 = x_626; +goto block_619; +} +block_506: +{ +lean_object* x_453; lean_object* x_454; +x_453 = lean_io_ref_get(x_6, x_452); +x_454 = lean_ctor_get(x_453, 0); +lean_inc(x_454); +if (x_429 == 0) +{ +lean_object* x_455; +lean_dec(x_428); +x_455 = lean_ctor_get(x_454, 4); +lean_inc(x_455); +lean_dec(x_454); +if (lean_obj_tag(x_455) == 0) +{ +lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; uint8_t x_464; lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; +x_456 = lean_ctor_get(x_453, 1); +lean_inc(x_456); +lean_dec(x_453); +if (lean_is_scalar(x_450)) { + x_457 = lean_alloc_ctor(1, 1, 0); +} else { + x_457 = x_450; +} +lean_ctor_set(x_457, 0, x_3); +x_458 = lean_io_ref_take(x_6, x_456); x_459 = lean_ctor_get(x_458, 0); lean_inc(x_459); x_460 = lean_ctor_get(x_458, 1); lean_inc(x_460); lean_dec(x_458); -x_267 = x_459; -x_268 = x_460; -goto block_328; -} -} -} -} -else -{ -lean_object* x_476; lean_object* x_477; -x_476 = lean_ctor_get(x_338, 0); -lean_inc(x_476); -lean_dec(x_338); -x_477 = l_Lean_Syntax_getTailInfo___main(x_336); -if (lean_obj_tag(x_477) == 0) -{ -lean_object* x_478; lean_object* x_479; lean_object* x_480; lean_object* x_481; lean_object* x_482; lean_object* x_483; lean_object* x_484; lean_object* x_485; uint8_t x_486; -lean_dec(x_476); -x_478 = lean_apply_1(x_2, x_336); -x_479 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_478, x_5, x_337, x_7, x_8, x_335); -x_480 = lean_ctor_get(x_479, 0); -lean_inc(x_480); -x_481 = lean_ctor_get(x_480, 0); -lean_inc(x_481); -lean_dec(x_480); -x_482 = lean_ctor_get(x_479, 1); -lean_inc(x_482); -lean_dec(x_479); -x_483 = lean_ctor_get(x_481, 1); -lean_inc(x_483); -lean_dec(x_481); -x_484 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_483, x_7, x_8, x_482); -x_485 = lean_ctor_get(x_484, 0); -lean_inc(x_485); -x_486 = !lean_is_exclusive(x_485); -if (x_486 == 0) -{ -lean_object* x_487; lean_object* x_488; uint8_t x_489; -x_487 = lean_ctor_get(x_485, 0); -x_488 = lean_ctor_get(x_484, 1); -lean_inc(x_488); -lean_dec(x_484); -x_489 = !lean_is_exclusive(x_487); -if (x_489 == 0) -{ -lean_object* x_490; lean_object* x_491; lean_object* x_492; lean_object* x_530; lean_object* x_531; uint8_t x_532; -x_490 = lean_ctor_get(x_487, 0); -x_530 = l_Lean_Core_getTraceState___rarg(x_8, x_488); -x_531 = lean_ctor_get(x_530, 0); -lean_inc(x_531); -x_532 = lean_ctor_get_uint8(x_531, sizeof(void*)*1); -lean_dec(x_531); -if (x_532 == 0) -{ -lean_object* x_533; lean_object* x_534; -x_533 = lean_ctor_get(x_530, 1); -lean_inc(x_533); -lean_dec(x_530); -x_534 = lean_box(x_226); -lean_ctor_set(x_487, 0, x_534); -x_491 = x_485; -x_492 = x_533; -goto block_529; -} -else -{ -lean_object* x_535; lean_object* x_536; lean_object* x_537; lean_object* x_538; lean_object* x_539; -x_535 = lean_ctor_get(x_530, 1); -lean_inc(x_535); -lean_dec(x_530); -x_536 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_537 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_536, x_7, x_8, x_535); -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); -lean_ctor_set(x_487, 0, x_538); -x_491 = x_485; -x_492 = x_539; -goto block_529; -} -block_529: -{ -uint8_t x_493; -x_493 = !lean_is_exclusive(x_491); -if (x_493 == 0) -{ -lean_object* x_494; lean_object* x_495; uint8_t x_496; -x_494 = lean_ctor_get(x_491, 0); -x_495 = lean_ctor_get(x_494, 0); -lean_inc(x_495); -x_496 = lean_unbox(x_495); -lean_dec(x_495); -if (x_496 == 0) -{ -uint8_t x_497; -lean_dec(x_490); -lean_dec(x_5); -x_497 = !lean_is_exclusive(x_494); -if (x_497 == 0) -{ -lean_object* x_498; lean_object* x_499; -x_498 = lean_ctor_get(x_494, 0); -lean_dec(x_498); -x_499 = lean_box(0); -lean_ctor_set(x_494, 0, x_499); -x_267 = x_491; -x_268 = x_492; -goto block_328; -} -else -{ -lean_object* x_500; lean_object* x_501; lean_object* x_502; -x_500 = lean_ctor_get(x_494, 1); -lean_inc(x_500); -lean_dec(x_494); -x_501 = lean_box(0); -x_502 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_502, 0, x_501); -lean_ctor_set(x_502, 1, x_500); -lean_ctor_set(x_491, 0, x_502); -x_267 = x_491; -x_268 = x_492; -goto block_328; -} -} -else -{ -lean_object* x_503; lean_object* x_504; lean_object* x_505; lean_object* x_506; lean_object* x_507; lean_object* x_508; lean_object* x_509; lean_object* x_510; lean_object* x_511; -lean_free_object(x_491); -x_503 = lean_ctor_get(x_494, 1); -lean_inc(x_503); -lean_dec(x_494); -x_504 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_490); -x_505 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_505, 0, x_504); -x_506 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_507 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_507, 0, x_506); -lean_ctor_set(x_507, 1, x_505); -x_508 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_509 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_508, x_507, x_5, x_503, x_7, x_8, x_492); -lean_dec(x_5); -x_510 = lean_ctor_get(x_509, 0); -lean_inc(x_510); -x_511 = lean_ctor_get(x_509, 1); -lean_inc(x_511); -lean_dec(x_509); -x_267 = x_510; -x_268 = x_511; -goto block_328; -} -} -else -{ -lean_object* x_512; lean_object* x_513; uint8_t x_514; -x_512 = lean_ctor_get(x_491, 0); -lean_inc(x_512); -lean_dec(x_491); -x_513 = lean_ctor_get(x_512, 0); -lean_inc(x_513); -x_514 = lean_unbox(x_513); -lean_dec(x_513); -if (x_514 == 0) -{ -lean_object* x_515; lean_object* x_516; lean_object* x_517; lean_object* x_518; lean_object* x_519; -lean_dec(x_490); -lean_dec(x_5); -x_515 = lean_ctor_get(x_512, 1); -lean_inc(x_515); -if (lean_is_exclusive(x_512)) { - lean_ctor_release(x_512, 0); - lean_ctor_release(x_512, 1); - x_516 = x_512; +x_461 = lean_ctor_get(x_459, 0); +lean_inc(x_461); +x_462 = lean_ctor_get(x_459, 1); +lean_inc(x_462); +x_463 = lean_ctor_get(x_459, 2); +lean_inc(x_463); +x_464 = lean_ctor_get_uint8(x_459, sizeof(void*)*5); +if (lean_is_exclusive(x_459)) { + lean_ctor_release(x_459, 0); + lean_ctor_release(x_459, 1); + lean_ctor_release(x_459, 2); + lean_ctor_release(x_459, 3); + lean_ctor_release(x_459, 4); + x_465 = x_459; } else { - lean_dec_ref(x_512); + lean_dec_ref(x_459); + x_465 = lean_box(0); +} +if (lean_is_scalar(x_465)) { + x_466 = lean_alloc_ctor(0, 5, 1); +} else { + x_466 = x_465; +} +lean_ctor_set(x_466, 0, x_461); +lean_ctor_set(x_466, 1, x_462); +lean_ctor_set(x_466, 2, x_463); +lean_ctor_set(x_466, 3, x_427); +lean_ctor_set(x_466, 4, x_457); +lean_ctor_set_uint8(x_466, sizeof(void*)*5, x_464); +x_467 = lean_io_ref_set(x_6, x_466, x_460); +lean_dec(x_6); +x_468 = lean_ctor_get(x_467, 1); +lean_inc(x_468); +if (lean_is_exclusive(x_467)) { + lean_ctor_release(x_467, 0); + lean_ctor_release(x_467, 1); + x_469 = x_467; +} else { + lean_dec_ref(x_467); + x_469 = lean_box(0); +} +x_470 = lean_box(0); +if (lean_is_scalar(x_469)) { + x_471 = lean_alloc_ctor(0, 2, 0); +} else { + x_471 = x_469; +} +lean_ctor_set(x_471, 0, x_470); +lean_ctor_set(x_471, 1, x_468); +return x_471; +} +else +{ +lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; lean_object* x_476; lean_object* x_477; lean_object* x_478; lean_object* x_479; lean_object* x_480; lean_object* x_481; lean_object* x_482; uint8_t 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_dec(x_450); +x_472 = lean_ctor_get(x_453, 1); +lean_inc(x_472); +lean_dec(x_453); +x_473 = lean_ctor_get(x_455, 0); +lean_inc(x_473); +if (lean_is_exclusive(x_455)) { + lean_ctor_release(x_455, 0); + x_474 = x_455; +} else { + lean_dec_ref(x_455); + x_474 = lean_box(0); +} +x_475 = l_Nat_min(x_473, x_3); +lean_dec(x_3); +lean_dec(x_473); +if (lean_is_scalar(x_474)) { + x_476 = lean_alloc_ctor(1, 1, 0); +} else { + x_476 = x_474; +} +lean_ctor_set(x_476, 0, x_475); +x_477 = lean_io_ref_take(x_6, x_472); +x_478 = lean_ctor_get(x_477, 0); +lean_inc(x_478); +x_479 = lean_ctor_get(x_477, 1); +lean_inc(x_479); +lean_dec(x_477); +x_480 = lean_ctor_get(x_478, 0); +lean_inc(x_480); +x_481 = lean_ctor_get(x_478, 1); +lean_inc(x_481); +x_482 = lean_ctor_get(x_478, 2); +lean_inc(x_482); +x_483 = lean_ctor_get_uint8(x_478, sizeof(void*)*5); +if (lean_is_exclusive(x_478)) { + lean_ctor_release(x_478, 0); + lean_ctor_release(x_478, 1); + lean_ctor_release(x_478, 2); + lean_ctor_release(x_478, 3); + lean_ctor_release(x_478, 4); + x_484 = x_478; +} else { + lean_dec_ref(x_478); + x_484 = lean_box(0); +} +if (lean_is_scalar(x_484)) { + x_485 = lean_alloc_ctor(0, 5, 1); +} else { + x_485 = x_484; +} +lean_ctor_set(x_485, 0, x_480); +lean_ctor_set(x_485, 1, x_481); +lean_ctor_set(x_485, 2, x_482); +lean_ctor_set(x_485, 3, x_427); +lean_ctor_set(x_485, 4, x_476); +lean_ctor_set_uint8(x_485, sizeof(void*)*5, x_483); +x_486 = lean_io_ref_set(x_6, x_485, x_479); +lean_dec(x_6); +x_487 = lean_ctor_get(x_486, 1); +lean_inc(x_487); +if (lean_is_exclusive(x_486)) { + lean_ctor_release(x_486, 0); + lean_ctor_release(x_486, 1); + x_488 = x_486; +} else { + lean_dec_ref(x_486); + x_488 = lean_box(0); +} +x_489 = lean_box(0); +if (lean_is_scalar(x_488)) { + x_490 = lean_alloc_ctor(0, 2, 0); +} else { + x_490 = x_488; +} +lean_ctor_set(x_490, 0, x_489); +lean_ctor_set(x_490, 1, x_487); +return x_490; +} +} +else +{ +lean_object* x_491; lean_object* x_492; lean_object* x_493; lean_object* x_494; lean_object* x_495; lean_object* x_496; lean_object* x_497; uint8_t x_498; lean_object* x_499; lean_object* x_500; lean_object* x_501; lean_object* x_502; lean_object* x_503; lean_object* x_504; lean_object* x_505; +lean_dec(x_454); +lean_dec(x_450); +lean_dec(x_3); +x_491 = lean_ctor_get(x_453, 1); +lean_inc(x_491); +lean_dec(x_453); +x_492 = lean_io_ref_take(x_6, x_491); +x_493 = lean_ctor_get(x_492, 0); +lean_inc(x_493); +x_494 = lean_ctor_get(x_492, 1); +lean_inc(x_494); +lean_dec(x_492); +x_495 = lean_ctor_get(x_493, 0); +lean_inc(x_495); +x_496 = lean_ctor_get(x_493, 1); +lean_inc(x_496); +x_497 = lean_ctor_get(x_493, 2); +lean_inc(x_497); +x_498 = lean_ctor_get_uint8(x_493, sizeof(void*)*5); +if (lean_is_exclusive(x_493)) { + lean_ctor_release(x_493, 0); + lean_ctor_release(x_493, 1); + lean_ctor_release(x_493, 2); + lean_ctor_release(x_493, 3); + lean_ctor_release(x_493, 4); + x_499 = x_493; +} else { + lean_dec_ref(x_493); + x_499 = lean_box(0); +} +if (lean_is_scalar(x_499)) { + x_500 = lean_alloc_ctor(0, 5, 1); +} else { + x_500 = x_499; +} +lean_ctor_set(x_500, 0, x_495); +lean_ctor_set(x_500, 1, x_496); +lean_ctor_set(x_500, 2, x_497); +lean_ctor_set(x_500, 3, x_427); +lean_ctor_set(x_500, 4, x_428); +lean_ctor_set_uint8(x_500, sizeof(void*)*5, x_498); +x_501 = lean_io_ref_set(x_6, x_500, x_494); +lean_dec(x_6); +x_502 = lean_ctor_get(x_501, 1); +lean_inc(x_502); +if (lean_is_exclusive(x_501)) { + lean_ctor_release(x_501, 0); + lean_ctor_release(x_501, 1); + x_503 = x_501; +} else { + lean_dec_ref(x_501); + x_503 = lean_box(0); +} +x_504 = lean_box(0); +if (lean_is_scalar(x_503)) { + x_505 = lean_alloc_ctor(0, 2, 0); +} else { + x_505 = x_503; +} +lean_ctor_set(x_505, 0, x_504); +lean_ctor_set(x_505, 1, x_502); +return x_505; +} +} +block_521: +{ +lean_object* x_508; lean_object* x_509; lean_object* x_510; lean_object* x_511; lean_object* x_512; lean_object* x_513; lean_object* x_514; uint8_t x_515; lean_object* x_516; lean_object* x_517; lean_object* x_518; lean_object* x_519; lean_object* x_520; +x_508 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_6, x_7, x_8, x_507); +lean_dec(x_8); +lean_dec(x_7); +x_509 = lean_ctor_get(x_508, 1); +lean_inc(x_509); +lean_dec(x_508); +x_510 = lean_io_ref_take(x_6, x_509); +x_511 = lean_ctor_get(x_510, 0); +lean_inc(x_511); +x_512 = lean_ctor_get(x_510, 1); +lean_inc(x_512); +lean_dec(x_510); +x_513 = lean_ctor_get(x_511, 0); +lean_inc(x_513); +x_514 = lean_ctor_get(x_511, 3); +lean_inc(x_514); +x_515 = lean_ctor_get_uint8(x_511, sizeof(void*)*5); +if (lean_is_exclusive(x_511)) { + lean_ctor_release(x_511, 0); + lean_ctor_release(x_511, 1); + lean_ctor_release(x_511, 2); + lean_ctor_release(x_511, 3); + lean_ctor_release(x_511, 4); + x_516 = x_511; +} else { + lean_dec_ref(x_511); x_516 = lean_box(0); } -x_517 = lean_box(0); +x_517 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; if (lean_is_scalar(x_516)) { - x_518 = lean_alloc_ctor(0, 2, 0); + x_518 = lean_alloc_ctor(0, 5, 1); } else { x_518 = x_516; } -lean_ctor_set(x_518, 0, x_517); -lean_ctor_set(x_518, 1, x_515); -x_519 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_519, 0, x_518); -x_267 = x_519; -x_268 = x_492; -goto block_328; -} -else -{ -lean_object* x_520; lean_object* x_521; lean_object* x_522; lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; lean_object* x_527; lean_object* x_528; -x_520 = lean_ctor_get(x_512, 1); +lean_ctor_set(x_518, 0, x_513); +lean_ctor_set(x_518, 1, x_517); +lean_ctor_set(x_518, 2, x_1); +lean_ctor_set(x_518, 3, x_514); +lean_ctor_set(x_518, 4, x_430); +lean_ctor_set_uint8(x_518, sizeof(void*)*5, x_515); +x_519 = lean_io_ref_set(x_6, x_518, x_512); +x_520 = lean_ctor_get(x_519, 1); lean_inc(x_520); -lean_dec(x_512); -x_521 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_490); -x_522 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_522, 0, x_521); -x_523 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_524 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_524, 0, x_523); -lean_ctor_set(x_524, 1, x_522); -x_525 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_526 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_525, x_524, x_5, x_520, x_7, x_8, x_492); -lean_dec(x_5); -x_527 = lean_ctor_get(x_526, 0); -lean_inc(x_527); -x_528 = lean_ctor_get(x_526, 1); -lean_inc(x_528); -lean_dec(x_526); -x_267 = x_527; -x_268 = x_528; -goto block_328; +lean_dec(x_519); +x_452 = x_520; +goto block_506; } -} -} -} -else +block_547: { -lean_object* x_540; lean_object* x_541; lean_object* x_542; lean_object* x_543; lean_object* x_563; lean_object* x_564; uint8_t x_565; -x_540 = lean_ctor_get(x_487, 0); -x_541 = lean_ctor_get(x_487, 1); -lean_inc(x_541); +lean_object* x_523; lean_object* x_524; lean_object* x_525; uint8_t x_526; lean_object* x_527; lean_object* x_537; lean_object* x_538; uint8_t x_539; +x_523 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_6, x_7, x_8, x_522); +x_524 = lean_ctor_get(x_523, 0); +lean_inc(x_524); +x_525 = lean_ctor_get(x_523, 1); +lean_inc(x_525); +lean_dec(x_523); +x_537 = l_Lean_Core_getTraceState___rarg(x_8, x_525); +x_538 = lean_ctor_get(x_537, 0); +lean_inc(x_538); +x_539 = lean_ctor_get_uint8(x_538, sizeof(void*)*1); +lean_dec(x_538); +if (x_539 == 0) +{ +lean_object* x_540; +x_540 = lean_ctor_get(x_537, 1); lean_inc(x_540); -lean_dec(x_487); -x_563 = l_Lean_Core_getTraceState___rarg(x_8, x_488); -x_564 = lean_ctor_get(x_563, 0); -lean_inc(x_564); -x_565 = lean_ctor_get_uint8(x_564, sizeof(void*)*1); -lean_dec(x_564); -if (x_565 == 0) -{ -lean_object* x_566; lean_object* x_567; lean_object* x_568; -x_566 = lean_ctor_get(x_563, 1); -lean_inc(x_566); -lean_dec(x_563); -x_567 = lean_box(x_226); -x_568 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_568, 0, x_567); -lean_ctor_set(x_568, 1, x_541); -lean_ctor_set(x_485, 0, x_568); -x_542 = x_485; -x_543 = x_566; -goto block_562; +lean_dec(x_537); +x_526 = x_432; +x_527 = x_540; +goto block_536; } else { -lean_object* x_569; lean_object* x_570; lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; -x_569 = lean_ctor_get(x_563, 1); -lean_inc(x_569); -lean_dec(x_563); -x_570 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_571 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_570, x_7, x_8, x_569); -x_572 = lean_ctor_get(x_571, 0); -lean_inc(x_572); -x_573 = lean_ctor_get(x_571, 1); -lean_inc(x_573); -lean_dec(x_571); -x_574 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_574, 0, x_572); -lean_ctor_set(x_574, 1, x_541); -lean_ctor_set(x_485, 0, x_574); -x_542 = x_485; -x_543 = x_573; -goto block_562; -} -block_562: -{ -lean_object* x_544; lean_object* x_545; lean_object* x_546; uint8_t x_547; -x_544 = lean_ctor_get(x_542, 0); +lean_object* x_541; lean_object* x_542; lean_object* x_543; lean_object* x_544; lean_object* x_545; uint8_t x_546; +x_541 = lean_ctor_get(x_537, 1); +lean_inc(x_541); +lean_dec(x_537); +x_542 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_543 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_542, x_7, x_8, x_541); +x_544 = lean_ctor_get(x_543, 0); lean_inc(x_544); -if (lean_is_exclusive(x_542)) { - lean_ctor_release(x_542, 0); - x_545 = x_542; -} else { - lean_dec_ref(x_542); - x_545 = lean_box(0); -} -x_546 = lean_ctor_get(x_544, 0); -lean_inc(x_546); -x_547 = lean_unbox(x_546); -lean_dec(x_546); -if (x_547 == 0) -{ -lean_object* x_548; lean_object* x_549; lean_object* x_550; lean_object* x_551; lean_object* x_552; -lean_dec(x_540); -lean_dec(x_5); -x_548 = lean_ctor_get(x_544, 1); -lean_inc(x_548); -if (lean_is_exclusive(x_544)) { - lean_ctor_release(x_544, 0); - lean_ctor_release(x_544, 1); - x_549 = x_544; -} else { - lean_dec_ref(x_544); - x_549 = lean_box(0); -} -x_550 = lean_box(0); -if (lean_is_scalar(x_549)) { - x_551 = lean_alloc_ctor(0, 2, 0); -} else { - x_551 = x_549; -} -lean_ctor_set(x_551, 0, x_550); -lean_ctor_set(x_551, 1, x_548); -if (lean_is_scalar(x_545)) { - x_552 = lean_alloc_ctor(1, 1, 0); -} else { - x_552 = x_545; -} -lean_ctor_set(x_552, 0, x_551); -x_267 = x_552; -x_268 = x_543; -goto block_328; -} -else -{ -lean_object* x_553; lean_object* x_554; lean_object* x_555; lean_object* x_556; lean_object* x_557; lean_object* x_558; lean_object* x_559; lean_object* x_560; lean_object* x_561; -lean_dec(x_545); -x_553 = lean_ctor_get(x_544, 1); -lean_inc(x_553); +x_545 = lean_ctor_get(x_543, 1); +lean_inc(x_545); +lean_dec(x_543); +x_546 = lean_unbox(x_544); lean_dec(x_544); -x_554 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_540); -x_555 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_555, 0, x_554); -x_556 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_557 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_557, 0, x_556); -lean_ctor_set(x_557, 1, x_555); -x_558 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_559 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_558, x_557, x_5, x_553, x_7, x_8, x_543); +x_526 = x_546; +x_527 = x_545; +goto block_536; +} +block_536: +{ +if (x_526 == 0) +{ +lean_dec(x_524); lean_dec(x_5); -x_560 = lean_ctor_get(x_559, 0); -lean_inc(x_560); -x_561 = lean_ctor_get(x_559, 1); -lean_inc(x_561); +x_507 = x_527; +goto block_521; +} +else +{ +lean_object* x_528; lean_object* x_529; lean_object* x_530; lean_object* x_531; lean_object* x_532; lean_object* x_533; lean_object* x_534; lean_object* x_535; +x_528 = lean_unsigned_to_nat(0u); +x_529 = l_Lean_Syntax_formatStxAux___main(x_430, x_432, x_528, x_524); +x_530 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_530, 0, x_529); +x_531 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__14; +x_532 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_532, 0, x_531); +lean_ctor_set(x_532, 1, x_530); +x_533 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_534 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_533, x_532, x_5, x_6, x_7, x_8, x_527); +lean_dec(x_5); +x_535 = lean_ctor_get(x_534, 1); +lean_inc(x_535); +lean_dec(x_534); +x_507 = x_535; +goto block_521; +} +} +} +block_619: +{ +lean_object* x_549; uint8_t x_550; +lean_dec(x_548); +x_549 = lean_unsigned_to_nat(0u); +x_550 = lean_nat_dec_lt(x_549, x_14); +lean_dec(x_14); +if (x_550 == 0) +{ +lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; +x_551 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_6, x_7, x_8, x_451); +x_552 = lean_ctor_get(x_551, 0); +lean_inc(x_552); +x_553 = lean_ctor_get(x_551, 1); +lean_inc(x_553); +lean_dec(x_551); +x_554 = l_Lean_Syntax_getHeadInfo___main(x_552); +if (lean_obj_tag(x_554) == 0) +{ +lean_object* x_555; lean_object* x_556; lean_object* x_557; +x_555 = lean_apply_1(x_2, x_552); +x_556 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_555, x_5, x_6, x_7, x_8, x_553); +x_557 = lean_ctor_get(x_556, 1); +lean_inc(x_557); +lean_dec(x_556); +x_522 = x_557; +goto block_547; +} +else +{ +lean_object* x_558; lean_object* x_559; +x_558 = lean_ctor_get(x_554, 0); +lean_inc(x_558); +lean_dec(x_554); +x_559 = l_Lean_Syntax_getTailInfo___main(x_552); +if (lean_obj_tag(x_559) == 0) +{ +lean_object* x_560; lean_object* x_561; lean_object* x_562; +lean_dec(x_558); +x_560 = lean_apply_1(x_2, x_552); +x_561 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_560, x_5, x_6, x_7, x_8, x_553); +x_562 = lean_ctor_get(x_561, 1); +lean_inc(x_562); +lean_dec(x_561); +x_522 = x_562; +goto block_547; +} +else +{ +lean_object* x_563; lean_object* x_564; lean_object* x_565; lean_object* x_566; lean_object* x_567; lean_object* x_568; lean_object* x_569; lean_object* x_570; lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; lean_object* x_575; lean_object* x_576; lean_object* x_577; lean_object* x_578; lean_object* x_579; lean_object* x_580; lean_object* x_581; lean_object* x_582; lean_object* x_583; +x_563 = lean_ctor_get(x_559, 0); +lean_inc(x_563); lean_dec(x_559); -x_267 = x_560; -x_268 = x_561; -goto block_328; -} -} -} -} -else -{ -lean_object* x_575; lean_object* x_576; lean_object* x_577; lean_object* x_578; lean_object* x_579; lean_object* x_580; lean_object* x_581; lean_object* x_601; lean_object* x_602; uint8_t x_603; -x_575 = lean_ctor_get(x_485, 0); -lean_inc(x_575); -lean_dec(x_485); -x_576 = lean_ctor_get(x_484, 1); -lean_inc(x_576); -lean_dec(x_484); -x_577 = lean_ctor_get(x_575, 0); -lean_inc(x_577); -x_578 = lean_ctor_get(x_575, 1); -lean_inc(x_578); -if (lean_is_exclusive(x_575)) { - lean_ctor_release(x_575, 0); - lean_ctor_release(x_575, 1); - x_579 = x_575; +x_564 = lean_ctor_get(x_558, 0); +lean_inc(x_564); +x_565 = lean_ctor_get(x_558, 1); +lean_inc(x_565); +x_566 = lean_ctor_get(x_558, 2); +lean_inc(x_566); +if (lean_is_exclusive(x_558)) { + lean_ctor_release(x_558, 0); + lean_ctor_release(x_558, 1); + lean_ctor_release(x_558, 2); + x_567 = x_558; } else { - lean_dec_ref(x_575); - x_579 = lean_box(0); + lean_dec_ref(x_558); + x_567 = lean_box(0); } -x_601 = l_Lean_Core_getTraceState___rarg(x_8, x_576); -x_602 = lean_ctor_get(x_601, 0); -lean_inc(x_602); -x_603 = lean_ctor_get_uint8(x_602, sizeof(void*)*1); -lean_dec(x_602); -if (x_603 == 0) -{ -lean_object* x_604; lean_object* x_605; lean_object* x_606; lean_object* x_607; -x_604 = lean_ctor_get(x_601, 1); -lean_inc(x_604); -lean_dec(x_601); -x_605 = lean_box(x_226); -if (lean_is_scalar(x_579)) { - x_606 = lean_alloc_ctor(0, 2, 0); +x_568 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; +lean_inc(x_565); +if (lean_is_scalar(x_567)) { + x_569 = lean_alloc_ctor(0, 3, 0); } else { - x_606 = x_579; + x_569 = x_567; } -lean_ctor_set(x_606, 0, x_605); -lean_ctor_set(x_606, 1, x_578); -x_607 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_607, 0, x_606); -x_580 = x_607; -x_581 = x_604; -goto block_600; -} -else -{ -lean_object* x_608; lean_object* x_609; lean_object* x_610; lean_object* x_611; lean_object* x_612; lean_object* x_613; lean_object* x_614; -x_608 = lean_ctor_get(x_601, 1); -lean_inc(x_608); -lean_dec(x_601); -x_609 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_610 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_609, x_7, x_8, x_608); -x_611 = lean_ctor_get(x_610, 0); -lean_inc(x_611); -x_612 = lean_ctor_get(x_610, 1); -lean_inc(x_612); -lean_dec(x_610); -if (lean_is_scalar(x_579)) { - x_613 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_569, 0, x_568); +lean_ctor_set(x_569, 1, x_565); +lean_ctor_set(x_569, 2, x_566); +x_570 = l_Lean_Syntax_setHeadInfo(x_552, x_569); +x_571 = lean_ctor_get(x_563, 0); +lean_inc(x_571); +x_572 = lean_ctor_get(x_563, 1); +lean_inc(x_572); +x_573 = lean_ctor_get(x_563, 2); +lean_inc(x_573); +if (lean_is_exclusive(x_563)) { + lean_ctor_release(x_563, 0); + lean_ctor_release(x_563, 1); + lean_ctor_release(x_563, 2); + x_574 = x_563; } else { - x_613 = x_579; + lean_dec_ref(x_563); + x_574 = lean_box(0); } -lean_ctor_set(x_613, 0, x_611); -lean_ctor_set(x_613, 1, x_578); -x_614 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_614, 0, x_613); -x_580 = x_614; -x_581 = x_612; -goto block_600; -} -block_600: -{ -lean_object* x_582; lean_object* x_583; lean_object* x_584; uint8_t x_585; -x_582 = lean_ctor_get(x_580, 0); -lean_inc(x_582); -if (lean_is_exclusive(x_580)) { - lean_ctor_release(x_580, 0); - x_583 = x_580; +lean_inc(x_572); +if (lean_is_scalar(x_574)) { + x_575 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_580); - x_583 = lean_box(0); + x_575 = x_574; } -x_584 = lean_ctor_get(x_582, 0); -lean_inc(x_584); -x_585 = lean_unbox(x_584); -lean_dec(x_584); -if (x_585 == 0) -{ -lean_object* x_586; lean_object* x_587; lean_object* x_588; lean_object* x_589; lean_object* x_590; -lean_dec(x_577); -lean_dec(x_5); -x_586 = lean_ctor_get(x_582, 1); -lean_inc(x_586); -if (lean_is_exclusive(x_582)) { - lean_ctor_release(x_582, 0); - lean_ctor_release(x_582, 1); - x_587 = x_582; -} else { - lean_dec_ref(x_582); - x_587 = lean_box(0); -} -x_588 = lean_box(0); -if (lean_is_scalar(x_587)) { - x_589 = lean_alloc_ctor(0, 2, 0); -} else { - x_589 = x_587; -} -lean_ctor_set(x_589, 0, x_588); -lean_ctor_set(x_589, 1, x_586); -if (lean_is_scalar(x_583)) { - x_590 = lean_alloc_ctor(1, 1, 0); -} else { - x_590 = x_583; -} -lean_ctor_set(x_590, 0, x_589); -x_267 = x_590; -x_268 = x_581; -goto block_328; -} -else -{ -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_dec(x_583); -x_591 = lean_ctor_get(x_582, 1); -lean_inc(x_591); +lean_ctor_set(x_575, 0, x_571); +lean_ctor_set(x_575, 1, x_572); +lean_ctor_set(x_575, 2, x_568); +x_576 = l_Lean_Syntax_setTailInfo(x_570, x_575); +x_577 = lean_apply_1(x_2, x_576); +x_578 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_578, 0, x_564); +lean_ctor_set(x_578, 1, x_565); +lean_ctor_set(x_578, 2, x_568); +x_579 = l_Lean_Syntax_setHeadInfo(x_577, x_578); +x_580 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_580, 0, x_568); +lean_ctor_set(x_580, 1, x_572); +lean_ctor_set(x_580, 2, x_573); +x_581 = l_Lean_Syntax_setTailInfo(x_579, x_580); +x_582 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_581, x_5, x_6, x_7, x_8, x_553); +x_583 = lean_ctor_get(x_582, 1); +lean_inc(x_583); lean_dec(x_582); -x_592 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_577); -x_593 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_593, 0, x_592); -x_594 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_595 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_595, 0, x_594); -lean_ctor_set(x_595, 1, x_593); -x_596 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_597 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_596, x_595, x_5, x_591, x_7, x_8, x_581); -lean_dec(x_5); -x_598 = lean_ctor_get(x_597, 0); +x_522 = x_583; +goto block_547; +} +} +} +else +{ +lean_object* x_584; lean_object* x_585; lean_object* x_586; lean_object* x_587; lean_object* x_588; lean_object* x_589; +x_584 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_6, x_7, x_8, x_451); +x_585 = lean_ctor_get(x_584, 1); +lean_inc(x_585); +lean_dec(x_584); +x_586 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_6, x_7, x_8, x_585); +x_587 = lean_ctor_get(x_586, 0); +lean_inc(x_587); +x_588 = lean_ctor_get(x_586, 1); +lean_inc(x_588); +lean_dec(x_586); +x_589 = l_Lean_Syntax_getHeadInfo___main(x_587); +if (lean_obj_tag(x_589) == 0) +{ +lean_object* x_590; lean_object* x_591; lean_object* x_592; +x_590 = lean_apply_1(x_2, x_587); +x_591 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_590, x_5, x_6, x_7, x_8, x_588); +x_592 = lean_ctor_get(x_591, 1); +lean_inc(x_592); +lean_dec(x_591); +x_522 = x_592; +goto block_547; +} +else +{ +lean_object* x_593; lean_object* x_594; +x_593 = lean_ctor_get(x_589, 0); +lean_inc(x_593); +lean_dec(x_589); +x_594 = l_Lean_Syntax_getTailInfo___main(x_587); +if (lean_obj_tag(x_594) == 0) +{ +lean_object* x_595; lean_object* x_596; lean_object* x_597; +lean_dec(x_593); +x_595 = lean_apply_1(x_2, x_587); +x_596 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_595, x_5, x_6, x_7, x_8, x_588); +x_597 = lean_ctor_get(x_596, 1); +lean_inc(x_597); +lean_dec(x_596); +x_522 = x_597; +goto block_547; +} +else +{ +lean_object* x_598; lean_object* x_599; lean_object* x_600; lean_object* x_601; lean_object* x_602; lean_object* x_603; lean_object* x_604; lean_object* x_605; lean_object* x_606; lean_object* x_607; lean_object* x_608; lean_object* x_609; lean_object* x_610; lean_object* x_611; lean_object* x_612; lean_object* x_613; lean_object* x_614; lean_object* x_615; lean_object* x_616; lean_object* x_617; lean_object* x_618; +x_598 = lean_ctor_get(x_594, 0); lean_inc(x_598); -x_599 = lean_ctor_get(x_597, 1); +lean_dec(x_594); +x_599 = lean_ctor_get(x_593, 0); lean_inc(x_599); -lean_dec(x_597); -x_267 = x_598; -x_268 = x_599; -goto block_328; -} -} -} -} -else -{ -lean_object* x_615; uint8_t x_616; -x_615 = lean_ctor_get(x_477, 0); -lean_inc(x_615); -lean_dec(x_477); -x_616 = !lean_is_exclusive(x_476); -if (x_616 == 0) -{ -lean_object* x_617; lean_object* x_618; lean_object* x_619; lean_object* x_620; uint8_t x_621; -x_617 = lean_ctor_get(x_476, 0); -x_618 = lean_ctor_get(x_476, 1); -x_619 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_618); -lean_ctor_set(x_476, 0, x_619); -x_620 = l_Lean_Syntax_setHeadInfo(x_336, x_476); -x_621 = !lean_is_exclusive(x_615); -if (x_621 == 0) -{ -lean_object* x_622; lean_object* x_623; lean_object* x_624; lean_object* x_625; lean_object* x_626; 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; lean_object* x_635; lean_object* x_636; uint8_t x_637; -x_622 = lean_ctor_get(x_615, 1); -x_623 = lean_ctor_get(x_615, 2); -lean_inc(x_622); -lean_ctor_set(x_615, 2, x_619); -x_624 = l_Lean_Syntax_setTailInfo(x_620, x_615); -x_625 = lean_apply_1(x_2, x_624); -x_626 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_626, 0, x_617); -lean_ctor_set(x_626, 1, x_618); -lean_ctor_set(x_626, 2, x_619); -x_627 = l_Lean_Syntax_setHeadInfo(x_625, x_626); -x_628 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_628, 0, x_619); -lean_ctor_set(x_628, 1, x_622); -lean_ctor_set(x_628, 2, x_623); -x_629 = l_Lean_Syntax_setTailInfo(x_627, x_628); -x_630 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_629, x_5, x_337, x_7, x_8, x_335); -x_631 = lean_ctor_get(x_630, 0); -lean_inc(x_631); -x_632 = lean_ctor_get(x_631, 0); -lean_inc(x_632); -lean_dec(x_631); -x_633 = lean_ctor_get(x_630, 1); -lean_inc(x_633); -lean_dec(x_630); -x_634 = lean_ctor_get(x_632, 1); -lean_inc(x_634); -lean_dec(x_632); -x_635 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_634, x_7, x_8, x_633); -x_636 = lean_ctor_get(x_635, 0); -lean_inc(x_636); -x_637 = !lean_is_exclusive(x_636); -if (x_637 == 0) -{ -lean_object* x_638; lean_object* x_639; uint8_t x_640; -x_638 = lean_ctor_get(x_636, 0); -x_639 = lean_ctor_get(x_635, 1); -lean_inc(x_639); -lean_dec(x_635); -x_640 = !lean_is_exclusive(x_638); -if (x_640 == 0) -{ -lean_object* x_641; lean_object* x_642; lean_object* x_643; lean_object* x_681; lean_object* x_682; uint8_t x_683; -x_641 = lean_ctor_get(x_638, 0); -x_681 = l_Lean_Core_getTraceState___rarg(x_8, x_639); -x_682 = lean_ctor_get(x_681, 0); -lean_inc(x_682); -x_683 = lean_ctor_get_uint8(x_682, sizeof(void*)*1); -lean_dec(x_682); -if (x_683 == 0) -{ -lean_object* x_684; lean_object* x_685; -x_684 = lean_ctor_get(x_681, 1); -lean_inc(x_684); -lean_dec(x_681); -x_685 = lean_box(x_226); -lean_ctor_set(x_638, 0, x_685); -x_642 = x_636; -x_643 = x_684; -goto block_680; -} -else -{ -lean_object* x_686; lean_object* x_687; lean_object* x_688; lean_object* x_689; lean_object* x_690; -x_686 = lean_ctor_get(x_681, 1); -lean_inc(x_686); -lean_dec(x_681); -x_687 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_688 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_687, x_7, x_8, x_686); -x_689 = lean_ctor_get(x_688, 0); -lean_inc(x_689); -x_690 = lean_ctor_get(x_688, 1); -lean_inc(x_690); -lean_dec(x_688); -lean_ctor_set(x_638, 0, x_689); -x_642 = x_636; -x_643 = x_690; -goto block_680; -} -block_680: -{ -uint8_t x_644; -x_644 = !lean_is_exclusive(x_642); -if (x_644 == 0) -{ -lean_object* x_645; lean_object* x_646; uint8_t x_647; -x_645 = lean_ctor_get(x_642, 0); -x_646 = lean_ctor_get(x_645, 0); -lean_inc(x_646); -x_647 = lean_unbox(x_646); -lean_dec(x_646); -if (x_647 == 0) -{ -uint8_t x_648; -lean_dec(x_641); -lean_dec(x_5); -x_648 = !lean_is_exclusive(x_645); -if (x_648 == 0) -{ -lean_object* x_649; lean_object* x_650; -x_649 = lean_ctor_get(x_645, 0); -lean_dec(x_649); -x_650 = lean_box(0); -lean_ctor_set(x_645, 0, x_650); -x_267 = x_642; -x_268 = x_643; -goto block_328; -} -else -{ -lean_object* x_651; lean_object* x_652; lean_object* x_653; -x_651 = lean_ctor_get(x_645, 1); -lean_inc(x_651); -lean_dec(x_645); -x_652 = lean_box(0); -x_653 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_653, 0, x_652); -lean_ctor_set(x_653, 1, x_651); -lean_ctor_set(x_642, 0, x_653); -x_267 = x_642; -x_268 = x_643; -goto block_328; -} -} -else -{ -lean_object* x_654; lean_object* x_655; lean_object* x_656; lean_object* x_657; lean_object* x_658; lean_object* x_659; lean_object* x_660; lean_object* x_661; lean_object* x_662; -lean_free_object(x_642); -x_654 = lean_ctor_get(x_645, 1); -lean_inc(x_654); -lean_dec(x_645); -x_655 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_641); -x_656 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_656, 0, x_655); -x_657 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_658 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_658, 0, x_657); -lean_ctor_set(x_658, 1, x_656); -x_659 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_660 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_659, x_658, x_5, x_654, x_7, x_8, x_643); -lean_dec(x_5); -x_661 = lean_ctor_get(x_660, 0); -lean_inc(x_661); -x_662 = lean_ctor_get(x_660, 1); -lean_inc(x_662); -lean_dec(x_660); -x_267 = x_661; -x_268 = x_662; -goto block_328; -} -} -else -{ -lean_object* x_663; lean_object* x_664; uint8_t x_665; -x_663 = lean_ctor_get(x_642, 0); -lean_inc(x_663); -lean_dec(x_642); -x_664 = lean_ctor_get(x_663, 0); -lean_inc(x_664); -x_665 = lean_unbox(x_664); -lean_dec(x_664); -if (x_665 == 0) -{ -lean_object* x_666; lean_object* x_667; lean_object* x_668; lean_object* x_669; lean_object* x_670; -lean_dec(x_641); -lean_dec(x_5); -x_666 = lean_ctor_get(x_663, 1); -lean_inc(x_666); -if (lean_is_exclusive(x_663)) { - lean_ctor_release(x_663, 0); - lean_ctor_release(x_663, 1); - x_667 = x_663; +x_600 = lean_ctor_get(x_593, 1); +lean_inc(x_600); +x_601 = lean_ctor_get(x_593, 2); +lean_inc(x_601); +if (lean_is_exclusive(x_593)) { + lean_ctor_release(x_593, 0); + lean_ctor_release(x_593, 1); + lean_ctor_release(x_593, 2); + x_602 = x_593; } else { - lean_dec_ref(x_663); + lean_dec_ref(x_593); + x_602 = lean_box(0); +} +x_603 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; +lean_inc(x_600); +if (lean_is_scalar(x_602)) { + x_604 = lean_alloc_ctor(0, 3, 0); +} else { + x_604 = x_602; +} +lean_ctor_set(x_604, 0, x_603); +lean_ctor_set(x_604, 1, x_600); +lean_ctor_set(x_604, 2, x_601); +x_605 = l_Lean_Syntax_setHeadInfo(x_587, x_604); +x_606 = lean_ctor_get(x_598, 0); +lean_inc(x_606); +x_607 = lean_ctor_get(x_598, 1); +lean_inc(x_607); +x_608 = lean_ctor_get(x_598, 2); +lean_inc(x_608); +if (lean_is_exclusive(x_598)) { + lean_ctor_release(x_598, 0); + lean_ctor_release(x_598, 1); + lean_ctor_release(x_598, 2); + x_609 = x_598; +} else { + lean_dec_ref(x_598); + x_609 = lean_box(0); +} +lean_inc(x_607); +if (lean_is_scalar(x_609)) { + x_610 = lean_alloc_ctor(0, 3, 0); +} else { + x_610 = x_609; +} +lean_ctor_set(x_610, 0, x_606); +lean_ctor_set(x_610, 1, x_607); +lean_ctor_set(x_610, 2, x_603); +x_611 = l_Lean_Syntax_setTailInfo(x_605, x_610); +x_612 = lean_apply_1(x_2, x_611); +x_613 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_613, 0, x_599); +lean_ctor_set(x_613, 1, x_600); +lean_ctor_set(x_613, 2, x_603); +x_614 = l_Lean_Syntax_setHeadInfo(x_612, x_613); +x_615 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_615, 0, x_603); +lean_ctor_set(x_615, 1, x_607); +lean_ctor_set(x_615, 2, x_608); +x_616 = l_Lean_Syntax_setTailInfo(x_614, x_615); +x_617 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_616, x_5, x_6, x_7, x_8, x_588); +x_618 = lean_ctor_get(x_617, 1); +lean_inc(x_618); +lean_dec(x_617); +x_522 = x_618; +goto block_547; +} +} +} +} +} +block_654: +{ +if (x_628 == 0) +{ +x_451 = x_629; +goto block_627; +} +else +{ +lean_object* x_630; 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_object* x_637; lean_object* x_638; 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; 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_inc(x_3); +x_630 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); +x_631 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_631, 0, x_630); +x_632 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__18; +x_633 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_633, 0, x_632); +lean_ctor_set(x_633, 1, x_631); +x_634 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__21; +x_635 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_635, 0, x_633); +lean_ctor_set(x_635, 1, x_634); +lean_inc(x_449); +x_636 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_449); +x_637 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_637, 0, x_636); +x_638 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_638, 0, x_635); +lean_ctor_set(x_638, 1, x_637); +x_639 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; +x_640 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_640, 0, x_638); +lean_ctor_set(x_640, 1, x_639); +lean_inc(x_1); +lean_inc(x_448); +x_641 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_641, 0, x_448); +lean_ctor_set(x_641, 1, x_1); +x_642 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_641); +x_643 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_643, 0, x_642); +x_644 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_644, 0, x_640); +lean_ctor_set(x_644, 1, x_643); +x_645 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__24; +x_646 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_646, 0, x_644); +lean_ctor_set(x_646, 1, x_645); +lean_inc(x_426); +lean_inc(x_425); +x_647 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_647, 0, x_425); +lean_ctor_set(x_647, 1, x_426); +x_648 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_647); +x_649 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_649, 0, x_648); +x_650 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_650, 0, x_646); +lean_ctor_set(x_650, 1, x_649); +x_651 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_652 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_651, x_650, x_5, x_6, x_7, x_8, x_629); +x_653 = lean_ctor_get(x_652, 1); +lean_inc(x_653); +lean_dec(x_652); +x_451 = x_653; +goto block_627; +} +} +} +} +else +{ +lean_object* x_665; lean_object* x_666; lean_object* x_667; lean_object* x_668; +lean_dec(x_428); +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_425); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_665 = lean_ctor_get(x_437, 0); +lean_inc(x_665); +x_666 = lean_ctor_get(x_437, 1); +lean_inc(x_666); +if (lean_is_exclusive(x_437)) { + lean_ctor_release(x_437, 0); + lean_ctor_release(x_437, 1); + x_667 = x_437; +} else { + lean_dec_ref(x_437); x_667 = lean_box(0); } -x_668 = lean_box(0); if (lean_is_scalar(x_667)) { - x_669 = lean_alloc_ctor(0, 2, 0); + x_668 = lean_alloc_ctor(1, 2, 0); } else { - x_669 = x_667; + x_668 = x_667; } -lean_ctor_set(x_669, 0, x_668); -lean_ctor_set(x_669, 1, x_666); -x_670 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_670, 0, x_669); -x_267 = x_670; -x_268 = x_643; -goto block_328; +lean_ctor_set(x_668, 0, x_665); +lean_ctor_set(x_668, 1, x_666); +return x_668; +} +} +block_716: +{ +if (x_670 == 0) +{ +lean_dec(x_11); +x_436 = x_671; +goto block_669; } else { -lean_object* x_671; lean_object* x_672; lean_object* x_673; lean_object* x_674; lean_object* x_675; lean_object* x_676; lean_object* x_677; lean_object* x_678; lean_object* x_679; -x_671 = lean_ctor_get(x_663, 1); -lean_inc(x_671); -lean_dec(x_663); -x_672 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_641); -x_673 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_673, 0, x_672); -x_674 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_675 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_675, 0, x_674); -lean_ctor_set(x_675, 1, x_673); -x_676 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_677 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_676, x_675, x_5, x_671, x_7, x_8, x_643); -lean_dec(x_5); -x_678 = lean_ctor_get(x_677, 0); -lean_inc(x_678); -x_679 = lean_ctor_get(x_677, 1); -lean_inc(x_679); -lean_dec(x_677); -x_267 = x_678; -x_268 = x_679; -goto block_328; -} -} -} -} -else +lean_object* x_672; lean_object* x_673; lean_object* x_674; lean_object* x_675; lean_object* x_676; lean_object* x_677; lean_object* x_678; +x_672 = l_Lean_Name_toString___closed__1; +lean_inc(x_426); +x_673 = l_Lean_Name_toStringWithSep___main(x_672, x_426); +x_674 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_674, 0, x_11); +x_675 = l_Lean_MessageData_ofList___closed__3; +x_676 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_676, 0, x_675); +lean_ctor_set(x_676, 1, x_674); +x_677 = lean_unsigned_to_nat(2u); +x_678 = lean_alloc_ctor(7, 2, 0); +lean_ctor_set(x_678, 0, x_677); +lean_ctor_set(x_678, 1, x_676); +if (lean_obj_tag(x_425) == 0) { -lean_object* x_691; lean_object* x_692; lean_object* x_693; lean_object* x_694; lean_object* x_714; lean_object* x_715; uint8_t x_716; -x_691 = lean_ctor_get(x_638, 0); -x_692 = lean_ctor_get(x_638, 1); +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_object* x_690; lean_object* x_691; lean_object* x_692; +x_679 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30; +x_680 = lean_string_append(x_679, x_673); +lean_dec(x_673); +x_681 = l_Option_HasRepr___rarg___closed__3; +x_682 = lean_string_append(x_680, x_681); +x_683 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_683, 0, x_682); +x_684 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_684, 0, x_683); +x_685 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__27; +x_686 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_686, 0, x_685); +lean_ctor_set(x_686, 1, x_684); +x_687 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; +x_688 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_688, 0, x_686); +lean_ctor_set(x_688, 1, x_687); +x_689 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_689, 0, x_688); +lean_ctor_set(x_689, 1, x_678); +x_690 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_691 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_690, x_689, x_5, x_6, x_7, x_8, x_671); +x_692 = lean_ctor_get(x_691, 1); lean_inc(x_692); -lean_inc(x_691); -lean_dec(x_638); -x_714 = l_Lean_Core_getTraceState___rarg(x_8, x_639); -x_715 = lean_ctor_get(x_714, 0); -lean_inc(x_715); -x_716 = lean_ctor_get_uint8(x_715, sizeof(void*)*1); -lean_dec(x_715); -if (x_716 == 0) -{ -lean_object* x_717; lean_object* x_718; lean_object* x_719; -x_717 = lean_ctor_get(x_714, 1); -lean_inc(x_717); -lean_dec(x_714); -x_718 = lean_box(x_226); -x_719 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_719, 0, x_718); -lean_ctor_set(x_719, 1, x_692); -lean_ctor_set(x_636, 0, x_719); -x_693 = x_636; -x_694 = x_717; -goto block_713; -} -else -{ -lean_object* x_720; lean_object* x_721; lean_object* x_722; lean_object* x_723; lean_object* x_724; lean_object* x_725; -x_720 = lean_ctor_get(x_714, 1); -lean_inc(x_720); -lean_dec(x_714); -x_721 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_722 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_721, x_7, x_8, x_720); -x_723 = lean_ctor_get(x_722, 0); -lean_inc(x_723); -x_724 = lean_ctor_get(x_722, 1); -lean_inc(x_724); -lean_dec(x_722); -x_725 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_725, 0, x_723); -lean_ctor_set(x_725, 1, x_692); -lean_ctor_set(x_636, 0, x_725); -x_693 = x_636; -x_694 = x_724; -goto block_713; -} -block_713: -{ -lean_object* x_695; lean_object* x_696; lean_object* x_697; uint8_t x_698; -x_695 = lean_ctor_get(x_693, 0); -lean_inc(x_695); -if (lean_is_exclusive(x_693)) { - lean_ctor_release(x_693, 0); - x_696 = x_693; -} else { - lean_dec_ref(x_693); - x_696 = lean_box(0); -} -x_697 = lean_ctor_get(x_695, 0); -lean_inc(x_697); -x_698 = lean_unbox(x_697); -lean_dec(x_697); -if (x_698 == 0) -{ -lean_object* x_699; lean_object* x_700; lean_object* x_701; lean_object* x_702; lean_object* x_703; lean_dec(x_691); -lean_dec(x_5); -x_699 = lean_ctor_get(x_695, 1); -lean_inc(x_699); -if (lean_is_exclusive(x_695)) { - lean_ctor_release(x_695, 0); - lean_ctor_release(x_695, 1); - x_700 = x_695; -} else { - lean_dec_ref(x_695); - x_700 = lean_box(0); -} -x_701 = lean_box(0); -if (lean_is_scalar(x_700)) { - x_702 = lean_alloc_ctor(0, 2, 0); -} else { - x_702 = x_700; -} -lean_ctor_set(x_702, 0, x_701); -lean_ctor_set(x_702, 1, x_699); -if (lean_is_scalar(x_696)) { - x_703 = lean_alloc_ctor(1, 1, 0); -} else { - x_703 = x_696; -} -lean_ctor_set(x_703, 0, x_702); -x_267 = x_703; -x_268 = x_694; -goto block_328; +x_436 = x_692; +goto block_669; } else { -lean_object* x_704; lean_object* x_705; lean_object* x_706; lean_object* x_707; lean_object* x_708; lean_object* x_709; lean_object* x_710; lean_object* x_711; lean_object* x_712; -lean_dec(x_696); -x_704 = lean_ctor_get(x_695, 1); -lean_inc(x_704); +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_704; lean_object* x_705; lean_object* x_706; lean_object* x_707; lean_object* x_708; lean_object* x_709; lean_object* x_710; lean_object* x_711; lean_object* x_712; lean_object* x_713; lean_object* x_714; lean_object* x_715; +x_693 = lean_ctor_get(x_425, 0); +lean_inc(x_693); +x_694 = l_Nat_repr(x_693); +x_695 = l_addParenHeuristic(x_694); +lean_dec(x_694); +x_696 = l_Option_HasRepr___rarg___closed__2; +x_697 = lean_string_append(x_696, x_695); lean_dec(x_695); -x_705 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_691); -x_706 = lean_alloc_ctor(0, 1, 0); +x_698 = l_Option_HasRepr___rarg___closed__3; +x_699 = lean_string_append(x_697, x_698); +x_700 = l_Prod_HasRepr___rarg___closed__1; +x_701 = lean_string_append(x_700, x_699); +lean_dec(x_699); +x_702 = l_List_reprAux___main___rarg___closed__1; +x_703 = lean_string_append(x_701, x_702); +x_704 = lean_string_append(x_703, x_673); +lean_dec(x_673); +x_705 = lean_string_append(x_704, x_698); +x_706 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_706, 0, x_705); -x_707 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_708 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_708, 0, x_707); -lean_ctor_set(x_708, 1, x_706); -x_709 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_710 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_709, x_708, x_5, x_704, x_7, x_8, x_694); -lean_dec(x_5); -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_267 = x_711; -x_268 = x_712; -goto block_328; -} -} -} -} -else -{ -lean_object* x_726; lean_object* x_727; lean_object* x_728; lean_object* x_729; lean_object* x_730; lean_object* x_731; lean_object* x_732; lean_object* x_752; lean_object* x_753; uint8_t x_754; -x_726 = lean_ctor_get(x_636, 0); -lean_inc(x_726); -lean_dec(x_636); -x_727 = lean_ctor_get(x_635, 1); -lean_inc(x_727); -lean_dec(x_635); -x_728 = lean_ctor_get(x_726, 0); -lean_inc(x_728); -x_729 = lean_ctor_get(x_726, 1); -lean_inc(x_729); -if (lean_is_exclusive(x_726)) { - lean_ctor_release(x_726, 0); - lean_ctor_release(x_726, 1); - x_730 = x_726; -} else { - lean_dec_ref(x_726); - x_730 = lean_box(0); -} -x_752 = l_Lean_Core_getTraceState___rarg(x_8, x_727); -x_753 = lean_ctor_get(x_752, 0); -lean_inc(x_753); -x_754 = lean_ctor_get_uint8(x_753, sizeof(void*)*1); -lean_dec(x_753); -if (x_754 == 0) -{ -lean_object* x_755; lean_object* x_756; lean_object* x_757; lean_object* x_758; -x_755 = lean_ctor_get(x_752, 1); -lean_inc(x_755); -lean_dec(x_752); -x_756 = lean_box(x_226); -if (lean_is_scalar(x_730)) { - x_757 = lean_alloc_ctor(0, 2, 0); -} else { - x_757 = x_730; -} -lean_ctor_set(x_757, 0, x_756); -lean_ctor_set(x_757, 1, x_729); -x_758 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_758, 0, x_757); -x_731 = x_758; -x_732 = x_755; -goto block_751; -} -else -{ -lean_object* x_759; lean_object* x_760; lean_object* x_761; lean_object* x_762; lean_object* x_763; lean_object* x_764; lean_object* x_765; -x_759 = lean_ctor_get(x_752, 1); -lean_inc(x_759); -lean_dec(x_752); -x_760 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_761 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_760, x_7, x_8, x_759); -x_762 = lean_ctor_get(x_761, 0); -lean_inc(x_762); -x_763 = lean_ctor_get(x_761, 1); -lean_inc(x_763); -lean_dec(x_761); -if (lean_is_scalar(x_730)) { - x_764 = lean_alloc_ctor(0, 2, 0); -} else { - x_764 = x_730; -} -lean_ctor_set(x_764, 0, x_762); -lean_ctor_set(x_764, 1, x_729); -x_765 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_765, 0, x_764); -x_731 = x_765; -x_732 = x_763; -goto block_751; -} -block_751: -{ -lean_object* x_733; lean_object* x_734; lean_object* x_735; uint8_t x_736; -x_733 = lean_ctor_get(x_731, 0); -lean_inc(x_733); -if (lean_is_exclusive(x_731)) { - lean_ctor_release(x_731, 0); - x_734 = x_731; -} else { - lean_dec_ref(x_731); - x_734 = lean_box(0); -} -x_735 = lean_ctor_get(x_733, 0); -lean_inc(x_735); -x_736 = lean_unbox(x_735); -lean_dec(x_735); -if (x_736 == 0) -{ -lean_object* x_737; lean_object* x_738; lean_object* x_739; lean_object* x_740; lean_object* x_741; -lean_dec(x_728); -lean_dec(x_5); -x_737 = lean_ctor_get(x_733, 1); -lean_inc(x_737); -if (lean_is_exclusive(x_733)) { - lean_ctor_release(x_733, 0); - lean_ctor_release(x_733, 1); - x_738 = x_733; -} else { - lean_dec_ref(x_733); - x_738 = lean_box(0); -} -x_739 = lean_box(0); -if (lean_is_scalar(x_738)) { - x_740 = lean_alloc_ctor(0, 2, 0); -} else { - x_740 = x_738; -} -lean_ctor_set(x_740, 0, x_739); -lean_ctor_set(x_740, 1, x_737); -if (lean_is_scalar(x_734)) { - x_741 = lean_alloc_ctor(1, 1, 0); -} else { - x_741 = x_734; -} -lean_ctor_set(x_741, 0, x_740); -x_267 = x_741; -x_268 = x_732; -goto block_328; -} -else -{ -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; lean_object* x_750; -lean_dec(x_734); -x_742 = lean_ctor_get(x_733, 1); -lean_inc(x_742); -lean_dec(x_733); -x_743 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_728); -x_744 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_744, 0, x_743); -x_745 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_746 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_746, 0, x_745); -lean_ctor_set(x_746, 1, x_744); -x_747 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_748 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_747, x_746, x_5, x_742, x_7, x_8, x_732); -lean_dec(x_5); -x_749 = lean_ctor_get(x_748, 0); -lean_inc(x_749); -x_750 = lean_ctor_get(x_748, 1); -lean_inc(x_750); -lean_dec(x_748); -x_267 = x_749; -x_268 = x_750; -goto block_328; -} -} -} -} -else -{ -lean_object* x_766; lean_object* x_767; lean_object* x_768; lean_object* x_769; lean_object* x_770; lean_object* x_771; lean_object* x_772; lean_object* x_773; lean_object* x_774; lean_object* x_775; lean_object* x_776; lean_object* x_777; lean_object* x_778; lean_object* x_779; 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_object* x_810; lean_object* x_811; uint8_t x_812; -x_766 = lean_ctor_get(x_615, 0); -x_767 = lean_ctor_get(x_615, 1); -x_768 = lean_ctor_get(x_615, 2); -lean_inc(x_768); -lean_inc(x_767); -lean_inc(x_766); -lean_dec(x_615); -lean_inc(x_767); -x_769 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_769, 0, x_766); -lean_ctor_set(x_769, 1, x_767); -lean_ctor_set(x_769, 2, x_619); -x_770 = l_Lean_Syntax_setTailInfo(x_620, x_769); -x_771 = lean_apply_1(x_2, x_770); -x_772 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_772, 0, x_617); -lean_ctor_set(x_772, 1, x_618); -lean_ctor_set(x_772, 2, x_619); -x_773 = l_Lean_Syntax_setHeadInfo(x_771, x_772); -x_774 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_774, 0, x_619); -lean_ctor_set(x_774, 1, x_767); -lean_ctor_set(x_774, 2, x_768); -x_775 = l_Lean_Syntax_setTailInfo(x_773, x_774); -x_776 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_775, x_5, x_337, x_7, x_8, x_335); -x_777 = lean_ctor_get(x_776, 0); -lean_inc(x_777); -x_778 = lean_ctor_get(x_777, 0); -lean_inc(x_778); -lean_dec(x_777); -x_779 = lean_ctor_get(x_776, 1); -lean_inc(x_779); -lean_dec(x_776); -x_780 = lean_ctor_get(x_778, 1); -lean_inc(x_780); -lean_dec(x_778); -x_781 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_780, x_7, x_8, x_779); -x_782 = lean_ctor_get(x_781, 0); -lean_inc(x_782); -x_783 = lean_ctor_get(x_782, 0); -lean_inc(x_783); -if (lean_is_exclusive(x_782)) { - lean_ctor_release(x_782, 0); - x_784 = x_782; -} else { - lean_dec_ref(x_782); - x_784 = lean_box(0); -} -x_785 = lean_ctor_get(x_781, 1); -lean_inc(x_785); -lean_dec(x_781); -x_786 = lean_ctor_get(x_783, 0); -lean_inc(x_786); -x_787 = lean_ctor_get(x_783, 1); -lean_inc(x_787); -if (lean_is_exclusive(x_783)) { - lean_ctor_release(x_783, 0); - lean_ctor_release(x_783, 1); - x_788 = x_783; -} else { - lean_dec_ref(x_783); - x_788 = lean_box(0); -} -x_810 = l_Lean_Core_getTraceState___rarg(x_8, x_785); -x_811 = lean_ctor_get(x_810, 0); -lean_inc(x_811); -x_812 = lean_ctor_get_uint8(x_811, sizeof(void*)*1); -lean_dec(x_811); -if (x_812 == 0) -{ -lean_object* x_813; lean_object* x_814; lean_object* x_815; lean_object* x_816; -x_813 = lean_ctor_get(x_810, 1); -lean_inc(x_813); -lean_dec(x_810); -x_814 = lean_box(x_226); -if (lean_is_scalar(x_788)) { - x_815 = lean_alloc_ctor(0, 2, 0); -} else { - x_815 = x_788; -} -lean_ctor_set(x_815, 0, x_814); -lean_ctor_set(x_815, 1, x_787); -if (lean_is_scalar(x_784)) { - x_816 = lean_alloc_ctor(1, 1, 0); -} else { - x_816 = x_784; -} -lean_ctor_set(x_816, 0, x_815); -x_789 = x_816; -x_790 = x_813; -goto block_809; -} -else -{ -lean_object* x_817; lean_object* x_818; lean_object* x_819; lean_object* x_820; lean_object* x_821; lean_object* x_822; lean_object* x_823; -x_817 = lean_ctor_get(x_810, 1); -lean_inc(x_817); -lean_dec(x_810); -x_818 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_819 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_818, x_7, x_8, x_817); -x_820 = lean_ctor_get(x_819, 0); -lean_inc(x_820); -x_821 = lean_ctor_get(x_819, 1); -lean_inc(x_821); -lean_dec(x_819); -if (lean_is_scalar(x_788)) { - x_822 = lean_alloc_ctor(0, 2, 0); -} else { - x_822 = x_788; -} -lean_ctor_set(x_822, 0, x_820); -lean_ctor_set(x_822, 1, x_787); -if (lean_is_scalar(x_784)) { - x_823 = lean_alloc_ctor(1, 1, 0); -} else { - x_823 = x_784; -} -lean_ctor_set(x_823, 0, x_822); -x_789 = x_823; -x_790 = x_821; -goto block_809; -} -block_809: -{ -lean_object* x_791; lean_object* x_792; lean_object* x_793; uint8_t x_794; -x_791 = lean_ctor_get(x_789, 0); -lean_inc(x_791); -if (lean_is_exclusive(x_789)) { - lean_ctor_release(x_789, 0); - x_792 = x_789; -} else { - lean_dec_ref(x_789); - x_792 = lean_box(0); -} -x_793 = lean_ctor_get(x_791, 0); -lean_inc(x_793); -x_794 = lean_unbox(x_793); -lean_dec(x_793); -if (x_794 == 0) -{ -lean_object* x_795; lean_object* x_796; lean_object* x_797; lean_object* x_798; lean_object* x_799; -lean_dec(x_786); -lean_dec(x_5); -x_795 = lean_ctor_get(x_791, 1); -lean_inc(x_795); -if (lean_is_exclusive(x_791)) { - lean_ctor_release(x_791, 0); - lean_ctor_release(x_791, 1); - x_796 = x_791; -} else { - lean_dec_ref(x_791); - x_796 = lean_box(0); -} -x_797 = lean_box(0); -if (lean_is_scalar(x_796)) { - x_798 = lean_alloc_ctor(0, 2, 0); -} else { - x_798 = x_796; -} -lean_ctor_set(x_798, 0, x_797); -lean_ctor_set(x_798, 1, x_795); -if (lean_is_scalar(x_792)) { - x_799 = lean_alloc_ctor(1, 1, 0); -} else { - x_799 = x_792; -} -lean_ctor_set(x_799, 0, x_798); -x_267 = x_799; -x_268 = x_790; -goto block_328; -} -else -{ -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_807; lean_object* x_808; -lean_dec(x_792); -x_800 = lean_ctor_get(x_791, 1); -lean_inc(x_800); -lean_dec(x_791); -x_801 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_786); -x_802 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_802, 0, x_801); -x_803 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_804 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_804, 0, x_803); -lean_ctor_set(x_804, 1, x_802); -x_805 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_806 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_805, x_804, x_5, x_800, x_7, x_8, x_790); -lean_dec(x_5); -x_807 = lean_ctor_get(x_806, 0); -lean_inc(x_807); -x_808 = lean_ctor_get(x_806, 1); -lean_inc(x_808); -lean_dec(x_806); -x_267 = x_807; -x_268 = x_808; -goto block_328; -} -} -} -} -else -{ -lean_object* x_824; lean_object* x_825; lean_object* x_826; lean_object* x_827; lean_object* x_828; 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; 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_object* x_843; lean_object* x_844; 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; lean_object* x_853; lean_object* x_854; lean_object* x_855; lean_object* x_875; lean_object* x_876; uint8_t x_877; -x_824 = lean_ctor_get(x_476, 0); -x_825 = lean_ctor_get(x_476, 1); -x_826 = lean_ctor_get(x_476, 2); -lean_inc(x_826); -lean_inc(x_825); -lean_inc(x_824); -lean_dec(x_476); -x_827 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_825); -x_828 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_828, 0, x_827); -lean_ctor_set(x_828, 1, x_825); -lean_ctor_set(x_828, 2, x_826); -x_829 = l_Lean_Syntax_setHeadInfo(x_336, x_828); -x_830 = lean_ctor_get(x_615, 0); -lean_inc(x_830); -x_831 = lean_ctor_get(x_615, 1); -lean_inc(x_831); -x_832 = lean_ctor_get(x_615, 2); -lean_inc(x_832); -if (lean_is_exclusive(x_615)) { - lean_ctor_release(x_615, 0); - lean_ctor_release(x_615, 1); - lean_ctor_release(x_615, 2); - x_833 = x_615; -} else { - lean_dec_ref(x_615); - x_833 = lean_box(0); -} -lean_inc(x_831); -if (lean_is_scalar(x_833)) { - x_834 = lean_alloc_ctor(0, 3, 0); -} else { - x_834 = x_833; -} -lean_ctor_set(x_834, 0, x_830); -lean_ctor_set(x_834, 1, x_831); -lean_ctor_set(x_834, 2, x_827); -x_835 = l_Lean_Syntax_setTailInfo(x_829, x_834); -x_836 = lean_apply_1(x_2, x_835); -x_837 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_837, 0, x_824); -lean_ctor_set(x_837, 1, x_825); -lean_ctor_set(x_837, 2, x_827); -x_838 = l_Lean_Syntax_setHeadInfo(x_836, x_837); -x_839 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_839, 0, x_827); -lean_ctor_set(x_839, 1, x_831); -lean_ctor_set(x_839, 2, x_832); -x_840 = l_Lean_Syntax_setTailInfo(x_838, x_839); -x_841 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_840, x_5, x_337, x_7, x_8, x_335); -x_842 = lean_ctor_get(x_841, 0); -lean_inc(x_842); -x_843 = lean_ctor_get(x_842, 0); -lean_inc(x_843); -lean_dec(x_842); -x_844 = lean_ctor_get(x_841, 1); -lean_inc(x_844); -lean_dec(x_841); -x_845 = lean_ctor_get(x_843, 1); -lean_inc(x_845); -lean_dec(x_843); -x_846 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_845, x_7, x_8, x_844); -x_847 = lean_ctor_get(x_846, 0); -lean_inc(x_847); -x_848 = lean_ctor_get(x_847, 0); -lean_inc(x_848); -if (lean_is_exclusive(x_847)) { - lean_ctor_release(x_847, 0); - x_849 = x_847; -} else { - lean_dec_ref(x_847); - x_849 = lean_box(0); -} -x_850 = lean_ctor_get(x_846, 1); -lean_inc(x_850); -lean_dec(x_846); -x_851 = lean_ctor_get(x_848, 0); -lean_inc(x_851); -x_852 = lean_ctor_get(x_848, 1); -lean_inc(x_852); -if (lean_is_exclusive(x_848)) { - lean_ctor_release(x_848, 0); - lean_ctor_release(x_848, 1); - x_853 = x_848; -} else { - lean_dec_ref(x_848); - x_853 = lean_box(0); -} -x_875 = l_Lean_Core_getTraceState___rarg(x_8, x_850); -x_876 = lean_ctor_get(x_875, 0); -lean_inc(x_876); -x_877 = lean_ctor_get_uint8(x_876, sizeof(void*)*1); -lean_dec(x_876); -if (x_877 == 0) -{ -lean_object* x_878; lean_object* x_879; lean_object* x_880; lean_object* x_881; -x_878 = lean_ctor_get(x_875, 1); -lean_inc(x_878); -lean_dec(x_875); -x_879 = lean_box(x_226); -if (lean_is_scalar(x_853)) { - x_880 = lean_alloc_ctor(0, 2, 0); -} else { - x_880 = x_853; -} -lean_ctor_set(x_880, 0, x_879); -lean_ctor_set(x_880, 1, x_852); -if (lean_is_scalar(x_849)) { - x_881 = lean_alloc_ctor(1, 1, 0); -} else { - x_881 = x_849; -} -lean_ctor_set(x_881, 0, x_880); -x_854 = x_881; -x_855 = x_878; -goto block_874; -} -else -{ -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; -x_882 = lean_ctor_get(x_875, 1); -lean_inc(x_882); -lean_dec(x_875); -x_883 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_884 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_883, x_7, x_8, x_882); -x_885 = lean_ctor_get(x_884, 0); -lean_inc(x_885); -x_886 = lean_ctor_get(x_884, 1); -lean_inc(x_886); -lean_dec(x_884); -if (lean_is_scalar(x_853)) { - x_887 = lean_alloc_ctor(0, 2, 0); -} else { - x_887 = x_853; -} -lean_ctor_set(x_887, 0, x_885); -lean_ctor_set(x_887, 1, x_852); -if (lean_is_scalar(x_849)) { - x_888 = lean_alloc_ctor(1, 1, 0); -} else { - x_888 = x_849; -} -lean_ctor_set(x_888, 0, x_887); -x_854 = x_888; -x_855 = x_886; -goto block_874; -} -block_874: -{ -lean_object* x_856; lean_object* x_857; lean_object* x_858; uint8_t x_859; -x_856 = lean_ctor_get(x_854, 0); -lean_inc(x_856); -if (lean_is_exclusive(x_854)) { - lean_ctor_release(x_854, 0); - x_857 = x_854; -} else { - lean_dec_ref(x_854); - x_857 = lean_box(0); -} -x_858 = lean_ctor_get(x_856, 0); -lean_inc(x_858); -x_859 = lean_unbox(x_858); -lean_dec(x_858); -if (x_859 == 0) -{ -lean_object* x_860; lean_object* x_861; lean_object* x_862; lean_object* x_863; lean_object* x_864; -lean_dec(x_851); -lean_dec(x_5); -x_860 = lean_ctor_get(x_856, 1); -lean_inc(x_860); -if (lean_is_exclusive(x_856)) { - lean_ctor_release(x_856, 0); - lean_ctor_release(x_856, 1); - x_861 = x_856; -} else { - lean_dec_ref(x_856); - x_861 = lean_box(0); -} -x_862 = lean_box(0); -if (lean_is_scalar(x_861)) { - x_863 = lean_alloc_ctor(0, 2, 0); -} else { - x_863 = x_861; -} -lean_ctor_set(x_863, 0, x_862); -lean_ctor_set(x_863, 1, x_860); -if (lean_is_scalar(x_857)) { - x_864 = lean_alloc_ctor(1, 1, 0); -} else { - x_864 = x_857; -} -lean_ctor_set(x_864, 0, x_863); -x_267 = x_864; -x_268 = x_855; -goto block_328; -} -else -{ -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); -x_865 = lean_ctor_get(x_856, 1); -lean_inc(x_865); -lean_dec(x_856); -x_866 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_851); -x_867 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_867, 0, x_866); -x_868 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_869 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_869, 0, x_868); -lean_ctor_set(x_869, 1, x_867); -x_870 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_871 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_870, x_869, x_5, x_865, x_7, x_8, x_855); -lean_dec(x_5); -x_872 = lean_ctor_get(x_871, 0); -lean_inc(x_872); -x_873 = lean_ctor_get(x_871, 1); -lean_inc(x_873); -lean_dec(x_871); -x_267 = x_872; -x_268 = x_873; -goto block_328; -} -} -} -} -} -} -else -{ -lean_object* x_889; lean_object* x_890; lean_object* x_891; lean_object* x_892; lean_object* x_893; lean_object* x_894; lean_object* x_895; lean_object* x_896; lean_object* x_897; lean_object* x_898; lean_object* x_899; lean_object* x_900; -x_889 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_265, x_7, x_8, x_261); -x_890 = lean_ctor_get(x_889, 0); -lean_inc(x_890); -x_891 = lean_ctor_get(x_890, 0); -lean_inc(x_891); -lean_dec(x_890); -x_892 = lean_ctor_get(x_889, 1); -lean_inc(x_892); -lean_dec(x_889); -x_893 = lean_ctor_get(x_891, 1); -lean_inc(x_893); -lean_dec(x_891); -x_894 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_893, x_7, x_8, x_892); -x_895 = lean_ctor_get(x_894, 0); -lean_inc(x_895); -x_896 = lean_ctor_get(x_895, 0); -lean_inc(x_896); -lean_dec(x_895); -x_897 = lean_ctor_get(x_894, 1); -lean_inc(x_897); -lean_dec(x_894); -x_898 = lean_ctor_get(x_896, 0); -lean_inc(x_898); -x_899 = lean_ctor_get(x_896, 1); -lean_inc(x_899); -lean_dec(x_896); -x_900 = l_Lean_Syntax_getHeadInfo___main(x_898); -if (lean_obj_tag(x_900) == 0) -{ -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; uint8_t x_909; -x_901 = lean_apply_1(x_2, x_898); -x_902 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_901, x_5, x_899, x_7, x_8, x_897); -x_903 = lean_ctor_get(x_902, 0); -lean_inc(x_903); -x_904 = lean_ctor_get(x_903, 0); -lean_inc(x_904); -lean_dec(x_903); -x_905 = lean_ctor_get(x_902, 1); -lean_inc(x_905); -lean_dec(x_902); -x_906 = lean_ctor_get(x_904, 1); -lean_inc(x_906); -lean_dec(x_904); -x_907 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_906, x_7, x_8, x_905); -x_908 = lean_ctor_get(x_907, 0); -lean_inc(x_908); -x_909 = !lean_is_exclusive(x_908); -if (x_909 == 0) -{ -lean_object* x_910; lean_object* x_911; uint8_t x_912; -x_910 = lean_ctor_get(x_908, 0); -x_911 = lean_ctor_get(x_907, 1); -lean_inc(x_911); -lean_dec(x_907); -x_912 = !lean_is_exclusive(x_910); -if (x_912 == 0) -{ -lean_object* x_913; lean_object* x_914; lean_object* x_915; lean_object* x_953; lean_object* x_954; uint8_t x_955; -x_913 = lean_ctor_get(x_910, 0); -x_953 = l_Lean_Core_getTraceState___rarg(x_8, x_911); -x_954 = lean_ctor_get(x_953, 0); -lean_inc(x_954); -x_955 = lean_ctor_get_uint8(x_954, sizeof(void*)*1); -lean_dec(x_954); -if (x_955 == 0) -{ -lean_object* x_956; lean_object* x_957; -x_956 = lean_ctor_get(x_953, 1); -lean_inc(x_956); -lean_dec(x_953); -x_957 = lean_box(x_226); -lean_ctor_set(x_910, 0, x_957); -x_914 = x_908; -x_915 = x_956; -goto block_952; -} -else -{ -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_953, 1); -lean_inc(x_958); -lean_dec(x_953); -x_959 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_960 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_959, x_7, x_8, x_958); -x_961 = lean_ctor_get(x_960, 0); -lean_inc(x_961); -x_962 = lean_ctor_get(x_960, 1); -lean_inc(x_962); -lean_dec(x_960); -lean_ctor_set(x_910, 0, x_961); -x_914 = x_908; -x_915 = x_962; -goto block_952; -} -block_952: -{ -uint8_t x_916; -x_916 = !lean_is_exclusive(x_914); -if (x_916 == 0) -{ -lean_object* x_917; lean_object* x_918; uint8_t x_919; -x_917 = lean_ctor_get(x_914, 0); -x_918 = lean_ctor_get(x_917, 0); -lean_inc(x_918); -x_919 = lean_unbox(x_918); -lean_dec(x_918); -if (x_919 == 0) -{ -uint8_t x_920; -lean_dec(x_913); -lean_dec(x_5); -x_920 = !lean_is_exclusive(x_917); -if (x_920 == 0) -{ -lean_object* x_921; lean_object* x_922; -x_921 = lean_ctor_get(x_917, 0); -lean_dec(x_921); -x_922 = lean_box(0); -lean_ctor_set(x_917, 0, x_922); -x_267 = x_914; -x_268 = x_915; -goto block_328; -} -else -{ -lean_object* x_923; lean_object* x_924; lean_object* x_925; -x_923 = lean_ctor_get(x_917, 1); -lean_inc(x_923); -lean_dec(x_917); -x_924 = lean_box(0); -x_925 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_925, 0, x_924); -lean_ctor_set(x_925, 1, x_923); -lean_ctor_set(x_914, 0, x_925); -x_267 = x_914; -x_268 = x_915; -goto block_328; -} -} -else -{ -lean_object* x_926; lean_object* x_927; lean_object* x_928; lean_object* x_929; lean_object* x_930; lean_object* x_931; lean_object* x_932; lean_object* x_933; lean_object* x_934; -lean_free_object(x_914); -x_926 = lean_ctor_get(x_917, 1); -lean_inc(x_926); -lean_dec(x_917); -x_927 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_913); -x_928 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_928, 0, x_927); -x_929 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_930 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_930, 0, x_929); -lean_ctor_set(x_930, 1, x_928); -x_931 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_932 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_931, x_930, x_5, x_926, x_7, x_8, x_915); -lean_dec(x_5); -x_933 = lean_ctor_get(x_932, 0); -lean_inc(x_933); -x_934 = lean_ctor_get(x_932, 1); -lean_inc(x_934); -lean_dec(x_932); -x_267 = x_933; -x_268 = x_934; -goto block_328; -} -} -else -{ -lean_object* x_935; lean_object* x_936; uint8_t x_937; -x_935 = lean_ctor_get(x_914, 0); -lean_inc(x_935); -lean_dec(x_914); -x_936 = lean_ctor_get(x_935, 0); -lean_inc(x_936); -x_937 = lean_unbox(x_936); -lean_dec(x_936); -if (x_937 == 0) -{ -lean_object* x_938; lean_object* x_939; lean_object* x_940; lean_object* x_941; lean_object* x_942; -lean_dec(x_913); -lean_dec(x_5); -x_938 = lean_ctor_get(x_935, 1); -lean_inc(x_938); -if (lean_is_exclusive(x_935)) { - lean_ctor_release(x_935, 0); - lean_ctor_release(x_935, 1); - x_939 = x_935; -} else { - lean_dec_ref(x_935); - x_939 = lean_box(0); -} -x_940 = lean_box(0); -if (lean_is_scalar(x_939)) { - x_941 = lean_alloc_ctor(0, 2, 0); -} else { - x_941 = x_939; -} -lean_ctor_set(x_941, 0, x_940); -lean_ctor_set(x_941, 1, x_938); -x_942 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_942, 0, x_941); -x_267 = x_942; -x_268 = x_915; -goto block_328; -} -else -{ -lean_object* x_943; lean_object* x_944; lean_object* x_945; lean_object* x_946; lean_object* x_947; lean_object* x_948; lean_object* x_949; lean_object* x_950; lean_object* x_951; -x_943 = lean_ctor_get(x_935, 1); -lean_inc(x_943); -lean_dec(x_935); -x_944 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_913); -x_945 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_945, 0, x_944); -x_946 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_947 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_947, 0, x_946); -lean_ctor_set(x_947, 1, x_945); -x_948 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_949 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_948, x_947, x_5, x_943, x_7, x_8, x_915); -lean_dec(x_5); -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_267 = x_950; -x_268 = x_951; -goto block_328; -} -} -} -} -else -{ -lean_object* x_963; lean_object* x_964; lean_object* x_965; lean_object* x_966; lean_object* x_986; lean_object* x_987; uint8_t x_988; -x_963 = lean_ctor_get(x_910, 0); -x_964 = lean_ctor_get(x_910, 1); -lean_inc(x_964); -lean_inc(x_963); -lean_dec(x_910); -x_986 = l_Lean_Core_getTraceState___rarg(x_8, x_911); -x_987 = lean_ctor_get(x_986, 0); -lean_inc(x_987); -x_988 = lean_ctor_get_uint8(x_987, sizeof(void*)*1); -lean_dec(x_987); -if (x_988 == 0) -{ -lean_object* x_989; lean_object* x_990; lean_object* x_991; -x_989 = lean_ctor_get(x_986, 1); -lean_inc(x_989); -lean_dec(x_986); -x_990 = lean_box(x_226); -x_991 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_991, 0, x_990); -lean_ctor_set(x_991, 1, x_964); -lean_ctor_set(x_908, 0, x_991); -x_965 = x_908; -x_966 = x_989; -goto block_985; -} -else -{ -lean_object* x_992; lean_object* x_993; lean_object* x_994; lean_object* x_995; lean_object* x_996; lean_object* x_997; -x_992 = lean_ctor_get(x_986, 1); -lean_inc(x_992); -lean_dec(x_986); -x_993 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_994 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_993, x_7, x_8, x_992); -x_995 = lean_ctor_get(x_994, 0); -lean_inc(x_995); -x_996 = lean_ctor_get(x_994, 1); -lean_inc(x_996); -lean_dec(x_994); -x_997 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_997, 0, x_995); -lean_ctor_set(x_997, 1, x_964); -lean_ctor_set(x_908, 0, x_997); -x_965 = x_908; -x_966 = x_996; -goto block_985; -} -block_985: -{ -lean_object* x_967; lean_object* x_968; lean_object* x_969; uint8_t x_970; -x_967 = lean_ctor_get(x_965, 0); -lean_inc(x_967); -if (lean_is_exclusive(x_965)) { - lean_ctor_release(x_965, 0); - x_968 = x_965; -} else { - lean_dec_ref(x_965); - x_968 = lean_box(0); -} -x_969 = lean_ctor_get(x_967, 0); -lean_inc(x_969); -x_970 = lean_unbox(x_969); -lean_dec(x_969); -if (x_970 == 0) -{ -lean_object* x_971; lean_object* x_972; lean_object* x_973; lean_object* x_974; lean_object* x_975; -lean_dec(x_963); -lean_dec(x_5); -x_971 = lean_ctor_get(x_967, 1); -lean_inc(x_971); -if (lean_is_exclusive(x_967)) { - lean_ctor_release(x_967, 0); - lean_ctor_release(x_967, 1); - x_972 = x_967; -} else { - lean_dec_ref(x_967); - x_972 = lean_box(0); -} -x_973 = lean_box(0); -if (lean_is_scalar(x_972)) { - x_974 = lean_alloc_ctor(0, 2, 0); -} else { - x_974 = x_972; -} -lean_ctor_set(x_974, 0, x_973); -lean_ctor_set(x_974, 1, x_971); -if (lean_is_scalar(x_968)) { - x_975 = lean_alloc_ctor(1, 1, 0); -} else { - x_975 = x_968; -} -lean_ctor_set(x_975, 0, x_974); -x_267 = x_975; -x_268 = x_966; -goto block_328; -} -else -{ -lean_object* x_976; lean_object* x_977; lean_object* x_978; lean_object* x_979; lean_object* x_980; lean_object* x_981; lean_object* x_982; lean_object* x_983; lean_object* x_984; -lean_dec(x_968); -x_976 = lean_ctor_get(x_967, 1); -lean_inc(x_976); -lean_dec(x_967); -x_977 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_963); -x_978 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_978, 0, x_977); -x_979 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_980 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_980, 0, x_979); -lean_ctor_set(x_980, 1, x_978); -x_981 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_982 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_981, x_980, x_5, x_976, x_7, x_8, x_966); -lean_dec(x_5); -x_983 = lean_ctor_get(x_982, 0); -lean_inc(x_983); -x_984 = lean_ctor_get(x_982, 1); -lean_inc(x_984); -lean_dec(x_982); -x_267 = x_983; -x_268 = x_984; -goto block_328; -} -} -} -} -else -{ -lean_object* x_998; lean_object* x_999; lean_object* x_1000; lean_object* x_1001; lean_object* x_1002; lean_object* x_1003; lean_object* x_1004; lean_object* x_1024; lean_object* x_1025; uint8_t x_1026; -x_998 = lean_ctor_get(x_908, 0); -lean_inc(x_998); -lean_dec(x_908); -x_999 = lean_ctor_get(x_907, 1); -lean_inc(x_999); -lean_dec(x_907); -x_1000 = lean_ctor_get(x_998, 0); -lean_inc(x_1000); -x_1001 = lean_ctor_get(x_998, 1); -lean_inc(x_1001); -if (lean_is_exclusive(x_998)) { - lean_ctor_release(x_998, 0); - lean_ctor_release(x_998, 1); - x_1002 = x_998; -} else { - lean_dec_ref(x_998); - x_1002 = lean_box(0); -} -x_1024 = l_Lean_Core_getTraceState___rarg(x_8, x_999); -x_1025 = lean_ctor_get(x_1024, 0); -lean_inc(x_1025); -x_1026 = lean_ctor_get_uint8(x_1025, sizeof(void*)*1); -lean_dec(x_1025); -if (x_1026 == 0) -{ -lean_object* x_1027; lean_object* x_1028; lean_object* x_1029; lean_object* x_1030; -x_1027 = lean_ctor_get(x_1024, 1); -lean_inc(x_1027); -lean_dec(x_1024); -x_1028 = lean_box(x_226); -if (lean_is_scalar(x_1002)) { - x_1029 = lean_alloc_ctor(0, 2, 0); -} else { - x_1029 = x_1002; -} -lean_ctor_set(x_1029, 0, x_1028); -lean_ctor_set(x_1029, 1, x_1001); -x_1030 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_1030, 0, x_1029); -x_1003 = x_1030; -x_1004 = x_1027; -goto block_1023; -} -else -{ -lean_object* x_1031; lean_object* x_1032; lean_object* x_1033; lean_object* x_1034; lean_object* x_1035; lean_object* x_1036; lean_object* x_1037; -x_1031 = lean_ctor_get(x_1024, 1); -lean_inc(x_1031); -lean_dec(x_1024); -x_1032 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1033 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1032, x_7, x_8, x_1031); -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); -if (lean_is_scalar(x_1002)) { - x_1036 = lean_alloc_ctor(0, 2, 0); -} else { - x_1036 = x_1002; -} -lean_ctor_set(x_1036, 0, x_1034); -lean_ctor_set(x_1036, 1, x_1001); -x_1037 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_1037, 0, x_1036); -x_1003 = x_1037; -x_1004 = x_1035; -goto block_1023; -} -block_1023: -{ -lean_object* x_1005; lean_object* x_1006; lean_object* x_1007; uint8_t x_1008; -x_1005 = lean_ctor_get(x_1003, 0); -lean_inc(x_1005); -if (lean_is_exclusive(x_1003)) { - lean_ctor_release(x_1003, 0); - x_1006 = x_1003; -} else { - lean_dec_ref(x_1003); - x_1006 = lean_box(0); -} -x_1007 = lean_ctor_get(x_1005, 0); -lean_inc(x_1007); -x_1008 = lean_unbox(x_1007); -lean_dec(x_1007); -if (x_1008 == 0) -{ -lean_object* x_1009; lean_object* x_1010; lean_object* x_1011; lean_object* x_1012; lean_object* x_1013; -lean_dec(x_1000); -lean_dec(x_5); -x_1009 = lean_ctor_get(x_1005, 1); -lean_inc(x_1009); -if (lean_is_exclusive(x_1005)) { - lean_ctor_release(x_1005, 0); - lean_ctor_release(x_1005, 1); - x_1010 = x_1005; -} else { - lean_dec_ref(x_1005); - x_1010 = lean_box(0); -} -x_1011 = lean_box(0); -if (lean_is_scalar(x_1010)) { - x_1012 = lean_alloc_ctor(0, 2, 0); -} else { - x_1012 = x_1010; -} -lean_ctor_set(x_1012, 0, x_1011); -lean_ctor_set(x_1012, 1, x_1009); -if (lean_is_scalar(x_1006)) { - x_1013 = lean_alloc_ctor(1, 1, 0); -} else { - x_1013 = x_1006; -} -lean_ctor_set(x_1013, 0, x_1012); -x_267 = x_1013; -x_268 = x_1004; -goto block_328; -} -else -{ -lean_object* x_1014; lean_object* x_1015; lean_object* x_1016; lean_object* x_1017; lean_object* x_1018; lean_object* x_1019; lean_object* x_1020; lean_object* x_1021; lean_object* x_1022; -lean_dec(x_1006); -x_1014 = lean_ctor_get(x_1005, 1); -lean_inc(x_1014); -lean_dec(x_1005); -x_1015 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1000); -x_1016 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1016, 0, x_1015); -x_1017 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1018 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1018, 0, x_1017); -lean_ctor_set(x_1018, 1, x_1016); -x_1019 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1020 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1019, x_1018, x_5, x_1014, x_7, x_8, x_1004); -lean_dec(x_5); -x_1021 = lean_ctor_get(x_1020, 0); -lean_inc(x_1021); -x_1022 = lean_ctor_get(x_1020, 1); -lean_inc(x_1022); -lean_dec(x_1020); -x_267 = x_1021; -x_268 = x_1022; -goto block_328; -} -} -} -} -else -{ -lean_object* x_1038; lean_object* x_1039; -x_1038 = lean_ctor_get(x_900, 0); -lean_inc(x_1038); -lean_dec(x_900); -x_1039 = l_Lean_Syntax_getTailInfo___main(x_898); -if (lean_obj_tag(x_1039) == 0) -{ -lean_object* x_1040; lean_object* x_1041; lean_object* x_1042; lean_object* x_1043; lean_object* x_1044; lean_object* x_1045; lean_object* x_1046; lean_object* x_1047; uint8_t x_1048; -lean_dec(x_1038); -x_1040 = lean_apply_1(x_2, x_898); -x_1041 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1040, x_5, x_899, x_7, x_8, x_897); -x_1042 = lean_ctor_get(x_1041, 0); -lean_inc(x_1042); -x_1043 = lean_ctor_get(x_1042, 0); -lean_inc(x_1043); -lean_dec(x_1042); -x_1044 = lean_ctor_get(x_1041, 1); -lean_inc(x_1044); -lean_dec(x_1041); -x_1045 = lean_ctor_get(x_1043, 1); -lean_inc(x_1045); -lean_dec(x_1043); -x_1046 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1045, x_7, x_8, x_1044); -x_1047 = lean_ctor_get(x_1046, 0); -lean_inc(x_1047); -x_1048 = !lean_is_exclusive(x_1047); -if (x_1048 == 0) -{ -lean_object* x_1049; lean_object* x_1050; uint8_t x_1051; -x_1049 = lean_ctor_get(x_1047, 0); -x_1050 = lean_ctor_get(x_1046, 1); -lean_inc(x_1050); -lean_dec(x_1046); -x_1051 = !lean_is_exclusive(x_1049); -if (x_1051 == 0) -{ -lean_object* x_1052; lean_object* x_1053; lean_object* x_1054; lean_object* x_1092; lean_object* x_1093; uint8_t x_1094; -x_1052 = lean_ctor_get(x_1049, 0); -x_1092 = l_Lean_Core_getTraceState___rarg(x_8, x_1050); -x_1093 = lean_ctor_get(x_1092, 0); -lean_inc(x_1093); -x_1094 = lean_ctor_get_uint8(x_1093, sizeof(void*)*1); -lean_dec(x_1093); -if (x_1094 == 0) -{ -lean_object* x_1095; lean_object* x_1096; -x_1095 = lean_ctor_get(x_1092, 1); -lean_inc(x_1095); -lean_dec(x_1092); -x_1096 = lean_box(x_226); -lean_ctor_set(x_1049, 0, x_1096); -x_1053 = x_1047; -x_1054 = x_1095; -goto block_1091; -} -else -{ -lean_object* x_1097; lean_object* x_1098; lean_object* x_1099; lean_object* x_1100; lean_object* x_1101; -x_1097 = lean_ctor_get(x_1092, 1); -lean_inc(x_1097); -lean_dec(x_1092); -x_1098 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1099 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1098, x_7, x_8, x_1097); -x_1100 = lean_ctor_get(x_1099, 0); -lean_inc(x_1100); -x_1101 = lean_ctor_get(x_1099, 1); -lean_inc(x_1101); -lean_dec(x_1099); -lean_ctor_set(x_1049, 0, x_1100); -x_1053 = x_1047; -x_1054 = x_1101; -goto block_1091; -} -block_1091: -{ -uint8_t x_1055; -x_1055 = !lean_is_exclusive(x_1053); -if (x_1055 == 0) -{ -lean_object* x_1056; lean_object* x_1057; uint8_t x_1058; -x_1056 = lean_ctor_get(x_1053, 0); -x_1057 = lean_ctor_get(x_1056, 0); -lean_inc(x_1057); -x_1058 = lean_unbox(x_1057); -lean_dec(x_1057); -if (x_1058 == 0) -{ -uint8_t x_1059; -lean_dec(x_1052); -lean_dec(x_5); -x_1059 = !lean_is_exclusive(x_1056); -if (x_1059 == 0) -{ -lean_object* x_1060; lean_object* x_1061; -x_1060 = lean_ctor_get(x_1056, 0); -lean_dec(x_1060); -x_1061 = lean_box(0); -lean_ctor_set(x_1056, 0, x_1061); -x_267 = x_1053; -x_268 = x_1054; -goto block_328; -} -else -{ -lean_object* x_1062; lean_object* x_1063; lean_object* x_1064; -x_1062 = lean_ctor_get(x_1056, 1); -lean_inc(x_1062); -lean_dec(x_1056); -x_1063 = lean_box(0); -x_1064 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1064, 0, x_1063); -lean_ctor_set(x_1064, 1, x_1062); -lean_ctor_set(x_1053, 0, x_1064); -x_267 = x_1053; -x_268 = x_1054; -goto block_328; -} -} -else -{ -lean_object* x_1065; lean_object* x_1066; lean_object* x_1067; lean_object* x_1068; lean_object* x_1069; lean_object* x_1070; lean_object* x_1071; lean_object* x_1072; lean_object* x_1073; -lean_free_object(x_1053); -x_1065 = lean_ctor_get(x_1056, 1); -lean_inc(x_1065); -lean_dec(x_1056); -x_1066 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1052); -x_1067 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1067, 0, x_1066); -x_1068 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1069 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1069, 0, x_1068); -lean_ctor_set(x_1069, 1, x_1067); -x_1070 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1071 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1070, x_1069, x_5, x_1065, x_7, x_8, x_1054); -lean_dec(x_5); -x_1072 = lean_ctor_get(x_1071, 0); -lean_inc(x_1072); -x_1073 = lean_ctor_get(x_1071, 1); -lean_inc(x_1073); -lean_dec(x_1071); -x_267 = x_1072; -x_268 = x_1073; -goto block_328; -} -} -else -{ -lean_object* x_1074; lean_object* x_1075; uint8_t x_1076; -x_1074 = lean_ctor_get(x_1053, 0); -lean_inc(x_1074); -lean_dec(x_1053); -x_1075 = lean_ctor_get(x_1074, 0); -lean_inc(x_1075); -x_1076 = lean_unbox(x_1075); -lean_dec(x_1075); -if (x_1076 == 0) -{ -lean_object* x_1077; lean_object* x_1078; lean_object* x_1079; lean_object* x_1080; lean_object* x_1081; -lean_dec(x_1052); -lean_dec(x_5); -x_1077 = lean_ctor_get(x_1074, 1); -lean_inc(x_1077); -if (lean_is_exclusive(x_1074)) { - lean_ctor_release(x_1074, 0); - lean_ctor_release(x_1074, 1); - x_1078 = x_1074; -} else { - lean_dec_ref(x_1074); - x_1078 = lean_box(0); -} -x_1079 = lean_box(0); -if (lean_is_scalar(x_1078)) { - x_1080 = lean_alloc_ctor(0, 2, 0); -} else { - x_1080 = x_1078; -} -lean_ctor_set(x_1080, 0, x_1079); -lean_ctor_set(x_1080, 1, x_1077); -x_1081 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_1081, 0, x_1080); -x_267 = x_1081; -x_268 = x_1054; -goto block_328; -} -else -{ -lean_object* x_1082; lean_object* x_1083; lean_object* x_1084; lean_object* x_1085; lean_object* x_1086; lean_object* x_1087; lean_object* x_1088; lean_object* x_1089; lean_object* x_1090; -x_1082 = lean_ctor_get(x_1074, 1); -lean_inc(x_1082); -lean_dec(x_1074); -x_1083 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1052); -x_1084 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1084, 0, x_1083); -x_1085 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1086 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1086, 0, x_1085); -lean_ctor_set(x_1086, 1, x_1084); -x_1087 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1088 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1087, x_1086, x_5, x_1082, x_7, x_8, x_1054); -lean_dec(x_5); -x_1089 = lean_ctor_get(x_1088, 0); -lean_inc(x_1089); -x_1090 = lean_ctor_get(x_1088, 1); -lean_inc(x_1090); -lean_dec(x_1088); -x_267 = x_1089; -x_268 = x_1090; -goto block_328; -} -} -} -} -else -{ -lean_object* x_1102; lean_object* x_1103; lean_object* x_1104; lean_object* x_1105; lean_object* x_1125; lean_object* x_1126; uint8_t x_1127; -x_1102 = lean_ctor_get(x_1049, 0); -x_1103 = lean_ctor_get(x_1049, 1); -lean_inc(x_1103); -lean_inc(x_1102); -lean_dec(x_1049); -x_1125 = l_Lean_Core_getTraceState___rarg(x_8, x_1050); -x_1126 = lean_ctor_get(x_1125, 0); -lean_inc(x_1126); -x_1127 = lean_ctor_get_uint8(x_1126, sizeof(void*)*1); -lean_dec(x_1126); -if (x_1127 == 0) -{ -lean_object* x_1128; lean_object* x_1129; lean_object* x_1130; -x_1128 = lean_ctor_get(x_1125, 1); -lean_inc(x_1128); -lean_dec(x_1125); -x_1129 = lean_box(x_226); -x_1130 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1130, 0, x_1129); -lean_ctor_set(x_1130, 1, x_1103); -lean_ctor_set(x_1047, 0, x_1130); -x_1104 = x_1047; -x_1105 = x_1128; -goto block_1124; -} -else -{ -lean_object* x_1131; lean_object* x_1132; lean_object* x_1133; lean_object* x_1134; lean_object* x_1135; lean_object* x_1136; -x_1131 = lean_ctor_get(x_1125, 1); -lean_inc(x_1131); -lean_dec(x_1125); -x_1132 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1133 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1132, x_7, x_8, x_1131); -x_1134 = lean_ctor_get(x_1133, 0); -lean_inc(x_1134); -x_1135 = lean_ctor_get(x_1133, 1); -lean_inc(x_1135); -lean_dec(x_1133); -x_1136 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1136, 0, x_1134); -lean_ctor_set(x_1136, 1, x_1103); -lean_ctor_set(x_1047, 0, x_1136); -x_1104 = x_1047; -x_1105 = x_1135; -goto block_1124; -} -block_1124: -{ -lean_object* x_1106; lean_object* x_1107; lean_object* x_1108; uint8_t x_1109; -x_1106 = lean_ctor_get(x_1104, 0); -lean_inc(x_1106); -if (lean_is_exclusive(x_1104)) { - lean_ctor_release(x_1104, 0); - x_1107 = x_1104; -} else { - lean_dec_ref(x_1104); - x_1107 = lean_box(0); -} -x_1108 = lean_ctor_get(x_1106, 0); -lean_inc(x_1108); -x_1109 = lean_unbox(x_1108); -lean_dec(x_1108); -if (x_1109 == 0) -{ -lean_object* x_1110; lean_object* x_1111; lean_object* x_1112; lean_object* x_1113; lean_object* x_1114; -lean_dec(x_1102); -lean_dec(x_5); -x_1110 = lean_ctor_get(x_1106, 1); -lean_inc(x_1110); -if (lean_is_exclusive(x_1106)) { - lean_ctor_release(x_1106, 0); - lean_ctor_release(x_1106, 1); - x_1111 = x_1106; -} else { - lean_dec_ref(x_1106); - x_1111 = lean_box(0); -} -x_1112 = lean_box(0); -if (lean_is_scalar(x_1111)) { - x_1113 = lean_alloc_ctor(0, 2, 0); -} else { - x_1113 = x_1111; -} -lean_ctor_set(x_1113, 0, x_1112); -lean_ctor_set(x_1113, 1, x_1110); -if (lean_is_scalar(x_1107)) { - x_1114 = lean_alloc_ctor(1, 1, 0); -} else { - x_1114 = x_1107; -} -lean_ctor_set(x_1114, 0, x_1113); -x_267 = x_1114; -x_268 = x_1105; -goto block_328; -} -else -{ -lean_object* x_1115; lean_object* x_1116; lean_object* x_1117; lean_object* x_1118; lean_object* x_1119; lean_object* x_1120; lean_object* x_1121; lean_object* x_1122; lean_object* x_1123; -lean_dec(x_1107); -x_1115 = lean_ctor_get(x_1106, 1); -lean_inc(x_1115); -lean_dec(x_1106); -x_1116 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1102); -x_1117 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1117, 0, x_1116); -x_1118 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1119 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1119, 0, x_1118); -lean_ctor_set(x_1119, 1, x_1117); -x_1120 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1121 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1120, x_1119, x_5, x_1115, x_7, x_8, x_1105); -lean_dec(x_5); -x_1122 = lean_ctor_get(x_1121, 0); -lean_inc(x_1122); -x_1123 = lean_ctor_get(x_1121, 1); -lean_inc(x_1123); -lean_dec(x_1121); -x_267 = x_1122; -x_268 = x_1123; -goto block_328; -} -} -} -} -else -{ -lean_object* x_1137; lean_object* x_1138; lean_object* x_1139; lean_object* x_1140; lean_object* x_1141; lean_object* x_1142; lean_object* x_1143; lean_object* x_1163; lean_object* x_1164; uint8_t x_1165; -x_1137 = lean_ctor_get(x_1047, 0); -lean_inc(x_1137); -lean_dec(x_1047); -x_1138 = lean_ctor_get(x_1046, 1); -lean_inc(x_1138); -lean_dec(x_1046); -x_1139 = lean_ctor_get(x_1137, 0); -lean_inc(x_1139); -x_1140 = lean_ctor_get(x_1137, 1); -lean_inc(x_1140); -if (lean_is_exclusive(x_1137)) { - lean_ctor_release(x_1137, 0); - lean_ctor_release(x_1137, 1); - x_1141 = x_1137; -} else { - lean_dec_ref(x_1137); - x_1141 = lean_box(0); -} -x_1163 = l_Lean_Core_getTraceState___rarg(x_8, x_1138); -x_1164 = lean_ctor_get(x_1163, 0); -lean_inc(x_1164); -x_1165 = lean_ctor_get_uint8(x_1164, sizeof(void*)*1); -lean_dec(x_1164); -if (x_1165 == 0) -{ -lean_object* x_1166; lean_object* x_1167; lean_object* x_1168; lean_object* x_1169; -x_1166 = lean_ctor_get(x_1163, 1); -lean_inc(x_1166); -lean_dec(x_1163); -x_1167 = lean_box(x_226); -if (lean_is_scalar(x_1141)) { - x_1168 = lean_alloc_ctor(0, 2, 0); -} else { - x_1168 = x_1141; -} -lean_ctor_set(x_1168, 0, x_1167); -lean_ctor_set(x_1168, 1, x_1140); -x_1169 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_1169, 0, x_1168); -x_1142 = x_1169; -x_1143 = x_1166; -goto block_1162; -} -else -{ -lean_object* x_1170; lean_object* x_1171; lean_object* x_1172; lean_object* x_1173; lean_object* x_1174; lean_object* x_1175; lean_object* x_1176; -x_1170 = lean_ctor_get(x_1163, 1); -lean_inc(x_1170); -lean_dec(x_1163); -x_1171 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1172 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1171, x_7, x_8, x_1170); -x_1173 = lean_ctor_get(x_1172, 0); -lean_inc(x_1173); -x_1174 = lean_ctor_get(x_1172, 1); -lean_inc(x_1174); -lean_dec(x_1172); -if (lean_is_scalar(x_1141)) { - x_1175 = lean_alloc_ctor(0, 2, 0); -} else { - x_1175 = x_1141; -} -lean_ctor_set(x_1175, 0, x_1173); -lean_ctor_set(x_1175, 1, x_1140); -x_1176 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_1176, 0, x_1175); -x_1142 = x_1176; -x_1143 = x_1174; -goto block_1162; -} -block_1162: -{ -lean_object* x_1144; lean_object* x_1145; lean_object* x_1146; uint8_t x_1147; -x_1144 = lean_ctor_get(x_1142, 0); -lean_inc(x_1144); -if (lean_is_exclusive(x_1142)) { - lean_ctor_release(x_1142, 0); - x_1145 = x_1142; -} else { - lean_dec_ref(x_1142); - x_1145 = lean_box(0); -} -x_1146 = lean_ctor_get(x_1144, 0); -lean_inc(x_1146); -x_1147 = lean_unbox(x_1146); -lean_dec(x_1146); -if (x_1147 == 0) -{ -lean_object* x_1148; lean_object* x_1149; lean_object* x_1150; lean_object* x_1151; lean_object* x_1152; -lean_dec(x_1139); -lean_dec(x_5); -x_1148 = lean_ctor_get(x_1144, 1); -lean_inc(x_1148); -if (lean_is_exclusive(x_1144)) { - lean_ctor_release(x_1144, 0); - lean_ctor_release(x_1144, 1); - x_1149 = x_1144; -} else { - lean_dec_ref(x_1144); - x_1149 = lean_box(0); -} -x_1150 = lean_box(0); -if (lean_is_scalar(x_1149)) { - x_1151 = lean_alloc_ctor(0, 2, 0); -} else { - x_1151 = x_1149; -} -lean_ctor_set(x_1151, 0, x_1150); -lean_ctor_set(x_1151, 1, x_1148); -if (lean_is_scalar(x_1145)) { - x_1152 = lean_alloc_ctor(1, 1, 0); -} else { - x_1152 = x_1145; -} -lean_ctor_set(x_1152, 0, x_1151); -x_267 = x_1152; -x_268 = x_1143; -goto block_328; -} -else -{ -lean_object* x_1153; lean_object* x_1154; lean_object* x_1155; lean_object* x_1156; lean_object* x_1157; lean_object* x_1158; lean_object* x_1159; lean_object* x_1160; lean_object* x_1161; -lean_dec(x_1145); -x_1153 = lean_ctor_get(x_1144, 1); -lean_inc(x_1153); -lean_dec(x_1144); -x_1154 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1139); -x_1155 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1155, 0, x_1154); -x_1156 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1157 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1157, 0, x_1156); -lean_ctor_set(x_1157, 1, x_1155); -x_1158 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1159 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1158, x_1157, x_5, x_1153, x_7, x_8, x_1143); -lean_dec(x_5); -x_1160 = lean_ctor_get(x_1159, 0); -lean_inc(x_1160); -x_1161 = lean_ctor_get(x_1159, 1); -lean_inc(x_1161); -lean_dec(x_1159); -x_267 = x_1160; -x_268 = x_1161; -goto block_328; -} -} -} -} -else -{ -lean_object* x_1177; uint8_t x_1178; -x_1177 = lean_ctor_get(x_1039, 0); -lean_inc(x_1177); -lean_dec(x_1039); -x_1178 = !lean_is_exclusive(x_1038); -if (x_1178 == 0) -{ -lean_object* x_1179; lean_object* x_1180; lean_object* x_1181; lean_object* x_1182; uint8_t x_1183; -x_1179 = lean_ctor_get(x_1038, 0); -x_1180 = lean_ctor_get(x_1038, 1); -x_1181 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_1180); -lean_ctor_set(x_1038, 0, x_1181); -x_1182 = l_Lean_Syntax_setHeadInfo(x_898, x_1038); -x_1183 = !lean_is_exclusive(x_1177); -if (x_1183 == 0) -{ -lean_object* x_1184; lean_object* x_1185; lean_object* x_1186; lean_object* x_1187; lean_object* x_1188; lean_object* x_1189; lean_object* x_1190; lean_object* x_1191; lean_object* x_1192; lean_object* x_1193; lean_object* x_1194; lean_object* x_1195; lean_object* x_1196; lean_object* x_1197; lean_object* x_1198; uint8_t x_1199; -x_1184 = lean_ctor_get(x_1177, 1); -x_1185 = lean_ctor_get(x_1177, 2); -lean_inc(x_1184); -lean_ctor_set(x_1177, 2, x_1181); -x_1186 = l_Lean_Syntax_setTailInfo(x_1182, x_1177); -x_1187 = lean_apply_1(x_2, x_1186); -x_1188 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1188, 0, x_1179); -lean_ctor_set(x_1188, 1, x_1180); -lean_ctor_set(x_1188, 2, x_1181); -x_1189 = l_Lean_Syntax_setHeadInfo(x_1187, x_1188); -x_1190 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1190, 0, x_1181); -lean_ctor_set(x_1190, 1, x_1184); -lean_ctor_set(x_1190, 2, x_1185); -x_1191 = l_Lean_Syntax_setTailInfo(x_1189, x_1190); -x_1192 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1191, x_5, x_899, x_7, x_8, x_897); -x_1193 = lean_ctor_get(x_1192, 0); -lean_inc(x_1193); -x_1194 = lean_ctor_get(x_1193, 0); -lean_inc(x_1194); -lean_dec(x_1193); -x_1195 = lean_ctor_get(x_1192, 1); -lean_inc(x_1195); -lean_dec(x_1192); -x_1196 = lean_ctor_get(x_1194, 1); -lean_inc(x_1196); -lean_dec(x_1194); -x_1197 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1196, x_7, x_8, x_1195); -x_1198 = lean_ctor_get(x_1197, 0); -lean_inc(x_1198); -x_1199 = !lean_is_exclusive(x_1198); -if (x_1199 == 0) -{ -lean_object* x_1200; lean_object* x_1201; uint8_t x_1202; -x_1200 = lean_ctor_get(x_1198, 0); -x_1201 = lean_ctor_get(x_1197, 1); -lean_inc(x_1201); -lean_dec(x_1197); -x_1202 = !lean_is_exclusive(x_1200); -if (x_1202 == 0) -{ -lean_object* x_1203; lean_object* x_1204; lean_object* x_1205; lean_object* x_1243; lean_object* x_1244; uint8_t x_1245; -x_1203 = lean_ctor_get(x_1200, 0); -x_1243 = l_Lean_Core_getTraceState___rarg(x_8, x_1201); -x_1244 = lean_ctor_get(x_1243, 0); -lean_inc(x_1244); -x_1245 = lean_ctor_get_uint8(x_1244, sizeof(void*)*1); -lean_dec(x_1244); -if (x_1245 == 0) -{ -lean_object* x_1246; lean_object* x_1247; -x_1246 = lean_ctor_get(x_1243, 1); -lean_inc(x_1246); -lean_dec(x_1243); -x_1247 = lean_box(x_226); -lean_ctor_set(x_1200, 0, x_1247); -x_1204 = x_1198; -x_1205 = x_1246; -goto block_1242; -} -else -{ -lean_object* x_1248; lean_object* x_1249; lean_object* x_1250; lean_object* x_1251; lean_object* x_1252; -x_1248 = lean_ctor_get(x_1243, 1); -lean_inc(x_1248); -lean_dec(x_1243); -x_1249 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1250 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1249, x_7, x_8, x_1248); -x_1251 = lean_ctor_get(x_1250, 0); -lean_inc(x_1251); -x_1252 = lean_ctor_get(x_1250, 1); -lean_inc(x_1252); -lean_dec(x_1250); -lean_ctor_set(x_1200, 0, x_1251); -x_1204 = x_1198; -x_1205 = x_1252; -goto block_1242; -} -block_1242: -{ -uint8_t x_1206; -x_1206 = !lean_is_exclusive(x_1204); -if (x_1206 == 0) -{ -lean_object* x_1207; lean_object* x_1208; uint8_t x_1209; -x_1207 = lean_ctor_get(x_1204, 0); -x_1208 = lean_ctor_get(x_1207, 0); -lean_inc(x_1208); -x_1209 = lean_unbox(x_1208); -lean_dec(x_1208); -if (x_1209 == 0) -{ -uint8_t x_1210; -lean_dec(x_1203); -lean_dec(x_5); -x_1210 = !lean_is_exclusive(x_1207); -if (x_1210 == 0) -{ -lean_object* x_1211; lean_object* x_1212; -x_1211 = lean_ctor_get(x_1207, 0); -lean_dec(x_1211); -x_1212 = lean_box(0); -lean_ctor_set(x_1207, 0, x_1212); -x_267 = x_1204; -x_268 = x_1205; -goto block_328; -} -else -{ -lean_object* x_1213; lean_object* x_1214; lean_object* x_1215; -x_1213 = lean_ctor_get(x_1207, 1); -lean_inc(x_1213); -lean_dec(x_1207); -x_1214 = lean_box(0); -x_1215 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1215, 0, x_1214); -lean_ctor_set(x_1215, 1, x_1213); -lean_ctor_set(x_1204, 0, x_1215); -x_267 = x_1204; -x_268 = x_1205; -goto block_328; -} -} -else -{ -lean_object* x_1216; lean_object* x_1217; lean_object* x_1218; lean_object* x_1219; lean_object* x_1220; lean_object* x_1221; lean_object* x_1222; lean_object* x_1223; lean_object* x_1224; -lean_free_object(x_1204); -x_1216 = lean_ctor_get(x_1207, 1); -lean_inc(x_1216); -lean_dec(x_1207); -x_1217 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1203); -x_1218 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1218, 0, x_1217); -x_1219 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1220 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1220, 0, x_1219); -lean_ctor_set(x_1220, 1, x_1218); -x_1221 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1222 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1221, x_1220, x_5, x_1216, x_7, x_8, x_1205); -lean_dec(x_5); -x_1223 = lean_ctor_get(x_1222, 0); -lean_inc(x_1223); -x_1224 = lean_ctor_get(x_1222, 1); -lean_inc(x_1224); -lean_dec(x_1222); -x_267 = x_1223; -x_268 = x_1224; -goto block_328; -} -} -else -{ -lean_object* x_1225; lean_object* x_1226; uint8_t x_1227; -x_1225 = lean_ctor_get(x_1204, 0); -lean_inc(x_1225); -lean_dec(x_1204); -x_1226 = lean_ctor_get(x_1225, 0); -lean_inc(x_1226); -x_1227 = lean_unbox(x_1226); -lean_dec(x_1226); -if (x_1227 == 0) -{ -lean_object* x_1228; lean_object* x_1229; lean_object* x_1230; lean_object* x_1231; lean_object* x_1232; -lean_dec(x_1203); -lean_dec(x_5); -x_1228 = lean_ctor_get(x_1225, 1); -lean_inc(x_1228); -if (lean_is_exclusive(x_1225)) { - lean_ctor_release(x_1225, 0); - lean_ctor_release(x_1225, 1); - x_1229 = x_1225; -} else { - lean_dec_ref(x_1225); - x_1229 = lean_box(0); -} -x_1230 = lean_box(0); -if (lean_is_scalar(x_1229)) { - x_1231 = lean_alloc_ctor(0, 2, 0); -} else { - x_1231 = x_1229; -} -lean_ctor_set(x_1231, 0, x_1230); -lean_ctor_set(x_1231, 1, x_1228); -x_1232 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_1232, 0, x_1231); -x_267 = x_1232; -x_268 = x_1205; -goto block_328; -} -else -{ -lean_object* x_1233; lean_object* x_1234; lean_object* x_1235; lean_object* x_1236; lean_object* x_1237; lean_object* x_1238; lean_object* x_1239; lean_object* x_1240; lean_object* x_1241; -x_1233 = lean_ctor_get(x_1225, 1); -lean_inc(x_1233); -lean_dec(x_1225); -x_1234 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1203); -x_1235 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1235, 0, x_1234); -x_1236 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1237 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1237, 0, x_1236); -lean_ctor_set(x_1237, 1, x_1235); -x_1238 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1239 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1238, x_1237, x_5, x_1233, x_7, x_8, x_1205); -lean_dec(x_5); -x_1240 = lean_ctor_get(x_1239, 0); -lean_inc(x_1240); -x_1241 = lean_ctor_get(x_1239, 1); -lean_inc(x_1241); -lean_dec(x_1239); -x_267 = x_1240; -x_268 = x_1241; -goto block_328; -} -} -} -} -else -{ -lean_object* x_1253; lean_object* x_1254; lean_object* x_1255; lean_object* x_1256; lean_object* x_1276; lean_object* x_1277; uint8_t x_1278; -x_1253 = lean_ctor_get(x_1200, 0); -x_1254 = lean_ctor_get(x_1200, 1); -lean_inc(x_1254); -lean_inc(x_1253); -lean_dec(x_1200); -x_1276 = l_Lean_Core_getTraceState___rarg(x_8, x_1201); -x_1277 = lean_ctor_get(x_1276, 0); -lean_inc(x_1277); -x_1278 = lean_ctor_get_uint8(x_1277, sizeof(void*)*1); -lean_dec(x_1277); -if (x_1278 == 0) -{ -lean_object* x_1279; lean_object* x_1280; lean_object* x_1281; -x_1279 = lean_ctor_get(x_1276, 1); -lean_inc(x_1279); -lean_dec(x_1276); -x_1280 = lean_box(x_226); -x_1281 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1281, 0, x_1280); -lean_ctor_set(x_1281, 1, x_1254); -lean_ctor_set(x_1198, 0, x_1281); -x_1255 = x_1198; -x_1256 = x_1279; -goto block_1275; -} -else -{ -lean_object* x_1282; lean_object* x_1283; lean_object* x_1284; lean_object* x_1285; lean_object* x_1286; lean_object* x_1287; -x_1282 = lean_ctor_get(x_1276, 1); -lean_inc(x_1282); -lean_dec(x_1276); -x_1283 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1284 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1283, x_7, x_8, x_1282); -x_1285 = lean_ctor_get(x_1284, 0); -lean_inc(x_1285); -x_1286 = lean_ctor_get(x_1284, 1); -lean_inc(x_1286); -lean_dec(x_1284); -x_1287 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1287, 0, x_1285); -lean_ctor_set(x_1287, 1, x_1254); -lean_ctor_set(x_1198, 0, x_1287); -x_1255 = x_1198; -x_1256 = x_1286; -goto block_1275; -} -block_1275: -{ -lean_object* x_1257; lean_object* x_1258; lean_object* x_1259; uint8_t x_1260; -x_1257 = lean_ctor_get(x_1255, 0); -lean_inc(x_1257); -if (lean_is_exclusive(x_1255)) { - lean_ctor_release(x_1255, 0); - x_1258 = x_1255; -} else { - lean_dec_ref(x_1255); - x_1258 = lean_box(0); -} -x_1259 = lean_ctor_get(x_1257, 0); -lean_inc(x_1259); -x_1260 = lean_unbox(x_1259); -lean_dec(x_1259); -if (x_1260 == 0) -{ -lean_object* x_1261; lean_object* x_1262; lean_object* x_1263; lean_object* x_1264; lean_object* x_1265; -lean_dec(x_1253); -lean_dec(x_5); -x_1261 = lean_ctor_get(x_1257, 1); -lean_inc(x_1261); -if (lean_is_exclusive(x_1257)) { - lean_ctor_release(x_1257, 0); - lean_ctor_release(x_1257, 1); - x_1262 = x_1257; -} else { - lean_dec_ref(x_1257); - x_1262 = lean_box(0); -} -x_1263 = lean_box(0); -if (lean_is_scalar(x_1262)) { - x_1264 = lean_alloc_ctor(0, 2, 0); -} else { - x_1264 = x_1262; -} -lean_ctor_set(x_1264, 0, x_1263); -lean_ctor_set(x_1264, 1, x_1261); -if (lean_is_scalar(x_1258)) { - x_1265 = lean_alloc_ctor(1, 1, 0); -} else { - x_1265 = x_1258; -} -lean_ctor_set(x_1265, 0, x_1264); -x_267 = x_1265; -x_268 = x_1256; -goto block_328; -} -else -{ -lean_object* x_1266; lean_object* x_1267; lean_object* x_1268; lean_object* x_1269; lean_object* x_1270; lean_object* x_1271; lean_object* x_1272; lean_object* x_1273; lean_object* x_1274; -lean_dec(x_1258); -x_1266 = lean_ctor_get(x_1257, 1); -lean_inc(x_1266); -lean_dec(x_1257); -x_1267 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1253); -x_1268 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1268, 0, x_1267); -x_1269 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1270 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1270, 0, x_1269); -lean_ctor_set(x_1270, 1, x_1268); -x_1271 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1272 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1271, x_1270, x_5, x_1266, x_7, x_8, x_1256); -lean_dec(x_5); -x_1273 = lean_ctor_get(x_1272, 0); -lean_inc(x_1273); -x_1274 = lean_ctor_get(x_1272, 1); -lean_inc(x_1274); -lean_dec(x_1272); -x_267 = x_1273; -x_268 = x_1274; -goto block_328; -} -} -} -} -else -{ -lean_object* x_1288; lean_object* x_1289; lean_object* x_1290; lean_object* x_1291; lean_object* x_1292; lean_object* x_1293; lean_object* x_1294; lean_object* x_1314; lean_object* x_1315; uint8_t x_1316; -x_1288 = lean_ctor_get(x_1198, 0); -lean_inc(x_1288); -lean_dec(x_1198); -x_1289 = lean_ctor_get(x_1197, 1); -lean_inc(x_1289); -lean_dec(x_1197); -x_1290 = lean_ctor_get(x_1288, 0); -lean_inc(x_1290); -x_1291 = lean_ctor_get(x_1288, 1); -lean_inc(x_1291); -if (lean_is_exclusive(x_1288)) { - lean_ctor_release(x_1288, 0); - lean_ctor_release(x_1288, 1); - x_1292 = x_1288; -} else { - lean_dec_ref(x_1288); - x_1292 = lean_box(0); -} -x_1314 = l_Lean_Core_getTraceState___rarg(x_8, x_1289); -x_1315 = lean_ctor_get(x_1314, 0); -lean_inc(x_1315); -x_1316 = lean_ctor_get_uint8(x_1315, sizeof(void*)*1); -lean_dec(x_1315); -if (x_1316 == 0) -{ -lean_object* x_1317; lean_object* x_1318; lean_object* x_1319; lean_object* x_1320; -x_1317 = lean_ctor_get(x_1314, 1); -lean_inc(x_1317); -lean_dec(x_1314); -x_1318 = lean_box(x_226); -if (lean_is_scalar(x_1292)) { - x_1319 = lean_alloc_ctor(0, 2, 0); -} else { - x_1319 = x_1292; -} -lean_ctor_set(x_1319, 0, x_1318); -lean_ctor_set(x_1319, 1, x_1291); -x_1320 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_1320, 0, x_1319); -x_1293 = x_1320; -x_1294 = x_1317; -goto block_1313; -} -else -{ -lean_object* x_1321; lean_object* x_1322; lean_object* x_1323; lean_object* x_1324; lean_object* x_1325; lean_object* x_1326; lean_object* x_1327; -x_1321 = lean_ctor_get(x_1314, 1); -lean_inc(x_1321); -lean_dec(x_1314); -x_1322 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1323 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1322, x_7, x_8, x_1321); -x_1324 = lean_ctor_get(x_1323, 0); -lean_inc(x_1324); -x_1325 = lean_ctor_get(x_1323, 1); -lean_inc(x_1325); -lean_dec(x_1323); -if (lean_is_scalar(x_1292)) { - x_1326 = lean_alloc_ctor(0, 2, 0); -} else { - x_1326 = x_1292; -} -lean_ctor_set(x_1326, 0, x_1324); -lean_ctor_set(x_1326, 1, x_1291); -x_1327 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_1327, 0, x_1326); -x_1293 = x_1327; -x_1294 = x_1325; -goto block_1313; -} -block_1313: -{ -lean_object* x_1295; lean_object* x_1296; lean_object* x_1297; uint8_t x_1298; -x_1295 = lean_ctor_get(x_1293, 0); -lean_inc(x_1295); -if (lean_is_exclusive(x_1293)) { - lean_ctor_release(x_1293, 0); - x_1296 = x_1293; -} else { - lean_dec_ref(x_1293); - x_1296 = lean_box(0); -} -x_1297 = lean_ctor_get(x_1295, 0); -lean_inc(x_1297); -x_1298 = lean_unbox(x_1297); -lean_dec(x_1297); -if (x_1298 == 0) -{ -lean_object* x_1299; lean_object* x_1300; lean_object* x_1301; lean_object* x_1302; lean_object* x_1303; -lean_dec(x_1290); -lean_dec(x_5); -x_1299 = lean_ctor_get(x_1295, 1); -lean_inc(x_1299); -if (lean_is_exclusive(x_1295)) { - lean_ctor_release(x_1295, 0); - lean_ctor_release(x_1295, 1); - x_1300 = x_1295; -} else { - lean_dec_ref(x_1295); - x_1300 = lean_box(0); -} -x_1301 = lean_box(0); -if (lean_is_scalar(x_1300)) { - x_1302 = lean_alloc_ctor(0, 2, 0); -} else { - x_1302 = x_1300; -} -lean_ctor_set(x_1302, 0, x_1301); -lean_ctor_set(x_1302, 1, x_1299); -if (lean_is_scalar(x_1296)) { - x_1303 = lean_alloc_ctor(1, 1, 0); -} else { - x_1303 = x_1296; -} -lean_ctor_set(x_1303, 0, x_1302); -x_267 = x_1303; -x_268 = x_1294; -goto block_328; -} -else -{ -lean_object* x_1304; lean_object* x_1305; lean_object* x_1306; lean_object* x_1307; lean_object* x_1308; lean_object* x_1309; lean_object* x_1310; lean_object* x_1311; lean_object* x_1312; -lean_dec(x_1296); -x_1304 = lean_ctor_get(x_1295, 1); -lean_inc(x_1304); -lean_dec(x_1295); -x_1305 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1290); -x_1306 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1306, 0, x_1305); -x_1307 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1308 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1308, 0, x_1307); -lean_ctor_set(x_1308, 1, x_1306); -x_1309 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1310 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1309, x_1308, x_5, x_1304, x_7, x_8, x_1294); -lean_dec(x_5); -x_1311 = lean_ctor_get(x_1310, 0); -lean_inc(x_1311); -x_1312 = lean_ctor_get(x_1310, 1); -lean_inc(x_1312); -lean_dec(x_1310); -x_267 = x_1311; -x_268 = x_1312; -goto block_328; -} -} -} -} -else -{ -lean_object* x_1328; lean_object* x_1329; lean_object* x_1330; lean_object* x_1331; lean_object* x_1332; lean_object* x_1333; lean_object* x_1334; lean_object* x_1335; lean_object* x_1336; lean_object* x_1337; lean_object* x_1338; lean_object* x_1339; lean_object* x_1340; lean_object* x_1341; lean_object* x_1342; lean_object* x_1343; lean_object* x_1344; lean_object* x_1345; lean_object* x_1346; lean_object* x_1347; lean_object* x_1348; lean_object* x_1349; lean_object* x_1350; lean_object* x_1351; lean_object* x_1352; lean_object* x_1372; lean_object* x_1373; uint8_t x_1374; -x_1328 = lean_ctor_get(x_1177, 0); -x_1329 = lean_ctor_get(x_1177, 1); -x_1330 = lean_ctor_get(x_1177, 2); -lean_inc(x_1330); -lean_inc(x_1329); -lean_inc(x_1328); -lean_dec(x_1177); -lean_inc(x_1329); -x_1331 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1331, 0, x_1328); -lean_ctor_set(x_1331, 1, x_1329); -lean_ctor_set(x_1331, 2, x_1181); -x_1332 = l_Lean_Syntax_setTailInfo(x_1182, x_1331); -x_1333 = lean_apply_1(x_2, x_1332); -x_1334 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1334, 0, x_1179); -lean_ctor_set(x_1334, 1, x_1180); -lean_ctor_set(x_1334, 2, x_1181); -x_1335 = l_Lean_Syntax_setHeadInfo(x_1333, x_1334); -x_1336 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1336, 0, x_1181); -lean_ctor_set(x_1336, 1, x_1329); -lean_ctor_set(x_1336, 2, x_1330); -x_1337 = l_Lean_Syntax_setTailInfo(x_1335, x_1336); -x_1338 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1337, x_5, x_899, x_7, x_8, x_897); -x_1339 = lean_ctor_get(x_1338, 0); -lean_inc(x_1339); -x_1340 = lean_ctor_get(x_1339, 0); -lean_inc(x_1340); -lean_dec(x_1339); -x_1341 = lean_ctor_get(x_1338, 1); -lean_inc(x_1341); -lean_dec(x_1338); -x_1342 = lean_ctor_get(x_1340, 1); -lean_inc(x_1342); -lean_dec(x_1340); -x_1343 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1342, x_7, x_8, x_1341); -x_1344 = lean_ctor_get(x_1343, 0); -lean_inc(x_1344); -x_1345 = lean_ctor_get(x_1344, 0); -lean_inc(x_1345); -if (lean_is_exclusive(x_1344)) { - lean_ctor_release(x_1344, 0); - x_1346 = x_1344; -} else { - lean_dec_ref(x_1344); - x_1346 = lean_box(0); -} -x_1347 = lean_ctor_get(x_1343, 1); -lean_inc(x_1347); -lean_dec(x_1343); -x_1348 = lean_ctor_get(x_1345, 0); -lean_inc(x_1348); -x_1349 = lean_ctor_get(x_1345, 1); -lean_inc(x_1349); -if (lean_is_exclusive(x_1345)) { - lean_ctor_release(x_1345, 0); - lean_ctor_release(x_1345, 1); - x_1350 = x_1345; -} else { - lean_dec_ref(x_1345); - x_1350 = lean_box(0); -} -x_1372 = l_Lean_Core_getTraceState___rarg(x_8, x_1347); -x_1373 = lean_ctor_get(x_1372, 0); -lean_inc(x_1373); -x_1374 = lean_ctor_get_uint8(x_1373, sizeof(void*)*1); -lean_dec(x_1373); -if (x_1374 == 0) -{ -lean_object* x_1375; lean_object* x_1376; lean_object* x_1377; lean_object* x_1378; -x_1375 = lean_ctor_get(x_1372, 1); -lean_inc(x_1375); -lean_dec(x_1372); -x_1376 = lean_box(x_226); -if (lean_is_scalar(x_1350)) { - x_1377 = lean_alloc_ctor(0, 2, 0); -} else { - x_1377 = x_1350; -} -lean_ctor_set(x_1377, 0, x_1376); -lean_ctor_set(x_1377, 1, x_1349); -if (lean_is_scalar(x_1346)) { - x_1378 = lean_alloc_ctor(1, 1, 0); -} else { - x_1378 = x_1346; -} -lean_ctor_set(x_1378, 0, x_1377); -x_1351 = x_1378; -x_1352 = x_1375; -goto block_1371; -} -else -{ -lean_object* x_1379; lean_object* x_1380; lean_object* x_1381; lean_object* x_1382; lean_object* x_1383; lean_object* x_1384; lean_object* x_1385; -x_1379 = lean_ctor_get(x_1372, 1); -lean_inc(x_1379); -lean_dec(x_1372); -x_1380 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1381 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1380, x_7, x_8, x_1379); -x_1382 = lean_ctor_get(x_1381, 0); -lean_inc(x_1382); -x_1383 = lean_ctor_get(x_1381, 1); -lean_inc(x_1383); -lean_dec(x_1381); -if (lean_is_scalar(x_1350)) { - x_1384 = lean_alloc_ctor(0, 2, 0); -} else { - x_1384 = x_1350; -} -lean_ctor_set(x_1384, 0, x_1382); -lean_ctor_set(x_1384, 1, x_1349); -if (lean_is_scalar(x_1346)) { - x_1385 = lean_alloc_ctor(1, 1, 0); -} else { - x_1385 = x_1346; -} -lean_ctor_set(x_1385, 0, x_1384); -x_1351 = x_1385; -x_1352 = x_1383; -goto block_1371; -} -block_1371: -{ -lean_object* x_1353; lean_object* x_1354; lean_object* x_1355; uint8_t x_1356; -x_1353 = lean_ctor_get(x_1351, 0); -lean_inc(x_1353); -if (lean_is_exclusive(x_1351)) { - lean_ctor_release(x_1351, 0); - x_1354 = x_1351; -} else { - lean_dec_ref(x_1351); - x_1354 = lean_box(0); -} -x_1355 = lean_ctor_get(x_1353, 0); -lean_inc(x_1355); -x_1356 = lean_unbox(x_1355); -lean_dec(x_1355); -if (x_1356 == 0) -{ -lean_object* x_1357; lean_object* x_1358; lean_object* x_1359; lean_object* x_1360; lean_object* x_1361; -lean_dec(x_1348); -lean_dec(x_5); -x_1357 = lean_ctor_get(x_1353, 1); -lean_inc(x_1357); -if (lean_is_exclusive(x_1353)) { - lean_ctor_release(x_1353, 0); - lean_ctor_release(x_1353, 1); - x_1358 = x_1353; -} else { - lean_dec_ref(x_1353); - x_1358 = lean_box(0); -} -x_1359 = lean_box(0); -if (lean_is_scalar(x_1358)) { - x_1360 = lean_alloc_ctor(0, 2, 0); -} else { - x_1360 = x_1358; -} -lean_ctor_set(x_1360, 0, x_1359); -lean_ctor_set(x_1360, 1, x_1357); -if (lean_is_scalar(x_1354)) { - x_1361 = lean_alloc_ctor(1, 1, 0); -} else { - x_1361 = x_1354; -} -lean_ctor_set(x_1361, 0, x_1360); -x_267 = x_1361; -x_268 = x_1352; -goto block_328; -} -else -{ -lean_object* x_1362; lean_object* x_1363; lean_object* x_1364; lean_object* x_1365; lean_object* x_1366; lean_object* x_1367; lean_object* x_1368; lean_object* x_1369; lean_object* x_1370; -lean_dec(x_1354); -x_1362 = lean_ctor_get(x_1353, 1); -lean_inc(x_1362); -lean_dec(x_1353); -x_1363 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1348); -x_1364 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1364, 0, x_1363); -x_1365 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1366 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1366, 0, x_1365); -lean_ctor_set(x_1366, 1, x_1364); -x_1367 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1368 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1367, x_1366, x_5, x_1362, x_7, x_8, x_1352); -lean_dec(x_5); -x_1369 = lean_ctor_get(x_1368, 0); -lean_inc(x_1369); -x_1370 = lean_ctor_get(x_1368, 1); -lean_inc(x_1370); -lean_dec(x_1368); -x_267 = x_1369; -x_268 = x_1370; -goto block_328; -} -} -} -} -else -{ -lean_object* x_1386; lean_object* x_1387; lean_object* x_1388; lean_object* x_1389; lean_object* x_1390; lean_object* x_1391; lean_object* x_1392; lean_object* x_1393; lean_object* x_1394; lean_object* x_1395; lean_object* x_1396; lean_object* x_1397; lean_object* x_1398; lean_object* x_1399; lean_object* x_1400; lean_object* x_1401; lean_object* x_1402; lean_object* x_1403; lean_object* x_1404; lean_object* x_1405; lean_object* x_1406; lean_object* x_1407; lean_object* x_1408; lean_object* x_1409; lean_object* x_1410; lean_object* x_1411; lean_object* x_1412; lean_object* x_1413; lean_object* x_1414; lean_object* x_1415; lean_object* x_1416; lean_object* x_1417; lean_object* x_1437; lean_object* x_1438; uint8_t x_1439; -x_1386 = lean_ctor_get(x_1038, 0); -x_1387 = lean_ctor_get(x_1038, 1); -x_1388 = lean_ctor_get(x_1038, 2); -lean_inc(x_1388); -lean_inc(x_1387); -lean_inc(x_1386); -lean_dec(x_1038); -x_1389 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_1387); -x_1390 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1390, 0, x_1389); -lean_ctor_set(x_1390, 1, x_1387); -lean_ctor_set(x_1390, 2, x_1388); -x_1391 = l_Lean_Syntax_setHeadInfo(x_898, x_1390); -x_1392 = lean_ctor_get(x_1177, 0); -lean_inc(x_1392); -x_1393 = lean_ctor_get(x_1177, 1); -lean_inc(x_1393); -x_1394 = lean_ctor_get(x_1177, 2); -lean_inc(x_1394); -if (lean_is_exclusive(x_1177)) { - lean_ctor_release(x_1177, 0); - lean_ctor_release(x_1177, 1); - lean_ctor_release(x_1177, 2); - x_1395 = x_1177; -} else { - lean_dec_ref(x_1177); - x_1395 = lean_box(0); -} -lean_inc(x_1393); -if (lean_is_scalar(x_1395)) { - x_1396 = lean_alloc_ctor(0, 3, 0); -} else { - x_1396 = x_1395; -} -lean_ctor_set(x_1396, 0, x_1392); -lean_ctor_set(x_1396, 1, x_1393); -lean_ctor_set(x_1396, 2, x_1389); -x_1397 = l_Lean_Syntax_setTailInfo(x_1391, x_1396); -x_1398 = lean_apply_1(x_2, x_1397); -x_1399 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1399, 0, x_1386); -lean_ctor_set(x_1399, 1, x_1387); -lean_ctor_set(x_1399, 2, x_1389); -x_1400 = l_Lean_Syntax_setHeadInfo(x_1398, x_1399); -x_1401 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1401, 0, x_1389); -lean_ctor_set(x_1401, 1, x_1393); -lean_ctor_set(x_1401, 2, x_1394); -x_1402 = l_Lean_Syntax_setTailInfo(x_1400, x_1401); -x_1403 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1402, x_5, x_899, x_7, x_8, x_897); -x_1404 = lean_ctor_get(x_1403, 0); -lean_inc(x_1404); -x_1405 = lean_ctor_get(x_1404, 0); -lean_inc(x_1405); -lean_dec(x_1404); -x_1406 = lean_ctor_get(x_1403, 1); -lean_inc(x_1406); -lean_dec(x_1403); -x_1407 = lean_ctor_get(x_1405, 1); -lean_inc(x_1407); -lean_dec(x_1405); -x_1408 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1407, x_7, x_8, x_1406); -x_1409 = lean_ctor_get(x_1408, 0); -lean_inc(x_1409); -x_1410 = lean_ctor_get(x_1409, 0); -lean_inc(x_1410); -if (lean_is_exclusive(x_1409)) { - lean_ctor_release(x_1409, 0); - x_1411 = x_1409; -} else { - lean_dec_ref(x_1409); - x_1411 = lean_box(0); -} -x_1412 = lean_ctor_get(x_1408, 1); -lean_inc(x_1412); -lean_dec(x_1408); -x_1413 = lean_ctor_get(x_1410, 0); -lean_inc(x_1413); -x_1414 = lean_ctor_get(x_1410, 1); -lean_inc(x_1414); -if (lean_is_exclusive(x_1410)) { - lean_ctor_release(x_1410, 0); - lean_ctor_release(x_1410, 1); - x_1415 = x_1410; -} else { - lean_dec_ref(x_1410); - x_1415 = lean_box(0); -} -x_1437 = l_Lean_Core_getTraceState___rarg(x_8, x_1412); -x_1438 = lean_ctor_get(x_1437, 0); -lean_inc(x_1438); -x_1439 = lean_ctor_get_uint8(x_1438, sizeof(void*)*1); -lean_dec(x_1438); -if (x_1439 == 0) -{ -lean_object* x_1440; lean_object* x_1441; lean_object* x_1442; lean_object* x_1443; -x_1440 = lean_ctor_get(x_1437, 1); -lean_inc(x_1440); -lean_dec(x_1437); -x_1441 = lean_box(x_226); -if (lean_is_scalar(x_1415)) { - x_1442 = lean_alloc_ctor(0, 2, 0); -} else { - x_1442 = x_1415; -} -lean_ctor_set(x_1442, 0, x_1441); -lean_ctor_set(x_1442, 1, x_1414); -if (lean_is_scalar(x_1411)) { - x_1443 = lean_alloc_ctor(1, 1, 0); -} else { - x_1443 = x_1411; -} -lean_ctor_set(x_1443, 0, x_1442); -x_1416 = x_1443; -x_1417 = x_1440; -goto block_1436; -} -else -{ -lean_object* x_1444; lean_object* x_1445; lean_object* x_1446; lean_object* x_1447; lean_object* x_1448; lean_object* x_1449; lean_object* x_1450; -x_1444 = lean_ctor_get(x_1437, 1); -lean_inc(x_1444); -lean_dec(x_1437); -x_1445 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1446 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1445, x_7, x_8, x_1444); -x_1447 = lean_ctor_get(x_1446, 0); -lean_inc(x_1447); -x_1448 = lean_ctor_get(x_1446, 1); -lean_inc(x_1448); -lean_dec(x_1446); -if (lean_is_scalar(x_1415)) { - x_1449 = lean_alloc_ctor(0, 2, 0); -} else { - x_1449 = x_1415; -} -lean_ctor_set(x_1449, 0, x_1447); -lean_ctor_set(x_1449, 1, x_1414); -if (lean_is_scalar(x_1411)) { - x_1450 = lean_alloc_ctor(1, 1, 0); -} else { - x_1450 = x_1411; -} -lean_ctor_set(x_1450, 0, x_1449); -x_1416 = x_1450; -x_1417 = x_1448; -goto block_1436; -} -block_1436: -{ -lean_object* x_1418; lean_object* x_1419; lean_object* x_1420; uint8_t x_1421; -x_1418 = lean_ctor_get(x_1416, 0); -lean_inc(x_1418); -if (lean_is_exclusive(x_1416)) { - lean_ctor_release(x_1416, 0); - x_1419 = x_1416; -} else { - lean_dec_ref(x_1416); - x_1419 = lean_box(0); -} -x_1420 = lean_ctor_get(x_1418, 0); -lean_inc(x_1420); -x_1421 = lean_unbox(x_1420); -lean_dec(x_1420); -if (x_1421 == 0) -{ -lean_object* x_1422; lean_object* x_1423; lean_object* x_1424; lean_object* x_1425; lean_object* x_1426; -lean_dec(x_1413); -lean_dec(x_5); -x_1422 = lean_ctor_get(x_1418, 1); -lean_inc(x_1422); -if (lean_is_exclusive(x_1418)) { - lean_ctor_release(x_1418, 0); - lean_ctor_release(x_1418, 1); - x_1423 = x_1418; -} else { - lean_dec_ref(x_1418); - x_1423 = lean_box(0); -} -x_1424 = lean_box(0); -if (lean_is_scalar(x_1423)) { - x_1425 = lean_alloc_ctor(0, 2, 0); -} else { - x_1425 = x_1423; -} -lean_ctor_set(x_1425, 0, x_1424); -lean_ctor_set(x_1425, 1, x_1422); -if (lean_is_scalar(x_1419)) { - x_1426 = lean_alloc_ctor(1, 1, 0); -} else { - x_1426 = x_1419; -} -lean_ctor_set(x_1426, 0, x_1425); -x_267 = x_1426; -x_268 = x_1417; -goto block_328; -} -else -{ -lean_object* x_1427; lean_object* x_1428; lean_object* x_1429; lean_object* x_1430; lean_object* x_1431; lean_object* x_1432; lean_object* x_1433; lean_object* x_1434; lean_object* x_1435; -lean_dec(x_1419); -x_1427 = lean_ctor_get(x_1418, 1); -lean_inc(x_1427); -lean_dec(x_1418); -x_1428 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_330, x_1413); -x_1429 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1429, 0, x_1428); -x_1430 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1431 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1431, 0, x_1430); -lean_ctor_set(x_1431, 1, x_1429); -x_1432 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1433 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1432, x_1431, x_5, x_1427, x_7, x_8, x_1417); -lean_dec(x_5); -x_1434 = lean_ctor_get(x_1433, 0); -lean_inc(x_1434); -x_1435 = lean_ctor_get(x_1433, 1); -lean_inc(x_1435); -lean_dec(x_1433); -x_267 = x_1434; -x_268 = x_1435; -goto block_328; -} -} -} -} -} -} -} -} -else -{ -lean_object* x_1469; lean_object* x_1470; lean_object* x_1471; lean_object* x_1493; uint8_t x_1850; -x_1469 = lean_ctor_get(x_263, 1); -lean_inc(x_1469); -lean_dec(x_263); -x_1850 = lean_nat_dec_lt(x_259, x_3); -lean_dec(x_259); -if (x_1850 == 0) -{ -if (lean_obj_tag(x_258) == 0) -{ -lean_object* x_1851; lean_object* x_1852; lean_object* x_1853; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_1851 = lean_box(0); -x_1852 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1852, 0, x_1851); -lean_ctor_set(x_1852, 1, x_1469); -lean_ctor_set(x_260, 0, x_1852); -if (lean_is_scalar(x_257)) { - x_1853 = lean_alloc_ctor(0, 2, 0); -} else { - x_1853 = x_257; -} -lean_ctor_set(x_1853, 0, x_260); -lean_ctor_set(x_1853, 1, x_261); -x_24 = x_1853; -goto block_222; -} -else -{ -lean_object* x_1854; -x_1854 = lean_ctor_get(x_23, 1); -lean_inc(x_1854); -if (lean_obj_tag(x_1854) == 0) -{ -lean_object* x_1855; lean_object* x_1856; lean_object* x_1857; -lean_dec(x_258); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_1855 = lean_box(0); -x_1856 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1856, 0, x_1855); -lean_ctor_set(x_1856, 1, x_1469); -lean_ctor_set(x_260, 0, x_1856); -if (lean_is_scalar(x_257)) { - x_1857 = lean_alloc_ctor(0, 2, 0); -} else { - x_1857 = x_257; -} -lean_ctor_set(x_1857, 0, x_260); -lean_ctor_set(x_1857, 1, x_261); -x_24 = x_1857; -goto block_222; -} -else -{ -lean_object* x_1858; lean_object* x_1859; lean_object* x_1860; uint8_t x_1861; -x_1858 = lean_ctor_get(x_258, 0); -lean_inc(x_1858); -lean_dec(x_258); -x_1859 = lean_ctor_get(x_1854, 0); -lean_inc(x_1859); -lean_dec(x_1854); -x_1860 = lean_ctor_get(x_23, 2); -lean_inc(x_1860); -x_1861 = lean_name_eq(x_1, x_1860); -lean_dec(x_1860); -if (x_1861 == 0) -{ -lean_object* x_1862; lean_object* x_1863; lean_object* x_1864; -lean_dec(x_1859); -lean_dec(x_1858); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_1862 = lean_box(0); -x_1863 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1863, 0, x_1862); -lean_ctor_set(x_1863, 1, x_1469); -lean_ctor_set(x_260, 0, x_1863); -if (lean_is_scalar(x_257)) { - x_1864 = lean_alloc_ctor(0, 2, 0); -} else { - x_1864 = x_257; -} -lean_ctor_set(x_1864, 0, x_260); -lean_ctor_set(x_1864, 1, x_261); -x_24 = x_1864; -goto block_222; -} -else -{ -uint8_t x_1865; -x_1865 = lean_nat_dec_le(x_1858, x_1859); -lean_dec(x_1859); -lean_dec(x_1858); -if (x_1865 == 0) -{ -lean_object* x_1866; lean_object* x_1867; lean_object* x_1868; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_1866 = lean_box(0); -x_1867 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_1867, 0, x_1866); -lean_ctor_set(x_1867, 1, x_1469); -lean_ctor_set(x_260, 0, x_1867); -if (lean_is_scalar(x_257)) { - x_1868 = lean_alloc_ctor(0, 2, 0); -} else { - x_1868 = x_257; -} -lean_ctor_set(x_1868, 0, x_260); -lean_ctor_set(x_1868, 1, x_261); -x_24 = x_1868; -goto block_222; -} -else -{ -lean_object* x_1869; -lean_free_object(x_260); -lean_dec(x_257); -x_1869 = lean_box(0); -x_1493 = x_1869; -goto block_1849; -} -} -} -} -} -else -{ -lean_object* x_1870; -lean_free_object(x_260); -lean_dec(x_258); -lean_dec(x_257); -x_1870 = lean_box(0); -x_1493 = x_1870; -goto block_1849; -} -block_1492: -{ -lean_object* x_1472; lean_object* x_1473; lean_object* x_1474; lean_object* x_1475; lean_object* x_1476; lean_object* x_1477; lean_object* x_1478; lean_object* x_1479; lean_object* x_1480; lean_object* x_1481; lean_object* x_1482; lean_object* x_1483; uint8_t x_1484; lean_object* x_1485; lean_object* x_1486; lean_object* x_1487; lean_object* x_1488; lean_object* x_1489; lean_object* x_1490; lean_object* x_1491; -x_1472 = lean_ctor_get(x_1470, 0); -lean_inc(x_1472); -lean_dec(x_1470); -x_1473 = lean_ctor_get(x_1472, 1); -lean_inc(x_1473); -lean_dec(x_1472); -x_1474 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_1473, x_7, x_8, x_1471); -lean_dec(x_8); -lean_dec(x_7); -x_1475 = lean_ctor_get(x_1474, 0); -lean_inc(x_1475); -x_1476 = lean_ctor_get(x_1475, 0); -lean_inc(x_1476); -if (lean_is_exclusive(x_1475)) { - lean_ctor_release(x_1475, 0); - x_1477 = x_1475; -} else { - lean_dec_ref(x_1475); - x_1477 = lean_box(0); -} -x_1478 = lean_ctor_get(x_1476, 1); -lean_inc(x_1478); -if (lean_is_exclusive(x_1476)) { - lean_ctor_release(x_1476, 0); - lean_ctor_release(x_1476, 1); - x_1479 = x_1476; -} else { - lean_dec_ref(x_1476); - x_1479 = lean_box(0); -} -x_1480 = lean_ctor_get(x_1474, 1); -lean_inc(x_1480); -if (lean_is_exclusive(x_1474)) { - lean_ctor_release(x_1474, 0); - lean_ctor_release(x_1474, 1); - x_1481 = x_1474; -} else { - lean_dec_ref(x_1474); - x_1481 = lean_box(0); -} -x_1482 = lean_ctor_get(x_1478, 0); -lean_inc(x_1482); -x_1483 = lean_ctor_get(x_1478, 3); -lean_inc(x_1483); -x_1484 = lean_ctor_get_uint8(x_1478, sizeof(void*)*5); -if (lean_is_exclusive(x_1478)) { - lean_ctor_release(x_1478, 0); - lean_ctor_release(x_1478, 1); - lean_ctor_release(x_1478, 2); - lean_ctor_release(x_1478, 3); - lean_ctor_release(x_1478, 4); - x_1485 = x_1478; -} else { - lean_dec_ref(x_1478); - x_1485 = lean_box(0); -} -x_1486 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_1485)) { - x_1487 = lean_alloc_ctor(0, 5, 1); -} else { - x_1487 = x_1485; -} -lean_ctor_set(x_1487, 0, x_1482); -lean_ctor_set(x_1487, 1, x_1486); -lean_ctor_set(x_1487, 2, x_1); -lean_ctor_set(x_1487, 3, x_1483); -lean_ctor_set(x_1487, 4, x_224); -lean_ctor_set_uint8(x_1487, sizeof(void*)*5, x_1484); -x_1488 = lean_box(0); -if (lean_is_scalar(x_1479)) { - x_1489 = lean_alloc_ctor(0, 2, 0); -} else { - x_1489 = x_1479; -} -lean_ctor_set(x_1489, 0, x_1488); -lean_ctor_set(x_1489, 1, x_1487); -if (lean_is_scalar(x_1477)) { - x_1490 = lean_alloc_ctor(1, 1, 0); -} else { - x_1490 = x_1477; -} -lean_ctor_set(x_1490, 0, x_1489); -if (lean_is_scalar(x_1481)) { - x_1491 = lean_alloc_ctor(0, 2, 0); -} else { - x_1491 = x_1481; -} -lean_ctor_set(x_1491, 0, x_1490); -lean_ctor_set(x_1491, 1, x_1480); -x_24 = x_1491; -goto block_222; -} -block_1849: -{ -lean_object* x_1494; uint8_t x_1495; -lean_dec(x_1493); -x_1494 = lean_unsigned_to_nat(0u); -x_1495 = lean_nat_dec_lt(x_1494, x_22); -lean_dec(x_22); -if (x_1495 == 0) -{ -lean_object* x_1496; lean_object* x_1497; lean_object* x_1498; lean_object* x_1499; lean_object* x_1500; lean_object* x_1501; lean_object* x_1502; -x_1496 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1469, x_7, x_8, x_261); -x_1497 = lean_ctor_get(x_1496, 0); -lean_inc(x_1497); -x_1498 = lean_ctor_get(x_1497, 0); -lean_inc(x_1498); -lean_dec(x_1497); -x_1499 = lean_ctor_get(x_1496, 1); -lean_inc(x_1499); -lean_dec(x_1496); -x_1500 = lean_ctor_get(x_1498, 0); -lean_inc(x_1500); -x_1501 = lean_ctor_get(x_1498, 1); -lean_inc(x_1501); -lean_dec(x_1498); -x_1502 = l_Lean_Syntax_getHeadInfo___main(x_1500); -if (lean_obj_tag(x_1502) == 0) -{ -lean_object* x_1503; lean_object* x_1504; lean_object* x_1505; lean_object* x_1506; lean_object* x_1507; lean_object* x_1508; lean_object* x_1509; lean_object* x_1510; lean_object* x_1511; lean_object* x_1512; lean_object* x_1513; lean_object* x_1514; lean_object* x_1515; lean_object* x_1516; lean_object* x_1517; lean_object* x_1518; lean_object* x_1538; lean_object* x_1539; uint8_t x_1540; -x_1503 = lean_apply_1(x_2, x_1500); -x_1504 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1503, x_5, x_1501, x_7, x_8, x_1499); -x_1505 = lean_ctor_get(x_1504, 0); -lean_inc(x_1505); -x_1506 = lean_ctor_get(x_1505, 0); -lean_inc(x_1506); -lean_dec(x_1505); -x_1507 = lean_ctor_get(x_1504, 1); -lean_inc(x_1507); -lean_dec(x_1504); -x_1508 = lean_ctor_get(x_1506, 1); -lean_inc(x_1508); -lean_dec(x_1506); -x_1509 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1508, x_7, x_8, x_1507); -x_1510 = lean_ctor_get(x_1509, 0); -lean_inc(x_1510); -x_1511 = lean_ctor_get(x_1510, 0); -lean_inc(x_1511); -if (lean_is_exclusive(x_1510)) { - lean_ctor_release(x_1510, 0); - x_1512 = x_1510; -} else { - lean_dec_ref(x_1510); - x_1512 = lean_box(0); -} -x_1513 = lean_ctor_get(x_1509, 1); -lean_inc(x_1513); -lean_dec(x_1509); -x_1514 = lean_ctor_get(x_1511, 0); -lean_inc(x_1514); -x_1515 = lean_ctor_get(x_1511, 1); -lean_inc(x_1515); -if (lean_is_exclusive(x_1511)) { - lean_ctor_release(x_1511, 0); - lean_ctor_release(x_1511, 1); - x_1516 = x_1511; -} else { - lean_dec_ref(x_1511); - x_1516 = lean_box(0); -} -x_1538 = l_Lean_Core_getTraceState___rarg(x_8, x_1513); -x_1539 = lean_ctor_get(x_1538, 0); -lean_inc(x_1539); -x_1540 = lean_ctor_get_uint8(x_1539, sizeof(void*)*1); -lean_dec(x_1539); -if (x_1540 == 0) -{ -lean_object* x_1541; lean_object* x_1542; lean_object* x_1543; lean_object* x_1544; -x_1541 = lean_ctor_get(x_1538, 1); -lean_inc(x_1541); -lean_dec(x_1538); -x_1542 = lean_box(x_226); -if (lean_is_scalar(x_1516)) { - x_1543 = lean_alloc_ctor(0, 2, 0); -} else { - x_1543 = x_1516; -} -lean_ctor_set(x_1543, 0, x_1542); -lean_ctor_set(x_1543, 1, x_1515); -if (lean_is_scalar(x_1512)) { - x_1544 = lean_alloc_ctor(1, 1, 0); -} else { - x_1544 = x_1512; -} -lean_ctor_set(x_1544, 0, x_1543); -x_1517 = x_1544; -x_1518 = x_1541; -goto block_1537; -} -else -{ -lean_object* x_1545; lean_object* x_1546; lean_object* x_1547; lean_object* x_1548; lean_object* x_1549; lean_object* x_1550; lean_object* x_1551; -x_1545 = lean_ctor_get(x_1538, 1); -lean_inc(x_1545); -lean_dec(x_1538); -x_1546 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1547 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1546, x_7, x_8, x_1545); -x_1548 = lean_ctor_get(x_1547, 0); -lean_inc(x_1548); -x_1549 = lean_ctor_get(x_1547, 1); -lean_inc(x_1549); -lean_dec(x_1547); -if (lean_is_scalar(x_1516)) { - x_1550 = lean_alloc_ctor(0, 2, 0); -} else { - x_1550 = x_1516; -} -lean_ctor_set(x_1550, 0, x_1548); -lean_ctor_set(x_1550, 1, x_1515); -if (lean_is_scalar(x_1512)) { - x_1551 = lean_alloc_ctor(1, 1, 0); -} else { - x_1551 = x_1512; -} -lean_ctor_set(x_1551, 0, x_1550); -x_1517 = x_1551; -x_1518 = x_1549; -goto block_1537; -} -block_1537: -{ -lean_object* x_1519; lean_object* x_1520; lean_object* x_1521; uint8_t x_1522; -x_1519 = lean_ctor_get(x_1517, 0); -lean_inc(x_1519); -if (lean_is_exclusive(x_1517)) { - lean_ctor_release(x_1517, 0); - x_1520 = x_1517; -} else { - lean_dec_ref(x_1517); - x_1520 = lean_box(0); -} -x_1521 = lean_ctor_get(x_1519, 0); -lean_inc(x_1521); -x_1522 = lean_unbox(x_1521); -lean_dec(x_1521); -if (x_1522 == 0) -{ -lean_object* x_1523; lean_object* x_1524; lean_object* x_1525; lean_object* x_1526; lean_object* x_1527; -lean_dec(x_1514); -lean_dec(x_5); -x_1523 = lean_ctor_get(x_1519, 1); -lean_inc(x_1523); -if (lean_is_exclusive(x_1519)) { - lean_ctor_release(x_1519, 0); - lean_ctor_release(x_1519, 1); - x_1524 = x_1519; -} else { - lean_dec_ref(x_1519); - x_1524 = lean_box(0); -} -x_1525 = lean_box(0); -if (lean_is_scalar(x_1524)) { - x_1526 = lean_alloc_ctor(0, 2, 0); -} else { - x_1526 = x_1524; -} -lean_ctor_set(x_1526, 0, x_1525); -lean_ctor_set(x_1526, 1, x_1523); -if (lean_is_scalar(x_1520)) { - x_1527 = lean_alloc_ctor(1, 1, 0); -} else { - x_1527 = x_1520; -} -lean_ctor_set(x_1527, 0, x_1526); -x_1470 = x_1527; -x_1471 = x_1518; -goto block_1492; -} -else -{ -lean_object* x_1528; lean_object* x_1529; lean_object* x_1530; lean_object* x_1531; lean_object* x_1532; lean_object* x_1533; lean_object* x_1534; lean_object* x_1535; lean_object* x_1536; -lean_dec(x_1520); -x_1528 = lean_ctor_get(x_1519, 1); -lean_inc(x_1528); -lean_dec(x_1519); -x_1529 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1494, x_1514); -x_1530 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1530, 0, x_1529); -x_1531 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1532 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1532, 0, x_1531); -lean_ctor_set(x_1532, 1, x_1530); -x_1533 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1534 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1533, x_1532, x_5, x_1528, x_7, x_8, x_1518); -lean_dec(x_5); -x_1535 = lean_ctor_get(x_1534, 0); -lean_inc(x_1535); -x_1536 = lean_ctor_get(x_1534, 1); -lean_inc(x_1536); -lean_dec(x_1534); -x_1470 = x_1535; -x_1471 = x_1536; -goto block_1492; -} -} -} -else -{ -lean_object* x_1552; lean_object* x_1553; -x_1552 = lean_ctor_get(x_1502, 0); -lean_inc(x_1552); -lean_dec(x_1502); -x_1553 = l_Lean_Syntax_getTailInfo___main(x_1500); -if (lean_obj_tag(x_1553) == 0) -{ -lean_object* x_1554; lean_object* x_1555; lean_object* x_1556; lean_object* x_1557; lean_object* x_1558; lean_object* x_1559; lean_object* x_1560; lean_object* x_1561; lean_object* x_1562; lean_object* x_1563; lean_object* x_1564; lean_object* x_1565; lean_object* x_1566; lean_object* x_1567; lean_object* x_1568; lean_object* x_1569; lean_object* x_1589; lean_object* x_1590; uint8_t x_1591; -lean_dec(x_1552); -x_1554 = lean_apply_1(x_2, x_1500); -x_1555 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1554, x_5, x_1501, x_7, x_8, x_1499); -x_1556 = lean_ctor_get(x_1555, 0); -lean_inc(x_1556); -x_1557 = lean_ctor_get(x_1556, 0); -lean_inc(x_1557); -lean_dec(x_1556); -x_1558 = lean_ctor_get(x_1555, 1); -lean_inc(x_1558); -lean_dec(x_1555); -x_1559 = lean_ctor_get(x_1557, 1); -lean_inc(x_1559); -lean_dec(x_1557); -x_1560 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1559, x_7, x_8, x_1558); -x_1561 = lean_ctor_get(x_1560, 0); -lean_inc(x_1561); -x_1562 = lean_ctor_get(x_1561, 0); -lean_inc(x_1562); -if (lean_is_exclusive(x_1561)) { - lean_ctor_release(x_1561, 0); - x_1563 = x_1561; -} else { - lean_dec_ref(x_1561); - x_1563 = lean_box(0); -} -x_1564 = lean_ctor_get(x_1560, 1); -lean_inc(x_1564); -lean_dec(x_1560); -x_1565 = lean_ctor_get(x_1562, 0); -lean_inc(x_1565); -x_1566 = lean_ctor_get(x_1562, 1); -lean_inc(x_1566); -if (lean_is_exclusive(x_1562)) { - lean_ctor_release(x_1562, 0); - lean_ctor_release(x_1562, 1); - x_1567 = x_1562; -} else { - lean_dec_ref(x_1562); - x_1567 = lean_box(0); -} -x_1589 = l_Lean_Core_getTraceState___rarg(x_8, x_1564); -x_1590 = lean_ctor_get(x_1589, 0); -lean_inc(x_1590); -x_1591 = lean_ctor_get_uint8(x_1590, sizeof(void*)*1); -lean_dec(x_1590); -if (x_1591 == 0) -{ -lean_object* x_1592; lean_object* x_1593; lean_object* x_1594; lean_object* x_1595; -x_1592 = lean_ctor_get(x_1589, 1); -lean_inc(x_1592); -lean_dec(x_1589); -x_1593 = lean_box(x_226); -if (lean_is_scalar(x_1567)) { - x_1594 = lean_alloc_ctor(0, 2, 0); -} else { - x_1594 = x_1567; -} -lean_ctor_set(x_1594, 0, x_1593); -lean_ctor_set(x_1594, 1, x_1566); -if (lean_is_scalar(x_1563)) { - x_1595 = lean_alloc_ctor(1, 1, 0); -} else { - x_1595 = x_1563; -} -lean_ctor_set(x_1595, 0, x_1594); -x_1568 = x_1595; -x_1569 = x_1592; -goto block_1588; -} -else -{ -lean_object* x_1596; lean_object* x_1597; lean_object* x_1598; lean_object* x_1599; lean_object* x_1600; lean_object* x_1601; lean_object* x_1602; -x_1596 = lean_ctor_get(x_1589, 1); -lean_inc(x_1596); -lean_dec(x_1589); -x_1597 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1598 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1597, x_7, x_8, x_1596); -x_1599 = lean_ctor_get(x_1598, 0); -lean_inc(x_1599); -x_1600 = lean_ctor_get(x_1598, 1); -lean_inc(x_1600); -lean_dec(x_1598); -if (lean_is_scalar(x_1567)) { - x_1601 = lean_alloc_ctor(0, 2, 0); -} else { - x_1601 = x_1567; -} -lean_ctor_set(x_1601, 0, x_1599); -lean_ctor_set(x_1601, 1, x_1566); -if (lean_is_scalar(x_1563)) { - x_1602 = lean_alloc_ctor(1, 1, 0); -} else { - x_1602 = x_1563; -} -lean_ctor_set(x_1602, 0, x_1601); -x_1568 = x_1602; -x_1569 = x_1600; -goto block_1588; -} -block_1588: -{ -lean_object* x_1570; lean_object* x_1571; lean_object* x_1572; uint8_t x_1573; -x_1570 = lean_ctor_get(x_1568, 0); -lean_inc(x_1570); -if (lean_is_exclusive(x_1568)) { - lean_ctor_release(x_1568, 0); - x_1571 = x_1568; -} else { - lean_dec_ref(x_1568); - x_1571 = lean_box(0); -} -x_1572 = lean_ctor_get(x_1570, 0); -lean_inc(x_1572); -x_1573 = lean_unbox(x_1572); -lean_dec(x_1572); -if (x_1573 == 0) -{ -lean_object* x_1574; lean_object* x_1575; lean_object* x_1576; lean_object* x_1577; lean_object* x_1578; -lean_dec(x_1565); -lean_dec(x_5); -x_1574 = lean_ctor_get(x_1570, 1); -lean_inc(x_1574); -if (lean_is_exclusive(x_1570)) { - lean_ctor_release(x_1570, 0); - lean_ctor_release(x_1570, 1); - x_1575 = x_1570; -} else { - lean_dec_ref(x_1570); - x_1575 = lean_box(0); -} -x_1576 = lean_box(0); -if (lean_is_scalar(x_1575)) { - x_1577 = lean_alloc_ctor(0, 2, 0); -} else { - x_1577 = x_1575; -} -lean_ctor_set(x_1577, 0, x_1576); -lean_ctor_set(x_1577, 1, x_1574); -if (lean_is_scalar(x_1571)) { - x_1578 = lean_alloc_ctor(1, 1, 0); -} else { - x_1578 = x_1571; -} -lean_ctor_set(x_1578, 0, x_1577); -x_1470 = x_1578; -x_1471 = x_1569; -goto block_1492; -} -else -{ -lean_object* x_1579; lean_object* x_1580; lean_object* x_1581; lean_object* x_1582; lean_object* x_1583; lean_object* x_1584; lean_object* x_1585; lean_object* x_1586; lean_object* x_1587; -lean_dec(x_1571); -x_1579 = lean_ctor_get(x_1570, 1); -lean_inc(x_1579); -lean_dec(x_1570); -x_1580 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1494, x_1565); -x_1581 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1581, 0, x_1580); -x_1582 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1583 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1583, 0, x_1582); -lean_ctor_set(x_1583, 1, x_1581); -x_1584 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1585 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1584, x_1583, x_5, x_1579, x_7, x_8, x_1569); -lean_dec(x_5); -x_1586 = lean_ctor_get(x_1585, 0); -lean_inc(x_1586); -x_1587 = lean_ctor_get(x_1585, 1); -lean_inc(x_1587); -lean_dec(x_1585); -x_1470 = x_1586; -x_1471 = x_1587; -goto block_1492; -} -} -} -else -{ -lean_object* x_1603; lean_object* x_1604; lean_object* x_1605; lean_object* x_1606; lean_object* x_1607; lean_object* x_1608; lean_object* x_1609; lean_object* x_1610; lean_object* x_1611; lean_object* x_1612; lean_object* x_1613; lean_object* x_1614; lean_object* x_1615; lean_object* x_1616; lean_object* x_1617; lean_object* x_1618; lean_object* x_1619; lean_object* x_1620; lean_object* x_1621; lean_object* x_1622; lean_object* x_1623; lean_object* x_1624; lean_object* x_1625; lean_object* x_1626; lean_object* x_1627; lean_object* x_1628; lean_object* x_1629; lean_object* x_1630; lean_object* x_1631; lean_object* x_1632; lean_object* x_1633; lean_object* x_1634; lean_object* x_1635; lean_object* x_1636; lean_object* x_1656; lean_object* x_1657; uint8_t x_1658; -x_1603 = lean_ctor_get(x_1553, 0); -lean_inc(x_1603); -lean_dec(x_1553); -x_1604 = lean_ctor_get(x_1552, 0); -lean_inc(x_1604); -x_1605 = lean_ctor_get(x_1552, 1); -lean_inc(x_1605); -x_1606 = lean_ctor_get(x_1552, 2); -lean_inc(x_1606); -if (lean_is_exclusive(x_1552)) { - lean_ctor_release(x_1552, 0); - lean_ctor_release(x_1552, 1); - lean_ctor_release(x_1552, 2); - x_1607 = x_1552; -} else { - lean_dec_ref(x_1552); - x_1607 = lean_box(0); -} -x_1608 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_1605); -if (lean_is_scalar(x_1607)) { - x_1609 = lean_alloc_ctor(0, 3, 0); -} else { - x_1609 = x_1607; -} -lean_ctor_set(x_1609, 0, x_1608); -lean_ctor_set(x_1609, 1, x_1605); -lean_ctor_set(x_1609, 2, x_1606); -x_1610 = l_Lean_Syntax_setHeadInfo(x_1500, x_1609); -x_1611 = lean_ctor_get(x_1603, 0); -lean_inc(x_1611); -x_1612 = lean_ctor_get(x_1603, 1); -lean_inc(x_1612); -x_1613 = lean_ctor_get(x_1603, 2); -lean_inc(x_1613); -if (lean_is_exclusive(x_1603)) { - lean_ctor_release(x_1603, 0); - lean_ctor_release(x_1603, 1); - lean_ctor_release(x_1603, 2); - x_1614 = x_1603; -} else { - lean_dec_ref(x_1603); - x_1614 = lean_box(0); -} -lean_inc(x_1612); -if (lean_is_scalar(x_1614)) { - x_1615 = lean_alloc_ctor(0, 3, 0); -} else { - x_1615 = x_1614; -} -lean_ctor_set(x_1615, 0, x_1611); -lean_ctor_set(x_1615, 1, x_1612); -lean_ctor_set(x_1615, 2, x_1608); -x_1616 = l_Lean_Syntax_setTailInfo(x_1610, x_1615); -x_1617 = lean_apply_1(x_2, x_1616); -x_1618 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1618, 0, x_1604); -lean_ctor_set(x_1618, 1, x_1605); -lean_ctor_set(x_1618, 2, x_1608); -x_1619 = l_Lean_Syntax_setHeadInfo(x_1617, x_1618); -x_1620 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1620, 0, x_1608); -lean_ctor_set(x_1620, 1, x_1612); -lean_ctor_set(x_1620, 2, x_1613); -x_1621 = l_Lean_Syntax_setTailInfo(x_1619, x_1620); -x_1622 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1621, x_5, x_1501, x_7, x_8, x_1499); -x_1623 = lean_ctor_get(x_1622, 0); -lean_inc(x_1623); -x_1624 = lean_ctor_get(x_1623, 0); -lean_inc(x_1624); -lean_dec(x_1623); -x_1625 = lean_ctor_get(x_1622, 1); -lean_inc(x_1625); -lean_dec(x_1622); -x_1626 = lean_ctor_get(x_1624, 1); -lean_inc(x_1626); -lean_dec(x_1624); -x_1627 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1626, x_7, x_8, x_1625); -x_1628 = lean_ctor_get(x_1627, 0); -lean_inc(x_1628); -x_1629 = lean_ctor_get(x_1628, 0); -lean_inc(x_1629); -if (lean_is_exclusive(x_1628)) { - lean_ctor_release(x_1628, 0); - x_1630 = x_1628; -} else { - lean_dec_ref(x_1628); - x_1630 = lean_box(0); -} -x_1631 = lean_ctor_get(x_1627, 1); -lean_inc(x_1631); -lean_dec(x_1627); -x_1632 = lean_ctor_get(x_1629, 0); -lean_inc(x_1632); -x_1633 = lean_ctor_get(x_1629, 1); -lean_inc(x_1633); -if (lean_is_exclusive(x_1629)) { - lean_ctor_release(x_1629, 0); - lean_ctor_release(x_1629, 1); - x_1634 = x_1629; -} else { - lean_dec_ref(x_1629); - x_1634 = lean_box(0); -} -x_1656 = l_Lean_Core_getTraceState___rarg(x_8, x_1631); -x_1657 = lean_ctor_get(x_1656, 0); -lean_inc(x_1657); -x_1658 = lean_ctor_get_uint8(x_1657, sizeof(void*)*1); -lean_dec(x_1657); -if (x_1658 == 0) -{ -lean_object* x_1659; lean_object* x_1660; lean_object* x_1661; lean_object* x_1662; -x_1659 = lean_ctor_get(x_1656, 1); -lean_inc(x_1659); -lean_dec(x_1656); -x_1660 = lean_box(x_226); -if (lean_is_scalar(x_1634)) { - x_1661 = lean_alloc_ctor(0, 2, 0); -} else { - x_1661 = x_1634; -} -lean_ctor_set(x_1661, 0, x_1660); -lean_ctor_set(x_1661, 1, x_1633); -if (lean_is_scalar(x_1630)) { - x_1662 = lean_alloc_ctor(1, 1, 0); -} else { - x_1662 = x_1630; -} -lean_ctor_set(x_1662, 0, x_1661); -x_1635 = x_1662; -x_1636 = x_1659; -goto block_1655; -} -else -{ -lean_object* x_1663; lean_object* x_1664; lean_object* x_1665; lean_object* x_1666; lean_object* x_1667; lean_object* x_1668; lean_object* x_1669; -x_1663 = lean_ctor_get(x_1656, 1); -lean_inc(x_1663); -lean_dec(x_1656); -x_1664 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1665 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1664, x_7, x_8, x_1663); -x_1666 = lean_ctor_get(x_1665, 0); -lean_inc(x_1666); -x_1667 = lean_ctor_get(x_1665, 1); -lean_inc(x_1667); -lean_dec(x_1665); -if (lean_is_scalar(x_1634)) { - x_1668 = lean_alloc_ctor(0, 2, 0); -} else { - x_1668 = x_1634; -} -lean_ctor_set(x_1668, 0, x_1666); -lean_ctor_set(x_1668, 1, x_1633); -if (lean_is_scalar(x_1630)) { - x_1669 = lean_alloc_ctor(1, 1, 0); -} else { - x_1669 = x_1630; -} -lean_ctor_set(x_1669, 0, x_1668); -x_1635 = x_1669; -x_1636 = x_1667; -goto block_1655; -} -block_1655: -{ -lean_object* x_1637; lean_object* x_1638; lean_object* x_1639; uint8_t x_1640; -x_1637 = lean_ctor_get(x_1635, 0); -lean_inc(x_1637); -if (lean_is_exclusive(x_1635)) { - lean_ctor_release(x_1635, 0); - x_1638 = x_1635; -} else { - lean_dec_ref(x_1635); - x_1638 = lean_box(0); -} -x_1639 = lean_ctor_get(x_1637, 0); -lean_inc(x_1639); -x_1640 = lean_unbox(x_1639); -lean_dec(x_1639); -if (x_1640 == 0) -{ -lean_object* x_1641; lean_object* x_1642; lean_object* x_1643; lean_object* x_1644; lean_object* x_1645; -lean_dec(x_1632); -lean_dec(x_5); -x_1641 = lean_ctor_get(x_1637, 1); -lean_inc(x_1641); -if (lean_is_exclusive(x_1637)) { - lean_ctor_release(x_1637, 0); - lean_ctor_release(x_1637, 1); - x_1642 = x_1637; -} else { - lean_dec_ref(x_1637); - x_1642 = lean_box(0); -} -x_1643 = lean_box(0); -if (lean_is_scalar(x_1642)) { - x_1644 = lean_alloc_ctor(0, 2, 0); -} else { - x_1644 = x_1642; -} -lean_ctor_set(x_1644, 0, x_1643); -lean_ctor_set(x_1644, 1, x_1641); -if (lean_is_scalar(x_1638)) { - x_1645 = lean_alloc_ctor(1, 1, 0); -} else { - x_1645 = x_1638; -} -lean_ctor_set(x_1645, 0, x_1644); -x_1470 = x_1645; -x_1471 = x_1636; -goto block_1492; -} -else -{ -lean_object* x_1646; lean_object* x_1647; lean_object* x_1648; lean_object* x_1649; lean_object* x_1650; lean_object* x_1651; lean_object* x_1652; lean_object* x_1653; lean_object* x_1654; -lean_dec(x_1638); -x_1646 = lean_ctor_get(x_1637, 1); -lean_inc(x_1646); -lean_dec(x_1637); -x_1647 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1494, x_1632); -x_1648 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1648, 0, x_1647); -x_1649 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1650 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1650, 0, x_1649); -lean_ctor_set(x_1650, 1, x_1648); -x_1651 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1652 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1651, x_1650, x_5, x_1646, x_7, x_8, x_1636); -lean_dec(x_5); -x_1653 = lean_ctor_get(x_1652, 0); -lean_inc(x_1653); -x_1654 = lean_ctor_get(x_1652, 1); -lean_inc(x_1654); -lean_dec(x_1652); -x_1470 = x_1653; -x_1471 = x_1654; -goto block_1492; -} -} -} -} -} -else -{ -lean_object* x_1670; lean_object* x_1671; lean_object* x_1672; lean_object* x_1673; lean_object* x_1674; lean_object* x_1675; lean_object* x_1676; lean_object* x_1677; lean_object* x_1678; lean_object* x_1679; lean_object* x_1680; lean_object* x_1681; -x_1670 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_1469, x_7, x_8, x_261); -x_1671 = lean_ctor_get(x_1670, 0); -lean_inc(x_1671); -x_1672 = lean_ctor_get(x_1671, 0); -lean_inc(x_1672); -lean_dec(x_1671); -x_1673 = lean_ctor_get(x_1670, 1); -lean_inc(x_1673); -lean_dec(x_1670); -x_1674 = lean_ctor_get(x_1672, 1); -lean_inc(x_1674); -lean_dec(x_1672); -x_1675 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1674, x_7, x_8, x_1673); -x_1676 = lean_ctor_get(x_1675, 0); -lean_inc(x_1676); -x_1677 = lean_ctor_get(x_1676, 0); -lean_inc(x_1677); -lean_dec(x_1676); -x_1678 = lean_ctor_get(x_1675, 1); -lean_inc(x_1678); -lean_dec(x_1675); -x_1679 = lean_ctor_get(x_1677, 0); -lean_inc(x_1679); -x_1680 = lean_ctor_get(x_1677, 1); -lean_inc(x_1680); -lean_dec(x_1677); -x_1681 = l_Lean_Syntax_getHeadInfo___main(x_1679); -if (lean_obj_tag(x_1681) == 0) -{ -lean_object* x_1682; lean_object* x_1683; lean_object* x_1684; lean_object* x_1685; lean_object* x_1686; lean_object* x_1687; lean_object* x_1688; lean_object* x_1689; lean_object* x_1690; lean_object* x_1691; lean_object* x_1692; lean_object* x_1693; lean_object* x_1694; lean_object* x_1695; lean_object* x_1696; lean_object* x_1697; lean_object* x_1717; lean_object* x_1718; uint8_t x_1719; -x_1682 = lean_apply_1(x_2, x_1679); -x_1683 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1682, x_5, x_1680, x_7, x_8, x_1678); -x_1684 = lean_ctor_get(x_1683, 0); -lean_inc(x_1684); -x_1685 = lean_ctor_get(x_1684, 0); -lean_inc(x_1685); -lean_dec(x_1684); -x_1686 = lean_ctor_get(x_1683, 1); -lean_inc(x_1686); -lean_dec(x_1683); -x_1687 = lean_ctor_get(x_1685, 1); -lean_inc(x_1687); -lean_dec(x_1685); -x_1688 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1687, x_7, x_8, x_1686); -x_1689 = lean_ctor_get(x_1688, 0); -lean_inc(x_1689); -x_1690 = lean_ctor_get(x_1689, 0); -lean_inc(x_1690); -if (lean_is_exclusive(x_1689)) { - lean_ctor_release(x_1689, 0); - x_1691 = x_1689; -} else { - lean_dec_ref(x_1689); - x_1691 = lean_box(0); -} -x_1692 = lean_ctor_get(x_1688, 1); -lean_inc(x_1692); -lean_dec(x_1688); -x_1693 = lean_ctor_get(x_1690, 0); -lean_inc(x_1693); -x_1694 = lean_ctor_get(x_1690, 1); -lean_inc(x_1694); -if (lean_is_exclusive(x_1690)) { - lean_ctor_release(x_1690, 0); - lean_ctor_release(x_1690, 1); - x_1695 = x_1690; -} else { - lean_dec_ref(x_1690); - x_1695 = lean_box(0); -} -x_1717 = l_Lean_Core_getTraceState___rarg(x_8, x_1692); -x_1718 = lean_ctor_get(x_1717, 0); -lean_inc(x_1718); -x_1719 = lean_ctor_get_uint8(x_1718, sizeof(void*)*1); -lean_dec(x_1718); -if (x_1719 == 0) -{ -lean_object* x_1720; lean_object* x_1721; lean_object* x_1722; lean_object* x_1723; -x_1720 = lean_ctor_get(x_1717, 1); -lean_inc(x_1720); -lean_dec(x_1717); -x_1721 = lean_box(x_226); -if (lean_is_scalar(x_1695)) { - x_1722 = lean_alloc_ctor(0, 2, 0); -} else { - x_1722 = x_1695; -} -lean_ctor_set(x_1722, 0, x_1721); -lean_ctor_set(x_1722, 1, x_1694); -if (lean_is_scalar(x_1691)) { - x_1723 = lean_alloc_ctor(1, 1, 0); -} else { - x_1723 = x_1691; -} -lean_ctor_set(x_1723, 0, x_1722); -x_1696 = x_1723; -x_1697 = x_1720; -goto block_1716; -} -else -{ -lean_object* x_1724; lean_object* x_1725; lean_object* x_1726; lean_object* x_1727; lean_object* x_1728; lean_object* x_1729; lean_object* x_1730; -x_1724 = lean_ctor_get(x_1717, 1); -lean_inc(x_1724); -lean_dec(x_1717); -x_1725 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1726 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1725, x_7, x_8, x_1724); -x_1727 = lean_ctor_get(x_1726, 0); -lean_inc(x_1727); -x_1728 = lean_ctor_get(x_1726, 1); -lean_inc(x_1728); -lean_dec(x_1726); -if (lean_is_scalar(x_1695)) { - x_1729 = lean_alloc_ctor(0, 2, 0); -} else { - x_1729 = x_1695; -} -lean_ctor_set(x_1729, 0, x_1727); -lean_ctor_set(x_1729, 1, x_1694); -if (lean_is_scalar(x_1691)) { - x_1730 = lean_alloc_ctor(1, 1, 0); -} else { - x_1730 = x_1691; -} -lean_ctor_set(x_1730, 0, x_1729); -x_1696 = x_1730; -x_1697 = x_1728; -goto block_1716; -} -block_1716: -{ -lean_object* x_1698; lean_object* x_1699; lean_object* x_1700; uint8_t x_1701; -x_1698 = lean_ctor_get(x_1696, 0); -lean_inc(x_1698); -if (lean_is_exclusive(x_1696)) { - lean_ctor_release(x_1696, 0); - x_1699 = x_1696; -} else { - lean_dec_ref(x_1696); - x_1699 = lean_box(0); -} -x_1700 = lean_ctor_get(x_1698, 0); -lean_inc(x_1700); -x_1701 = lean_unbox(x_1700); -lean_dec(x_1700); -if (x_1701 == 0) -{ -lean_object* x_1702; lean_object* x_1703; lean_object* x_1704; lean_object* x_1705; lean_object* x_1706; -lean_dec(x_1693); -lean_dec(x_5); -x_1702 = lean_ctor_get(x_1698, 1); -lean_inc(x_1702); -if (lean_is_exclusive(x_1698)) { - lean_ctor_release(x_1698, 0); - lean_ctor_release(x_1698, 1); - x_1703 = x_1698; -} else { - lean_dec_ref(x_1698); - x_1703 = lean_box(0); -} -x_1704 = lean_box(0); -if (lean_is_scalar(x_1703)) { - x_1705 = lean_alloc_ctor(0, 2, 0); -} else { - x_1705 = x_1703; -} -lean_ctor_set(x_1705, 0, x_1704); -lean_ctor_set(x_1705, 1, x_1702); -if (lean_is_scalar(x_1699)) { - x_1706 = lean_alloc_ctor(1, 1, 0); -} else { - x_1706 = x_1699; -} -lean_ctor_set(x_1706, 0, x_1705); -x_1470 = x_1706; -x_1471 = x_1697; -goto block_1492; -} -else -{ -lean_object* x_1707; lean_object* x_1708; lean_object* x_1709; lean_object* x_1710; lean_object* x_1711; lean_object* x_1712; lean_object* x_1713; lean_object* x_1714; lean_object* x_1715; -lean_dec(x_1699); -x_1707 = lean_ctor_get(x_1698, 1); -lean_inc(x_1707); -lean_dec(x_1698); -x_1708 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1494, x_1693); -x_1709 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1709, 0, x_1708); -x_1710 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1711 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1711, 0, x_1710); -lean_ctor_set(x_1711, 1, x_1709); -x_1712 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1713 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1712, x_1711, x_5, x_1707, x_7, x_8, x_1697); -lean_dec(x_5); -x_1714 = lean_ctor_get(x_1713, 0); -lean_inc(x_1714); -x_1715 = lean_ctor_get(x_1713, 1); -lean_inc(x_1715); -lean_dec(x_1713); -x_1470 = x_1714; -x_1471 = x_1715; -goto block_1492; -} -} -} -else -{ -lean_object* x_1731; lean_object* x_1732; -x_1731 = lean_ctor_get(x_1681, 0); -lean_inc(x_1731); -lean_dec(x_1681); -x_1732 = l_Lean_Syntax_getTailInfo___main(x_1679); -if (lean_obj_tag(x_1732) == 0) -{ -lean_object* x_1733; lean_object* x_1734; lean_object* x_1735; lean_object* x_1736; lean_object* x_1737; lean_object* x_1738; lean_object* x_1739; lean_object* x_1740; lean_object* x_1741; lean_object* x_1742; lean_object* x_1743; lean_object* x_1744; lean_object* x_1745; lean_object* x_1746; lean_object* x_1747; lean_object* x_1748; lean_object* x_1768; lean_object* x_1769; uint8_t x_1770; -lean_dec(x_1731); -x_1733 = lean_apply_1(x_2, x_1679); -x_1734 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1733, x_5, x_1680, x_7, x_8, x_1678); -x_1735 = lean_ctor_get(x_1734, 0); -lean_inc(x_1735); -x_1736 = lean_ctor_get(x_1735, 0); -lean_inc(x_1736); -lean_dec(x_1735); -x_1737 = lean_ctor_get(x_1734, 1); -lean_inc(x_1737); -lean_dec(x_1734); -x_1738 = lean_ctor_get(x_1736, 1); -lean_inc(x_1738); -lean_dec(x_1736); -x_1739 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1738, x_7, x_8, x_1737); -x_1740 = lean_ctor_get(x_1739, 0); -lean_inc(x_1740); -x_1741 = lean_ctor_get(x_1740, 0); -lean_inc(x_1741); -if (lean_is_exclusive(x_1740)) { - lean_ctor_release(x_1740, 0); - x_1742 = x_1740; -} else { - lean_dec_ref(x_1740); - x_1742 = lean_box(0); -} -x_1743 = lean_ctor_get(x_1739, 1); -lean_inc(x_1743); -lean_dec(x_1739); -x_1744 = lean_ctor_get(x_1741, 0); -lean_inc(x_1744); -x_1745 = lean_ctor_get(x_1741, 1); -lean_inc(x_1745); -if (lean_is_exclusive(x_1741)) { - lean_ctor_release(x_1741, 0); - lean_ctor_release(x_1741, 1); - x_1746 = x_1741; -} else { - lean_dec_ref(x_1741); - x_1746 = lean_box(0); -} -x_1768 = l_Lean_Core_getTraceState___rarg(x_8, x_1743); -x_1769 = lean_ctor_get(x_1768, 0); -lean_inc(x_1769); -x_1770 = lean_ctor_get_uint8(x_1769, sizeof(void*)*1); -lean_dec(x_1769); -if (x_1770 == 0) -{ -lean_object* x_1771; lean_object* x_1772; lean_object* x_1773; lean_object* x_1774; -x_1771 = lean_ctor_get(x_1768, 1); -lean_inc(x_1771); -lean_dec(x_1768); -x_1772 = lean_box(x_226); -if (lean_is_scalar(x_1746)) { - x_1773 = lean_alloc_ctor(0, 2, 0); -} else { - x_1773 = x_1746; -} -lean_ctor_set(x_1773, 0, x_1772); -lean_ctor_set(x_1773, 1, x_1745); -if (lean_is_scalar(x_1742)) { - x_1774 = lean_alloc_ctor(1, 1, 0); -} else { - x_1774 = x_1742; -} -lean_ctor_set(x_1774, 0, x_1773); -x_1747 = x_1774; -x_1748 = x_1771; -goto block_1767; -} -else -{ -lean_object* x_1775; lean_object* x_1776; lean_object* x_1777; lean_object* x_1778; lean_object* x_1779; lean_object* x_1780; lean_object* x_1781; -x_1775 = lean_ctor_get(x_1768, 1); -lean_inc(x_1775); -lean_dec(x_1768); -x_1776 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1777 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1776, x_7, x_8, x_1775); -x_1778 = lean_ctor_get(x_1777, 0); -lean_inc(x_1778); -x_1779 = lean_ctor_get(x_1777, 1); -lean_inc(x_1779); -lean_dec(x_1777); -if (lean_is_scalar(x_1746)) { - x_1780 = lean_alloc_ctor(0, 2, 0); -} else { - x_1780 = x_1746; -} -lean_ctor_set(x_1780, 0, x_1778); -lean_ctor_set(x_1780, 1, x_1745); -if (lean_is_scalar(x_1742)) { - x_1781 = lean_alloc_ctor(1, 1, 0); -} else { - x_1781 = x_1742; -} -lean_ctor_set(x_1781, 0, x_1780); -x_1747 = x_1781; -x_1748 = x_1779; -goto block_1767; -} -block_1767: -{ -lean_object* x_1749; lean_object* x_1750; lean_object* x_1751; uint8_t x_1752; -x_1749 = lean_ctor_get(x_1747, 0); -lean_inc(x_1749); -if (lean_is_exclusive(x_1747)) { - lean_ctor_release(x_1747, 0); - x_1750 = x_1747; -} else { - lean_dec_ref(x_1747); - x_1750 = lean_box(0); -} -x_1751 = lean_ctor_get(x_1749, 0); -lean_inc(x_1751); -x_1752 = lean_unbox(x_1751); -lean_dec(x_1751); -if (x_1752 == 0) -{ -lean_object* x_1753; lean_object* x_1754; lean_object* x_1755; lean_object* x_1756; lean_object* x_1757; -lean_dec(x_1744); -lean_dec(x_5); -x_1753 = lean_ctor_get(x_1749, 1); -lean_inc(x_1753); -if (lean_is_exclusive(x_1749)) { - lean_ctor_release(x_1749, 0); - lean_ctor_release(x_1749, 1); - x_1754 = x_1749; -} else { - lean_dec_ref(x_1749); - x_1754 = lean_box(0); -} -x_1755 = lean_box(0); -if (lean_is_scalar(x_1754)) { - x_1756 = lean_alloc_ctor(0, 2, 0); -} else { - x_1756 = x_1754; -} -lean_ctor_set(x_1756, 0, x_1755); -lean_ctor_set(x_1756, 1, x_1753); -if (lean_is_scalar(x_1750)) { - x_1757 = lean_alloc_ctor(1, 1, 0); -} else { - x_1757 = x_1750; -} -lean_ctor_set(x_1757, 0, x_1756); -x_1470 = x_1757; -x_1471 = x_1748; -goto block_1492; -} -else -{ -lean_object* x_1758; lean_object* x_1759; lean_object* x_1760; lean_object* x_1761; lean_object* x_1762; lean_object* x_1763; lean_object* x_1764; lean_object* x_1765; lean_object* x_1766; -lean_dec(x_1750); -x_1758 = lean_ctor_get(x_1749, 1); -lean_inc(x_1758); -lean_dec(x_1749); -x_1759 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1494, x_1744); -x_1760 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1760, 0, x_1759); -x_1761 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1762 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1762, 0, x_1761); -lean_ctor_set(x_1762, 1, x_1760); -x_1763 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1764 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1763, x_1762, x_5, x_1758, x_7, x_8, x_1748); -lean_dec(x_5); -x_1765 = lean_ctor_get(x_1764, 0); -lean_inc(x_1765); -x_1766 = lean_ctor_get(x_1764, 1); -lean_inc(x_1766); -lean_dec(x_1764); -x_1470 = x_1765; -x_1471 = x_1766; -goto block_1492; -} -} -} -else -{ -lean_object* x_1782; lean_object* x_1783; lean_object* x_1784; lean_object* x_1785; lean_object* x_1786; lean_object* x_1787; lean_object* x_1788; lean_object* x_1789; lean_object* x_1790; lean_object* x_1791; lean_object* x_1792; lean_object* x_1793; lean_object* x_1794; lean_object* x_1795; lean_object* x_1796; lean_object* x_1797; lean_object* x_1798; lean_object* x_1799; lean_object* x_1800; lean_object* x_1801; lean_object* x_1802; lean_object* x_1803; lean_object* x_1804; lean_object* x_1805; lean_object* x_1806; lean_object* x_1807; lean_object* x_1808; lean_object* x_1809; lean_object* x_1810; lean_object* x_1811; lean_object* x_1812; lean_object* x_1813; lean_object* x_1814; lean_object* x_1815; lean_object* x_1835; lean_object* x_1836; uint8_t x_1837; -x_1782 = lean_ctor_get(x_1732, 0); -lean_inc(x_1782); -lean_dec(x_1732); -x_1783 = lean_ctor_get(x_1731, 0); -lean_inc(x_1783); -x_1784 = lean_ctor_get(x_1731, 1); -lean_inc(x_1784); -x_1785 = lean_ctor_get(x_1731, 2); -lean_inc(x_1785); -if (lean_is_exclusive(x_1731)) { - lean_ctor_release(x_1731, 0); - lean_ctor_release(x_1731, 1); - lean_ctor_release(x_1731, 2); - x_1786 = x_1731; -} else { - lean_dec_ref(x_1731); - x_1786 = lean_box(0); -} -x_1787 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_1784); -if (lean_is_scalar(x_1786)) { - x_1788 = lean_alloc_ctor(0, 3, 0); -} else { - x_1788 = x_1786; -} -lean_ctor_set(x_1788, 0, x_1787); -lean_ctor_set(x_1788, 1, x_1784); -lean_ctor_set(x_1788, 2, x_1785); -x_1789 = l_Lean_Syntax_setHeadInfo(x_1679, x_1788); -x_1790 = lean_ctor_get(x_1782, 0); -lean_inc(x_1790); -x_1791 = lean_ctor_get(x_1782, 1); -lean_inc(x_1791); -x_1792 = lean_ctor_get(x_1782, 2); -lean_inc(x_1792); -if (lean_is_exclusive(x_1782)) { - lean_ctor_release(x_1782, 0); - lean_ctor_release(x_1782, 1); - lean_ctor_release(x_1782, 2); - x_1793 = x_1782; -} else { - lean_dec_ref(x_1782); - x_1793 = lean_box(0); -} -lean_inc(x_1791); -if (lean_is_scalar(x_1793)) { - x_1794 = lean_alloc_ctor(0, 3, 0); -} else { - x_1794 = x_1793; -} -lean_ctor_set(x_1794, 0, x_1790); -lean_ctor_set(x_1794, 1, x_1791); -lean_ctor_set(x_1794, 2, x_1787); -x_1795 = l_Lean_Syntax_setTailInfo(x_1789, x_1794); -x_1796 = lean_apply_1(x_2, x_1795); -x_1797 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1797, 0, x_1783); -lean_ctor_set(x_1797, 1, x_1784); -lean_ctor_set(x_1797, 2, x_1787); -x_1798 = l_Lean_Syntax_setHeadInfo(x_1796, x_1797); -x_1799 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_1799, 0, x_1787); -lean_ctor_set(x_1799, 1, x_1791); -lean_ctor_set(x_1799, 2, x_1792); -x_1800 = l_Lean_Syntax_setTailInfo(x_1798, x_1799); -x_1801 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1800, x_5, x_1680, x_7, x_8, x_1678); -x_1802 = lean_ctor_get(x_1801, 0); -lean_inc(x_1802); -x_1803 = lean_ctor_get(x_1802, 0); -lean_inc(x_1803); -lean_dec(x_1802); -x_1804 = lean_ctor_get(x_1801, 1); -lean_inc(x_1804); -lean_dec(x_1801); -x_1805 = lean_ctor_get(x_1803, 1); -lean_inc(x_1805); -lean_dec(x_1803); -x_1806 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1805, x_7, x_8, x_1804); -x_1807 = lean_ctor_get(x_1806, 0); -lean_inc(x_1807); -x_1808 = lean_ctor_get(x_1807, 0); -lean_inc(x_1808); -if (lean_is_exclusive(x_1807)) { - lean_ctor_release(x_1807, 0); - x_1809 = x_1807; -} else { - lean_dec_ref(x_1807); - x_1809 = lean_box(0); -} -x_1810 = lean_ctor_get(x_1806, 1); -lean_inc(x_1810); -lean_dec(x_1806); -x_1811 = lean_ctor_get(x_1808, 0); -lean_inc(x_1811); -x_1812 = lean_ctor_get(x_1808, 1); -lean_inc(x_1812); -if (lean_is_exclusive(x_1808)) { - lean_ctor_release(x_1808, 0); - lean_ctor_release(x_1808, 1); - x_1813 = x_1808; -} else { - lean_dec_ref(x_1808); - x_1813 = lean_box(0); -} -x_1835 = l_Lean_Core_getTraceState___rarg(x_8, x_1810); -x_1836 = lean_ctor_get(x_1835, 0); -lean_inc(x_1836); -x_1837 = lean_ctor_get_uint8(x_1836, sizeof(void*)*1); -lean_dec(x_1836); -if (x_1837 == 0) -{ -lean_object* x_1838; lean_object* x_1839; lean_object* x_1840; lean_object* x_1841; -x_1838 = lean_ctor_get(x_1835, 1); -lean_inc(x_1838); -lean_dec(x_1835); -x_1839 = lean_box(x_226); -if (lean_is_scalar(x_1813)) { - x_1840 = lean_alloc_ctor(0, 2, 0); -} else { - x_1840 = x_1813; -} -lean_ctor_set(x_1840, 0, x_1839); -lean_ctor_set(x_1840, 1, x_1812); -if (lean_is_scalar(x_1809)) { - x_1841 = lean_alloc_ctor(1, 1, 0); -} else { - x_1841 = x_1809; -} -lean_ctor_set(x_1841, 0, x_1840); -x_1814 = x_1841; -x_1815 = x_1838; -goto block_1834; -} -else -{ -lean_object* x_1842; lean_object* x_1843; lean_object* x_1844; lean_object* x_1845; lean_object* x_1846; lean_object* x_1847; lean_object* x_1848; -x_1842 = lean_ctor_get(x_1835, 1); -lean_inc(x_1842); -lean_dec(x_1835); -x_1843 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1844 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1843, x_7, x_8, x_1842); -x_1845 = lean_ctor_get(x_1844, 0); -lean_inc(x_1845); -x_1846 = lean_ctor_get(x_1844, 1); -lean_inc(x_1846); -lean_dec(x_1844); -if (lean_is_scalar(x_1813)) { - x_1847 = lean_alloc_ctor(0, 2, 0); -} else { - x_1847 = x_1813; -} -lean_ctor_set(x_1847, 0, x_1845); -lean_ctor_set(x_1847, 1, x_1812); -if (lean_is_scalar(x_1809)) { - x_1848 = lean_alloc_ctor(1, 1, 0); -} else { - x_1848 = x_1809; -} -lean_ctor_set(x_1848, 0, x_1847); -x_1814 = x_1848; -x_1815 = x_1846; -goto block_1834; -} -block_1834: -{ -lean_object* x_1816; lean_object* x_1817; lean_object* x_1818; uint8_t x_1819; -x_1816 = lean_ctor_get(x_1814, 0); -lean_inc(x_1816); -if (lean_is_exclusive(x_1814)) { - lean_ctor_release(x_1814, 0); - x_1817 = x_1814; -} else { - lean_dec_ref(x_1814); - x_1817 = lean_box(0); -} -x_1818 = lean_ctor_get(x_1816, 0); -lean_inc(x_1818); -x_1819 = lean_unbox(x_1818); -lean_dec(x_1818); -if (x_1819 == 0) -{ -lean_object* x_1820; lean_object* x_1821; lean_object* x_1822; lean_object* x_1823; lean_object* x_1824; -lean_dec(x_1811); -lean_dec(x_5); -x_1820 = lean_ctor_get(x_1816, 1); -lean_inc(x_1820); -if (lean_is_exclusive(x_1816)) { - lean_ctor_release(x_1816, 0); - lean_ctor_release(x_1816, 1); - x_1821 = x_1816; -} else { - lean_dec_ref(x_1816); - x_1821 = lean_box(0); -} -x_1822 = lean_box(0); -if (lean_is_scalar(x_1821)) { - x_1823 = lean_alloc_ctor(0, 2, 0); -} else { - x_1823 = x_1821; -} -lean_ctor_set(x_1823, 0, x_1822); -lean_ctor_set(x_1823, 1, x_1820); -if (lean_is_scalar(x_1817)) { - x_1824 = lean_alloc_ctor(1, 1, 0); -} else { - x_1824 = x_1817; -} -lean_ctor_set(x_1824, 0, x_1823); -x_1470 = x_1824; -x_1471 = x_1815; -goto block_1492; -} -else -{ -lean_object* x_1825; lean_object* x_1826; lean_object* x_1827; lean_object* x_1828; lean_object* x_1829; lean_object* x_1830; lean_object* x_1831; lean_object* x_1832; lean_object* x_1833; -lean_dec(x_1817); -x_1825 = lean_ctor_get(x_1816, 1); -lean_inc(x_1825); -lean_dec(x_1816); -x_1826 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1494, x_1811); -x_1827 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1827, 0, x_1826); -x_1828 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1829 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1829, 0, x_1828); -lean_ctor_set(x_1829, 1, x_1827); -x_1830 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1831 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1830, x_1829, x_5, x_1825, x_7, x_8, x_1815); -lean_dec(x_5); -x_1832 = lean_ctor_get(x_1831, 0); -lean_inc(x_1832); -x_1833 = lean_ctor_get(x_1831, 1); -lean_inc(x_1833); -lean_dec(x_1831); -x_1470 = x_1832; -x_1471 = x_1833; -goto block_1492; -} -} -} -} -} -} -} -} -else -{ -lean_object* x_1871; lean_object* x_1872; lean_object* x_1873; lean_object* x_1874; lean_object* x_1875; lean_object* x_1897; uint8_t x_2254; -x_1871 = lean_ctor_get(x_260, 0); -lean_inc(x_1871); -lean_dec(x_260); -x_1872 = lean_ctor_get(x_1871, 1); -lean_inc(x_1872); -if (lean_is_exclusive(x_1871)) { - lean_ctor_release(x_1871, 0); - lean_ctor_release(x_1871, 1); - x_1873 = x_1871; -} else { - lean_dec_ref(x_1871); - x_1873 = lean_box(0); -} -x_2254 = lean_nat_dec_lt(x_259, x_3); -lean_dec(x_259); -if (x_2254 == 0) -{ -if (lean_obj_tag(x_258) == 0) -{ -lean_object* x_2255; lean_object* x_2256; lean_object* x_2257; lean_object* x_2258; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_2255 = lean_box(0); -if (lean_is_scalar(x_1873)) { - x_2256 = lean_alloc_ctor(0, 2, 0); -} else { - x_2256 = x_1873; -} -lean_ctor_set(x_2256, 0, x_2255); -lean_ctor_set(x_2256, 1, x_1872); -x_2257 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2257, 0, x_2256); -if (lean_is_scalar(x_257)) { - x_2258 = lean_alloc_ctor(0, 2, 0); -} else { - x_2258 = x_257; -} -lean_ctor_set(x_2258, 0, x_2257); -lean_ctor_set(x_2258, 1, x_261); -x_24 = x_2258; -goto block_222; -} -else -{ -lean_object* x_2259; -x_2259 = lean_ctor_get(x_23, 1); -lean_inc(x_2259); -if (lean_obj_tag(x_2259) == 0) -{ -lean_object* x_2260; lean_object* x_2261; lean_object* x_2262; lean_object* x_2263; -lean_dec(x_258); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_2260 = lean_box(0); -if (lean_is_scalar(x_1873)) { - x_2261 = lean_alloc_ctor(0, 2, 0); -} else { - x_2261 = x_1873; -} -lean_ctor_set(x_2261, 0, x_2260); -lean_ctor_set(x_2261, 1, x_1872); -x_2262 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2262, 0, x_2261); -if (lean_is_scalar(x_257)) { - x_2263 = lean_alloc_ctor(0, 2, 0); -} else { - x_2263 = x_257; -} -lean_ctor_set(x_2263, 0, x_2262); -lean_ctor_set(x_2263, 1, x_261); -x_24 = x_2263; -goto block_222; -} -else -{ -lean_object* x_2264; lean_object* x_2265; lean_object* x_2266; uint8_t x_2267; -x_2264 = lean_ctor_get(x_258, 0); -lean_inc(x_2264); -lean_dec(x_258); -x_2265 = lean_ctor_get(x_2259, 0); -lean_inc(x_2265); -lean_dec(x_2259); -x_2266 = lean_ctor_get(x_23, 2); -lean_inc(x_2266); -x_2267 = lean_name_eq(x_1, x_2266); -lean_dec(x_2266); -if (x_2267 == 0) -{ -lean_object* x_2268; lean_object* x_2269; lean_object* x_2270; lean_object* x_2271; -lean_dec(x_2265); -lean_dec(x_2264); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_2268 = lean_box(0); -if (lean_is_scalar(x_1873)) { - x_2269 = lean_alloc_ctor(0, 2, 0); -} else { - x_2269 = x_1873; -} -lean_ctor_set(x_2269, 0, x_2268); -lean_ctor_set(x_2269, 1, x_1872); -x_2270 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2270, 0, x_2269); -if (lean_is_scalar(x_257)) { - x_2271 = lean_alloc_ctor(0, 2, 0); -} else { - x_2271 = x_257; -} -lean_ctor_set(x_2271, 0, x_2270); -lean_ctor_set(x_2271, 1, x_261); -x_24 = x_2271; -goto block_222; -} -else -{ -uint8_t x_2272; -x_2272 = lean_nat_dec_le(x_2264, x_2265); -lean_dec(x_2265); -lean_dec(x_2264); -if (x_2272 == 0) -{ -lean_object* x_2273; lean_object* x_2274; lean_object* x_2275; lean_object* x_2276; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_2273 = lean_box(0); -if (lean_is_scalar(x_1873)) { - x_2274 = lean_alloc_ctor(0, 2, 0); -} else { - x_2274 = x_1873; -} -lean_ctor_set(x_2274, 0, x_2273); -lean_ctor_set(x_2274, 1, x_1872); -x_2275 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2275, 0, x_2274); -if (lean_is_scalar(x_257)) { - x_2276 = lean_alloc_ctor(0, 2, 0); -} else { - x_2276 = x_257; -} -lean_ctor_set(x_2276, 0, x_2275); -lean_ctor_set(x_2276, 1, x_261); -x_24 = x_2276; -goto block_222; -} -else -{ -lean_object* x_2277; -lean_dec(x_1873); -lean_dec(x_257); -x_2277 = lean_box(0); -x_1897 = x_2277; -goto block_2253; -} -} -} -} -} -else -{ -lean_object* x_2278; -lean_dec(x_1873); -lean_dec(x_258); -lean_dec(x_257); -x_2278 = lean_box(0); -x_1897 = x_2278; -goto block_2253; -} -block_1896: -{ -lean_object* x_1876; lean_object* x_1877; lean_object* x_1878; lean_object* x_1879; lean_object* x_1880; lean_object* x_1881; lean_object* x_1882; lean_object* x_1883; lean_object* x_1884; lean_object* x_1885; lean_object* x_1886; lean_object* x_1887; uint8_t x_1888; lean_object* x_1889; lean_object* x_1890; lean_object* x_1891; lean_object* x_1892; lean_object* x_1893; lean_object* x_1894; lean_object* x_1895; -x_1876 = lean_ctor_get(x_1874, 0); -lean_inc(x_1876); -lean_dec(x_1874); -x_1877 = lean_ctor_get(x_1876, 1); -lean_inc(x_1877); -lean_dec(x_1876); -x_1878 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_1877, x_7, x_8, x_1875); -lean_dec(x_8); -lean_dec(x_7); -x_1879 = lean_ctor_get(x_1878, 0); -lean_inc(x_1879); -x_1880 = lean_ctor_get(x_1879, 0); -lean_inc(x_1880); -if (lean_is_exclusive(x_1879)) { - lean_ctor_release(x_1879, 0); - x_1881 = x_1879; -} else { - lean_dec_ref(x_1879); - x_1881 = lean_box(0); -} -x_1882 = lean_ctor_get(x_1880, 1); -lean_inc(x_1882); -if (lean_is_exclusive(x_1880)) { - lean_ctor_release(x_1880, 0); - lean_ctor_release(x_1880, 1); - x_1883 = x_1880; -} else { - lean_dec_ref(x_1880); - x_1883 = lean_box(0); -} -x_1884 = lean_ctor_get(x_1878, 1); -lean_inc(x_1884); -if (lean_is_exclusive(x_1878)) { - lean_ctor_release(x_1878, 0); - lean_ctor_release(x_1878, 1); - x_1885 = x_1878; -} else { - lean_dec_ref(x_1878); - x_1885 = lean_box(0); -} -x_1886 = lean_ctor_get(x_1882, 0); -lean_inc(x_1886); -x_1887 = lean_ctor_get(x_1882, 3); -lean_inc(x_1887); -x_1888 = lean_ctor_get_uint8(x_1882, sizeof(void*)*5); -if (lean_is_exclusive(x_1882)) { - lean_ctor_release(x_1882, 0); - lean_ctor_release(x_1882, 1); - lean_ctor_release(x_1882, 2); - lean_ctor_release(x_1882, 3); - lean_ctor_release(x_1882, 4); - x_1889 = x_1882; -} else { - lean_dec_ref(x_1882); - x_1889 = lean_box(0); -} -x_1890 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_1889)) { - x_1891 = lean_alloc_ctor(0, 5, 1); -} else { - x_1891 = x_1889; -} -lean_ctor_set(x_1891, 0, x_1886); -lean_ctor_set(x_1891, 1, x_1890); -lean_ctor_set(x_1891, 2, x_1); -lean_ctor_set(x_1891, 3, x_1887); -lean_ctor_set(x_1891, 4, x_224); -lean_ctor_set_uint8(x_1891, sizeof(void*)*5, x_1888); -x_1892 = lean_box(0); -if (lean_is_scalar(x_1883)) { - x_1893 = lean_alloc_ctor(0, 2, 0); -} else { - x_1893 = x_1883; -} -lean_ctor_set(x_1893, 0, x_1892); -lean_ctor_set(x_1893, 1, x_1891); -if (lean_is_scalar(x_1881)) { - x_1894 = lean_alloc_ctor(1, 1, 0); -} else { - x_1894 = x_1881; -} -lean_ctor_set(x_1894, 0, x_1893); -if (lean_is_scalar(x_1885)) { - x_1895 = lean_alloc_ctor(0, 2, 0); -} else { - x_1895 = x_1885; -} -lean_ctor_set(x_1895, 0, x_1894); -lean_ctor_set(x_1895, 1, x_1884); -x_24 = x_1895; -goto block_222; -} -block_2253: -{ -lean_object* x_1898; uint8_t x_1899; -lean_dec(x_1897); -x_1898 = lean_unsigned_to_nat(0u); -x_1899 = lean_nat_dec_lt(x_1898, x_22); -lean_dec(x_22); -if (x_1899 == 0) -{ -lean_object* x_1900; lean_object* x_1901; lean_object* x_1902; lean_object* x_1903; lean_object* x_1904; lean_object* x_1905; lean_object* x_1906; -x_1900 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1872, x_7, x_8, x_261); -x_1901 = lean_ctor_get(x_1900, 0); -lean_inc(x_1901); -x_1902 = lean_ctor_get(x_1901, 0); -lean_inc(x_1902); -lean_dec(x_1901); -x_1903 = lean_ctor_get(x_1900, 1); -lean_inc(x_1903); -lean_dec(x_1900); -x_1904 = lean_ctor_get(x_1902, 0); -lean_inc(x_1904); -x_1905 = lean_ctor_get(x_1902, 1); -lean_inc(x_1905); -lean_dec(x_1902); -x_1906 = l_Lean_Syntax_getHeadInfo___main(x_1904); -if (lean_obj_tag(x_1906) == 0) -{ -lean_object* x_1907; lean_object* x_1908; lean_object* x_1909; lean_object* x_1910; lean_object* x_1911; lean_object* x_1912; lean_object* x_1913; lean_object* x_1914; lean_object* x_1915; lean_object* x_1916; lean_object* x_1917; lean_object* x_1918; lean_object* x_1919; lean_object* x_1920; lean_object* x_1921; lean_object* x_1922; lean_object* x_1942; lean_object* x_1943; uint8_t x_1944; -x_1907 = lean_apply_1(x_2, x_1904); -x_1908 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1907, x_5, x_1905, x_7, x_8, x_1903); -x_1909 = lean_ctor_get(x_1908, 0); -lean_inc(x_1909); -x_1910 = lean_ctor_get(x_1909, 0); -lean_inc(x_1910); -lean_dec(x_1909); -x_1911 = lean_ctor_get(x_1908, 1); -lean_inc(x_1911); -lean_dec(x_1908); -x_1912 = lean_ctor_get(x_1910, 1); -lean_inc(x_1912); -lean_dec(x_1910); -x_1913 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1912, x_7, x_8, x_1911); -x_1914 = lean_ctor_get(x_1913, 0); -lean_inc(x_1914); -x_1915 = lean_ctor_get(x_1914, 0); -lean_inc(x_1915); -if (lean_is_exclusive(x_1914)) { - lean_ctor_release(x_1914, 0); - x_1916 = x_1914; -} else { - lean_dec_ref(x_1914); - x_1916 = lean_box(0); -} -x_1917 = lean_ctor_get(x_1913, 1); -lean_inc(x_1917); -lean_dec(x_1913); -x_1918 = lean_ctor_get(x_1915, 0); -lean_inc(x_1918); -x_1919 = lean_ctor_get(x_1915, 1); -lean_inc(x_1919); -if (lean_is_exclusive(x_1915)) { - lean_ctor_release(x_1915, 0); - lean_ctor_release(x_1915, 1); - x_1920 = x_1915; -} else { - lean_dec_ref(x_1915); - x_1920 = lean_box(0); -} -x_1942 = l_Lean_Core_getTraceState___rarg(x_8, x_1917); -x_1943 = lean_ctor_get(x_1942, 0); -lean_inc(x_1943); -x_1944 = lean_ctor_get_uint8(x_1943, sizeof(void*)*1); -lean_dec(x_1943); -if (x_1944 == 0) -{ -lean_object* x_1945; lean_object* x_1946; lean_object* x_1947; lean_object* x_1948; -x_1945 = lean_ctor_get(x_1942, 1); -lean_inc(x_1945); -lean_dec(x_1942); -x_1946 = lean_box(x_226); -if (lean_is_scalar(x_1920)) { - x_1947 = lean_alloc_ctor(0, 2, 0); -} else { - x_1947 = x_1920; -} -lean_ctor_set(x_1947, 0, x_1946); -lean_ctor_set(x_1947, 1, x_1919); -if (lean_is_scalar(x_1916)) { - x_1948 = lean_alloc_ctor(1, 1, 0); -} else { - x_1948 = x_1916; -} -lean_ctor_set(x_1948, 0, x_1947); -x_1921 = x_1948; -x_1922 = x_1945; -goto block_1941; -} -else -{ -lean_object* x_1949; lean_object* x_1950; lean_object* x_1951; lean_object* x_1952; lean_object* x_1953; lean_object* x_1954; lean_object* x_1955; -x_1949 = lean_ctor_get(x_1942, 1); -lean_inc(x_1949); -lean_dec(x_1942); -x_1950 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1951 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1950, x_7, x_8, x_1949); -x_1952 = lean_ctor_get(x_1951, 0); -lean_inc(x_1952); -x_1953 = lean_ctor_get(x_1951, 1); -lean_inc(x_1953); -lean_dec(x_1951); -if (lean_is_scalar(x_1920)) { - x_1954 = lean_alloc_ctor(0, 2, 0); -} else { - x_1954 = x_1920; -} -lean_ctor_set(x_1954, 0, x_1952); -lean_ctor_set(x_1954, 1, x_1919); -if (lean_is_scalar(x_1916)) { - x_1955 = lean_alloc_ctor(1, 1, 0); -} else { - x_1955 = x_1916; -} -lean_ctor_set(x_1955, 0, x_1954); -x_1921 = x_1955; -x_1922 = x_1953; -goto block_1941; -} -block_1941: -{ -lean_object* x_1923; lean_object* x_1924; lean_object* x_1925; uint8_t x_1926; -x_1923 = lean_ctor_get(x_1921, 0); -lean_inc(x_1923); -if (lean_is_exclusive(x_1921)) { - lean_ctor_release(x_1921, 0); - x_1924 = x_1921; -} else { - lean_dec_ref(x_1921); - x_1924 = lean_box(0); -} -x_1925 = lean_ctor_get(x_1923, 0); -lean_inc(x_1925); -x_1926 = lean_unbox(x_1925); -lean_dec(x_1925); -if (x_1926 == 0) -{ -lean_object* x_1927; lean_object* x_1928; lean_object* x_1929; lean_object* x_1930; lean_object* x_1931; -lean_dec(x_1918); -lean_dec(x_5); -x_1927 = lean_ctor_get(x_1923, 1); -lean_inc(x_1927); -if (lean_is_exclusive(x_1923)) { - lean_ctor_release(x_1923, 0); - lean_ctor_release(x_1923, 1); - x_1928 = x_1923; -} else { - lean_dec_ref(x_1923); - x_1928 = lean_box(0); -} -x_1929 = lean_box(0); -if (lean_is_scalar(x_1928)) { - x_1930 = lean_alloc_ctor(0, 2, 0); -} else { - x_1930 = x_1928; -} -lean_ctor_set(x_1930, 0, x_1929); -lean_ctor_set(x_1930, 1, x_1927); -if (lean_is_scalar(x_1924)) { - x_1931 = lean_alloc_ctor(1, 1, 0); -} else { - x_1931 = x_1924; -} -lean_ctor_set(x_1931, 0, x_1930); -x_1874 = x_1931; -x_1875 = x_1922; -goto block_1896; -} -else -{ -lean_object* x_1932; lean_object* x_1933; lean_object* x_1934; lean_object* x_1935; lean_object* x_1936; lean_object* x_1937; lean_object* x_1938; lean_object* x_1939; lean_object* x_1940; -lean_dec(x_1924); -x_1932 = lean_ctor_get(x_1923, 1); -lean_inc(x_1932); -lean_dec(x_1923); -x_1933 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1898, x_1918); -x_1934 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1934, 0, x_1933); -x_1935 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1936 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1936, 0, x_1935); -lean_ctor_set(x_1936, 1, x_1934); -x_1937 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1938 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1937, x_1936, x_5, x_1932, x_7, x_8, x_1922); -lean_dec(x_5); -x_1939 = lean_ctor_get(x_1938, 0); -lean_inc(x_1939); -x_1940 = lean_ctor_get(x_1938, 1); -lean_inc(x_1940); -lean_dec(x_1938); -x_1874 = x_1939; -x_1875 = x_1940; -goto block_1896; -} -} -} -else -{ -lean_object* x_1956; lean_object* x_1957; -x_1956 = lean_ctor_get(x_1906, 0); -lean_inc(x_1956); -lean_dec(x_1906); -x_1957 = l_Lean_Syntax_getTailInfo___main(x_1904); -if (lean_obj_tag(x_1957) == 0) -{ -lean_object* x_1958; lean_object* x_1959; lean_object* x_1960; lean_object* x_1961; lean_object* x_1962; lean_object* x_1963; lean_object* x_1964; lean_object* x_1965; lean_object* x_1966; lean_object* x_1967; lean_object* x_1968; lean_object* x_1969; lean_object* x_1970; lean_object* x_1971; lean_object* x_1972; lean_object* x_1973; lean_object* x_1993; lean_object* x_1994; uint8_t x_1995; -lean_dec(x_1956); -x_1958 = lean_apply_1(x_2, x_1904); -x_1959 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1958, x_5, x_1905, x_7, x_8, x_1903); -x_1960 = lean_ctor_get(x_1959, 0); -lean_inc(x_1960); -x_1961 = lean_ctor_get(x_1960, 0); -lean_inc(x_1961); -lean_dec(x_1960); -x_1962 = lean_ctor_get(x_1959, 1); -lean_inc(x_1962); -lean_dec(x_1959); -x_1963 = lean_ctor_get(x_1961, 1); -lean_inc(x_1963); -lean_dec(x_1961); -x_1964 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1963, x_7, x_8, x_1962); -x_1965 = lean_ctor_get(x_1964, 0); -lean_inc(x_1965); -x_1966 = lean_ctor_get(x_1965, 0); -lean_inc(x_1966); -if (lean_is_exclusive(x_1965)) { - lean_ctor_release(x_1965, 0); - x_1967 = x_1965; -} else { - lean_dec_ref(x_1965); - x_1967 = lean_box(0); -} -x_1968 = lean_ctor_get(x_1964, 1); -lean_inc(x_1968); -lean_dec(x_1964); -x_1969 = lean_ctor_get(x_1966, 0); -lean_inc(x_1969); -x_1970 = lean_ctor_get(x_1966, 1); -lean_inc(x_1970); -if (lean_is_exclusive(x_1966)) { - lean_ctor_release(x_1966, 0); - lean_ctor_release(x_1966, 1); - x_1971 = x_1966; -} else { - lean_dec_ref(x_1966); - x_1971 = lean_box(0); -} -x_1993 = l_Lean_Core_getTraceState___rarg(x_8, x_1968); -x_1994 = lean_ctor_get(x_1993, 0); -lean_inc(x_1994); -x_1995 = lean_ctor_get_uint8(x_1994, sizeof(void*)*1); -lean_dec(x_1994); -if (x_1995 == 0) -{ -lean_object* x_1996; lean_object* x_1997; lean_object* x_1998; lean_object* x_1999; -x_1996 = lean_ctor_get(x_1993, 1); -lean_inc(x_1996); -lean_dec(x_1993); -x_1997 = lean_box(x_226); -if (lean_is_scalar(x_1971)) { - x_1998 = lean_alloc_ctor(0, 2, 0); -} else { - x_1998 = x_1971; -} -lean_ctor_set(x_1998, 0, x_1997); -lean_ctor_set(x_1998, 1, x_1970); -if (lean_is_scalar(x_1967)) { - x_1999 = lean_alloc_ctor(1, 1, 0); -} else { - x_1999 = x_1967; -} -lean_ctor_set(x_1999, 0, x_1998); -x_1972 = x_1999; -x_1973 = x_1996; -goto block_1992; -} -else -{ -lean_object* x_2000; lean_object* x_2001; lean_object* x_2002; lean_object* x_2003; lean_object* x_2004; lean_object* x_2005; lean_object* x_2006; -x_2000 = lean_ctor_get(x_1993, 1); -lean_inc(x_2000); -lean_dec(x_1993); -x_2001 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2002 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2001, x_7, x_8, x_2000); -x_2003 = lean_ctor_get(x_2002, 0); -lean_inc(x_2003); -x_2004 = lean_ctor_get(x_2002, 1); -lean_inc(x_2004); -lean_dec(x_2002); -if (lean_is_scalar(x_1971)) { - x_2005 = lean_alloc_ctor(0, 2, 0); -} else { - x_2005 = x_1971; -} -lean_ctor_set(x_2005, 0, x_2003); -lean_ctor_set(x_2005, 1, x_1970); -if (lean_is_scalar(x_1967)) { - x_2006 = lean_alloc_ctor(1, 1, 0); -} else { - x_2006 = x_1967; -} -lean_ctor_set(x_2006, 0, x_2005); -x_1972 = x_2006; -x_1973 = x_2004; -goto block_1992; -} -block_1992: -{ -lean_object* x_1974; lean_object* x_1975; lean_object* x_1976; uint8_t x_1977; -x_1974 = lean_ctor_get(x_1972, 0); -lean_inc(x_1974); -if (lean_is_exclusive(x_1972)) { - lean_ctor_release(x_1972, 0); - x_1975 = x_1972; -} else { - lean_dec_ref(x_1972); - x_1975 = lean_box(0); -} -x_1976 = lean_ctor_get(x_1974, 0); -lean_inc(x_1976); -x_1977 = lean_unbox(x_1976); -lean_dec(x_1976); -if (x_1977 == 0) -{ -lean_object* x_1978; lean_object* x_1979; lean_object* x_1980; lean_object* x_1981; lean_object* x_1982; -lean_dec(x_1969); -lean_dec(x_5); -x_1978 = lean_ctor_get(x_1974, 1); -lean_inc(x_1978); -if (lean_is_exclusive(x_1974)) { - lean_ctor_release(x_1974, 0); - lean_ctor_release(x_1974, 1); - x_1979 = x_1974; -} else { - lean_dec_ref(x_1974); - x_1979 = lean_box(0); -} -x_1980 = lean_box(0); -if (lean_is_scalar(x_1979)) { - x_1981 = lean_alloc_ctor(0, 2, 0); -} else { - x_1981 = x_1979; -} -lean_ctor_set(x_1981, 0, x_1980); -lean_ctor_set(x_1981, 1, x_1978); -if (lean_is_scalar(x_1975)) { - x_1982 = lean_alloc_ctor(1, 1, 0); -} else { - x_1982 = x_1975; -} -lean_ctor_set(x_1982, 0, x_1981); -x_1874 = x_1982; -x_1875 = x_1973; -goto block_1896; -} -else -{ -lean_object* x_1983; lean_object* x_1984; lean_object* x_1985; lean_object* x_1986; lean_object* x_1987; lean_object* x_1988; lean_object* x_1989; lean_object* x_1990; lean_object* x_1991; -lean_dec(x_1975); -x_1983 = lean_ctor_get(x_1974, 1); -lean_inc(x_1983); -lean_dec(x_1974); -x_1984 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1898, x_1969); -x_1985 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_1985, 0, x_1984); -x_1986 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_1987 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_1987, 0, x_1986); -lean_ctor_set(x_1987, 1, x_1985); -x_1988 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_1989 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1988, x_1987, x_5, x_1983, x_7, x_8, x_1973); -lean_dec(x_5); -x_1990 = lean_ctor_get(x_1989, 0); -lean_inc(x_1990); -x_1991 = lean_ctor_get(x_1989, 1); -lean_inc(x_1991); -lean_dec(x_1989); -x_1874 = x_1990; -x_1875 = x_1991; -goto block_1896; -} -} -} -else -{ -lean_object* x_2007; lean_object* x_2008; lean_object* x_2009; lean_object* x_2010; lean_object* x_2011; lean_object* x_2012; lean_object* x_2013; lean_object* x_2014; lean_object* x_2015; lean_object* x_2016; lean_object* x_2017; lean_object* x_2018; lean_object* x_2019; lean_object* x_2020; lean_object* x_2021; lean_object* x_2022; lean_object* x_2023; lean_object* x_2024; lean_object* x_2025; lean_object* x_2026; lean_object* x_2027; lean_object* x_2028; lean_object* x_2029; lean_object* x_2030; lean_object* x_2031; lean_object* x_2032; lean_object* x_2033; lean_object* x_2034; lean_object* x_2035; lean_object* x_2036; lean_object* x_2037; lean_object* x_2038; lean_object* x_2039; lean_object* x_2040; lean_object* x_2060; lean_object* x_2061; uint8_t x_2062; -x_2007 = lean_ctor_get(x_1957, 0); -lean_inc(x_2007); -lean_dec(x_1957); -x_2008 = lean_ctor_get(x_1956, 0); -lean_inc(x_2008); -x_2009 = lean_ctor_get(x_1956, 1); -lean_inc(x_2009); -x_2010 = lean_ctor_get(x_1956, 2); -lean_inc(x_2010); -if (lean_is_exclusive(x_1956)) { - lean_ctor_release(x_1956, 0); - lean_ctor_release(x_1956, 1); - lean_ctor_release(x_1956, 2); - x_2011 = x_1956; -} else { - lean_dec_ref(x_1956); - x_2011 = lean_box(0); -} -x_2012 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_2009); -if (lean_is_scalar(x_2011)) { - x_2013 = lean_alloc_ctor(0, 3, 0); -} else { - x_2013 = x_2011; -} -lean_ctor_set(x_2013, 0, x_2012); -lean_ctor_set(x_2013, 1, x_2009); -lean_ctor_set(x_2013, 2, x_2010); -x_2014 = l_Lean_Syntax_setHeadInfo(x_1904, x_2013); -x_2015 = lean_ctor_get(x_2007, 0); -lean_inc(x_2015); -x_2016 = lean_ctor_get(x_2007, 1); -lean_inc(x_2016); -x_2017 = lean_ctor_get(x_2007, 2); -lean_inc(x_2017); -if (lean_is_exclusive(x_2007)) { - lean_ctor_release(x_2007, 0); - lean_ctor_release(x_2007, 1); - lean_ctor_release(x_2007, 2); - x_2018 = x_2007; -} else { - lean_dec_ref(x_2007); - x_2018 = lean_box(0); -} -lean_inc(x_2016); -if (lean_is_scalar(x_2018)) { - x_2019 = lean_alloc_ctor(0, 3, 0); -} else { - x_2019 = x_2018; -} -lean_ctor_set(x_2019, 0, x_2015); -lean_ctor_set(x_2019, 1, x_2016); -lean_ctor_set(x_2019, 2, x_2012); -x_2020 = l_Lean_Syntax_setTailInfo(x_2014, x_2019); -x_2021 = lean_apply_1(x_2, x_2020); -x_2022 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_2022, 0, x_2008); -lean_ctor_set(x_2022, 1, x_2009); -lean_ctor_set(x_2022, 2, x_2012); -x_2023 = l_Lean_Syntax_setHeadInfo(x_2021, x_2022); -x_2024 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_2024, 0, x_2012); -lean_ctor_set(x_2024, 1, x_2016); -lean_ctor_set(x_2024, 2, x_2017); -x_2025 = l_Lean_Syntax_setTailInfo(x_2023, x_2024); -x_2026 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2025, x_5, x_1905, x_7, x_8, x_1903); -x_2027 = lean_ctor_get(x_2026, 0); -lean_inc(x_2027); -x_2028 = lean_ctor_get(x_2027, 0); -lean_inc(x_2028); -lean_dec(x_2027); -x_2029 = lean_ctor_get(x_2026, 1); -lean_inc(x_2029); -lean_dec(x_2026); -x_2030 = lean_ctor_get(x_2028, 1); -lean_inc(x_2030); -lean_dec(x_2028); -x_2031 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2030, x_7, x_8, x_2029); -x_2032 = lean_ctor_get(x_2031, 0); -lean_inc(x_2032); -x_2033 = lean_ctor_get(x_2032, 0); -lean_inc(x_2033); -if (lean_is_exclusive(x_2032)) { - lean_ctor_release(x_2032, 0); - x_2034 = x_2032; -} else { - lean_dec_ref(x_2032); - x_2034 = lean_box(0); -} -x_2035 = lean_ctor_get(x_2031, 1); -lean_inc(x_2035); -lean_dec(x_2031); -x_2036 = lean_ctor_get(x_2033, 0); -lean_inc(x_2036); -x_2037 = lean_ctor_get(x_2033, 1); -lean_inc(x_2037); -if (lean_is_exclusive(x_2033)) { - lean_ctor_release(x_2033, 0); - lean_ctor_release(x_2033, 1); - x_2038 = x_2033; -} else { - lean_dec_ref(x_2033); - x_2038 = lean_box(0); -} -x_2060 = l_Lean_Core_getTraceState___rarg(x_8, x_2035); -x_2061 = lean_ctor_get(x_2060, 0); -lean_inc(x_2061); -x_2062 = lean_ctor_get_uint8(x_2061, sizeof(void*)*1); -lean_dec(x_2061); -if (x_2062 == 0) -{ -lean_object* x_2063; lean_object* x_2064; lean_object* x_2065; lean_object* x_2066; -x_2063 = lean_ctor_get(x_2060, 1); -lean_inc(x_2063); -lean_dec(x_2060); -x_2064 = lean_box(x_226); -if (lean_is_scalar(x_2038)) { - x_2065 = lean_alloc_ctor(0, 2, 0); -} else { - x_2065 = x_2038; -} -lean_ctor_set(x_2065, 0, x_2064); -lean_ctor_set(x_2065, 1, x_2037); -if (lean_is_scalar(x_2034)) { - x_2066 = lean_alloc_ctor(1, 1, 0); -} else { - x_2066 = x_2034; -} -lean_ctor_set(x_2066, 0, x_2065); -x_2039 = x_2066; -x_2040 = x_2063; -goto block_2059; -} -else -{ -lean_object* x_2067; lean_object* x_2068; lean_object* x_2069; lean_object* x_2070; lean_object* x_2071; lean_object* x_2072; lean_object* x_2073; -x_2067 = lean_ctor_get(x_2060, 1); -lean_inc(x_2067); -lean_dec(x_2060); -x_2068 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2069 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2068, x_7, x_8, x_2067); -x_2070 = lean_ctor_get(x_2069, 0); -lean_inc(x_2070); -x_2071 = lean_ctor_get(x_2069, 1); -lean_inc(x_2071); -lean_dec(x_2069); -if (lean_is_scalar(x_2038)) { - x_2072 = lean_alloc_ctor(0, 2, 0); -} else { - x_2072 = x_2038; -} -lean_ctor_set(x_2072, 0, x_2070); -lean_ctor_set(x_2072, 1, x_2037); -if (lean_is_scalar(x_2034)) { - x_2073 = lean_alloc_ctor(1, 1, 0); -} else { - x_2073 = x_2034; -} -lean_ctor_set(x_2073, 0, x_2072); -x_2039 = x_2073; -x_2040 = x_2071; -goto block_2059; -} -block_2059: -{ -lean_object* x_2041; lean_object* x_2042; lean_object* x_2043; uint8_t x_2044; -x_2041 = lean_ctor_get(x_2039, 0); -lean_inc(x_2041); -if (lean_is_exclusive(x_2039)) { - lean_ctor_release(x_2039, 0); - x_2042 = x_2039; -} else { - lean_dec_ref(x_2039); - x_2042 = lean_box(0); -} -x_2043 = lean_ctor_get(x_2041, 0); -lean_inc(x_2043); -x_2044 = lean_unbox(x_2043); -lean_dec(x_2043); -if (x_2044 == 0) -{ -lean_object* x_2045; lean_object* x_2046; lean_object* x_2047; lean_object* x_2048; lean_object* x_2049; -lean_dec(x_2036); -lean_dec(x_5); -x_2045 = lean_ctor_get(x_2041, 1); -lean_inc(x_2045); -if (lean_is_exclusive(x_2041)) { - lean_ctor_release(x_2041, 0); - lean_ctor_release(x_2041, 1); - x_2046 = x_2041; -} else { - lean_dec_ref(x_2041); - x_2046 = lean_box(0); -} -x_2047 = lean_box(0); -if (lean_is_scalar(x_2046)) { - x_2048 = lean_alloc_ctor(0, 2, 0); -} else { - x_2048 = x_2046; -} -lean_ctor_set(x_2048, 0, x_2047); -lean_ctor_set(x_2048, 1, x_2045); -if (lean_is_scalar(x_2042)) { - x_2049 = lean_alloc_ctor(1, 1, 0); -} else { - x_2049 = x_2042; -} -lean_ctor_set(x_2049, 0, x_2048); -x_1874 = x_2049; -x_1875 = x_2040; -goto block_1896; -} -else -{ -lean_object* x_2050; lean_object* x_2051; lean_object* x_2052; lean_object* x_2053; lean_object* x_2054; lean_object* x_2055; lean_object* x_2056; lean_object* x_2057; lean_object* x_2058; -lean_dec(x_2042); -x_2050 = lean_ctor_get(x_2041, 1); -lean_inc(x_2050); -lean_dec(x_2041); -x_2051 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1898, x_2036); -x_2052 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2052, 0, x_2051); -x_2053 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2054 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2054, 0, x_2053); -lean_ctor_set(x_2054, 1, x_2052); -x_2055 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2056 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2055, x_2054, x_5, x_2050, x_7, x_8, x_2040); -lean_dec(x_5); -x_2057 = lean_ctor_get(x_2056, 0); -lean_inc(x_2057); -x_2058 = lean_ctor_get(x_2056, 1); -lean_inc(x_2058); -lean_dec(x_2056); -x_1874 = x_2057; -x_1875 = x_2058; -goto block_1896; -} -} -} -} -} -else -{ -lean_object* x_2074; lean_object* x_2075; lean_object* x_2076; lean_object* x_2077; lean_object* x_2078; lean_object* x_2079; lean_object* x_2080; lean_object* x_2081; lean_object* x_2082; lean_object* x_2083; lean_object* x_2084; lean_object* x_2085; -x_2074 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_1872, x_7, x_8, x_261); -x_2075 = lean_ctor_get(x_2074, 0); -lean_inc(x_2075); -x_2076 = lean_ctor_get(x_2075, 0); -lean_inc(x_2076); -lean_dec(x_2075); -x_2077 = lean_ctor_get(x_2074, 1); -lean_inc(x_2077); -lean_dec(x_2074); -x_2078 = lean_ctor_get(x_2076, 1); -lean_inc(x_2078); -lean_dec(x_2076); -x_2079 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2078, x_7, x_8, x_2077); -x_2080 = lean_ctor_get(x_2079, 0); -lean_inc(x_2080); -x_2081 = lean_ctor_get(x_2080, 0); -lean_inc(x_2081); -lean_dec(x_2080); -x_2082 = lean_ctor_get(x_2079, 1); -lean_inc(x_2082); -lean_dec(x_2079); -x_2083 = lean_ctor_get(x_2081, 0); -lean_inc(x_2083); -x_2084 = lean_ctor_get(x_2081, 1); -lean_inc(x_2084); -lean_dec(x_2081); -x_2085 = l_Lean_Syntax_getHeadInfo___main(x_2083); -if (lean_obj_tag(x_2085) == 0) -{ -lean_object* x_2086; lean_object* x_2087; lean_object* x_2088; lean_object* x_2089; lean_object* x_2090; lean_object* x_2091; lean_object* x_2092; lean_object* x_2093; lean_object* x_2094; lean_object* x_2095; lean_object* x_2096; lean_object* x_2097; lean_object* x_2098; lean_object* x_2099; lean_object* x_2100; lean_object* x_2101; lean_object* x_2121; lean_object* x_2122; uint8_t x_2123; -x_2086 = lean_apply_1(x_2, x_2083); -x_2087 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2086, x_5, x_2084, x_7, x_8, x_2082); -x_2088 = lean_ctor_get(x_2087, 0); -lean_inc(x_2088); -x_2089 = lean_ctor_get(x_2088, 0); -lean_inc(x_2089); -lean_dec(x_2088); -x_2090 = lean_ctor_get(x_2087, 1); -lean_inc(x_2090); -lean_dec(x_2087); -x_2091 = lean_ctor_get(x_2089, 1); -lean_inc(x_2091); -lean_dec(x_2089); -x_2092 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2091, x_7, x_8, x_2090); -x_2093 = lean_ctor_get(x_2092, 0); -lean_inc(x_2093); -x_2094 = lean_ctor_get(x_2093, 0); -lean_inc(x_2094); -if (lean_is_exclusive(x_2093)) { - lean_ctor_release(x_2093, 0); - x_2095 = x_2093; -} else { - lean_dec_ref(x_2093); - x_2095 = lean_box(0); -} -x_2096 = lean_ctor_get(x_2092, 1); -lean_inc(x_2096); -lean_dec(x_2092); -x_2097 = lean_ctor_get(x_2094, 0); -lean_inc(x_2097); -x_2098 = lean_ctor_get(x_2094, 1); -lean_inc(x_2098); -if (lean_is_exclusive(x_2094)) { - lean_ctor_release(x_2094, 0); - lean_ctor_release(x_2094, 1); - x_2099 = x_2094; -} else { - lean_dec_ref(x_2094); - x_2099 = lean_box(0); -} -x_2121 = l_Lean_Core_getTraceState___rarg(x_8, x_2096); -x_2122 = lean_ctor_get(x_2121, 0); -lean_inc(x_2122); -x_2123 = lean_ctor_get_uint8(x_2122, sizeof(void*)*1); -lean_dec(x_2122); -if (x_2123 == 0) -{ -lean_object* x_2124; lean_object* x_2125; lean_object* x_2126; lean_object* x_2127; -x_2124 = lean_ctor_get(x_2121, 1); -lean_inc(x_2124); -lean_dec(x_2121); -x_2125 = lean_box(x_226); -if (lean_is_scalar(x_2099)) { - x_2126 = lean_alloc_ctor(0, 2, 0); -} else { - x_2126 = x_2099; -} -lean_ctor_set(x_2126, 0, x_2125); -lean_ctor_set(x_2126, 1, x_2098); -if (lean_is_scalar(x_2095)) { - x_2127 = lean_alloc_ctor(1, 1, 0); -} else { - x_2127 = x_2095; -} -lean_ctor_set(x_2127, 0, x_2126); -x_2100 = x_2127; -x_2101 = x_2124; -goto block_2120; -} -else -{ -lean_object* x_2128; lean_object* x_2129; lean_object* x_2130; lean_object* x_2131; lean_object* x_2132; lean_object* x_2133; lean_object* x_2134; -x_2128 = lean_ctor_get(x_2121, 1); -lean_inc(x_2128); -lean_dec(x_2121); -x_2129 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2130 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2129, x_7, x_8, x_2128); -x_2131 = lean_ctor_get(x_2130, 0); -lean_inc(x_2131); -x_2132 = lean_ctor_get(x_2130, 1); -lean_inc(x_2132); -lean_dec(x_2130); -if (lean_is_scalar(x_2099)) { - x_2133 = lean_alloc_ctor(0, 2, 0); -} else { - x_2133 = x_2099; -} -lean_ctor_set(x_2133, 0, x_2131); -lean_ctor_set(x_2133, 1, x_2098); -if (lean_is_scalar(x_2095)) { - x_2134 = lean_alloc_ctor(1, 1, 0); -} else { - x_2134 = x_2095; -} -lean_ctor_set(x_2134, 0, x_2133); -x_2100 = x_2134; -x_2101 = x_2132; -goto block_2120; -} -block_2120: -{ -lean_object* x_2102; lean_object* x_2103; lean_object* x_2104; uint8_t x_2105; -x_2102 = lean_ctor_get(x_2100, 0); -lean_inc(x_2102); -if (lean_is_exclusive(x_2100)) { - lean_ctor_release(x_2100, 0); - x_2103 = x_2100; -} else { - lean_dec_ref(x_2100); - x_2103 = lean_box(0); -} -x_2104 = lean_ctor_get(x_2102, 0); -lean_inc(x_2104); -x_2105 = lean_unbox(x_2104); -lean_dec(x_2104); -if (x_2105 == 0) -{ -lean_object* x_2106; lean_object* x_2107; lean_object* x_2108; lean_object* x_2109; lean_object* x_2110; -lean_dec(x_2097); -lean_dec(x_5); -x_2106 = lean_ctor_get(x_2102, 1); -lean_inc(x_2106); -if (lean_is_exclusive(x_2102)) { - lean_ctor_release(x_2102, 0); - lean_ctor_release(x_2102, 1); - x_2107 = x_2102; -} else { - lean_dec_ref(x_2102); - x_2107 = lean_box(0); -} -x_2108 = lean_box(0); -if (lean_is_scalar(x_2107)) { - x_2109 = lean_alloc_ctor(0, 2, 0); -} else { - x_2109 = x_2107; -} -lean_ctor_set(x_2109, 0, x_2108); -lean_ctor_set(x_2109, 1, x_2106); -if (lean_is_scalar(x_2103)) { - x_2110 = lean_alloc_ctor(1, 1, 0); -} else { - x_2110 = x_2103; -} -lean_ctor_set(x_2110, 0, x_2109); -x_1874 = x_2110; -x_1875 = x_2101; -goto block_1896; -} -else -{ -lean_object* x_2111; lean_object* x_2112; lean_object* x_2113; lean_object* x_2114; lean_object* x_2115; lean_object* x_2116; lean_object* x_2117; lean_object* x_2118; lean_object* x_2119; -lean_dec(x_2103); -x_2111 = lean_ctor_get(x_2102, 1); -lean_inc(x_2111); -lean_dec(x_2102); -x_2112 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1898, x_2097); -x_2113 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2113, 0, x_2112); -x_2114 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2115 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2115, 0, x_2114); -lean_ctor_set(x_2115, 1, x_2113); -x_2116 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2117 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2116, x_2115, x_5, x_2111, x_7, x_8, x_2101); -lean_dec(x_5); -x_2118 = lean_ctor_get(x_2117, 0); -lean_inc(x_2118); -x_2119 = lean_ctor_get(x_2117, 1); -lean_inc(x_2119); -lean_dec(x_2117); -x_1874 = x_2118; -x_1875 = x_2119; -goto block_1896; -} -} -} -else -{ -lean_object* x_2135; lean_object* x_2136; -x_2135 = lean_ctor_get(x_2085, 0); -lean_inc(x_2135); -lean_dec(x_2085); -x_2136 = l_Lean_Syntax_getTailInfo___main(x_2083); -if (lean_obj_tag(x_2136) == 0) -{ -lean_object* x_2137; lean_object* x_2138; lean_object* x_2139; lean_object* x_2140; lean_object* x_2141; lean_object* x_2142; lean_object* x_2143; lean_object* x_2144; lean_object* x_2145; lean_object* x_2146; lean_object* x_2147; lean_object* x_2148; lean_object* x_2149; lean_object* x_2150; lean_object* x_2151; lean_object* x_2152; lean_object* x_2172; lean_object* x_2173; uint8_t x_2174; -lean_dec(x_2135); -x_2137 = lean_apply_1(x_2, x_2083); -x_2138 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2137, x_5, x_2084, x_7, x_8, x_2082); -x_2139 = lean_ctor_get(x_2138, 0); -lean_inc(x_2139); -x_2140 = lean_ctor_get(x_2139, 0); -lean_inc(x_2140); -lean_dec(x_2139); -x_2141 = lean_ctor_get(x_2138, 1); -lean_inc(x_2141); -lean_dec(x_2138); -x_2142 = lean_ctor_get(x_2140, 1); -lean_inc(x_2142); -lean_dec(x_2140); -x_2143 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2142, x_7, x_8, x_2141); -x_2144 = lean_ctor_get(x_2143, 0); -lean_inc(x_2144); -x_2145 = lean_ctor_get(x_2144, 0); -lean_inc(x_2145); -if (lean_is_exclusive(x_2144)) { - lean_ctor_release(x_2144, 0); - x_2146 = x_2144; -} else { - lean_dec_ref(x_2144); - x_2146 = lean_box(0); -} -x_2147 = lean_ctor_get(x_2143, 1); -lean_inc(x_2147); -lean_dec(x_2143); -x_2148 = lean_ctor_get(x_2145, 0); -lean_inc(x_2148); -x_2149 = lean_ctor_get(x_2145, 1); -lean_inc(x_2149); -if (lean_is_exclusive(x_2145)) { - lean_ctor_release(x_2145, 0); - lean_ctor_release(x_2145, 1); - x_2150 = x_2145; -} else { - lean_dec_ref(x_2145); - x_2150 = lean_box(0); -} -x_2172 = l_Lean_Core_getTraceState___rarg(x_8, x_2147); -x_2173 = lean_ctor_get(x_2172, 0); -lean_inc(x_2173); -x_2174 = lean_ctor_get_uint8(x_2173, sizeof(void*)*1); -lean_dec(x_2173); -if (x_2174 == 0) -{ -lean_object* x_2175; lean_object* x_2176; lean_object* x_2177; lean_object* x_2178; -x_2175 = lean_ctor_get(x_2172, 1); -lean_inc(x_2175); -lean_dec(x_2172); -x_2176 = lean_box(x_226); -if (lean_is_scalar(x_2150)) { - x_2177 = lean_alloc_ctor(0, 2, 0); -} else { - x_2177 = x_2150; -} -lean_ctor_set(x_2177, 0, x_2176); -lean_ctor_set(x_2177, 1, x_2149); -if (lean_is_scalar(x_2146)) { - x_2178 = lean_alloc_ctor(1, 1, 0); -} else { - x_2178 = x_2146; -} -lean_ctor_set(x_2178, 0, x_2177); -x_2151 = x_2178; -x_2152 = x_2175; -goto block_2171; -} -else -{ -lean_object* x_2179; lean_object* x_2180; lean_object* x_2181; lean_object* x_2182; lean_object* x_2183; lean_object* x_2184; lean_object* x_2185; -x_2179 = lean_ctor_get(x_2172, 1); -lean_inc(x_2179); -lean_dec(x_2172); -x_2180 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2181 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2180, x_7, x_8, x_2179); -x_2182 = lean_ctor_get(x_2181, 0); -lean_inc(x_2182); -x_2183 = lean_ctor_get(x_2181, 1); -lean_inc(x_2183); -lean_dec(x_2181); -if (lean_is_scalar(x_2150)) { - x_2184 = lean_alloc_ctor(0, 2, 0); -} else { - x_2184 = x_2150; -} -lean_ctor_set(x_2184, 0, x_2182); -lean_ctor_set(x_2184, 1, x_2149); -if (lean_is_scalar(x_2146)) { - x_2185 = lean_alloc_ctor(1, 1, 0); -} else { - x_2185 = x_2146; -} -lean_ctor_set(x_2185, 0, x_2184); -x_2151 = x_2185; -x_2152 = x_2183; -goto block_2171; -} -block_2171: -{ -lean_object* x_2153; lean_object* x_2154; lean_object* x_2155; uint8_t x_2156; -x_2153 = lean_ctor_get(x_2151, 0); -lean_inc(x_2153); -if (lean_is_exclusive(x_2151)) { - lean_ctor_release(x_2151, 0); - x_2154 = x_2151; -} else { - lean_dec_ref(x_2151); - x_2154 = lean_box(0); -} -x_2155 = lean_ctor_get(x_2153, 0); -lean_inc(x_2155); -x_2156 = lean_unbox(x_2155); -lean_dec(x_2155); -if (x_2156 == 0) -{ -lean_object* x_2157; lean_object* x_2158; lean_object* x_2159; lean_object* x_2160; lean_object* x_2161; -lean_dec(x_2148); -lean_dec(x_5); -x_2157 = lean_ctor_get(x_2153, 1); -lean_inc(x_2157); -if (lean_is_exclusive(x_2153)) { - lean_ctor_release(x_2153, 0); - lean_ctor_release(x_2153, 1); - x_2158 = x_2153; -} else { - lean_dec_ref(x_2153); - x_2158 = lean_box(0); -} -x_2159 = lean_box(0); -if (lean_is_scalar(x_2158)) { - x_2160 = lean_alloc_ctor(0, 2, 0); -} else { - x_2160 = x_2158; -} -lean_ctor_set(x_2160, 0, x_2159); -lean_ctor_set(x_2160, 1, x_2157); -if (lean_is_scalar(x_2154)) { - x_2161 = lean_alloc_ctor(1, 1, 0); -} else { - x_2161 = x_2154; -} -lean_ctor_set(x_2161, 0, x_2160); -x_1874 = x_2161; -x_1875 = x_2152; -goto block_1896; -} -else -{ -lean_object* x_2162; lean_object* x_2163; lean_object* x_2164; lean_object* x_2165; lean_object* x_2166; lean_object* x_2167; lean_object* x_2168; lean_object* x_2169; lean_object* x_2170; -lean_dec(x_2154); -x_2162 = lean_ctor_get(x_2153, 1); -lean_inc(x_2162); -lean_dec(x_2153); -x_2163 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1898, x_2148); -x_2164 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2164, 0, x_2163); -x_2165 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2166 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2166, 0, x_2165); -lean_ctor_set(x_2166, 1, x_2164); -x_2167 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2168 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2167, x_2166, x_5, x_2162, x_7, x_8, x_2152); -lean_dec(x_5); -x_2169 = lean_ctor_get(x_2168, 0); -lean_inc(x_2169); -x_2170 = lean_ctor_get(x_2168, 1); -lean_inc(x_2170); -lean_dec(x_2168); -x_1874 = x_2169; -x_1875 = x_2170; -goto block_1896; -} -} -} -else -{ -lean_object* x_2186; lean_object* x_2187; lean_object* x_2188; lean_object* x_2189; lean_object* x_2190; lean_object* x_2191; lean_object* x_2192; lean_object* x_2193; lean_object* x_2194; lean_object* x_2195; lean_object* x_2196; lean_object* x_2197; lean_object* x_2198; lean_object* x_2199; lean_object* x_2200; lean_object* x_2201; lean_object* x_2202; lean_object* x_2203; lean_object* x_2204; lean_object* x_2205; lean_object* x_2206; lean_object* x_2207; lean_object* x_2208; lean_object* x_2209; lean_object* x_2210; lean_object* x_2211; lean_object* x_2212; lean_object* x_2213; lean_object* x_2214; lean_object* x_2215; lean_object* x_2216; lean_object* x_2217; lean_object* x_2218; lean_object* x_2219; lean_object* x_2239; lean_object* x_2240; uint8_t x_2241; -x_2186 = lean_ctor_get(x_2136, 0); -lean_inc(x_2186); -lean_dec(x_2136); -x_2187 = lean_ctor_get(x_2135, 0); -lean_inc(x_2187); -x_2188 = lean_ctor_get(x_2135, 1); -lean_inc(x_2188); -x_2189 = lean_ctor_get(x_2135, 2); -lean_inc(x_2189); -if (lean_is_exclusive(x_2135)) { - lean_ctor_release(x_2135, 0); - lean_ctor_release(x_2135, 1); - lean_ctor_release(x_2135, 2); - x_2190 = x_2135; -} else { - lean_dec_ref(x_2135); - x_2190 = lean_box(0); -} -x_2191 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_2188); -if (lean_is_scalar(x_2190)) { - x_2192 = lean_alloc_ctor(0, 3, 0); -} else { - x_2192 = x_2190; -} -lean_ctor_set(x_2192, 0, x_2191); -lean_ctor_set(x_2192, 1, x_2188); -lean_ctor_set(x_2192, 2, x_2189); -x_2193 = l_Lean_Syntax_setHeadInfo(x_2083, x_2192); -x_2194 = lean_ctor_get(x_2186, 0); -lean_inc(x_2194); -x_2195 = lean_ctor_get(x_2186, 1); -lean_inc(x_2195); -x_2196 = lean_ctor_get(x_2186, 2); -lean_inc(x_2196); -if (lean_is_exclusive(x_2186)) { - lean_ctor_release(x_2186, 0); - lean_ctor_release(x_2186, 1); - lean_ctor_release(x_2186, 2); - x_2197 = x_2186; -} else { - lean_dec_ref(x_2186); - x_2197 = lean_box(0); -} -lean_inc(x_2195); -if (lean_is_scalar(x_2197)) { - x_2198 = lean_alloc_ctor(0, 3, 0); -} else { - x_2198 = x_2197; -} -lean_ctor_set(x_2198, 0, x_2194); -lean_ctor_set(x_2198, 1, x_2195); -lean_ctor_set(x_2198, 2, x_2191); -x_2199 = l_Lean_Syntax_setTailInfo(x_2193, x_2198); -x_2200 = lean_apply_1(x_2, x_2199); -x_2201 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_2201, 0, x_2187); -lean_ctor_set(x_2201, 1, x_2188); -lean_ctor_set(x_2201, 2, x_2191); -x_2202 = l_Lean_Syntax_setHeadInfo(x_2200, x_2201); -x_2203 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_2203, 0, x_2191); -lean_ctor_set(x_2203, 1, x_2195); -lean_ctor_set(x_2203, 2, x_2196); -x_2204 = l_Lean_Syntax_setTailInfo(x_2202, x_2203); -x_2205 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2204, x_5, x_2084, x_7, x_8, x_2082); -x_2206 = lean_ctor_get(x_2205, 0); -lean_inc(x_2206); -x_2207 = lean_ctor_get(x_2206, 0); -lean_inc(x_2207); -lean_dec(x_2206); -x_2208 = lean_ctor_get(x_2205, 1); -lean_inc(x_2208); -lean_dec(x_2205); -x_2209 = lean_ctor_get(x_2207, 1); -lean_inc(x_2209); -lean_dec(x_2207); -x_2210 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2209, x_7, x_8, x_2208); -x_2211 = lean_ctor_get(x_2210, 0); -lean_inc(x_2211); -x_2212 = lean_ctor_get(x_2211, 0); -lean_inc(x_2212); -if (lean_is_exclusive(x_2211)) { - lean_ctor_release(x_2211, 0); - x_2213 = x_2211; -} else { - lean_dec_ref(x_2211); - x_2213 = lean_box(0); -} -x_2214 = lean_ctor_get(x_2210, 1); -lean_inc(x_2214); -lean_dec(x_2210); -x_2215 = lean_ctor_get(x_2212, 0); -lean_inc(x_2215); -x_2216 = lean_ctor_get(x_2212, 1); -lean_inc(x_2216); -if (lean_is_exclusive(x_2212)) { - lean_ctor_release(x_2212, 0); - lean_ctor_release(x_2212, 1); - x_2217 = x_2212; -} else { - lean_dec_ref(x_2212); - x_2217 = lean_box(0); -} -x_2239 = l_Lean_Core_getTraceState___rarg(x_8, x_2214); -x_2240 = lean_ctor_get(x_2239, 0); -lean_inc(x_2240); -x_2241 = lean_ctor_get_uint8(x_2240, sizeof(void*)*1); -lean_dec(x_2240); -if (x_2241 == 0) -{ -lean_object* x_2242; lean_object* x_2243; lean_object* x_2244; lean_object* x_2245; -x_2242 = lean_ctor_get(x_2239, 1); -lean_inc(x_2242); -lean_dec(x_2239); -x_2243 = lean_box(x_226); -if (lean_is_scalar(x_2217)) { - x_2244 = lean_alloc_ctor(0, 2, 0); -} else { - x_2244 = x_2217; -} -lean_ctor_set(x_2244, 0, x_2243); -lean_ctor_set(x_2244, 1, x_2216); -if (lean_is_scalar(x_2213)) { - x_2245 = lean_alloc_ctor(1, 1, 0); -} else { - x_2245 = x_2213; -} -lean_ctor_set(x_2245, 0, x_2244); -x_2218 = x_2245; -x_2219 = x_2242; -goto block_2238; -} -else -{ -lean_object* x_2246; lean_object* x_2247; lean_object* x_2248; lean_object* x_2249; lean_object* x_2250; lean_object* x_2251; lean_object* x_2252; -x_2246 = lean_ctor_get(x_2239, 1); -lean_inc(x_2246); -lean_dec(x_2239); -x_2247 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2248 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2247, x_7, x_8, x_2246); -x_2249 = lean_ctor_get(x_2248, 0); -lean_inc(x_2249); -x_2250 = lean_ctor_get(x_2248, 1); -lean_inc(x_2250); -lean_dec(x_2248); -if (lean_is_scalar(x_2217)) { - x_2251 = lean_alloc_ctor(0, 2, 0); -} else { - x_2251 = x_2217; -} -lean_ctor_set(x_2251, 0, x_2249); -lean_ctor_set(x_2251, 1, x_2216); -if (lean_is_scalar(x_2213)) { - x_2252 = lean_alloc_ctor(1, 1, 0); -} else { - x_2252 = x_2213; -} -lean_ctor_set(x_2252, 0, x_2251); -x_2218 = x_2252; -x_2219 = x_2250; -goto block_2238; -} -block_2238: -{ -lean_object* x_2220; lean_object* x_2221; lean_object* x_2222; uint8_t x_2223; -x_2220 = lean_ctor_get(x_2218, 0); -lean_inc(x_2220); -if (lean_is_exclusive(x_2218)) { - lean_ctor_release(x_2218, 0); - x_2221 = x_2218; -} else { - lean_dec_ref(x_2218); - x_2221 = lean_box(0); -} -x_2222 = lean_ctor_get(x_2220, 0); -lean_inc(x_2222); -x_2223 = lean_unbox(x_2222); -lean_dec(x_2222); -if (x_2223 == 0) -{ -lean_object* x_2224; lean_object* x_2225; lean_object* x_2226; lean_object* x_2227; lean_object* x_2228; -lean_dec(x_2215); -lean_dec(x_5); -x_2224 = lean_ctor_get(x_2220, 1); -lean_inc(x_2224); -if (lean_is_exclusive(x_2220)) { - lean_ctor_release(x_2220, 0); - lean_ctor_release(x_2220, 1); - x_2225 = x_2220; -} else { - lean_dec_ref(x_2220); - x_2225 = lean_box(0); -} -x_2226 = lean_box(0); -if (lean_is_scalar(x_2225)) { - x_2227 = lean_alloc_ctor(0, 2, 0); -} else { - x_2227 = x_2225; -} -lean_ctor_set(x_2227, 0, x_2226); -lean_ctor_set(x_2227, 1, x_2224); -if (lean_is_scalar(x_2221)) { - x_2228 = lean_alloc_ctor(1, 1, 0); -} else { - x_2228 = x_2221; -} -lean_ctor_set(x_2228, 0, x_2227); -x_1874 = x_2228; -x_1875 = x_2219; -goto block_1896; -} -else -{ -lean_object* x_2229; lean_object* x_2230; lean_object* x_2231; lean_object* x_2232; lean_object* x_2233; lean_object* x_2234; lean_object* x_2235; lean_object* x_2236; lean_object* x_2237; -lean_dec(x_2221); -x_2229 = lean_ctor_get(x_2220, 1); -lean_inc(x_2229); -lean_dec(x_2220); -x_2230 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_1898, x_2215); -x_2231 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2231, 0, x_2230); -x_2232 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2233 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2233, 0, x_2232); -lean_ctor_set(x_2233, 1, x_2231); -x_2234 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2235 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2234, x_2233, x_5, x_2229, x_7, x_8, x_2219); -lean_dec(x_5); -x_2236 = lean_ctor_get(x_2235, 0); -lean_inc(x_2236); -x_2237 = lean_ctor_get(x_2235, 1); -lean_inc(x_2237); -lean_dec(x_2235); -x_1874 = x_2236; -x_1875 = x_2237; -goto block_1896; -} -} -} -} -} -} -} -} -block_2386: -{ -uint8_t x_2282; -x_2282 = !lean_is_exclusive(x_2280); -if (x_2282 == 0) -{ -lean_object* x_2283; lean_object* x_2284; uint8_t x_2285; -x_2283 = lean_ctor_get(x_2280, 0); -x_2284 = lean_ctor_get(x_2283, 0); -lean_inc(x_2284); -x_2285 = lean_unbox(x_2284); -lean_dec(x_2284); -if (x_2285 == 0) -{ -uint8_t x_2286; -lean_dec(x_249); -x_2286 = !lean_is_exclusive(x_2283); -if (x_2286 == 0) -{ -lean_object* x_2287; lean_object* x_2288; -x_2287 = lean_ctor_get(x_2283, 0); -lean_dec(x_2287); -x_2288 = lean_box(0); -lean_ctor_set(x_2283, 0, x_2288); -x_260 = x_2280; -x_261 = x_2281; -goto block_2279; -} -else -{ -lean_object* x_2289; lean_object* x_2290; lean_object* x_2291; -x_2289 = lean_ctor_get(x_2283, 1); -lean_inc(x_2289); -lean_dec(x_2283); -x_2290 = lean_box(0); -x_2291 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_2291, 0, x_2290); -lean_ctor_set(x_2291, 1, x_2289); -lean_ctor_set(x_2280, 0, x_2291); -x_260 = x_2280; -x_261 = x_2281; -goto block_2279; -} -} -else -{ -uint8_t x_2292; -lean_free_object(x_2280); -x_2292 = !lean_is_exclusive(x_2283); -if (x_2292 == 0) -{ -lean_object* x_2293; lean_object* x_2294; lean_object* x_2295; lean_object* x_2296; lean_object* x_2297; lean_object* x_2298; lean_object* x_2299; lean_object* x_2300; lean_object* x_2301; lean_object* x_2302; lean_object* x_2303; lean_object* x_2304; lean_object* x_2305; lean_object* x_2306; lean_object* x_2307; lean_object* x_2308; lean_object* x_2309; lean_object* x_2310; lean_object* x_2311; lean_object* x_2312; lean_object* x_2313; lean_object* x_2314; lean_object* x_2315; lean_object* x_2316; lean_object* x_2317; lean_object* x_2318; lean_object* x_2319; lean_object* x_2320; -x_2293 = lean_ctor_get(x_2283, 1); -x_2294 = lean_ctor_get(x_2283, 0); -lean_dec(x_2294); -lean_inc(x_3); -x_2295 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); -x_2296 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2296, 0, x_2295); -x_2297 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; -x_2298 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2298, 0, x_2297); -lean_ctor_set(x_2298, 1, x_2296); -x_2299 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22; -x_2300 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2300, 0, x_2298); -lean_ctor_set(x_2300, 1, x_2299); -lean_inc(x_259); -x_2301 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_259); -x_2302 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2302, 0, x_2301); -x_2303 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2303, 0, x_2300); -lean_ctor_set(x_2303, 1, x_2302); -x_2304 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; -x_2305 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2305, 0, x_2303); -lean_ctor_set(x_2305, 1, x_2304); -lean_inc(x_1); -lean_inc(x_258); -lean_ctor_set(x_2283, 1, x_1); -lean_ctor_set(x_2283, 0, x_258); -x_2306 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_2283); -x_2307 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2307, 0, x_2306); -x_2308 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2308, 0, x_2305); -lean_ctor_set(x_2308, 1, x_2307); -x_2309 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25; -x_2310 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2310, 0, x_2308); -lean_ctor_set(x_2310, 1, x_2309); -x_2311 = lean_ctor_get(x_23, 1); -lean_inc(x_2311); -x_2312 = lean_ctor_get(x_23, 2); -lean_inc(x_2312); -if (lean_is_scalar(x_249)) { - x_2313 = lean_alloc_ctor(0, 2, 0); -} else { - x_2313 = x_249; -} -lean_ctor_set(x_2313, 0, x_2311); -lean_ctor_set(x_2313, 1, x_2312); -x_2314 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_2313); -x_2315 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2315, 0, x_2314); -x_2316 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2316, 0, x_2310); -lean_ctor_set(x_2316, 1, x_2315); -x_2317 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2318 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2317, x_2316, x_5, x_2293, x_7, x_8, x_2281); -x_2319 = lean_ctor_get(x_2318, 0); -lean_inc(x_2319); -x_2320 = lean_ctor_get(x_2318, 1); -lean_inc(x_2320); -lean_dec(x_2318); -x_260 = x_2319; -x_261 = x_2320; -goto block_2279; -} -else -{ -lean_object* x_2321; lean_object* x_2322; lean_object* x_2323; lean_object* x_2324; lean_object* x_2325; lean_object* x_2326; lean_object* x_2327; lean_object* x_2328; lean_object* x_2329; lean_object* x_2330; lean_object* x_2331; lean_object* x_2332; lean_object* x_2333; lean_object* x_2334; lean_object* x_2335; lean_object* x_2336; lean_object* x_2337; lean_object* x_2338; lean_object* x_2339; lean_object* x_2340; lean_object* x_2341; lean_object* x_2342; lean_object* x_2343; lean_object* x_2344; lean_object* x_2345; lean_object* x_2346; lean_object* x_2347; lean_object* x_2348; -x_2321 = lean_ctor_get(x_2283, 1); -lean_inc(x_2321); -lean_dec(x_2283); -lean_inc(x_3); -x_2322 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); -x_2323 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2323, 0, x_2322); -x_2324 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; -x_2325 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2325, 0, x_2324); -lean_ctor_set(x_2325, 1, x_2323); -x_2326 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22; -x_2327 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2327, 0, x_2325); -lean_ctor_set(x_2327, 1, x_2326); -lean_inc(x_259); -x_2328 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_259); -x_2329 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2329, 0, x_2328); -x_2330 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2330, 0, x_2327); -lean_ctor_set(x_2330, 1, x_2329); -x_2331 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; -x_2332 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2332, 0, x_2330); -lean_ctor_set(x_2332, 1, x_2331); -lean_inc(x_1); -lean_inc(x_258); -x_2333 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_2333, 0, x_258); -lean_ctor_set(x_2333, 1, x_1); -x_2334 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_2333); -x_2335 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2335, 0, x_2334); -x_2336 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2336, 0, x_2332); -lean_ctor_set(x_2336, 1, x_2335); -x_2337 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25; -x_2338 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2338, 0, x_2336); -lean_ctor_set(x_2338, 1, x_2337); -x_2339 = lean_ctor_get(x_23, 1); -lean_inc(x_2339); -x_2340 = lean_ctor_get(x_23, 2); -lean_inc(x_2340); -if (lean_is_scalar(x_249)) { - x_2341 = lean_alloc_ctor(0, 2, 0); -} else { - x_2341 = x_249; -} -lean_ctor_set(x_2341, 0, x_2339); -lean_ctor_set(x_2341, 1, x_2340); -x_2342 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_2341); -x_2343 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2343, 0, x_2342); -x_2344 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2344, 0, x_2338); -lean_ctor_set(x_2344, 1, x_2343); -x_2345 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2346 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2345, x_2344, x_5, x_2321, x_7, x_8, x_2281); -x_2347 = lean_ctor_get(x_2346, 0); -lean_inc(x_2347); -x_2348 = lean_ctor_get(x_2346, 1); -lean_inc(x_2348); -lean_dec(x_2346); -x_260 = x_2347; -x_261 = x_2348; -goto block_2279; -} -} -} -else -{ -lean_object* x_2349; lean_object* x_2350; uint8_t x_2351; -x_2349 = lean_ctor_get(x_2280, 0); -lean_inc(x_2349); -lean_dec(x_2280); -x_2350 = lean_ctor_get(x_2349, 0); -lean_inc(x_2350); -x_2351 = lean_unbox(x_2350); -lean_dec(x_2350); -if (x_2351 == 0) -{ -lean_object* x_2352; lean_object* x_2353; lean_object* x_2354; lean_object* x_2355; lean_object* x_2356; -lean_dec(x_249); -x_2352 = lean_ctor_get(x_2349, 1); -lean_inc(x_2352); -if (lean_is_exclusive(x_2349)) { - lean_ctor_release(x_2349, 0); - lean_ctor_release(x_2349, 1); - x_2353 = x_2349; -} else { - lean_dec_ref(x_2349); - x_2353 = lean_box(0); -} -x_2354 = lean_box(0); -if (lean_is_scalar(x_2353)) { - x_2355 = lean_alloc_ctor(0, 2, 0); -} else { - x_2355 = x_2353; -} -lean_ctor_set(x_2355, 0, x_2354); -lean_ctor_set(x_2355, 1, x_2352); -x_2356 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2356, 0, x_2355); -x_260 = x_2356; -x_261 = x_2281; -goto block_2279; -} -else -{ -lean_object* x_2357; lean_object* x_2358; lean_object* x_2359; lean_object* x_2360; lean_object* x_2361; lean_object* x_2362; lean_object* x_2363; lean_object* x_2364; lean_object* x_2365; lean_object* x_2366; lean_object* x_2367; lean_object* x_2368; lean_object* x_2369; lean_object* x_2370; lean_object* x_2371; lean_object* x_2372; lean_object* x_2373; lean_object* x_2374; lean_object* x_2375; lean_object* x_2376; lean_object* x_2377; lean_object* x_2378; lean_object* x_2379; lean_object* x_2380; lean_object* x_2381; lean_object* x_2382; lean_object* x_2383; lean_object* x_2384; lean_object* x_2385; -x_2357 = lean_ctor_get(x_2349, 1); -lean_inc(x_2357); -if (lean_is_exclusive(x_2349)) { - lean_ctor_release(x_2349, 0); - lean_ctor_release(x_2349, 1); - x_2358 = x_2349; -} else { - lean_dec_ref(x_2349); - x_2358 = lean_box(0); -} -lean_inc(x_3); -x_2359 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); -x_2360 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2360, 0, x_2359); -x_2361 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; -x_2362 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2362, 0, x_2361); -lean_ctor_set(x_2362, 1, x_2360); -x_2363 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22; -x_2364 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2364, 0, x_2362); -lean_ctor_set(x_2364, 1, x_2363); -lean_inc(x_259); -x_2365 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_259); -x_2366 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2366, 0, x_2365); -x_2367 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2367, 0, x_2364); -lean_ctor_set(x_2367, 1, x_2366); -x_2368 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; -x_2369 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2369, 0, x_2367); -lean_ctor_set(x_2369, 1, x_2368); -lean_inc(x_1); -lean_inc(x_258); -if (lean_is_scalar(x_2358)) { - x_2370 = lean_alloc_ctor(0, 2, 0); -} else { - x_2370 = x_2358; -} -lean_ctor_set(x_2370, 0, x_258); -lean_ctor_set(x_2370, 1, x_1); -x_2371 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_2370); -x_2372 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2372, 0, x_2371); -x_2373 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2373, 0, x_2369); -lean_ctor_set(x_2373, 1, x_2372); -x_2374 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25; -x_2375 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2375, 0, x_2373); -lean_ctor_set(x_2375, 1, x_2374); -x_2376 = lean_ctor_get(x_23, 1); -lean_inc(x_2376); -x_2377 = lean_ctor_get(x_23, 2); -lean_inc(x_2377); -if (lean_is_scalar(x_249)) { - x_2378 = lean_alloc_ctor(0, 2, 0); -} else { - x_2378 = x_249; -} -lean_ctor_set(x_2378, 0, x_2376); -lean_ctor_set(x_2378, 1, x_2377); -x_2379 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_2378); -x_2380 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2380, 0, x_2379); -x_2381 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2381, 0, x_2375); -lean_ctor_set(x_2381, 1, x_2380); -x_2382 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2383 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2382, x_2381, x_5, x_2357, x_7, x_8, x_2281); -x_2384 = lean_ctor_get(x_2383, 0); -lean_inc(x_2384); -x_2385 = lean_ctor_get(x_2383, 1); -lean_inc(x_2385); -lean_dec(x_2383); -x_260 = x_2384; -x_261 = x_2385; -goto block_2279; -} -} -} -} -} -else -{ -lean_object* x_2397; lean_object* x_2398; lean_object* x_2399; lean_object* x_2400; -x_2397 = lean_ctor_get(x_235, 0); -lean_inc(x_2397); -lean_dec(x_235); -x_2398 = lean_ctor_get(x_2397, 1); -lean_inc(x_2398); -if (lean_is_exclusive(x_2397)) { - lean_ctor_release(x_2397, 0); - lean_ctor_release(x_2397, 1); - x_2399 = x_2397; -} else { - lean_dec_ref(x_2397); - x_2399 = lean_box(0); -} -x_2400 = lean_ctor_get(x_2398, 3); -lean_inc(x_2400); -if (lean_obj_tag(x_2400) == 0) -{ -lean_object* x_2401; lean_object* x_2402; lean_object* x_2403; lean_object* x_2404; lean_object* x_2405; -lean_dec(x_2399); -lean_free_object(x_230); -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_2401 = lean_ctor_get(x_234, 1); -lean_inc(x_2401); -lean_dec(x_234); -x_2402 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; -x_2403 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; -x_2404 = lean_panic_fn(x_2402, x_2403); -x_2405 = lean_apply_5(x_2404, x_5, x_2398, x_7, x_8, x_2401); -return x_2405; -} -else -{ -lean_object* x_2406; lean_object* x_2407; lean_object* x_2408; lean_object* x_2409; lean_object* x_2410; lean_object* x_2411; lean_object* x_2822; lean_object* x_2823; lean_object* x_2863; lean_object* x_2864; uint8_t x_2865; -x_2406 = lean_ctor_get(x_234, 1); -lean_inc(x_2406); -if (lean_is_exclusive(x_234)) { - lean_ctor_release(x_234, 0); - lean_ctor_release(x_234, 1); - x_2407 = x_234; -} else { - lean_dec_ref(x_234); - x_2407 = lean_box(0); -} -x_2408 = lean_ctor_get(x_2398, 4); -lean_inc(x_2408); -x_2409 = lean_ctor_get(x_2400, 0); -lean_inc(x_2409); -lean_dec(x_2400); -x_2863 = l_Lean_Core_getTraceState___rarg(x_8, x_2406); -x_2864 = lean_ctor_get(x_2863, 0); -lean_inc(x_2864); -x_2865 = lean_ctor_get_uint8(x_2864, sizeof(void*)*1); -lean_dec(x_2864); -if (x_2865 == 0) -{ -lean_object* x_2866; lean_object* x_2867; lean_object* x_2868; -x_2866 = lean_ctor_get(x_2863, 1); -lean_inc(x_2866); -lean_dec(x_2863); -x_2867 = lean_box(x_226); -lean_ctor_set(x_230, 1, x_2398); -lean_ctor_set(x_230, 0, x_2867); -x_2868 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2868, 0, x_230); -x_2822 = x_2868; -x_2823 = x_2866; -goto block_2862; -} -else -{ -lean_object* x_2869; lean_object* x_2870; lean_object* x_2871; lean_object* x_2872; lean_object* x_2873; lean_object* x_2874; -x_2869 = lean_ctor_get(x_2863, 1); -lean_inc(x_2869); -lean_dec(x_2863); -x_2870 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2871 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2870, x_7, x_8, x_2869); -x_2872 = lean_ctor_get(x_2871, 0); -lean_inc(x_2872); -x_2873 = lean_ctor_get(x_2871, 1); -lean_inc(x_2873); -lean_dec(x_2871); -lean_ctor_set(x_230, 1, x_2398); -lean_ctor_set(x_230, 0, x_2872); -x_2874 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2874, 0, x_230); -x_2822 = x_2874; -x_2823 = x_2873; -goto block_2862; -} -block_2821: -{ -lean_object* x_2412; lean_object* x_2413; lean_object* x_2414; lean_object* x_2415; lean_object* x_2416; lean_object* x_2417; lean_object* x_2439; uint8_t x_2796; -x_2412 = lean_ctor_get(x_2410, 0); -lean_inc(x_2412); -if (lean_is_exclusive(x_2410)) { - lean_ctor_release(x_2410, 0); - x_2413 = x_2410; -} else { - lean_dec_ref(x_2410); - x_2413 = lean_box(0); -} -x_2414 = lean_ctor_get(x_2412, 1); -lean_inc(x_2414); -if (lean_is_exclusive(x_2412)) { - lean_ctor_release(x_2412, 0); - lean_ctor_release(x_2412, 1); - x_2415 = x_2412; -} else { - lean_dec_ref(x_2412); - x_2415 = lean_box(0); -} -x_2796 = lean_nat_dec_lt(x_2409, x_3); -lean_dec(x_2409); -if (x_2796 == 0) -{ -if (lean_obj_tag(x_2408) == 0) -{ -lean_object* x_2797; lean_object* x_2798; lean_object* x_2799; lean_object* x_2800; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_2797 = lean_box(0); -if (lean_is_scalar(x_2415)) { - x_2798 = lean_alloc_ctor(0, 2, 0); -} else { - x_2798 = x_2415; -} -lean_ctor_set(x_2798, 0, x_2797); -lean_ctor_set(x_2798, 1, x_2414); -if (lean_is_scalar(x_2413)) { - x_2799 = lean_alloc_ctor(1, 1, 0); -} else { - x_2799 = x_2413; -} -lean_ctor_set(x_2799, 0, x_2798); -if (lean_is_scalar(x_2407)) { - x_2800 = lean_alloc_ctor(0, 2, 0); -} else { - x_2800 = x_2407; -} -lean_ctor_set(x_2800, 0, x_2799); -lean_ctor_set(x_2800, 1, x_2411); -x_24 = x_2800; -goto block_222; -} -else -{ -lean_object* x_2801; -x_2801 = lean_ctor_get(x_23, 1); -lean_inc(x_2801); -if (lean_obj_tag(x_2801) == 0) -{ -lean_object* x_2802; lean_object* x_2803; lean_object* x_2804; lean_object* x_2805; -lean_dec(x_2408); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_2802 = lean_box(0); -if (lean_is_scalar(x_2415)) { - x_2803 = lean_alloc_ctor(0, 2, 0); -} else { - x_2803 = x_2415; -} -lean_ctor_set(x_2803, 0, x_2802); -lean_ctor_set(x_2803, 1, x_2414); -if (lean_is_scalar(x_2413)) { - x_2804 = lean_alloc_ctor(1, 1, 0); -} else { - x_2804 = x_2413; -} -lean_ctor_set(x_2804, 0, x_2803); -if (lean_is_scalar(x_2407)) { - x_2805 = lean_alloc_ctor(0, 2, 0); -} else { - x_2805 = x_2407; -} -lean_ctor_set(x_2805, 0, x_2804); -lean_ctor_set(x_2805, 1, x_2411); -x_24 = x_2805; -goto block_222; -} -else -{ -lean_object* x_2806; lean_object* x_2807; lean_object* x_2808; uint8_t x_2809; -x_2806 = lean_ctor_get(x_2408, 0); -lean_inc(x_2806); -lean_dec(x_2408); -x_2807 = lean_ctor_get(x_2801, 0); -lean_inc(x_2807); -lean_dec(x_2801); -x_2808 = lean_ctor_get(x_23, 2); -lean_inc(x_2808); -x_2809 = lean_name_eq(x_1, x_2808); -lean_dec(x_2808); -if (x_2809 == 0) -{ -lean_object* x_2810; lean_object* x_2811; lean_object* x_2812; lean_object* x_2813; -lean_dec(x_2807); -lean_dec(x_2806); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_2810 = lean_box(0); -if (lean_is_scalar(x_2415)) { - x_2811 = lean_alloc_ctor(0, 2, 0); -} else { - x_2811 = x_2415; -} -lean_ctor_set(x_2811, 0, x_2810); -lean_ctor_set(x_2811, 1, x_2414); -if (lean_is_scalar(x_2413)) { - x_2812 = lean_alloc_ctor(1, 1, 0); -} else { - x_2812 = x_2413; -} -lean_ctor_set(x_2812, 0, x_2811); -if (lean_is_scalar(x_2407)) { - x_2813 = lean_alloc_ctor(0, 2, 0); -} else { - x_2813 = x_2407; -} -lean_ctor_set(x_2813, 0, x_2812); -lean_ctor_set(x_2813, 1, x_2411); -x_24 = x_2813; -goto block_222; -} -else -{ -uint8_t x_2814; -x_2814 = lean_nat_dec_le(x_2806, x_2807); -lean_dec(x_2807); -lean_dec(x_2806); -if (x_2814 == 0) -{ -lean_object* x_2815; lean_object* x_2816; lean_object* x_2817; lean_object* x_2818; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_2815 = lean_box(0); -if (lean_is_scalar(x_2415)) { - x_2816 = lean_alloc_ctor(0, 2, 0); -} else { - x_2816 = x_2415; -} -lean_ctor_set(x_2816, 0, x_2815); -lean_ctor_set(x_2816, 1, x_2414); -if (lean_is_scalar(x_2413)) { - x_2817 = lean_alloc_ctor(1, 1, 0); -} else { - x_2817 = x_2413; -} -lean_ctor_set(x_2817, 0, x_2816); -if (lean_is_scalar(x_2407)) { - x_2818 = lean_alloc_ctor(0, 2, 0); -} else { - x_2818 = x_2407; -} -lean_ctor_set(x_2818, 0, x_2817); -lean_ctor_set(x_2818, 1, x_2411); -x_24 = x_2818; -goto block_222; -} -else -{ -lean_object* x_2819; -lean_dec(x_2415); -lean_dec(x_2413); -lean_dec(x_2407); -x_2819 = lean_box(0); -x_2439 = x_2819; -goto block_2795; -} -} -} -} -} -else -{ -lean_object* x_2820; -lean_dec(x_2415); -lean_dec(x_2413); -lean_dec(x_2408); -lean_dec(x_2407); -x_2820 = lean_box(0); -x_2439 = x_2820; -goto block_2795; -} -block_2438: -{ -lean_object* x_2418; lean_object* x_2419; lean_object* x_2420; lean_object* x_2421; lean_object* x_2422; lean_object* x_2423; lean_object* x_2424; lean_object* x_2425; lean_object* x_2426; lean_object* x_2427; lean_object* x_2428; lean_object* x_2429; uint8_t x_2430; lean_object* x_2431; lean_object* x_2432; lean_object* x_2433; lean_object* x_2434; lean_object* x_2435; lean_object* x_2436; lean_object* x_2437; -x_2418 = lean_ctor_get(x_2416, 0); -lean_inc(x_2418); -lean_dec(x_2416); -x_2419 = lean_ctor_get(x_2418, 1); -lean_inc(x_2419); -lean_dec(x_2418); -x_2420 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_2419, x_7, x_8, x_2417); -lean_dec(x_8); -lean_dec(x_7); -x_2421 = lean_ctor_get(x_2420, 0); -lean_inc(x_2421); -x_2422 = lean_ctor_get(x_2421, 0); -lean_inc(x_2422); -if (lean_is_exclusive(x_2421)) { - lean_ctor_release(x_2421, 0); - x_2423 = x_2421; -} else { - lean_dec_ref(x_2421); - x_2423 = lean_box(0); -} -x_2424 = lean_ctor_get(x_2422, 1); -lean_inc(x_2424); -if (lean_is_exclusive(x_2422)) { - lean_ctor_release(x_2422, 0); - lean_ctor_release(x_2422, 1); - x_2425 = x_2422; -} else { - lean_dec_ref(x_2422); - x_2425 = lean_box(0); -} -x_2426 = lean_ctor_get(x_2420, 1); -lean_inc(x_2426); -if (lean_is_exclusive(x_2420)) { - lean_ctor_release(x_2420, 0); - lean_ctor_release(x_2420, 1); - x_2427 = x_2420; -} else { - lean_dec_ref(x_2420); - x_2427 = lean_box(0); -} -x_2428 = lean_ctor_get(x_2424, 0); -lean_inc(x_2428); -x_2429 = lean_ctor_get(x_2424, 3); -lean_inc(x_2429); -x_2430 = lean_ctor_get_uint8(x_2424, sizeof(void*)*5); -if (lean_is_exclusive(x_2424)) { - lean_ctor_release(x_2424, 0); - lean_ctor_release(x_2424, 1); - lean_ctor_release(x_2424, 2); - lean_ctor_release(x_2424, 3); - lean_ctor_release(x_2424, 4); - x_2431 = x_2424; -} else { - lean_dec_ref(x_2424); - x_2431 = lean_box(0); -} -x_2432 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_2431)) { - x_2433 = lean_alloc_ctor(0, 5, 1); -} else { - x_2433 = x_2431; -} -lean_ctor_set(x_2433, 0, x_2428); -lean_ctor_set(x_2433, 1, x_2432); -lean_ctor_set(x_2433, 2, x_1); -lean_ctor_set(x_2433, 3, x_2429); -lean_ctor_set(x_2433, 4, x_224); -lean_ctor_set_uint8(x_2433, sizeof(void*)*5, x_2430); -x_2434 = lean_box(0); -if (lean_is_scalar(x_2425)) { - x_2435 = lean_alloc_ctor(0, 2, 0); -} else { - x_2435 = x_2425; -} -lean_ctor_set(x_2435, 0, x_2434); -lean_ctor_set(x_2435, 1, x_2433); -if (lean_is_scalar(x_2423)) { - x_2436 = lean_alloc_ctor(1, 1, 0); -} else { - x_2436 = x_2423; -} -lean_ctor_set(x_2436, 0, x_2435); -if (lean_is_scalar(x_2427)) { - x_2437 = lean_alloc_ctor(0, 2, 0); -} else { - x_2437 = x_2427; -} -lean_ctor_set(x_2437, 0, x_2436); -lean_ctor_set(x_2437, 1, x_2426); -x_24 = x_2437; -goto block_222; -} -block_2795: -{ -lean_object* x_2440; uint8_t x_2441; -lean_dec(x_2439); -x_2440 = lean_unsigned_to_nat(0u); -x_2441 = lean_nat_dec_lt(x_2440, x_22); -lean_dec(x_22); -if (x_2441 == 0) -{ -lean_object* x_2442; lean_object* x_2443; lean_object* x_2444; lean_object* x_2445; lean_object* x_2446; lean_object* x_2447; lean_object* x_2448; -x_2442 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2414, x_7, x_8, x_2411); -x_2443 = lean_ctor_get(x_2442, 0); -lean_inc(x_2443); -x_2444 = lean_ctor_get(x_2443, 0); -lean_inc(x_2444); -lean_dec(x_2443); -x_2445 = lean_ctor_get(x_2442, 1); -lean_inc(x_2445); -lean_dec(x_2442); -x_2446 = lean_ctor_get(x_2444, 0); -lean_inc(x_2446); -x_2447 = lean_ctor_get(x_2444, 1); -lean_inc(x_2447); -lean_dec(x_2444); -x_2448 = l_Lean_Syntax_getHeadInfo___main(x_2446); -if (lean_obj_tag(x_2448) == 0) -{ -lean_object* x_2449; lean_object* x_2450; lean_object* x_2451; lean_object* x_2452; lean_object* x_2453; lean_object* x_2454; lean_object* x_2455; lean_object* x_2456; lean_object* x_2457; lean_object* x_2458; lean_object* x_2459; lean_object* x_2460; lean_object* x_2461; lean_object* x_2462; lean_object* x_2463; lean_object* x_2464; lean_object* x_2484; lean_object* x_2485; uint8_t x_2486; -x_2449 = lean_apply_1(x_2, x_2446); -x_2450 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2449, x_5, x_2447, x_7, x_8, x_2445); -x_2451 = lean_ctor_get(x_2450, 0); -lean_inc(x_2451); -x_2452 = lean_ctor_get(x_2451, 0); -lean_inc(x_2452); -lean_dec(x_2451); -x_2453 = lean_ctor_get(x_2450, 1); -lean_inc(x_2453); -lean_dec(x_2450); -x_2454 = lean_ctor_get(x_2452, 1); -lean_inc(x_2454); -lean_dec(x_2452); -x_2455 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2454, x_7, x_8, x_2453); -x_2456 = lean_ctor_get(x_2455, 0); -lean_inc(x_2456); -x_2457 = lean_ctor_get(x_2456, 0); -lean_inc(x_2457); -if (lean_is_exclusive(x_2456)) { - lean_ctor_release(x_2456, 0); - x_2458 = x_2456; -} else { - lean_dec_ref(x_2456); - x_2458 = lean_box(0); -} -x_2459 = lean_ctor_get(x_2455, 1); -lean_inc(x_2459); -lean_dec(x_2455); -x_2460 = lean_ctor_get(x_2457, 0); -lean_inc(x_2460); -x_2461 = lean_ctor_get(x_2457, 1); -lean_inc(x_2461); -if (lean_is_exclusive(x_2457)) { - lean_ctor_release(x_2457, 0); - lean_ctor_release(x_2457, 1); - x_2462 = x_2457; -} else { - lean_dec_ref(x_2457); - x_2462 = lean_box(0); -} -x_2484 = l_Lean_Core_getTraceState___rarg(x_8, x_2459); -x_2485 = lean_ctor_get(x_2484, 0); -lean_inc(x_2485); -x_2486 = lean_ctor_get_uint8(x_2485, sizeof(void*)*1); -lean_dec(x_2485); -if (x_2486 == 0) -{ -lean_object* x_2487; lean_object* x_2488; lean_object* x_2489; lean_object* x_2490; -x_2487 = lean_ctor_get(x_2484, 1); -lean_inc(x_2487); -lean_dec(x_2484); -x_2488 = lean_box(x_226); -if (lean_is_scalar(x_2462)) { - x_2489 = lean_alloc_ctor(0, 2, 0); -} else { - x_2489 = x_2462; -} -lean_ctor_set(x_2489, 0, x_2488); -lean_ctor_set(x_2489, 1, x_2461); -if (lean_is_scalar(x_2458)) { - x_2490 = lean_alloc_ctor(1, 1, 0); -} else { - x_2490 = x_2458; -} -lean_ctor_set(x_2490, 0, x_2489); -x_2463 = x_2490; -x_2464 = x_2487; -goto block_2483; -} -else -{ -lean_object* x_2491; lean_object* x_2492; lean_object* x_2493; lean_object* x_2494; lean_object* x_2495; lean_object* x_2496; lean_object* x_2497; -x_2491 = lean_ctor_get(x_2484, 1); -lean_inc(x_2491); -lean_dec(x_2484); -x_2492 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2493 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2492, x_7, x_8, x_2491); -x_2494 = lean_ctor_get(x_2493, 0); -lean_inc(x_2494); -x_2495 = lean_ctor_get(x_2493, 1); -lean_inc(x_2495); -lean_dec(x_2493); -if (lean_is_scalar(x_2462)) { - x_2496 = lean_alloc_ctor(0, 2, 0); -} else { - x_2496 = x_2462; -} -lean_ctor_set(x_2496, 0, x_2494); -lean_ctor_set(x_2496, 1, x_2461); -if (lean_is_scalar(x_2458)) { - x_2497 = lean_alloc_ctor(1, 1, 0); -} else { - x_2497 = x_2458; -} -lean_ctor_set(x_2497, 0, x_2496); -x_2463 = x_2497; -x_2464 = x_2495; -goto block_2483; -} -block_2483: -{ -lean_object* x_2465; lean_object* x_2466; lean_object* x_2467; uint8_t x_2468; -x_2465 = lean_ctor_get(x_2463, 0); -lean_inc(x_2465); -if (lean_is_exclusive(x_2463)) { - lean_ctor_release(x_2463, 0); - x_2466 = x_2463; -} else { - lean_dec_ref(x_2463); - x_2466 = lean_box(0); -} -x_2467 = lean_ctor_get(x_2465, 0); -lean_inc(x_2467); -x_2468 = lean_unbox(x_2467); -lean_dec(x_2467); -if (x_2468 == 0) -{ -lean_object* x_2469; lean_object* x_2470; lean_object* x_2471; lean_object* x_2472; lean_object* x_2473; -lean_dec(x_2460); -lean_dec(x_5); -x_2469 = lean_ctor_get(x_2465, 1); -lean_inc(x_2469); -if (lean_is_exclusive(x_2465)) { - lean_ctor_release(x_2465, 0); - lean_ctor_release(x_2465, 1); - x_2470 = x_2465; -} else { - lean_dec_ref(x_2465); - x_2470 = lean_box(0); -} -x_2471 = lean_box(0); -if (lean_is_scalar(x_2470)) { - x_2472 = lean_alloc_ctor(0, 2, 0); -} else { - x_2472 = x_2470; -} -lean_ctor_set(x_2472, 0, x_2471); -lean_ctor_set(x_2472, 1, x_2469); -if (lean_is_scalar(x_2466)) { - x_2473 = lean_alloc_ctor(1, 1, 0); -} else { - x_2473 = x_2466; -} -lean_ctor_set(x_2473, 0, x_2472); -x_2416 = x_2473; -x_2417 = x_2464; -goto block_2438; -} -else -{ -lean_object* x_2474; lean_object* x_2475; lean_object* x_2476; lean_object* x_2477; lean_object* x_2478; lean_object* x_2479; lean_object* x_2480; lean_object* x_2481; lean_object* x_2482; -lean_dec(x_2466); -x_2474 = lean_ctor_get(x_2465, 1); -lean_inc(x_2474); -lean_dec(x_2465); -x_2475 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2440, x_2460); -x_2476 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2476, 0, x_2475); -x_2477 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2478 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2478, 0, x_2477); -lean_ctor_set(x_2478, 1, x_2476); -x_2479 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2480 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2479, x_2478, x_5, x_2474, x_7, x_8, x_2464); -lean_dec(x_5); -x_2481 = lean_ctor_get(x_2480, 0); -lean_inc(x_2481); -x_2482 = lean_ctor_get(x_2480, 1); -lean_inc(x_2482); -lean_dec(x_2480); -x_2416 = x_2481; -x_2417 = x_2482; -goto block_2438; -} -} -} -else -{ -lean_object* x_2498; lean_object* x_2499; -x_2498 = lean_ctor_get(x_2448, 0); -lean_inc(x_2498); -lean_dec(x_2448); -x_2499 = l_Lean_Syntax_getTailInfo___main(x_2446); -if (lean_obj_tag(x_2499) == 0) -{ -lean_object* x_2500; lean_object* x_2501; lean_object* x_2502; lean_object* x_2503; lean_object* x_2504; lean_object* x_2505; lean_object* x_2506; lean_object* x_2507; lean_object* x_2508; lean_object* x_2509; lean_object* x_2510; lean_object* x_2511; lean_object* x_2512; lean_object* x_2513; lean_object* x_2514; lean_object* x_2515; lean_object* x_2535; lean_object* x_2536; uint8_t x_2537; -lean_dec(x_2498); -x_2500 = lean_apply_1(x_2, x_2446); -x_2501 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2500, x_5, x_2447, x_7, x_8, x_2445); -x_2502 = lean_ctor_get(x_2501, 0); -lean_inc(x_2502); -x_2503 = lean_ctor_get(x_2502, 0); -lean_inc(x_2503); -lean_dec(x_2502); -x_2504 = lean_ctor_get(x_2501, 1); -lean_inc(x_2504); -lean_dec(x_2501); -x_2505 = lean_ctor_get(x_2503, 1); -lean_inc(x_2505); -lean_dec(x_2503); -x_2506 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2505, x_7, x_8, x_2504); -x_2507 = lean_ctor_get(x_2506, 0); -lean_inc(x_2507); -x_2508 = lean_ctor_get(x_2507, 0); -lean_inc(x_2508); -if (lean_is_exclusive(x_2507)) { - lean_ctor_release(x_2507, 0); - x_2509 = x_2507; -} else { - lean_dec_ref(x_2507); - x_2509 = lean_box(0); -} -x_2510 = lean_ctor_get(x_2506, 1); -lean_inc(x_2510); -lean_dec(x_2506); -x_2511 = lean_ctor_get(x_2508, 0); -lean_inc(x_2511); -x_2512 = lean_ctor_get(x_2508, 1); -lean_inc(x_2512); -if (lean_is_exclusive(x_2508)) { - lean_ctor_release(x_2508, 0); - lean_ctor_release(x_2508, 1); - x_2513 = x_2508; -} else { - lean_dec_ref(x_2508); - x_2513 = lean_box(0); -} -x_2535 = l_Lean_Core_getTraceState___rarg(x_8, x_2510); -x_2536 = lean_ctor_get(x_2535, 0); -lean_inc(x_2536); -x_2537 = lean_ctor_get_uint8(x_2536, sizeof(void*)*1); -lean_dec(x_2536); -if (x_2537 == 0) -{ -lean_object* x_2538; lean_object* x_2539; lean_object* x_2540; lean_object* x_2541; -x_2538 = lean_ctor_get(x_2535, 1); -lean_inc(x_2538); -lean_dec(x_2535); -x_2539 = lean_box(x_226); -if (lean_is_scalar(x_2513)) { - x_2540 = lean_alloc_ctor(0, 2, 0); -} else { - x_2540 = x_2513; -} -lean_ctor_set(x_2540, 0, x_2539); -lean_ctor_set(x_2540, 1, x_2512); -if (lean_is_scalar(x_2509)) { - x_2541 = lean_alloc_ctor(1, 1, 0); -} else { - x_2541 = x_2509; -} -lean_ctor_set(x_2541, 0, x_2540); -x_2514 = x_2541; -x_2515 = x_2538; -goto block_2534; -} -else -{ -lean_object* x_2542; lean_object* x_2543; lean_object* x_2544; lean_object* x_2545; lean_object* x_2546; lean_object* x_2547; lean_object* x_2548; -x_2542 = lean_ctor_get(x_2535, 1); -lean_inc(x_2542); -lean_dec(x_2535); -x_2543 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2544 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2543, x_7, x_8, x_2542); -x_2545 = lean_ctor_get(x_2544, 0); -lean_inc(x_2545); -x_2546 = lean_ctor_get(x_2544, 1); -lean_inc(x_2546); -lean_dec(x_2544); -if (lean_is_scalar(x_2513)) { - x_2547 = lean_alloc_ctor(0, 2, 0); -} else { - x_2547 = x_2513; -} -lean_ctor_set(x_2547, 0, x_2545); -lean_ctor_set(x_2547, 1, x_2512); -if (lean_is_scalar(x_2509)) { - x_2548 = lean_alloc_ctor(1, 1, 0); -} else { - x_2548 = x_2509; -} -lean_ctor_set(x_2548, 0, x_2547); -x_2514 = x_2548; -x_2515 = x_2546; -goto block_2534; -} -block_2534: -{ -lean_object* x_2516; lean_object* x_2517; lean_object* x_2518; uint8_t x_2519; -x_2516 = lean_ctor_get(x_2514, 0); -lean_inc(x_2516); -if (lean_is_exclusive(x_2514)) { - lean_ctor_release(x_2514, 0); - x_2517 = x_2514; -} else { - lean_dec_ref(x_2514); - x_2517 = lean_box(0); -} -x_2518 = lean_ctor_get(x_2516, 0); -lean_inc(x_2518); -x_2519 = lean_unbox(x_2518); -lean_dec(x_2518); -if (x_2519 == 0) -{ -lean_object* x_2520; lean_object* x_2521; lean_object* x_2522; lean_object* x_2523; lean_object* x_2524; -lean_dec(x_2511); -lean_dec(x_5); -x_2520 = lean_ctor_get(x_2516, 1); -lean_inc(x_2520); -if (lean_is_exclusive(x_2516)) { - lean_ctor_release(x_2516, 0); - lean_ctor_release(x_2516, 1); - x_2521 = x_2516; -} else { - lean_dec_ref(x_2516); - x_2521 = lean_box(0); -} -x_2522 = lean_box(0); -if (lean_is_scalar(x_2521)) { - x_2523 = lean_alloc_ctor(0, 2, 0); -} else { - x_2523 = x_2521; -} -lean_ctor_set(x_2523, 0, x_2522); -lean_ctor_set(x_2523, 1, x_2520); -if (lean_is_scalar(x_2517)) { - x_2524 = lean_alloc_ctor(1, 1, 0); -} else { - x_2524 = x_2517; -} -lean_ctor_set(x_2524, 0, x_2523); -x_2416 = x_2524; -x_2417 = x_2515; -goto block_2438; -} -else -{ -lean_object* x_2525; lean_object* x_2526; lean_object* x_2527; lean_object* x_2528; lean_object* x_2529; lean_object* x_2530; lean_object* x_2531; lean_object* x_2532; lean_object* x_2533; -lean_dec(x_2517); -x_2525 = lean_ctor_get(x_2516, 1); -lean_inc(x_2525); -lean_dec(x_2516); -x_2526 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2440, x_2511); -x_2527 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2527, 0, x_2526); -x_2528 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2529 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2529, 0, x_2528); -lean_ctor_set(x_2529, 1, x_2527); -x_2530 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2531 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2530, x_2529, x_5, x_2525, x_7, x_8, x_2515); -lean_dec(x_5); -x_2532 = lean_ctor_get(x_2531, 0); -lean_inc(x_2532); -x_2533 = lean_ctor_get(x_2531, 1); -lean_inc(x_2533); -lean_dec(x_2531); -x_2416 = x_2532; -x_2417 = x_2533; -goto block_2438; -} -} -} -else -{ -lean_object* x_2549; lean_object* x_2550; lean_object* x_2551; lean_object* x_2552; lean_object* x_2553; lean_object* x_2554; lean_object* x_2555; lean_object* x_2556; lean_object* x_2557; lean_object* x_2558; lean_object* x_2559; lean_object* x_2560; lean_object* x_2561; lean_object* x_2562; lean_object* x_2563; lean_object* x_2564; lean_object* x_2565; lean_object* x_2566; lean_object* x_2567; lean_object* x_2568; lean_object* x_2569; lean_object* x_2570; lean_object* x_2571; lean_object* x_2572; lean_object* x_2573; lean_object* x_2574; lean_object* x_2575; lean_object* x_2576; lean_object* x_2577; lean_object* x_2578; lean_object* x_2579; lean_object* x_2580; lean_object* x_2581; lean_object* x_2582; lean_object* x_2602; lean_object* x_2603; uint8_t x_2604; -x_2549 = lean_ctor_get(x_2499, 0); -lean_inc(x_2549); -lean_dec(x_2499); -x_2550 = lean_ctor_get(x_2498, 0); -lean_inc(x_2550); -x_2551 = lean_ctor_get(x_2498, 1); -lean_inc(x_2551); -x_2552 = lean_ctor_get(x_2498, 2); -lean_inc(x_2552); -if (lean_is_exclusive(x_2498)) { - lean_ctor_release(x_2498, 0); - lean_ctor_release(x_2498, 1); - lean_ctor_release(x_2498, 2); - x_2553 = x_2498; -} else { - lean_dec_ref(x_2498); - x_2553 = lean_box(0); -} -x_2554 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_2551); -if (lean_is_scalar(x_2553)) { - x_2555 = lean_alloc_ctor(0, 3, 0); -} else { - x_2555 = x_2553; -} -lean_ctor_set(x_2555, 0, x_2554); -lean_ctor_set(x_2555, 1, x_2551); -lean_ctor_set(x_2555, 2, x_2552); -x_2556 = l_Lean_Syntax_setHeadInfo(x_2446, x_2555); -x_2557 = lean_ctor_get(x_2549, 0); -lean_inc(x_2557); -x_2558 = lean_ctor_get(x_2549, 1); -lean_inc(x_2558); -x_2559 = lean_ctor_get(x_2549, 2); -lean_inc(x_2559); -if (lean_is_exclusive(x_2549)) { - lean_ctor_release(x_2549, 0); - lean_ctor_release(x_2549, 1); - lean_ctor_release(x_2549, 2); - x_2560 = x_2549; -} else { - lean_dec_ref(x_2549); - x_2560 = lean_box(0); -} -lean_inc(x_2558); -if (lean_is_scalar(x_2560)) { - x_2561 = lean_alloc_ctor(0, 3, 0); -} else { - x_2561 = x_2560; -} -lean_ctor_set(x_2561, 0, x_2557); -lean_ctor_set(x_2561, 1, x_2558); -lean_ctor_set(x_2561, 2, x_2554); -x_2562 = l_Lean_Syntax_setTailInfo(x_2556, x_2561); -x_2563 = lean_apply_1(x_2, x_2562); -x_2564 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_2564, 0, x_2550); -lean_ctor_set(x_2564, 1, x_2551); -lean_ctor_set(x_2564, 2, x_2554); -x_2565 = l_Lean_Syntax_setHeadInfo(x_2563, x_2564); -x_2566 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_2566, 0, x_2554); -lean_ctor_set(x_2566, 1, x_2558); -lean_ctor_set(x_2566, 2, x_2559); -x_2567 = l_Lean_Syntax_setTailInfo(x_2565, x_2566); -x_2568 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2567, x_5, x_2447, x_7, x_8, x_2445); -x_2569 = lean_ctor_get(x_2568, 0); -lean_inc(x_2569); -x_2570 = lean_ctor_get(x_2569, 0); -lean_inc(x_2570); -lean_dec(x_2569); -x_2571 = lean_ctor_get(x_2568, 1); -lean_inc(x_2571); -lean_dec(x_2568); -x_2572 = lean_ctor_get(x_2570, 1); -lean_inc(x_2572); -lean_dec(x_2570); -x_2573 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2572, x_7, x_8, x_2571); -x_2574 = lean_ctor_get(x_2573, 0); -lean_inc(x_2574); -x_2575 = lean_ctor_get(x_2574, 0); -lean_inc(x_2575); -if (lean_is_exclusive(x_2574)) { - lean_ctor_release(x_2574, 0); - x_2576 = x_2574; -} else { - lean_dec_ref(x_2574); - x_2576 = lean_box(0); -} -x_2577 = lean_ctor_get(x_2573, 1); -lean_inc(x_2577); -lean_dec(x_2573); -x_2578 = lean_ctor_get(x_2575, 0); -lean_inc(x_2578); -x_2579 = lean_ctor_get(x_2575, 1); -lean_inc(x_2579); -if (lean_is_exclusive(x_2575)) { - lean_ctor_release(x_2575, 0); - lean_ctor_release(x_2575, 1); - x_2580 = x_2575; -} else { - lean_dec_ref(x_2575); - x_2580 = lean_box(0); -} -x_2602 = l_Lean_Core_getTraceState___rarg(x_8, x_2577); -x_2603 = lean_ctor_get(x_2602, 0); -lean_inc(x_2603); -x_2604 = lean_ctor_get_uint8(x_2603, sizeof(void*)*1); -lean_dec(x_2603); -if (x_2604 == 0) -{ -lean_object* x_2605; lean_object* x_2606; lean_object* x_2607; lean_object* x_2608; -x_2605 = lean_ctor_get(x_2602, 1); -lean_inc(x_2605); -lean_dec(x_2602); -x_2606 = lean_box(x_226); -if (lean_is_scalar(x_2580)) { - x_2607 = lean_alloc_ctor(0, 2, 0); -} else { - x_2607 = x_2580; -} -lean_ctor_set(x_2607, 0, x_2606); -lean_ctor_set(x_2607, 1, x_2579); -if (lean_is_scalar(x_2576)) { - x_2608 = lean_alloc_ctor(1, 1, 0); -} else { - x_2608 = x_2576; -} -lean_ctor_set(x_2608, 0, x_2607); -x_2581 = x_2608; -x_2582 = x_2605; -goto block_2601; -} -else -{ -lean_object* x_2609; lean_object* x_2610; lean_object* x_2611; lean_object* x_2612; lean_object* x_2613; lean_object* x_2614; lean_object* x_2615; -x_2609 = lean_ctor_get(x_2602, 1); -lean_inc(x_2609); -lean_dec(x_2602); -x_2610 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2611 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2610, x_7, x_8, x_2609); -x_2612 = lean_ctor_get(x_2611, 0); -lean_inc(x_2612); -x_2613 = lean_ctor_get(x_2611, 1); -lean_inc(x_2613); -lean_dec(x_2611); -if (lean_is_scalar(x_2580)) { - x_2614 = lean_alloc_ctor(0, 2, 0); -} else { - x_2614 = x_2580; -} -lean_ctor_set(x_2614, 0, x_2612); -lean_ctor_set(x_2614, 1, x_2579); -if (lean_is_scalar(x_2576)) { - x_2615 = lean_alloc_ctor(1, 1, 0); -} else { - x_2615 = x_2576; -} -lean_ctor_set(x_2615, 0, x_2614); -x_2581 = x_2615; -x_2582 = x_2613; -goto block_2601; -} -block_2601: -{ -lean_object* x_2583; lean_object* x_2584; lean_object* x_2585; uint8_t x_2586; -x_2583 = lean_ctor_get(x_2581, 0); -lean_inc(x_2583); -if (lean_is_exclusive(x_2581)) { - lean_ctor_release(x_2581, 0); - x_2584 = x_2581; -} else { - lean_dec_ref(x_2581); - x_2584 = lean_box(0); -} -x_2585 = lean_ctor_get(x_2583, 0); -lean_inc(x_2585); -x_2586 = lean_unbox(x_2585); -lean_dec(x_2585); -if (x_2586 == 0) -{ -lean_object* x_2587; lean_object* x_2588; lean_object* x_2589; lean_object* x_2590; lean_object* x_2591; -lean_dec(x_2578); -lean_dec(x_5); -x_2587 = lean_ctor_get(x_2583, 1); -lean_inc(x_2587); -if (lean_is_exclusive(x_2583)) { - lean_ctor_release(x_2583, 0); - lean_ctor_release(x_2583, 1); - x_2588 = x_2583; -} else { - lean_dec_ref(x_2583); - x_2588 = lean_box(0); -} -x_2589 = lean_box(0); -if (lean_is_scalar(x_2588)) { - x_2590 = lean_alloc_ctor(0, 2, 0); -} else { - x_2590 = x_2588; -} -lean_ctor_set(x_2590, 0, x_2589); -lean_ctor_set(x_2590, 1, x_2587); -if (lean_is_scalar(x_2584)) { - x_2591 = lean_alloc_ctor(1, 1, 0); -} else { - x_2591 = x_2584; -} -lean_ctor_set(x_2591, 0, x_2590); -x_2416 = x_2591; -x_2417 = x_2582; -goto block_2438; -} -else -{ -lean_object* x_2592; lean_object* x_2593; lean_object* x_2594; lean_object* x_2595; lean_object* x_2596; lean_object* x_2597; lean_object* x_2598; lean_object* x_2599; lean_object* x_2600; -lean_dec(x_2584); -x_2592 = lean_ctor_get(x_2583, 1); -lean_inc(x_2592); -lean_dec(x_2583); -x_2593 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2440, x_2578); -x_2594 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2594, 0, x_2593); -x_2595 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2596 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2596, 0, x_2595); -lean_ctor_set(x_2596, 1, x_2594); -x_2597 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2598 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2597, x_2596, x_5, x_2592, x_7, x_8, x_2582); -lean_dec(x_5); -x_2599 = lean_ctor_get(x_2598, 0); -lean_inc(x_2599); -x_2600 = lean_ctor_get(x_2598, 1); -lean_inc(x_2600); -lean_dec(x_2598); -x_2416 = x_2599; -x_2417 = x_2600; -goto block_2438; -} -} -} -} -} -else -{ -lean_object* x_2616; lean_object* x_2617; lean_object* x_2618; lean_object* x_2619; lean_object* x_2620; lean_object* x_2621; lean_object* x_2622; lean_object* x_2623; lean_object* x_2624; lean_object* x_2625; lean_object* x_2626; lean_object* x_2627; -x_2616 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_2414, x_7, x_8, x_2411); -x_2617 = lean_ctor_get(x_2616, 0); -lean_inc(x_2617); -x_2618 = lean_ctor_get(x_2617, 0); -lean_inc(x_2618); -lean_dec(x_2617); -x_2619 = lean_ctor_get(x_2616, 1); -lean_inc(x_2619); -lean_dec(x_2616); -x_2620 = lean_ctor_get(x_2618, 1); -lean_inc(x_2620); -lean_dec(x_2618); -x_2621 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2620, x_7, x_8, x_2619); -x_2622 = lean_ctor_get(x_2621, 0); -lean_inc(x_2622); -x_2623 = lean_ctor_get(x_2622, 0); -lean_inc(x_2623); -lean_dec(x_2622); -x_2624 = lean_ctor_get(x_2621, 1); -lean_inc(x_2624); -lean_dec(x_2621); -x_2625 = lean_ctor_get(x_2623, 0); -lean_inc(x_2625); -x_2626 = lean_ctor_get(x_2623, 1); -lean_inc(x_2626); -lean_dec(x_2623); -x_2627 = l_Lean_Syntax_getHeadInfo___main(x_2625); -if (lean_obj_tag(x_2627) == 0) -{ -lean_object* x_2628; lean_object* x_2629; lean_object* x_2630; lean_object* x_2631; lean_object* x_2632; lean_object* x_2633; lean_object* x_2634; lean_object* x_2635; lean_object* x_2636; lean_object* x_2637; lean_object* x_2638; lean_object* x_2639; lean_object* x_2640; lean_object* x_2641; lean_object* x_2642; lean_object* x_2643; lean_object* x_2663; lean_object* x_2664; uint8_t x_2665; -x_2628 = lean_apply_1(x_2, x_2625); -x_2629 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2628, x_5, x_2626, x_7, x_8, x_2624); -x_2630 = lean_ctor_get(x_2629, 0); -lean_inc(x_2630); -x_2631 = lean_ctor_get(x_2630, 0); -lean_inc(x_2631); -lean_dec(x_2630); -x_2632 = lean_ctor_get(x_2629, 1); -lean_inc(x_2632); -lean_dec(x_2629); -x_2633 = lean_ctor_get(x_2631, 1); -lean_inc(x_2633); -lean_dec(x_2631); -x_2634 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2633, x_7, x_8, x_2632); -x_2635 = lean_ctor_get(x_2634, 0); -lean_inc(x_2635); -x_2636 = lean_ctor_get(x_2635, 0); -lean_inc(x_2636); -if (lean_is_exclusive(x_2635)) { - lean_ctor_release(x_2635, 0); - x_2637 = x_2635; -} else { - lean_dec_ref(x_2635); - x_2637 = lean_box(0); -} -x_2638 = lean_ctor_get(x_2634, 1); -lean_inc(x_2638); -lean_dec(x_2634); -x_2639 = lean_ctor_get(x_2636, 0); -lean_inc(x_2639); -x_2640 = lean_ctor_get(x_2636, 1); -lean_inc(x_2640); -if (lean_is_exclusive(x_2636)) { - lean_ctor_release(x_2636, 0); - lean_ctor_release(x_2636, 1); - x_2641 = x_2636; -} else { - lean_dec_ref(x_2636); - x_2641 = lean_box(0); -} -x_2663 = l_Lean_Core_getTraceState___rarg(x_8, x_2638); -x_2664 = lean_ctor_get(x_2663, 0); -lean_inc(x_2664); -x_2665 = lean_ctor_get_uint8(x_2664, sizeof(void*)*1); -lean_dec(x_2664); -if (x_2665 == 0) -{ -lean_object* x_2666; lean_object* x_2667; lean_object* x_2668; lean_object* x_2669; -x_2666 = lean_ctor_get(x_2663, 1); -lean_inc(x_2666); -lean_dec(x_2663); -x_2667 = lean_box(x_226); -if (lean_is_scalar(x_2641)) { - x_2668 = lean_alloc_ctor(0, 2, 0); -} else { - x_2668 = x_2641; -} -lean_ctor_set(x_2668, 0, x_2667); -lean_ctor_set(x_2668, 1, x_2640); -if (lean_is_scalar(x_2637)) { - x_2669 = lean_alloc_ctor(1, 1, 0); -} else { - x_2669 = x_2637; -} -lean_ctor_set(x_2669, 0, x_2668); -x_2642 = x_2669; -x_2643 = x_2666; -goto block_2662; -} -else -{ -lean_object* x_2670; lean_object* x_2671; lean_object* x_2672; lean_object* x_2673; lean_object* x_2674; lean_object* x_2675; lean_object* x_2676; -x_2670 = lean_ctor_get(x_2663, 1); -lean_inc(x_2670); -lean_dec(x_2663); -x_2671 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2672 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2671, x_7, x_8, x_2670); -x_2673 = lean_ctor_get(x_2672, 0); -lean_inc(x_2673); -x_2674 = lean_ctor_get(x_2672, 1); -lean_inc(x_2674); -lean_dec(x_2672); -if (lean_is_scalar(x_2641)) { - x_2675 = lean_alloc_ctor(0, 2, 0); -} else { - x_2675 = x_2641; -} -lean_ctor_set(x_2675, 0, x_2673); -lean_ctor_set(x_2675, 1, x_2640); -if (lean_is_scalar(x_2637)) { - x_2676 = lean_alloc_ctor(1, 1, 0); -} else { - x_2676 = x_2637; -} -lean_ctor_set(x_2676, 0, x_2675); -x_2642 = x_2676; -x_2643 = x_2674; -goto block_2662; -} -block_2662: -{ -lean_object* x_2644; lean_object* x_2645; lean_object* x_2646; uint8_t x_2647; -x_2644 = lean_ctor_get(x_2642, 0); -lean_inc(x_2644); -if (lean_is_exclusive(x_2642)) { - lean_ctor_release(x_2642, 0); - x_2645 = x_2642; -} else { - lean_dec_ref(x_2642); - x_2645 = lean_box(0); -} -x_2646 = lean_ctor_get(x_2644, 0); -lean_inc(x_2646); -x_2647 = lean_unbox(x_2646); -lean_dec(x_2646); -if (x_2647 == 0) -{ -lean_object* x_2648; lean_object* x_2649; lean_object* x_2650; lean_object* x_2651; lean_object* x_2652; -lean_dec(x_2639); -lean_dec(x_5); -x_2648 = lean_ctor_get(x_2644, 1); -lean_inc(x_2648); -if (lean_is_exclusive(x_2644)) { - lean_ctor_release(x_2644, 0); - lean_ctor_release(x_2644, 1); - x_2649 = x_2644; -} else { - lean_dec_ref(x_2644); - x_2649 = lean_box(0); -} -x_2650 = lean_box(0); -if (lean_is_scalar(x_2649)) { - x_2651 = lean_alloc_ctor(0, 2, 0); -} else { - x_2651 = x_2649; -} -lean_ctor_set(x_2651, 0, x_2650); -lean_ctor_set(x_2651, 1, x_2648); -if (lean_is_scalar(x_2645)) { - x_2652 = lean_alloc_ctor(1, 1, 0); -} else { - x_2652 = x_2645; -} -lean_ctor_set(x_2652, 0, x_2651); -x_2416 = x_2652; -x_2417 = x_2643; -goto block_2438; -} -else -{ -lean_object* x_2653; lean_object* x_2654; lean_object* x_2655; lean_object* x_2656; lean_object* x_2657; lean_object* x_2658; lean_object* x_2659; lean_object* x_2660; lean_object* x_2661; -lean_dec(x_2645); -x_2653 = lean_ctor_get(x_2644, 1); -lean_inc(x_2653); -lean_dec(x_2644); -x_2654 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2440, x_2639); -x_2655 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2655, 0, x_2654); -x_2656 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2657 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2657, 0, x_2656); -lean_ctor_set(x_2657, 1, x_2655); -x_2658 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2659 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2658, x_2657, x_5, x_2653, x_7, x_8, x_2643); -lean_dec(x_5); -x_2660 = lean_ctor_get(x_2659, 0); -lean_inc(x_2660); -x_2661 = lean_ctor_get(x_2659, 1); -lean_inc(x_2661); -lean_dec(x_2659); -x_2416 = x_2660; -x_2417 = x_2661; -goto block_2438; -} -} -} -else -{ -lean_object* x_2677; lean_object* x_2678; -x_2677 = lean_ctor_get(x_2627, 0); -lean_inc(x_2677); -lean_dec(x_2627); -x_2678 = l_Lean_Syntax_getTailInfo___main(x_2625); -if (lean_obj_tag(x_2678) == 0) -{ -lean_object* x_2679; lean_object* x_2680; lean_object* x_2681; lean_object* x_2682; lean_object* x_2683; lean_object* x_2684; lean_object* x_2685; lean_object* x_2686; lean_object* x_2687; lean_object* x_2688; lean_object* x_2689; lean_object* x_2690; lean_object* x_2691; lean_object* x_2692; lean_object* x_2693; lean_object* x_2694; lean_object* x_2714; lean_object* x_2715; uint8_t x_2716; -lean_dec(x_2677); -x_2679 = lean_apply_1(x_2, x_2625); -x_2680 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2679, x_5, x_2626, x_7, x_8, x_2624); -x_2681 = lean_ctor_get(x_2680, 0); -lean_inc(x_2681); -x_2682 = lean_ctor_get(x_2681, 0); -lean_inc(x_2682); -lean_dec(x_2681); -x_2683 = lean_ctor_get(x_2680, 1); -lean_inc(x_2683); -lean_dec(x_2680); -x_2684 = lean_ctor_get(x_2682, 1); -lean_inc(x_2684); -lean_dec(x_2682); -x_2685 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2684, x_7, x_8, x_2683); -x_2686 = lean_ctor_get(x_2685, 0); -lean_inc(x_2686); -x_2687 = lean_ctor_get(x_2686, 0); -lean_inc(x_2687); -if (lean_is_exclusive(x_2686)) { - lean_ctor_release(x_2686, 0); - x_2688 = x_2686; -} else { - lean_dec_ref(x_2686); - x_2688 = lean_box(0); -} -x_2689 = lean_ctor_get(x_2685, 1); -lean_inc(x_2689); -lean_dec(x_2685); -x_2690 = lean_ctor_get(x_2687, 0); -lean_inc(x_2690); -x_2691 = lean_ctor_get(x_2687, 1); -lean_inc(x_2691); -if (lean_is_exclusive(x_2687)) { - lean_ctor_release(x_2687, 0); - lean_ctor_release(x_2687, 1); - x_2692 = x_2687; -} else { - lean_dec_ref(x_2687); - x_2692 = lean_box(0); -} -x_2714 = l_Lean_Core_getTraceState___rarg(x_8, x_2689); -x_2715 = lean_ctor_get(x_2714, 0); -lean_inc(x_2715); -x_2716 = lean_ctor_get_uint8(x_2715, sizeof(void*)*1); -lean_dec(x_2715); -if (x_2716 == 0) -{ -lean_object* x_2717; lean_object* x_2718; lean_object* x_2719; lean_object* x_2720; -x_2717 = lean_ctor_get(x_2714, 1); -lean_inc(x_2717); -lean_dec(x_2714); -x_2718 = lean_box(x_226); -if (lean_is_scalar(x_2692)) { - x_2719 = lean_alloc_ctor(0, 2, 0); -} else { - x_2719 = x_2692; -} -lean_ctor_set(x_2719, 0, x_2718); -lean_ctor_set(x_2719, 1, x_2691); -if (lean_is_scalar(x_2688)) { - x_2720 = lean_alloc_ctor(1, 1, 0); -} else { - x_2720 = x_2688; -} -lean_ctor_set(x_2720, 0, x_2719); -x_2693 = x_2720; -x_2694 = x_2717; -goto block_2713; -} -else -{ -lean_object* x_2721; lean_object* x_2722; lean_object* x_2723; lean_object* x_2724; lean_object* x_2725; lean_object* x_2726; lean_object* x_2727; -x_2721 = lean_ctor_get(x_2714, 1); -lean_inc(x_2721); -lean_dec(x_2714); -x_2722 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2723 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2722, x_7, x_8, x_2721); -x_2724 = lean_ctor_get(x_2723, 0); -lean_inc(x_2724); -x_2725 = lean_ctor_get(x_2723, 1); -lean_inc(x_2725); -lean_dec(x_2723); -if (lean_is_scalar(x_2692)) { - x_2726 = lean_alloc_ctor(0, 2, 0); -} else { - x_2726 = x_2692; -} -lean_ctor_set(x_2726, 0, x_2724); -lean_ctor_set(x_2726, 1, x_2691); -if (lean_is_scalar(x_2688)) { - x_2727 = lean_alloc_ctor(1, 1, 0); -} else { - x_2727 = x_2688; -} -lean_ctor_set(x_2727, 0, x_2726); -x_2693 = x_2727; -x_2694 = x_2725; -goto block_2713; -} -block_2713: -{ -lean_object* x_2695; lean_object* x_2696; lean_object* x_2697; uint8_t x_2698; -x_2695 = lean_ctor_get(x_2693, 0); -lean_inc(x_2695); -if (lean_is_exclusive(x_2693)) { - lean_ctor_release(x_2693, 0); - x_2696 = x_2693; -} else { - lean_dec_ref(x_2693); - x_2696 = lean_box(0); -} -x_2697 = lean_ctor_get(x_2695, 0); -lean_inc(x_2697); -x_2698 = lean_unbox(x_2697); -lean_dec(x_2697); -if (x_2698 == 0) -{ -lean_object* x_2699; lean_object* x_2700; lean_object* x_2701; lean_object* x_2702; lean_object* x_2703; -lean_dec(x_2690); -lean_dec(x_5); -x_2699 = lean_ctor_get(x_2695, 1); -lean_inc(x_2699); -if (lean_is_exclusive(x_2695)) { - lean_ctor_release(x_2695, 0); - lean_ctor_release(x_2695, 1); - x_2700 = x_2695; -} else { - lean_dec_ref(x_2695); - x_2700 = lean_box(0); -} -x_2701 = lean_box(0); -if (lean_is_scalar(x_2700)) { - x_2702 = lean_alloc_ctor(0, 2, 0); -} else { - x_2702 = x_2700; -} -lean_ctor_set(x_2702, 0, x_2701); -lean_ctor_set(x_2702, 1, x_2699); -if (lean_is_scalar(x_2696)) { - x_2703 = lean_alloc_ctor(1, 1, 0); -} else { - x_2703 = x_2696; -} -lean_ctor_set(x_2703, 0, x_2702); -x_2416 = x_2703; -x_2417 = x_2694; -goto block_2438; -} -else -{ -lean_object* x_2704; lean_object* x_2705; lean_object* x_2706; lean_object* x_2707; lean_object* x_2708; lean_object* x_2709; lean_object* x_2710; lean_object* x_2711; lean_object* x_2712; -lean_dec(x_2696); -x_2704 = lean_ctor_get(x_2695, 1); -lean_inc(x_2704); -lean_dec(x_2695); -x_2705 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2440, x_2690); -x_2706 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2706, 0, x_2705); -x_2707 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2708 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2708, 0, x_2707); -lean_ctor_set(x_2708, 1, x_2706); -x_2709 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2710 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2709, x_2708, x_5, x_2704, x_7, x_8, x_2694); -lean_dec(x_5); -x_2711 = lean_ctor_get(x_2710, 0); -lean_inc(x_2711); -x_2712 = lean_ctor_get(x_2710, 1); -lean_inc(x_2712); -lean_dec(x_2710); -x_2416 = x_2711; -x_2417 = x_2712; -goto block_2438; -} -} -} -else -{ -lean_object* x_2728; lean_object* x_2729; lean_object* x_2730; lean_object* x_2731; lean_object* x_2732; lean_object* x_2733; lean_object* x_2734; lean_object* x_2735; lean_object* x_2736; lean_object* x_2737; lean_object* x_2738; lean_object* x_2739; lean_object* x_2740; lean_object* x_2741; lean_object* x_2742; lean_object* x_2743; lean_object* x_2744; lean_object* x_2745; lean_object* x_2746; lean_object* x_2747; lean_object* x_2748; lean_object* x_2749; lean_object* x_2750; lean_object* x_2751; lean_object* x_2752; lean_object* x_2753; lean_object* x_2754; lean_object* x_2755; lean_object* x_2756; lean_object* x_2757; lean_object* x_2758; lean_object* x_2759; lean_object* x_2760; lean_object* x_2761; lean_object* x_2781; lean_object* x_2782; uint8_t x_2783; -x_2728 = lean_ctor_get(x_2678, 0); -lean_inc(x_2728); -lean_dec(x_2678); -x_2729 = lean_ctor_get(x_2677, 0); -lean_inc(x_2729); -x_2730 = lean_ctor_get(x_2677, 1); -lean_inc(x_2730); -x_2731 = lean_ctor_get(x_2677, 2); -lean_inc(x_2731); -if (lean_is_exclusive(x_2677)) { - lean_ctor_release(x_2677, 0); - lean_ctor_release(x_2677, 1); - lean_ctor_release(x_2677, 2); - x_2732 = x_2677; -} else { - lean_dec_ref(x_2677); - x_2732 = lean_box(0); -} -x_2733 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_2730); -if (lean_is_scalar(x_2732)) { - x_2734 = lean_alloc_ctor(0, 3, 0); -} else { - x_2734 = x_2732; -} -lean_ctor_set(x_2734, 0, x_2733); -lean_ctor_set(x_2734, 1, x_2730); -lean_ctor_set(x_2734, 2, x_2731); -x_2735 = l_Lean_Syntax_setHeadInfo(x_2625, x_2734); -x_2736 = lean_ctor_get(x_2728, 0); -lean_inc(x_2736); -x_2737 = lean_ctor_get(x_2728, 1); -lean_inc(x_2737); -x_2738 = lean_ctor_get(x_2728, 2); -lean_inc(x_2738); -if (lean_is_exclusive(x_2728)) { - lean_ctor_release(x_2728, 0); - lean_ctor_release(x_2728, 1); - lean_ctor_release(x_2728, 2); - x_2739 = x_2728; -} else { - lean_dec_ref(x_2728); - x_2739 = lean_box(0); -} -lean_inc(x_2737); -if (lean_is_scalar(x_2739)) { - x_2740 = lean_alloc_ctor(0, 3, 0); -} else { - x_2740 = x_2739; -} -lean_ctor_set(x_2740, 0, x_2736); -lean_ctor_set(x_2740, 1, x_2737); -lean_ctor_set(x_2740, 2, x_2733); -x_2741 = l_Lean_Syntax_setTailInfo(x_2735, x_2740); -x_2742 = lean_apply_1(x_2, x_2741); -x_2743 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_2743, 0, x_2729); -lean_ctor_set(x_2743, 1, x_2730); -lean_ctor_set(x_2743, 2, x_2733); -x_2744 = l_Lean_Syntax_setHeadInfo(x_2742, x_2743); -x_2745 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_2745, 0, x_2733); -lean_ctor_set(x_2745, 1, x_2737); -lean_ctor_set(x_2745, 2, x_2738); -x_2746 = l_Lean_Syntax_setTailInfo(x_2744, x_2745); -x_2747 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2746, x_5, x_2626, x_7, x_8, x_2624); -x_2748 = lean_ctor_get(x_2747, 0); -lean_inc(x_2748); -x_2749 = lean_ctor_get(x_2748, 0); -lean_inc(x_2749); -lean_dec(x_2748); -x_2750 = lean_ctor_get(x_2747, 1); -lean_inc(x_2750); -lean_dec(x_2747); -x_2751 = lean_ctor_get(x_2749, 1); -lean_inc(x_2751); -lean_dec(x_2749); -x_2752 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2751, x_7, x_8, x_2750); -x_2753 = lean_ctor_get(x_2752, 0); -lean_inc(x_2753); -x_2754 = lean_ctor_get(x_2753, 0); -lean_inc(x_2754); -if (lean_is_exclusive(x_2753)) { - lean_ctor_release(x_2753, 0); - x_2755 = x_2753; -} else { - lean_dec_ref(x_2753); - x_2755 = lean_box(0); -} -x_2756 = lean_ctor_get(x_2752, 1); -lean_inc(x_2756); -lean_dec(x_2752); -x_2757 = lean_ctor_get(x_2754, 0); -lean_inc(x_2757); -x_2758 = lean_ctor_get(x_2754, 1); -lean_inc(x_2758); -if (lean_is_exclusive(x_2754)) { - lean_ctor_release(x_2754, 0); - lean_ctor_release(x_2754, 1); - x_2759 = x_2754; -} else { - lean_dec_ref(x_2754); - x_2759 = lean_box(0); -} -x_2781 = l_Lean_Core_getTraceState___rarg(x_8, x_2756); -x_2782 = lean_ctor_get(x_2781, 0); -lean_inc(x_2782); -x_2783 = lean_ctor_get_uint8(x_2782, sizeof(void*)*1); -lean_dec(x_2782); -if (x_2783 == 0) -{ -lean_object* x_2784; lean_object* x_2785; lean_object* x_2786; lean_object* x_2787; -x_2784 = lean_ctor_get(x_2781, 1); -lean_inc(x_2784); -lean_dec(x_2781); -x_2785 = lean_box(x_226); -if (lean_is_scalar(x_2759)) { - x_2786 = lean_alloc_ctor(0, 2, 0); -} else { - x_2786 = x_2759; -} -lean_ctor_set(x_2786, 0, x_2785); -lean_ctor_set(x_2786, 1, x_2758); -if (lean_is_scalar(x_2755)) { - x_2787 = lean_alloc_ctor(1, 1, 0); -} else { - x_2787 = x_2755; -} -lean_ctor_set(x_2787, 0, x_2786); -x_2760 = x_2787; -x_2761 = x_2784; -goto block_2780; -} -else -{ -lean_object* x_2788; lean_object* x_2789; lean_object* x_2790; lean_object* x_2791; lean_object* x_2792; lean_object* x_2793; lean_object* x_2794; -x_2788 = lean_ctor_get(x_2781, 1); -lean_inc(x_2788); -lean_dec(x_2781); -x_2789 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2790 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2789, x_7, x_8, x_2788); -x_2791 = lean_ctor_get(x_2790, 0); -lean_inc(x_2791); -x_2792 = lean_ctor_get(x_2790, 1); -lean_inc(x_2792); -lean_dec(x_2790); -if (lean_is_scalar(x_2759)) { - x_2793 = lean_alloc_ctor(0, 2, 0); -} else { - x_2793 = x_2759; -} -lean_ctor_set(x_2793, 0, x_2791); -lean_ctor_set(x_2793, 1, x_2758); -if (lean_is_scalar(x_2755)) { - x_2794 = lean_alloc_ctor(1, 1, 0); -} else { - x_2794 = x_2755; -} -lean_ctor_set(x_2794, 0, x_2793); -x_2760 = x_2794; -x_2761 = x_2792; -goto block_2780; -} -block_2780: -{ -lean_object* x_2762; lean_object* x_2763; lean_object* x_2764; uint8_t x_2765; -x_2762 = lean_ctor_get(x_2760, 0); -lean_inc(x_2762); -if (lean_is_exclusive(x_2760)) { - lean_ctor_release(x_2760, 0); - x_2763 = x_2760; -} else { - lean_dec_ref(x_2760); - x_2763 = lean_box(0); -} -x_2764 = lean_ctor_get(x_2762, 0); -lean_inc(x_2764); -x_2765 = lean_unbox(x_2764); -lean_dec(x_2764); -if (x_2765 == 0) -{ -lean_object* x_2766; lean_object* x_2767; lean_object* x_2768; lean_object* x_2769; lean_object* x_2770; -lean_dec(x_2757); -lean_dec(x_5); -x_2766 = lean_ctor_get(x_2762, 1); -lean_inc(x_2766); -if (lean_is_exclusive(x_2762)) { - lean_ctor_release(x_2762, 0); - lean_ctor_release(x_2762, 1); - x_2767 = x_2762; -} else { - lean_dec_ref(x_2762); - x_2767 = lean_box(0); -} -x_2768 = lean_box(0); -if (lean_is_scalar(x_2767)) { - x_2769 = lean_alloc_ctor(0, 2, 0); -} else { - x_2769 = x_2767; -} -lean_ctor_set(x_2769, 0, x_2768); -lean_ctor_set(x_2769, 1, x_2766); -if (lean_is_scalar(x_2763)) { - x_2770 = lean_alloc_ctor(1, 1, 0); -} else { - x_2770 = x_2763; -} -lean_ctor_set(x_2770, 0, x_2769); -x_2416 = x_2770; -x_2417 = x_2761; -goto block_2438; -} -else -{ -lean_object* x_2771; lean_object* x_2772; lean_object* x_2773; lean_object* x_2774; lean_object* x_2775; lean_object* x_2776; lean_object* x_2777; lean_object* x_2778; lean_object* x_2779; -lean_dec(x_2763); -x_2771 = lean_ctor_get(x_2762, 1); -lean_inc(x_2771); -lean_dec(x_2762); -x_2772 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2440, x_2757); -x_2773 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2773, 0, x_2772); -x_2774 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2775 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2775, 0, x_2774); -lean_ctor_set(x_2775, 1, x_2773); -x_2776 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2777 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2776, x_2775, x_5, x_2771, x_7, x_8, x_2761); -lean_dec(x_5); -x_2778 = lean_ctor_get(x_2777, 0); -lean_inc(x_2778); -x_2779 = lean_ctor_get(x_2777, 1); -lean_inc(x_2779); -lean_dec(x_2777); -x_2416 = x_2778; -x_2417 = x_2779; -goto block_2438; -} -} -} -} -} -} -} -block_2862: -{ -lean_object* x_2824; lean_object* x_2825; lean_object* x_2826; uint8_t x_2827; -x_2824 = lean_ctor_get(x_2822, 0); -lean_inc(x_2824); -if (lean_is_exclusive(x_2822)) { - lean_ctor_release(x_2822, 0); - x_2825 = x_2822; -} else { - lean_dec_ref(x_2822); - x_2825 = lean_box(0); -} -x_2826 = lean_ctor_get(x_2824, 0); -lean_inc(x_2826); -x_2827 = lean_unbox(x_2826); -lean_dec(x_2826); -if (x_2827 == 0) -{ -lean_object* x_2828; lean_object* x_2829; lean_object* x_2830; lean_object* x_2831; lean_object* x_2832; -lean_dec(x_2399); -x_2828 = lean_ctor_get(x_2824, 1); -lean_inc(x_2828); -if (lean_is_exclusive(x_2824)) { - lean_ctor_release(x_2824, 0); - lean_ctor_release(x_2824, 1); - x_2829 = x_2824; -} else { - lean_dec_ref(x_2824); - x_2829 = lean_box(0); -} -x_2830 = lean_box(0); -if (lean_is_scalar(x_2829)) { - x_2831 = lean_alloc_ctor(0, 2, 0); -} else { - x_2831 = x_2829; -} -lean_ctor_set(x_2831, 0, x_2830); -lean_ctor_set(x_2831, 1, x_2828); -if (lean_is_scalar(x_2825)) { - x_2832 = lean_alloc_ctor(1, 1, 0); -} else { - x_2832 = x_2825; -} -lean_ctor_set(x_2832, 0, x_2831); -x_2410 = x_2832; -x_2411 = x_2823; -goto block_2821; -} -else -{ -lean_object* x_2833; lean_object* x_2834; lean_object* x_2835; lean_object* x_2836; lean_object* x_2837; lean_object* x_2838; lean_object* x_2839; lean_object* x_2840; lean_object* x_2841; lean_object* x_2842; lean_object* x_2843; lean_object* x_2844; lean_object* x_2845; lean_object* x_2846; lean_object* x_2847; lean_object* x_2848; lean_object* x_2849; lean_object* x_2850; lean_object* x_2851; lean_object* x_2852; lean_object* x_2853; lean_object* x_2854; lean_object* x_2855; lean_object* x_2856; lean_object* x_2857; lean_object* x_2858; lean_object* x_2859; lean_object* x_2860; lean_object* x_2861; -lean_dec(x_2825); -x_2833 = lean_ctor_get(x_2824, 1); -lean_inc(x_2833); -if (lean_is_exclusive(x_2824)) { - lean_ctor_release(x_2824, 0); - lean_ctor_release(x_2824, 1); - x_2834 = x_2824; -} else { - lean_dec_ref(x_2824); - x_2834 = lean_box(0); -} -lean_inc(x_3); -x_2835 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); -x_2836 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2836, 0, x_2835); -x_2837 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; -x_2838 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2838, 0, x_2837); -lean_ctor_set(x_2838, 1, x_2836); -x_2839 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22; -x_2840 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2840, 0, x_2838); -lean_ctor_set(x_2840, 1, x_2839); -lean_inc(x_2409); -x_2841 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_2409); -x_2842 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2842, 0, x_2841); -x_2843 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2843, 0, x_2840); -lean_ctor_set(x_2843, 1, x_2842); -x_2844 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; -x_2845 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2845, 0, x_2843); -lean_ctor_set(x_2845, 1, x_2844); -lean_inc(x_1); -lean_inc(x_2408); -if (lean_is_scalar(x_2834)) { - x_2846 = lean_alloc_ctor(0, 2, 0); -} else { - x_2846 = x_2834; -} -lean_ctor_set(x_2846, 0, x_2408); -lean_ctor_set(x_2846, 1, x_1); -x_2847 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_2846); -x_2848 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2848, 0, x_2847); -x_2849 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2849, 0, x_2845); -lean_ctor_set(x_2849, 1, x_2848); -x_2850 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25; -x_2851 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2851, 0, x_2849); -lean_ctor_set(x_2851, 1, x_2850); -x_2852 = lean_ctor_get(x_23, 1); -lean_inc(x_2852); -x_2853 = lean_ctor_get(x_23, 2); -lean_inc(x_2853); -if (lean_is_scalar(x_2399)) { - x_2854 = lean_alloc_ctor(0, 2, 0); -} else { - x_2854 = x_2399; -} -lean_ctor_set(x_2854, 0, x_2852); -lean_ctor_set(x_2854, 1, x_2853); -x_2855 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_2854); -x_2856 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2856, 0, x_2855); -x_2857 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2857, 0, x_2851); -lean_ctor_set(x_2857, 1, x_2856); -x_2858 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2859 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2858, x_2857, x_5, x_2833, x_7, x_8, x_2823); -x_2860 = lean_ctor_get(x_2859, 0); -lean_inc(x_2860); -x_2861 = lean_ctor_get(x_2859, 1); -lean_inc(x_2861); -lean_dec(x_2859); -x_2410 = x_2860; -x_2411 = x_2861; -goto block_2821; -} -} -} -} -} -} -else -{ -uint8_t x_2875; -lean_free_object(x_230); -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_2875 = !lean_is_exclusive(x_234); -if (x_2875 == 0) -{ -return x_234; -} -else -{ -lean_object* x_2876; lean_object* x_2877; lean_object* x_2878; -x_2876 = lean_ctor_get(x_234, 0); -x_2877 = lean_ctor_get(x_234, 1); -lean_inc(x_2877); -lean_inc(x_2876); -lean_dec(x_234); -x_2878 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_2878, 0, x_2876); -lean_ctor_set(x_2878, 1, x_2877); -return x_2878; -} -} -} -else -{ -lean_object* x_2879; lean_object* x_2880; -x_2879 = lean_ctor_get(x_230, 1); -lean_inc(x_2879); -lean_dec(x_230); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_5); -x_2880 = lean_apply_5(x_4, x_5, x_2879, x_7, x_8, x_229); -if (lean_obj_tag(x_2880) == 0) -{ -lean_object* x_2881; -x_2881 = lean_ctor_get(x_2880, 0); -lean_inc(x_2881); -if (lean_obj_tag(x_2881) == 0) -{ -lean_object* x_2882; lean_object* x_2883; lean_object* x_2884; lean_object* x_2885; lean_object* x_2886; lean_object* x_2887; -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_2882 = lean_ctor_get(x_2880, 1); -lean_inc(x_2882); -if (lean_is_exclusive(x_2880)) { - lean_ctor_release(x_2880, 0); - lean_ctor_release(x_2880, 1); - x_2883 = x_2880; -} else { - lean_dec_ref(x_2880); - x_2883 = lean_box(0); -} -x_2884 = lean_ctor_get(x_2881, 0); -lean_inc(x_2884); -if (lean_is_exclusive(x_2881)) { - lean_ctor_release(x_2881, 0); - x_2885 = x_2881; -} else { - lean_dec_ref(x_2881); - x_2885 = lean_box(0); -} -if (lean_is_scalar(x_2885)) { - x_2886 = lean_alloc_ctor(0, 1, 0); -} else { - x_2886 = x_2885; -} -lean_ctor_set(x_2886, 0, x_2884); -if (lean_is_scalar(x_2883)) { - x_2887 = lean_alloc_ctor(0, 2, 0); -} else { - x_2887 = x_2883; -} -lean_ctor_set(x_2887, 0, x_2886); -lean_ctor_set(x_2887, 1, x_2882); -return x_2887; -} -else -{ -lean_object* x_2888; lean_object* x_2889; lean_object* x_2890; lean_object* x_2891; lean_object* x_2892; -x_2888 = lean_ctor_get(x_2881, 0); -lean_inc(x_2888); -if (lean_is_exclusive(x_2881)) { - lean_ctor_release(x_2881, 0); - x_2889 = x_2881; -} else { - lean_dec_ref(x_2881); - x_2889 = lean_box(0); -} -x_2890 = lean_ctor_get(x_2888, 1); -lean_inc(x_2890); -if (lean_is_exclusive(x_2888)) { - lean_ctor_release(x_2888, 0); - lean_ctor_release(x_2888, 1); - x_2891 = x_2888; -} else { - lean_dec_ref(x_2888); - x_2891 = lean_box(0); -} -x_2892 = lean_ctor_get(x_2890, 3); -lean_inc(x_2892); -if (lean_obj_tag(x_2892) == 0) -{ -lean_object* x_2893; lean_object* x_2894; lean_object* x_2895; lean_object* x_2896; lean_object* x_2897; -lean_dec(x_2891); -lean_dec(x_2889); -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_2893 = lean_ctor_get(x_2880, 1); -lean_inc(x_2893); -lean_dec(x_2880); -x_2894 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; -x_2895 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; -x_2896 = lean_panic_fn(x_2894, x_2895); -x_2897 = lean_apply_5(x_2896, x_5, x_2890, x_7, x_8, x_2893); -return x_2897; -} -else -{ -lean_object* x_2898; lean_object* x_2899; lean_object* x_2900; lean_object* x_2901; lean_object* x_2902; lean_object* x_2903; lean_object* x_3314; lean_object* x_3315; lean_object* x_3355; lean_object* x_3356; uint8_t x_3357; -x_2898 = lean_ctor_get(x_2880, 1); -lean_inc(x_2898); -if (lean_is_exclusive(x_2880)) { - lean_ctor_release(x_2880, 0); - lean_ctor_release(x_2880, 1); - x_2899 = x_2880; -} else { - lean_dec_ref(x_2880); - x_2899 = lean_box(0); -} -x_2900 = lean_ctor_get(x_2890, 4); -lean_inc(x_2900); -x_2901 = lean_ctor_get(x_2892, 0); -lean_inc(x_2901); -lean_dec(x_2892); -x_3355 = l_Lean_Core_getTraceState___rarg(x_8, x_2898); -x_3356 = lean_ctor_get(x_3355, 0); -lean_inc(x_3356); -x_3357 = lean_ctor_get_uint8(x_3356, sizeof(void*)*1); -lean_dec(x_3356); -if (x_3357 == 0) -{ -lean_object* x_3358; lean_object* x_3359; lean_object* x_3360; lean_object* x_3361; -x_3358 = lean_ctor_get(x_3355, 1); -lean_inc(x_3358); -lean_dec(x_3355); -x_3359 = lean_box(x_226); -x_3360 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3360, 0, x_3359); -lean_ctor_set(x_3360, 1, x_2890); -if (lean_is_scalar(x_2889)) { - x_3361 = lean_alloc_ctor(1, 1, 0); -} else { - x_3361 = x_2889; -} -lean_ctor_set(x_3361, 0, x_3360); -x_3314 = x_3361; -x_3315 = x_3358; -goto block_3354; -} -else -{ -lean_object* x_3362; lean_object* x_3363; lean_object* x_3364; lean_object* x_3365; lean_object* x_3366; lean_object* x_3367; lean_object* x_3368; -x_3362 = lean_ctor_get(x_3355, 1); -lean_inc(x_3362); -lean_dec(x_3355); -x_3363 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3364 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3363, x_7, x_8, x_3362); -x_3365 = lean_ctor_get(x_3364, 0); -lean_inc(x_3365); -x_3366 = lean_ctor_get(x_3364, 1); -lean_inc(x_3366); -lean_dec(x_3364); -x_3367 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3367, 0, x_3365); -lean_ctor_set(x_3367, 1, x_2890); -if (lean_is_scalar(x_2889)) { - x_3368 = lean_alloc_ctor(1, 1, 0); -} else { - x_3368 = x_2889; -} -lean_ctor_set(x_3368, 0, x_3367); -x_3314 = x_3368; -x_3315 = x_3366; -goto block_3354; -} -block_3313: -{ -lean_object* x_2904; lean_object* x_2905; lean_object* x_2906; lean_object* x_2907; lean_object* x_2908; lean_object* x_2909; lean_object* x_2931; uint8_t x_3288; -x_2904 = lean_ctor_get(x_2902, 0); -lean_inc(x_2904); -if (lean_is_exclusive(x_2902)) { - lean_ctor_release(x_2902, 0); - x_2905 = x_2902; -} else { - lean_dec_ref(x_2902); - x_2905 = lean_box(0); -} -x_2906 = lean_ctor_get(x_2904, 1); -lean_inc(x_2906); -if (lean_is_exclusive(x_2904)) { - lean_ctor_release(x_2904, 0); - lean_ctor_release(x_2904, 1); - x_2907 = x_2904; -} else { - lean_dec_ref(x_2904); - x_2907 = lean_box(0); -} -x_3288 = lean_nat_dec_lt(x_2901, x_3); -lean_dec(x_2901); -if (x_3288 == 0) -{ -if (lean_obj_tag(x_2900) == 0) -{ -lean_object* x_3289; lean_object* x_3290; lean_object* x_3291; lean_object* x_3292; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_3289 = lean_box(0); -if (lean_is_scalar(x_2907)) { - x_3290 = lean_alloc_ctor(0, 2, 0); -} else { - x_3290 = x_2907; -} -lean_ctor_set(x_3290, 0, x_3289); -lean_ctor_set(x_3290, 1, x_2906); -if (lean_is_scalar(x_2905)) { - x_3291 = lean_alloc_ctor(1, 1, 0); -} else { - x_3291 = x_2905; -} -lean_ctor_set(x_3291, 0, x_3290); -if (lean_is_scalar(x_2899)) { - x_3292 = lean_alloc_ctor(0, 2, 0); -} else { - x_3292 = x_2899; -} -lean_ctor_set(x_3292, 0, x_3291); -lean_ctor_set(x_3292, 1, x_2903); -x_24 = x_3292; -goto block_222; -} -else -{ -lean_object* x_3293; -x_3293 = lean_ctor_get(x_23, 1); -lean_inc(x_3293); -if (lean_obj_tag(x_3293) == 0) -{ -lean_object* x_3294; lean_object* x_3295; lean_object* x_3296; lean_object* x_3297; -lean_dec(x_2900); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_3294 = lean_box(0); -if (lean_is_scalar(x_2907)) { - x_3295 = lean_alloc_ctor(0, 2, 0); -} else { - x_3295 = x_2907; -} -lean_ctor_set(x_3295, 0, x_3294); -lean_ctor_set(x_3295, 1, x_2906); -if (lean_is_scalar(x_2905)) { - x_3296 = lean_alloc_ctor(1, 1, 0); -} else { - x_3296 = x_2905; -} -lean_ctor_set(x_3296, 0, x_3295); -if (lean_is_scalar(x_2899)) { - x_3297 = lean_alloc_ctor(0, 2, 0); -} else { - x_3297 = x_2899; -} -lean_ctor_set(x_3297, 0, x_3296); -lean_ctor_set(x_3297, 1, x_2903); -x_24 = x_3297; -goto block_222; -} -else -{ -lean_object* x_3298; lean_object* x_3299; lean_object* x_3300; uint8_t x_3301; -x_3298 = lean_ctor_get(x_2900, 0); -lean_inc(x_3298); -lean_dec(x_2900); -x_3299 = lean_ctor_get(x_3293, 0); -lean_inc(x_3299); -lean_dec(x_3293); -x_3300 = lean_ctor_get(x_23, 2); -lean_inc(x_3300); -x_3301 = lean_name_eq(x_1, x_3300); -lean_dec(x_3300); -if (x_3301 == 0) -{ -lean_object* x_3302; lean_object* x_3303; lean_object* x_3304; lean_object* x_3305; -lean_dec(x_3299); -lean_dec(x_3298); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_3302 = lean_box(0); -if (lean_is_scalar(x_2907)) { - x_3303 = lean_alloc_ctor(0, 2, 0); -} else { - x_3303 = x_2907; -} -lean_ctor_set(x_3303, 0, x_3302); -lean_ctor_set(x_3303, 1, x_2906); -if (lean_is_scalar(x_2905)) { - x_3304 = lean_alloc_ctor(1, 1, 0); -} else { - x_3304 = x_2905; -} -lean_ctor_set(x_3304, 0, x_3303); -if (lean_is_scalar(x_2899)) { - x_3305 = lean_alloc_ctor(0, 2, 0); -} else { - x_3305 = x_2899; -} -lean_ctor_set(x_3305, 0, x_3304); -lean_ctor_set(x_3305, 1, x_2903); -x_24 = x_3305; -goto block_222; -} -else -{ -uint8_t x_3306; -x_3306 = lean_nat_dec_le(x_3298, x_3299); -lean_dec(x_3299); -lean_dec(x_3298); -if (x_3306 == 0) -{ -lean_object* x_3307; lean_object* x_3308; lean_object* x_3309; lean_object* x_3310; -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_3307 = lean_box(0); -if (lean_is_scalar(x_2907)) { - x_3308 = lean_alloc_ctor(0, 2, 0); -} else { - x_3308 = x_2907; -} -lean_ctor_set(x_3308, 0, x_3307); -lean_ctor_set(x_3308, 1, x_2906); -if (lean_is_scalar(x_2905)) { - x_3309 = lean_alloc_ctor(1, 1, 0); -} else { - x_3309 = x_2905; -} -lean_ctor_set(x_3309, 0, x_3308); -if (lean_is_scalar(x_2899)) { - x_3310 = lean_alloc_ctor(0, 2, 0); -} else { - x_3310 = x_2899; -} -lean_ctor_set(x_3310, 0, x_3309); -lean_ctor_set(x_3310, 1, x_2903); -x_24 = x_3310; -goto block_222; -} -else -{ -lean_object* x_3311; -lean_dec(x_2907); -lean_dec(x_2905); -lean_dec(x_2899); -x_3311 = lean_box(0); -x_2931 = x_3311; -goto block_3287; -} -} -} -} -} -else -{ -lean_object* x_3312; -lean_dec(x_2907); -lean_dec(x_2905); -lean_dec(x_2900); -lean_dec(x_2899); -x_3312 = lean_box(0); -x_2931 = x_3312; -goto block_3287; -} -block_2930: -{ -lean_object* x_2910; lean_object* x_2911; lean_object* x_2912; lean_object* x_2913; lean_object* x_2914; lean_object* x_2915; lean_object* x_2916; lean_object* x_2917; lean_object* x_2918; lean_object* x_2919; lean_object* x_2920; lean_object* x_2921; uint8_t x_2922; lean_object* x_2923; lean_object* x_2924; lean_object* x_2925; lean_object* x_2926; lean_object* x_2927; lean_object* x_2928; lean_object* x_2929; -x_2910 = lean_ctor_get(x_2908, 0); -lean_inc(x_2910); -lean_dec(x_2908); -x_2911 = lean_ctor_get(x_2910, 1); -lean_inc(x_2911); -lean_dec(x_2910); -x_2912 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_2911, x_7, x_8, x_2909); -lean_dec(x_8); -lean_dec(x_7); -x_2913 = lean_ctor_get(x_2912, 0); -lean_inc(x_2913); -x_2914 = lean_ctor_get(x_2913, 0); -lean_inc(x_2914); -if (lean_is_exclusive(x_2913)) { - lean_ctor_release(x_2913, 0); - x_2915 = x_2913; -} else { - lean_dec_ref(x_2913); - x_2915 = lean_box(0); -} -x_2916 = lean_ctor_get(x_2914, 1); -lean_inc(x_2916); -if (lean_is_exclusive(x_2914)) { - lean_ctor_release(x_2914, 0); - lean_ctor_release(x_2914, 1); - x_2917 = x_2914; -} else { - lean_dec_ref(x_2914); - x_2917 = lean_box(0); -} -x_2918 = lean_ctor_get(x_2912, 1); -lean_inc(x_2918); -if (lean_is_exclusive(x_2912)) { - lean_ctor_release(x_2912, 0); - lean_ctor_release(x_2912, 1); - x_2919 = x_2912; -} else { - lean_dec_ref(x_2912); - x_2919 = lean_box(0); -} -x_2920 = lean_ctor_get(x_2916, 0); -lean_inc(x_2920); -x_2921 = lean_ctor_get(x_2916, 3); -lean_inc(x_2921); -x_2922 = lean_ctor_get_uint8(x_2916, sizeof(void*)*5); -if (lean_is_exclusive(x_2916)) { - lean_ctor_release(x_2916, 0); - lean_ctor_release(x_2916, 1); - lean_ctor_release(x_2916, 2); - lean_ctor_release(x_2916, 3); - lean_ctor_release(x_2916, 4); - x_2923 = x_2916; -} else { - lean_dec_ref(x_2916); - x_2923 = lean_box(0); -} -x_2924 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_2923)) { - x_2925 = lean_alloc_ctor(0, 5, 1); -} else { - x_2925 = x_2923; -} -lean_ctor_set(x_2925, 0, x_2920); -lean_ctor_set(x_2925, 1, x_2924); -lean_ctor_set(x_2925, 2, x_1); -lean_ctor_set(x_2925, 3, x_2921); -lean_ctor_set(x_2925, 4, x_224); -lean_ctor_set_uint8(x_2925, sizeof(void*)*5, x_2922); -x_2926 = lean_box(0); -if (lean_is_scalar(x_2917)) { - x_2927 = lean_alloc_ctor(0, 2, 0); -} else { - x_2927 = x_2917; -} -lean_ctor_set(x_2927, 0, x_2926); -lean_ctor_set(x_2927, 1, x_2925); -if (lean_is_scalar(x_2915)) { - x_2928 = lean_alloc_ctor(1, 1, 0); -} else { - x_2928 = x_2915; -} -lean_ctor_set(x_2928, 0, x_2927); -if (lean_is_scalar(x_2919)) { - x_2929 = lean_alloc_ctor(0, 2, 0); -} else { - x_2929 = x_2919; -} -lean_ctor_set(x_2929, 0, x_2928); -lean_ctor_set(x_2929, 1, x_2918); -x_24 = x_2929; -goto block_222; -} -block_3287: -{ -lean_object* x_2932; uint8_t x_2933; -lean_dec(x_2931); -x_2932 = lean_unsigned_to_nat(0u); -x_2933 = lean_nat_dec_lt(x_2932, x_22); -lean_dec(x_22); -if (x_2933 == 0) -{ -lean_object* x_2934; lean_object* x_2935; lean_object* x_2936; lean_object* x_2937; lean_object* x_2938; lean_object* x_2939; lean_object* x_2940; -x_2934 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2906, x_7, x_8, x_2903); -x_2935 = lean_ctor_get(x_2934, 0); -lean_inc(x_2935); -x_2936 = lean_ctor_get(x_2935, 0); -lean_inc(x_2936); -lean_dec(x_2935); -x_2937 = lean_ctor_get(x_2934, 1); -lean_inc(x_2937); -lean_dec(x_2934); -x_2938 = lean_ctor_get(x_2936, 0); -lean_inc(x_2938); -x_2939 = lean_ctor_get(x_2936, 1); -lean_inc(x_2939); -lean_dec(x_2936); -x_2940 = l_Lean_Syntax_getHeadInfo___main(x_2938); -if (lean_obj_tag(x_2940) == 0) -{ -lean_object* x_2941; lean_object* x_2942; lean_object* x_2943; lean_object* x_2944; lean_object* x_2945; lean_object* x_2946; lean_object* x_2947; lean_object* x_2948; lean_object* x_2949; lean_object* x_2950; lean_object* x_2951; lean_object* x_2952; lean_object* x_2953; lean_object* x_2954; lean_object* x_2955; lean_object* x_2956; lean_object* x_2976; lean_object* x_2977; uint8_t x_2978; -x_2941 = lean_apply_1(x_2, x_2938); -x_2942 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2941, x_5, x_2939, x_7, x_8, x_2937); -x_2943 = lean_ctor_get(x_2942, 0); -lean_inc(x_2943); -x_2944 = lean_ctor_get(x_2943, 0); -lean_inc(x_2944); -lean_dec(x_2943); -x_2945 = lean_ctor_get(x_2942, 1); -lean_inc(x_2945); -lean_dec(x_2942); -x_2946 = lean_ctor_get(x_2944, 1); -lean_inc(x_2946); -lean_dec(x_2944); -x_2947 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2946, x_7, x_8, x_2945); -x_2948 = lean_ctor_get(x_2947, 0); -lean_inc(x_2948); -x_2949 = lean_ctor_get(x_2948, 0); -lean_inc(x_2949); -if (lean_is_exclusive(x_2948)) { - lean_ctor_release(x_2948, 0); - x_2950 = x_2948; -} else { - lean_dec_ref(x_2948); - x_2950 = lean_box(0); -} -x_2951 = lean_ctor_get(x_2947, 1); -lean_inc(x_2951); -lean_dec(x_2947); -x_2952 = lean_ctor_get(x_2949, 0); -lean_inc(x_2952); -x_2953 = lean_ctor_get(x_2949, 1); -lean_inc(x_2953); -if (lean_is_exclusive(x_2949)) { - lean_ctor_release(x_2949, 0); - lean_ctor_release(x_2949, 1); - x_2954 = x_2949; -} else { - lean_dec_ref(x_2949); - x_2954 = lean_box(0); -} -x_2976 = l_Lean_Core_getTraceState___rarg(x_8, x_2951); -x_2977 = lean_ctor_get(x_2976, 0); -lean_inc(x_2977); -x_2978 = lean_ctor_get_uint8(x_2977, sizeof(void*)*1); -lean_dec(x_2977); -if (x_2978 == 0) -{ -lean_object* x_2979; lean_object* x_2980; lean_object* x_2981; lean_object* x_2982; -x_2979 = lean_ctor_get(x_2976, 1); -lean_inc(x_2979); -lean_dec(x_2976); -x_2980 = lean_box(x_226); -if (lean_is_scalar(x_2954)) { - x_2981 = lean_alloc_ctor(0, 2, 0); -} else { - x_2981 = x_2954; -} -lean_ctor_set(x_2981, 0, x_2980); -lean_ctor_set(x_2981, 1, x_2953); -if (lean_is_scalar(x_2950)) { - x_2982 = lean_alloc_ctor(1, 1, 0); -} else { - x_2982 = x_2950; -} -lean_ctor_set(x_2982, 0, x_2981); -x_2955 = x_2982; -x_2956 = x_2979; -goto block_2975; -} -else -{ -lean_object* x_2983; lean_object* x_2984; lean_object* x_2985; lean_object* x_2986; lean_object* x_2987; lean_object* x_2988; lean_object* x_2989; -x_2983 = lean_ctor_get(x_2976, 1); -lean_inc(x_2983); -lean_dec(x_2976); -x_2984 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2985 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_2984, x_7, x_8, x_2983); -x_2986 = lean_ctor_get(x_2985, 0); -lean_inc(x_2986); -x_2987 = lean_ctor_get(x_2985, 1); -lean_inc(x_2987); -lean_dec(x_2985); -if (lean_is_scalar(x_2954)) { - x_2988 = lean_alloc_ctor(0, 2, 0); -} else { - x_2988 = x_2954; -} -lean_ctor_set(x_2988, 0, x_2986); -lean_ctor_set(x_2988, 1, x_2953); -if (lean_is_scalar(x_2950)) { - x_2989 = lean_alloc_ctor(1, 1, 0); -} else { - x_2989 = x_2950; -} -lean_ctor_set(x_2989, 0, x_2988); -x_2955 = x_2989; -x_2956 = x_2987; -goto block_2975; -} -block_2975: -{ -lean_object* x_2957; lean_object* x_2958; lean_object* x_2959; uint8_t x_2960; -x_2957 = lean_ctor_get(x_2955, 0); -lean_inc(x_2957); -if (lean_is_exclusive(x_2955)) { - lean_ctor_release(x_2955, 0); - x_2958 = x_2955; -} else { - lean_dec_ref(x_2955); - x_2958 = lean_box(0); -} -x_2959 = lean_ctor_get(x_2957, 0); -lean_inc(x_2959); -x_2960 = lean_unbox(x_2959); -lean_dec(x_2959); -if (x_2960 == 0) -{ -lean_object* x_2961; lean_object* x_2962; lean_object* x_2963; lean_object* x_2964; lean_object* x_2965; -lean_dec(x_2952); -lean_dec(x_5); -x_2961 = lean_ctor_get(x_2957, 1); -lean_inc(x_2961); -if (lean_is_exclusive(x_2957)) { - lean_ctor_release(x_2957, 0); - lean_ctor_release(x_2957, 1); - x_2962 = x_2957; -} else { - lean_dec_ref(x_2957); - x_2962 = lean_box(0); -} -x_2963 = lean_box(0); -if (lean_is_scalar(x_2962)) { - x_2964 = lean_alloc_ctor(0, 2, 0); -} else { - x_2964 = x_2962; -} -lean_ctor_set(x_2964, 0, x_2963); -lean_ctor_set(x_2964, 1, x_2961); -if (lean_is_scalar(x_2958)) { - x_2965 = lean_alloc_ctor(1, 1, 0); -} else { - x_2965 = x_2958; -} -lean_ctor_set(x_2965, 0, x_2964); -x_2908 = x_2965; -x_2909 = x_2956; -goto block_2930; -} -else -{ -lean_object* x_2966; lean_object* x_2967; lean_object* x_2968; lean_object* x_2969; lean_object* x_2970; lean_object* x_2971; lean_object* x_2972; lean_object* x_2973; lean_object* x_2974; -lean_dec(x_2958); -x_2966 = lean_ctor_get(x_2957, 1); -lean_inc(x_2966); -lean_dec(x_2957); -x_2967 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2932, x_2952); -x_2968 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2968, 0, x_2967); -x_2969 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_2970 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_2970, 0, x_2969); -lean_ctor_set(x_2970, 1, x_2968); -x_2971 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_2972 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_2971, x_2970, x_5, x_2966, x_7, x_8, x_2956); -lean_dec(x_5); -x_2973 = lean_ctor_get(x_2972, 0); -lean_inc(x_2973); -x_2974 = lean_ctor_get(x_2972, 1); -lean_inc(x_2974); -lean_dec(x_2972); -x_2908 = x_2973; -x_2909 = x_2974; -goto block_2930; -} -} -} -else -{ -lean_object* x_2990; lean_object* x_2991; -x_2990 = lean_ctor_get(x_2940, 0); -lean_inc(x_2990); -lean_dec(x_2940); -x_2991 = l_Lean_Syntax_getTailInfo___main(x_2938); -if (lean_obj_tag(x_2991) == 0) -{ -lean_object* x_2992; lean_object* x_2993; lean_object* x_2994; lean_object* x_2995; lean_object* x_2996; lean_object* x_2997; lean_object* x_2998; lean_object* x_2999; lean_object* x_3000; lean_object* x_3001; lean_object* x_3002; lean_object* x_3003; lean_object* x_3004; lean_object* x_3005; lean_object* x_3006; lean_object* x_3007; lean_object* x_3027; lean_object* x_3028; uint8_t x_3029; -lean_dec(x_2990); -x_2992 = lean_apply_1(x_2, x_2938); -x_2993 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_2992, x_5, x_2939, x_7, x_8, x_2937); -x_2994 = lean_ctor_get(x_2993, 0); -lean_inc(x_2994); -x_2995 = lean_ctor_get(x_2994, 0); -lean_inc(x_2995); -lean_dec(x_2994); -x_2996 = lean_ctor_get(x_2993, 1); -lean_inc(x_2996); -lean_dec(x_2993); -x_2997 = lean_ctor_get(x_2995, 1); -lean_inc(x_2997); -lean_dec(x_2995); -x_2998 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_2997, x_7, x_8, x_2996); -x_2999 = lean_ctor_get(x_2998, 0); -lean_inc(x_2999); -x_3000 = lean_ctor_get(x_2999, 0); -lean_inc(x_3000); -if (lean_is_exclusive(x_2999)) { - lean_ctor_release(x_2999, 0); - x_3001 = x_2999; -} else { - lean_dec_ref(x_2999); - x_3001 = lean_box(0); -} -x_3002 = lean_ctor_get(x_2998, 1); -lean_inc(x_3002); -lean_dec(x_2998); -x_3003 = lean_ctor_get(x_3000, 0); -lean_inc(x_3003); -x_3004 = lean_ctor_get(x_3000, 1); -lean_inc(x_3004); -if (lean_is_exclusive(x_3000)) { - lean_ctor_release(x_3000, 0); - lean_ctor_release(x_3000, 1); - x_3005 = x_3000; -} else { - lean_dec_ref(x_3000); - x_3005 = lean_box(0); -} -x_3027 = l_Lean_Core_getTraceState___rarg(x_8, x_3002); -x_3028 = lean_ctor_get(x_3027, 0); -lean_inc(x_3028); -x_3029 = lean_ctor_get_uint8(x_3028, sizeof(void*)*1); -lean_dec(x_3028); -if (x_3029 == 0) -{ -lean_object* x_3030; lean_object* x_3031; lean_object* x_3032; lean_object* x_3033; -x_3030 = lean_ctor_get(x_3027, 1); -lean_inc(x_3030); -lean_dec(x_3027); -x_3031 = lean_box(x_226); -if (lean_is_scalar(x_3005)) { - x_3032 = lean_alloc_ctor(0, 2, 0); -} else { - x_3032 = x_3005; -} -lean_ctor_set(x_3032, 0, x_3031); -lean_ctor_set(x_3032, 1, x_3004); -if (lean_is_scalar(x_3001)) { - x_3033 = lean_alloc_ctor(1, 1, 0); -} else { - x_3033 = x_3001; -} -lean_ctor_set(x_3033, 0, x_3032); -x_3006 = x_3033; -x_3007 = x_3030; -goto block_3026; -} -else -{ -lean_object* x_3034; lean_object* x_3035; lean_object* x_3036; lean_object* x_3037; lean_object* x_3038; lean_object* x_3039; lean_object* x_3040; -x_3034 = lean_ctor_get(x_3027, 1); -lean_inc(x_3034); -lean_dec(x_3027); -x_3035 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3036 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3035, x_7, x_8, x_3034); -x_3037 = lean_ctor_get(x_3036, 0); -lean_inc(x_3037); -x_3038 = lean_ctor_get(x_3036, 1); -lean_inc(x_3038); -lean_dec(x_3036); -if (lean_is_scalar(x_3005)) { - x_3039 = lean_alloc_ctor(0, 2, 0); -} else { - x_3039 = x_3005; -} -lean_ctor_set(x_3039, 0, x_3037); -lean_ctor_set(x_3039, 1, x_3004); -if (lean_is_scalar(x_3001)) { - x_3040 = lean_alloc_ctor(1, 1, 0); -} else { - x_3040 = x_3001; -} -lean_ctor_set(x_3040, 0, x_3039); -x_3006 = x_3040; -x_3007 = x_3038; -goto block_3026; -} -block_3026: -{ -lean_object* x_3008; lean_object* x_3009; lean_object* x_3010; uint8_t x_3011; -x_3008 = lean_ctor_get(x_3006, 0); -lean_inc(x_3008); -if (lean_is_exclusive(x_3006)) { - lean_ctor_release(x_3006, 0); - x_3009 = x_3006; -} else { - lean_dec_ref(x_3006); - x_3009 = lean_box(0); -} -x_3010 = lean_ctor_get(x_3008, 0); -lean_inc(x_3010); -x_3011 = lean_unbox(x_3010); -lean_dec(x_3010); -if (x_3011 == 0) -{ -lean_object* x_3012; lean_object* x_3013; lean_object* x_3014; lean_object* x_3015; lean_object* x_3016; -lean_dec(x_3003); -lean_dec(x_5); -x_3012 = lean_ctor_get(x_3008, 1); -lean_inc(x_3012); -if (lean_is_exclusive(x_3008)) { - lean_ctor_release(x_3008, 0); - lean_ctor_release(x_3008, 1); - x_3013 = x_3008; -} else { - lean_dec_ref(x_3008); - x_3013 = lean_box(0); -} -x_3014 = lean_box(0); -if (lean_is_scalar(x_3013)) { - x_3015 = lean_alloc_ctor(0, 2, 0); -} else { - x_3015 = x_3013; -} -lean_ctor_set(x_3015, 0, x_3014); -lean_ctor_set(x_3015, 1, x_3012); -if (lean_is_scalar(x_3009)) { - x_3016 = lean_alloc_ctor(1, 1, 0); -} else { - x_3016 = x_3009; -} -lean_ctor_set(x_3016, 0, x_3015); -x_2908 = x_3016; -x_2909 = x_3007; -goto block_2930; -} -else -{ -lean_object* x_3017; lean_object* x_3018; lean_object* x_3019; lean_object* x_3020; lean_object* x_3021; lean_object* x_3022; lean_object* x_3023; lean_object* x_3024; lean_object* x_3025; -lean_dec(x_3009); -x_3017 = lean_ctor_get(x_3008, 1); -lean_inc(x_3017); -lean_dec(x_3008); -x_3018 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2932, x_3003); -x_3019 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3019, 0, x_3018); -x_3020 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3021 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3021, 0, x_3020); -lean_ctor_set(x_3021, 1, x_3019); -x_3022 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3023 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3022, x_3021, x_5, x_3017, x_7, x_8, x_3007); -lean_dec(x_5); -x_3024 = lean_ctor_get(x_3023, 0); -lean_inc(x_3024); -x_3025 = lean_ctor_get(x_3023, 1); -lean_inc(x_3025); -lean_dec(x_3023); -x_2908 = x_3024; -x_2909 = x_3025; -goto block_2930; -} -} -} -else -{ -lean_object* x_3041; lean_object* x_3042; lean_object* x_3043; lean_object* x_3044; lean_object* x_3045; lean_object* x_3046; lean_object* x_3047; lean_object* x_3048; lean_object* x_3049; lean_object* x_3050; lean_object* x_3051; lean_object* x_3052; lean_object* x_3053; lean_object* x_3054; lean_object* x_3055; lean_object* x_3056; lean_object* x_3057; lean_object* x_3058; lean_object* x_3059; lean_object* x_3060; lean_object* x_3061; lean_object* x_3062; lean_object* x_3063; lean_object* x_3064; lean_object* x_3065; lean_object* x_3066; lean_object* x_3067; lean_object* x_3068; lean_object* x_3069; lean_object* x_3070; lean_object* x_3071; lean_object* x_3072; lean_object* x_3073; lean_object* x_3074; lean_object* x_3094; lean_object* x_3095; uint8_t x_3096; -x_3041 = lean_ctor_get(x_2991, 0); -lean_inc(x_3041); -lean_dec(x_2991); -x_3042 = lean_ctor_get(x_2990, 0); -lean_inc(x_3042); -x_3043 = lean_ctor_get(x_2990, 1); -lean_inc(x_3043); -x_3044 = lean_ctor_get(x_2990, 2); -lean_inc(x_3044); -if (lean_is_exclusive(x_2990)) { - lean_ctor_release(x_2990, 0); - lean_ctor_release(x_2990, 1); - lean_ctor_release(x_2990, 2); - x_3045 = x_2990; -} else { - lean_dec_ref(x_2990); - x_3045 = lean_box(0); -} -x_3046 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_3043); -if (lean_is_scalar(x_3045)) { - x_3047 = lean_alloc_ctor(0, 3, 0); -} else { - x_3047 = x_3045; -} -lean_ctor_set(x_3047, 0, x_3046); -lean_ctor_set(x_3047, 1, x_3043); -lean_ctor_set(x_3047, 2, x_3044); -x_3048 = l_Lean_Syntax_setHeadInfo(x_2938, x_3047); -x_3049 = lean_ctor_get(x_3041, 0); -lean_inc(x_3049); -x_3050 = lean_ctor_get(x_3041, 1); -lean_inc(x_3050); -x_3051 = lean_ctor_get(x_3041, 2); -lean_inc(x_3051); -if (lean_is_exclusive(x_3041)) { - lean_ctor_release(x_3041, 0); - lean_ctor_release(x_3041, 1); - lean_ctor_release(x_3041, 2); - x_3052 = x_3041; -} else { - lean_dec_ref(x_3041); - x_3052 = lean_box(0); -} -lean_inc(x_3050); -if (lean_is_scalar(x_3052)) { - x_3053 = lean_alloc_ctor(0, 3, 0); -} else { - x_3053 = x_3052; -} -lean_ctor_set(x_3053, 0, x_3049); -lean_ctor_set(x_3053, 1, x_3050); -lean_ctor_set(x_3053, 2, x_3046); -x_3054 = l_Lean_Syntax_setTailInfo(x_3048, x_3053); -x_3055 = lean_apply_1(x_2, x_3054); -x_3056 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_3056, 0, x_3042); -lean_ctor_set(x_3056, 1, x_3043); -lean_ctor_set(x_3056, 2, x_3046); -x_3057 = l_Lean_Syntax_setHeadInfo(x_3055, x_3056); -x_3058 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_3058, 0, x_3046); -lean_ctor_set(x_3058, 1, x_3050); -lean_ctor_set(x_3058, 2, x_3051); -x_3059 = l_Lean_Syntax_setTailInfo(x_3057, x_3058); -x_3060 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3059, x_5, x_2939, x_7, x_8, x_2937); -x_3061 = lean_ctor_get(x_3060, 0); -lean_inc(x_3061); -x_3062 = lean_ctor_get(x_3061, 0); -lean_inc(x_3062); -lean_dec(x_3061); -x_3063 = lean_ctor_get(x_3060, 1); -lean_inc(x_3063); -lean_dec(x_3060); -x_3064 = lean_ctor_get(x_3062, 1); -lean_inc(x_3064); -lean_dec(x_3062); -x_3065 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3064, x_7, x_8, x_3063); -x_3066 = lean_ctor_get(x_3065, 0); -lean_inc(x_3066); -x_3067 = lean_ctor_get(x_3066, 0); -lean_inc(x_3067); -if (lean_is_exclusive(x_3066)) { - lean_ctor_release(x_3066, 0); - x_3068 = x_3066; -} else { - lean_dec_ref(x_3066); - x_3068 = lean_box(0); -} -x_3069 = lean_ctor_get(x_3065, 1); -lean_inc(x_3069); -lean_dec(x_3065); -x_3070 = lean_ctor_get(x_3067, 0); -lean_inc(x_3070); -x_3071 = lean_ctor_get(x_3067, 1); -lean_inc(x_3071); -if (lean_is_exclusive(x_3067)) { - lean_ctor_release(x_3067, 0); - lean_ctor_release(x_3067, 1); - x_3072 = x_3067; -} else { - lean_dec_ref(x_3067); - x_3072 = lean_box(0); -} -x_3094 = l_Lean_Core_getTraceState___rarg(x_8, x_3069); -x_3095 = lean_ctor_get(x_3094, 0); -lean_inc(x_3095); -x_3096 = lean_ctor_get_uint8(x_3095, sizeof(void*)*1); -lean_dec(x_3095); -if (x_3096 == 0) -{ -lean_object* x_3097; lean_object* x_3098; lean_object* x_3099; lean_object* x_3100; -x_3097 = lean_ctor_get(x_3094, 1); -lean_inc(x_3097); -lean_dec(x_3094); -x_3098 = lean_box(x_226); -if (lean_is_scalar(x_3072)) { - x_3099 = lean_alloc_ctor(0, 2, 0); -} else { - x_3099 = x_3072; -} -lean_ctor_set(x_3099, 0, x_3098); -lean_ctor_set(x_3099, 1, x_3071); -if (lean_is_scalar(x_3068)) { - x_3100 = lean_alloc_ctor(1, 1, 0); -} else { - x_3100 = x_3068; -} -lean_ctor_set(x_3100, 0, x_3099); -x_3073 = x_3100; -x_3074 = x_3097; -goto block_3093; -} -else -{ -lean_object* x_3101; lean_object* x_3102; lean_object* x_3103; lean_object* x_3104; lean_object* x_3105; lean_object* x_3106; lean_object* x_3107; -x_3101 = lean_ctor_get(x_3094, 1); -lean_inc(x_3101); -lean_dec(x_3094); -x_3102 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3103 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3102, x_7, x_8, x_3101); -x_3104 = lean_ctor_get(x_3103, 0); -lean_inc(x_3104); -x_3105 = lean_ctor_get(x_3103, 1); -lean_inc(x_3105); -lean_dec(x_3103); -if (lean_is_scalar(x_3072)) { - x_3106 = lean_alloc_ctor(0, 2, 0); -} else { - x_3106 = x_3072; -} -lean_ctor_set(x_3106, 0, x_3104); -lean_ctor_set(x_3106, 1, x_3071); -if (lean_is_scalar(x_3068)) { - x_3107 = lean_alloc_ctor(1, 1, 0); -} else { - x_3107 = x_3068; -} -lean_ctor_set(x_3107, 0, x_3106); -x_3073 = x_3107; -x_3074 = x_3105; -goto block_3093; -} -block_3093: -{ -lean_object* x_3075; lean_object* x_3076; lean_object* x_3077; uint8_t x_3078; -x_3075 = lean_ctor_get(x_3073, 0); -lean_inc(x_3075); -if (lean_is_exclusive(x_3073)) { - lean_ctor_release(x_3073, 0); - x_3076 = x_3073; -} else { - lean_dec_ref(x_3073); - x_3076 = lean_box(0); -} -x_3077 = lean_ctor_get(x_3075, 0); -lean_inc(x_3077); -x_3078 = lean_unbox(x_3077); -lean_dec(x_3077); -if (x_3078 == 0) -{ -lean_object* x_3079; lean_object* x_3080; lean_object* x_3081; lean_object* x_3082; lean_object* x_3083; -lean_dec(x_3070); -lean_dec(x_5); -x_3079 = lean_ctor_get(x_3075, 1); -lean_inc(x_3079); -if (lean_is_exclusive(x_3075)) { - lean_ctor_release(x_3075, 0); - lean_ctor_release(x_3075, 1); - x_3080 = x_3075; -} else { - lean_dec_ref(x_3075); - x_3080 = lean_box(0); -} -x_3081 = lean_box(0); -if (lean_is_scalar(x_3080)) { - x_3082 = lean_alloc_ctor(0, 2, 0); -} else { - x_3082 = x_3080; -} -lean_ctor_set(x_3082, 0, x_3081); -lean_ctor_set(x_3082, 1, x_3079); -if (lean_is_scalar(x_3076)) { - x_3083 = lean_alloc_ctor(1, 1, 0); -} else { - x_3083 = x_3076; -} -lean_ctor_set(x_3083, 0, x_3082); -x_2908 = x_3083; -x_2909 = x_3074; -goto block_2930; -} -else -{ -lean_object* x_3084; lean_object* x_3085; lean_object* x_3086; lean_object* x_3087; lean_object* x_3088; lean_object* x_3089; lean_object* x_3090; lean_object* x_3091; lean_object* x_3092; -lean_dec(x_3076); -x_3084 = lean_ctor_get(x_3075, 1); -lean_inc(x_3084); -lean_dec(x_3075); -x_3085 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2932, x_3070); -x_3086 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3086, 0, x_3085); -x_3087 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3088 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3088, 0, x_3087); -lean_ctor_set(x_3088, 1, x_3086); -x_3089 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3090 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3089, x_3088, x_5, x_3084, x_7, x_8, x_3074); -lean_dec(x_5); -x_3091 = lean_ctor_get(x_3090, 0); -lean_inc(x_3091); -x_3092 = lean_ctor_get(x_3090, 1); -lean_inc(x_3092); -lean_dec(x_3090); -x_2908 = x_3091; -x_2909 = x_3092; -goto block_2930; -} -} -} -} -} -else -{ -lean_object* x_3108; lean_object* x_3109; lean_object* x_3110; lean_object* x_3111; lean_object* x_3112; lean_object* x_3113; lean_object* x_3114; lean_object* x_3115; lean_object* x_3116; lean_object* x_3117; lean_object* x_3118; lean_object* x_3119; -x_3108 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_2906, x_7, x_8, x_2903); -x_3109 = lean_ctor_get(x_3108, 0); -lean_inc(x_3109); -x_3110 = lean_ctor_get(x_3109, 0); -lean_inc(x_3110); -lean_dec(x_3109); -x_3111 = lean_ctor_get(x_3108, 1); -lean_inc(x_3111); -lean_dec(x_3108); -x_3112 = lean_ctor_get(x_3110, 1); -lean_inc(x_3112); -lean_dec(x_3110); -x_3113 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3112, x_7, x_8, x_3111); -x_3114 = lean_ctor_get(x_3113, 0); -lean_inc(x_3114); -x_3115 = lean_ctor_get(x_3114, 0); -lean_inc(x_3115); -lean_dec(x_3114); -x_3116 = lean_ctor_get(x_3113, 1); -lean_inc(x_3116); -lean_dec(x_3113); -x_3117 = lean_ctor_get(x_3115, 0); -lean_inc(x_3117); -x_3118 = lean_ctor_get(x_3115, 1); -lean_inc(x_3118); -lean_dec(x_3115); -x_3119 = l_Lean_Syntax_getHeadInfo___main(x_3117); -if (lean_obj_tag(x_3119) == 0) -{ -lean_object* x_3120; lean_object* x_3121; lean_object* x_3122; lean_object* x_3123; lean_object* x_3124; lean_object* x_3125; lean_object* x_3126; lean_object* x_3127; lean_object* x_3128; lean_object* x_3129; lean_object* x_3130; lean_object* x_3131; lean_object* x_3132; lean_object* x_3133; lean_object* x_3134; lean_object* x_3135; lean_object* x_3155; lean_object* x_3156; uint8_t x_3157; -x_3120 = lean_apply_1(x_2, x_3117); -x_3121 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3120, x_5, x_3118, x_7, x_8, x_3116); -x_3122 = lean_ctor_get(x_3121, 0); -lean_inc(x_3122); -x_3123 = lean_ctor_get(x_3122, 0); -lean_inc(x_3123); -lean_dec(x_3122); -x_3124 = lean_ctor_get(x_3121, 1); -lean_inc(x_3124); -lean_dec(x_3121); -x_3125 = lean_ctor_get(x_3123, 1); -lean_inc(x_3125); -lean_dec(x_3123); -x_3126 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3125, x_7, x_8, x_3124); -x_3127 = lean_ctor_get(x_3126, 0); -lean_inc(x_3127); -x_3128 = lean_ctor_get(x_3127, 0); -lean_inc(x_3128); -if (lean_is_exclusive(x_3127)) { - lean_ctor_release(x_3127, 0); - x_3129 = x_3127; -} else { - lean_dec_ref(x_3127); - x_3129 = lean_box(0); -} -x_3130 = lean_ctor_get(x_3126, 1); -lean_inc(x_3130); -lean_dec(x_3126); -x_3131 = lean_ctor_get(x_3128, 0); -lean_inc(x_3131); -x_3132 = lean_ctor_get(x_3128, 1); -lean_inc(x_3132); -if (lean_is_exclusive(x_3128)) { - lean_ctor_release(x_3128, 0); - lean_ctor_release(x_3128, 1); - x_3133 = x_3128; -} else { - lean_dec_ref(x_3128); - x_3133 = lean_box(0); -} -x_3155 = l_Lean_Core_getTraceState___rarg(x_8, x_3130); -x_3156 = lean_ctor_get(x_3155, 0); -lean_inc(x_3156); -x_3157 = lean_ctor_get_uint8(x_3156, sizeof(void*)*1); -lean_dec(x_3156); -if (x_3157 == 0) -{ -lean_object* x_3158; lean_object* x_3159; lean_object* x_3160; lean_object* x_3161; -x_3158 = lean_ctor_get(x_3155, 1); -lean_inc(x_3158); -lean_dec(x_3155); -x_3159 = lean_box(x_226); -if (lean_is_scalar(x_3133)) { - x_3160 = lean_alloc_ctor(0, 2, 0); -} else { - x_3160 = x_3133; -} -lean_ctor_set(x_3160, 0, x_3159); -lean_ctor_set(x_3160, 1, x_3132); -if (lean_is_scalar(x_3129)) { - x_3161 = lean_alloc_ctor(1, 1, 0); -} else { - x_3161 = x_3129; -} -lean_ctor_set(x_3161, 0, x_3160); -x_3134 = x_3161; -x_3135 = x_3158; -goto block_3154; -} -else -{ -lean_object* x_3162; lean_object* x_3163; lean_object* x_3164; lean_object* x_3165; lean_object* x_3166; lean_object* x_3167; lean_object* x_3168; -x_3162 = lean_ctor_get(x_3155, 1); -lean_inc(x_3162); -lean_dec(x_3155); -x_3163 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3164 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3163, x_7, x_8, x_3162); -x_3165 = lean_ctor_get(x_3164, 0); -lean_inc(x_3165); -x_3166 = lean_ctor_get(x_3164, 1); -lean_inc(x_3166); -lean_dec(x_3164); -if (lean_is_scalar(x_3133)) { - x_3167 = lean_alloc_ctor(0, 2, 0); -} else { - x_3167 = x_3133; -} -lean_ctor_set(x_3167, 0, x_3165); -lean_ctor_set(x_3167, 1, x_3132); -if (lean_is_scalar(x_3129)) { - x_3168 = lean_alloc_ctor(1, 1, 0); -} else { - x_3168 = x_3129; -} -lean_ctor_set(x_3168, 0, x_3167); -x_3134 = x_3168; -x_3135 = x_3166; -goto block_3154; -} -block_3154: -{ -lean_object* x_3136; lean_object* x_3137; lean_object* x_3138; uint8_t x_3139; -x_3136 = lean_ctor_get(x_3134, 0); -lean_inc(x_3136); -if (lean_is_exclusive(x_3134)) { - lean_ctor_release(x_3134, 0); - x_3137 = x_3134; -} else { - lean_dec_ref(x_3134); - x_3137 = lean_box(0); -} -x_3138 = lean_ctor_get(x_3136, 0); -lean_inc(x_3138); -x_3139 = lean_unbox(x_3138); -lean_dec(x_3138); -if (x_3139 == 0) -{ -lean_object* x_3140; lean_object* x_3141; lean_object* x_3142; lean_object* x_3143; lean_object* x_3144; -lean_dec(x_3131); -lean_dec(x_5); -x_3140 = lean_ctor_get(x_3136, 1); -lean_inc(x_3140); -if (lean_is_exclusive(x_3136)) { - lean_ctor_release(x_3136, 0); - lean_ctor_release(x_3136, 1); - x_3141 = x_3136; -} else { - lean_dec_ref(x_3136); - x_3141 = lean_box(0); -} -x_3142 = lean_box(0); -if (lean_is_scalar(x_3141)) { - x_3143 = lean_alloc_ctor(0, 2, 0); -} else { - x_3143 = x_3141; -} -lean_ctor_set(x_3143, 0, x_3142); -lean_ctor_set(x_3143, 1, x_3140); -if (lean_is_scalar(x_3137)) { - x_3144 = lean_alloc_ctor(1, 1, 0); -} else { - x_3144 = x_3137; -} -lean_ctor_set(x_3144, 0, x_3143); -x_2908 = x_3144; -x_2909 = x_3135; -goto block_2930; -} -else -{ -lean_object* x_3145; lean_object* x_3146; lean_object* x_3147; lean_object* x_3148; lean_object* x_3149; lean_object* x_3150; lean_object* x_3151; lean_object* x_3152; lean_object* x_3153; -lean_dec(x_3137); -x_3145 = lean_ctor_get(x_3136, 1); -lean_inc(x_3145); -lean_dec(x_3136); -x_3146 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2932, x_3131); -x_3147 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3147, 0, x_3146); -x_3148 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3149 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3149, 0, x_3148); -lean_ctor_set(x_3149, 1, x_3147); -x_3150 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3151 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3150, x_3149, x_5, x_3145, x_7, x_8, x_3135); -lean_dec(x_5); -x_3152 = lean_ctor_get(x_3151, 0); -lean_inc(x_3152); -x_3153 = lean_ctor_get(x_3151, 1); -lean_inc(x_3153); -lean_dec(x_3151); -x_2908 = x_3152; -x_2909 = x_3153; -goto block_2930; -} -} -} -else -{ -lean_object* x_3169; lean_object* x_3170; -x_3169 = lean_ctor_get(x_3119, 0); -lean_inc(x_3169); -lean_dec(x_3119); -x_3170 = l_Lean_Syntax_getTailInfo___main(x_3117); -if (lean_obj_tag(x_3170) == 0) -{ -lean_object* x_3171; lean_object* x_3172; lean_object* x_3173; lean_object* x_3174; lean_object* x_3175; lean_object* x_3176; lean_object* x_3177; lean_object* x_3178; lean_object* x_3179; lean_object* x_3180; lean_object* x_3181; lean_object* x_3182; lean_object* x_3183; lean_object* x_3184; lean_object* x_3185; lean_object* x_3186; lean_object* x_3206; lean_object* x_3207; uint8_t x_3208; -lean_dec(x_3169); -x_3171 = lean_apply_1(x_2, x_3117); -x_3172 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3171, x_5, x_3118, x_7, x_8, x_3116); -x_3173 = lean_ctor_get(x_3172, 0); -lean_inc(x_3173); -x_3174 = lean_ctor_get(x_3173, 0); -lean_inc(x_3174); -lean_dec(x_3173); -x_3175 = lean_ctor_get(x_3172, 1); -lean_inc(x_3175); -lean_dec(x_3172); -x_3176 = lean_ctor_get(x_3174, 1); -lean_inc(x_3176); -lean_dec(x_3174); -x_3177 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3176, x_7, x_8, x_3175); -x_3178 = lean_ctor_get(x_3177, 0); -lean_inc(x_3178); -x_3179 = lean_ctor_get(x_3178, 0); -lean_inc(x_3179); -if (lean_is_exclusive(x_3178)) { - lean_ctor_release(x_3178, 0); - x_3180 = x_3178; -} else { - lean_dec_ref(x_3178); - x_3180 = lean_box(0); -} -x_3181 = lean_ctor_get(x_3177, 1); -lean_inc(x_3181); -lean_dec(x_3177); -x_3182 = lean_ctor_get(x_3179, 0); -lean_inc(x_3182); -x_3183 = lean_ctor_get(x_3179, 1); -lean_inc(x_3183); -if (lean_is_exclusive(x_3179)) { - lean_ctor_release(x_3179, 0); - lean_ctor_release(x_3179, 1); - x_3184 = x_3179; -} else { - lean_dec_ref(x_3179); - x_3184 = lean_box(0); -} -x_3206 = l_Lean_Core_getTraceState___rarg(x_8, x_3181); -x_3207 = lean_ctor_get(x_3206, 0); -lean_inc(x_3207); -x_3208 = lean_ctor_get_uint8(x_3207, sizeof(void*)*1); -lean_dec(x_3207); -if (x_3208 == 0) -{ -lean_object* x_3209; lean_object* x_3210; lean_object* x_3211; lean_object* x_3212; -x_3209 = lean_ctor_get(x_3206, 1); -lean_inc(x_3209); -lean_dec(x_3206); -x_3210 = lean_box(x_226); -if (lean_is_scalar(x_3184)) { - x_3211 = lean_alloc_ctor(0, 2, 0); -} else { - x_3211 = x_3184; -} -lean_ctor_set(x_3211, 0, x_3210); -lean_ctor_set(x_3211, 1, x_3183); -if (lean_is_scalar(x_3180)) { - x_3212 = lean_alloc_ctor(1, 1, 0); -} else { - x_3212 = x_3180; -} -lean_ctor_set(x_3212, 0, x_3211); -x_3185 = x_3212; -x_3186 = x_3209; -goto block_3205; -} -else -{ -lean_object* x_3213; lean_object* x_3214; lean_object* x_3215; lean_object* x_3216; lean_object* x_3217; lean_object* x_3218; lean_object* x_3219; -x_3213 = lean_ctor_get(x_3206, 1); -lean_inc(x_3213); -lean_dec(x_3206); -x_3214 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3215 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3214, x_7, x_8, x_3213); -x_3216 = lean_ctor_get(x_3215, 0); -lean_inc(x_3216); -x_3217 = lean_ctor_get(x_3215, 1); -lean_inc(x_3217); -lean_dec(x_3215); -if (lean_is_scalar(x_3184)) { - x_3218 = lean_alloc_ctor(0, 2, 0); -} else { - x_3218 = x_3184; -} -lean_ctor_set(x_3218, 0, x_3216); -lean_ctor_set(x_3218, 1, x_3183); -if (lean_is_scalar(x_3180)) { - x_3219 = lean_alloc_ctor(1, 1, 0); -} else { - x_3219 = x_3180; -} -lean_ctor_set(x_3219, 0, x_3218); -x_3185 = x_3219; -x_3186 = x_3217; -goto block_3205; -} -block_3205: -{ -lean_object* x_3187; lean_object* x_3188; lean_object* x_3189; uint8_t x_3190; -x_3187 = lean_ctor_get(x_3185, 0); -lean_inc(x_3187); -if (lean_is_exclusive(x_3185)) { - lean_ctor_release(x_3185, 0); - x_3188 = x_3185; -} else { - lean_dec_ref(x_3185); - x_3188 = lean_box(0); -} -x_3189 = lean_ctor_get(x_3187, 0); -lean_inc(x_3189); -x_3190 = lean_unbox(x_3189); -lean_dec(x_3189); -if (x_3190 == 0) -{ -lean_object* x_3191; lean_object* x_3192; lean_object* x_3193; lean_object* x_3194; lean_object* x_3195; -lean_dec(x_3182); -lean_dec(x_5); -x_3191 = lean_ctor_get(x_3187, 1); -lean_inc(x_3191); -if (lean_is_exclusive(x_3187)) { - lean_ctor_release(x_3187, 0); - lean_ctor_release(x_3187, 1); - x_3192 = x_3187; -} else { - lean_dec_ref(x_3187); - x_3192 = lean_box(0); -} -x_3193 = lean_box(0); -if (lean_is_scalar(x_3192)) { - x_3194 = lean_alloc_ctor(0, 2, 0); -} else { - x_3194 = x_3192; -} -lean_ctor_set(x_3194, 0, x_3193); -lean_ctor_set(x_3194, 1, x_3191); -if (lean_is_scalar(x_3188)) { - x_3195 = lean_alloc_ctor(1, 1, 0); -} else { - x_3195 = x_3188; -} -lean_ctor_set(x_3195, 0, x_3194); -x_2908 = x_3195; -x_2909 = x_3186; -goto block_2930; -} -else -{ -lean_object* x_3196; lean_object* x_3197; lean_object* x_3198; lean_object* x_3199; lean_object* x_3200; lean_object* x_3201; lean_object* x_3202; lean_object* x_3203; lean_object* x_3204; -lean_dec(x_3188); -x_3196 = lean_ctor_get(x_3187, 1); -lean_inc(x_3196); -lean_dec(x_3187); -x_3197 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2932, x_3182); -x_3198 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3198, 0, x_3197); -x_3199 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3200 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3200, 0, x_3199); -lean_ctor_set(x_3200, 1, x_3198); -x_3201 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3202 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3201, x_3200, x_5, x_3196, x_7, x_8, x_3186); -lean_dec(x_5); -x_3203 = lean_ctor_get(x_3202, 0); -lean_inc(x_3203); -x_3204 = lean_ctor_get(x_3202, 1); -lean_inc(x_3204); -lean_dec(x_3202); -x_2908 = x_3203; -x_2909 = x_3204; -goto block_2930; -} -} -} -else -{ -lean_object* x_3220; lean_object* x_3221; lean_object* x_3222; lean_object* x_3223; lean_object* x_3224; lean_object* x_3225; lean_object* x_3226; lean_object* x_3227; lean_object* x_3228; lean_object* x_3229; lean_object* x_3230; lean_object* x_3231; lean_object* x_3232; lean_object* x_3233; lean_object* x_3234; lean_object* x_3235; lean_object* x_3236; lean_object* x_3237; lean_object* x_3238; lean_object* x_3239; lean_object* x_3240; lean_object* x_3241; lean_object* x_3242; lean_object* x_3243; lean_object* x_3244; lean_object* x_3245; lean_object* x_3246; lean_object* x_3247; lean_object* x_3248; lean_object* x_3249; lean_object* x_3250; lean_object* x_3251; lean_object* x_3252; lean_object* x_3253; lean_object* x_3273; lean_object* x_3274; uint8_t x_3275; -x_3220 = lean_ctor_get(x_3170, 0); -lean_inc(x_3220); -lean_dec(x_3170); -x_3221 = lean_ctor_get(x_3169, 0); -lean_inc(x_3221); -x_3222 = lean_ctor_get(x_3169, 1); -lean_inc(x_3222); -x_3223 = lean_ctor_get(x_3169, 2); -lean_inc(x_3223); -if (lean_is_exclusive(x_3169)) { - lean_ctor_release(x_3169, 0); - lean_ctor_release(x_3169, 1); - lean_ctor_release(x_3169, 2); - x_3224 = x_3169; -} else { - lean_dec_ref(x_3169); - x_3224 = lean_box(0); -} -x_3225 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_3222); -if (lean_is_scalar(x_3224)) { - x_3226 = lean_alloc_ctor(0, 3, 0); -} else { - x_3226 = x_3224; -} -lean_ctor_set(x_3226, 0, x_3225); -lean_ctor_set(x_3226, 1, x_3222); -lean_ctor_set(x_3226, 2, x_3223); -x_3227 = l_Lean_Syntax_setHeadInfo(x_3117, x_3226); -x_3228 = lean_ctor_get(x_3220, 0); -lean_inc(x_3228); -x_3229 = lean_ctor_get(x_3220, 1); -lean_inc(x_3229); -x_3230 = lean_ctor_get(x_3220, 2); -lean_inc(x_3230); -if (lean_is_exclusive(x_3220)) { - lean_ctor_release(x_3220, 0); - lean_ctor_release(x_3220, 1); - lean_ctor_release(x_3220, 2); - x_3231 = x_3220; -} else { - lean_dec_ref(x_3220); - x_3231 = lean_box(0); -} -lean_inc(x_3229); -if (lean_is_scalar(x_3231)) { - x_3232 = lean_alloc_ctor(0, 3, 0); -} else { - x_3232 = x_3231; -} -lean_ctor_set(x_3232, 0, x_3228); -lean_ctor_set(x_3232, 1, x_3229); -lean_ctor_set(x_3232, 2, x_3225); -x_3233 = l_Lean_Syntax_setTailInfo(x_3227, x_3232); -x_3234 = lean_apply_1(x_2, x_3233); -x_3235 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_3235, 0, x_3221); -lean_ctor_set(x_3235, 1, x_3222); -lean_ctor_set(x_3235, 2, x_3225); -x_3236 = l_Lean_Syntax_setHeadInfo(x_3234, x_3235); -x_3237 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_3237, 0, x_3225); -lean_ctor_set(x_3237, 1, x_3229); -lean_ctor_set(x_3237, 2, x_3230); -x_3238 = l_Lean_Syntax_setTailInfo(x_3236, x_3237); -x_3239 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3238, x_5, x_3118, x_7, x_8, x_3116); -x_3240 = lean_ctor_get(x_3239, 0); -lean_inc(x_3240); -x_3241 = lean_ctor_get(x_3240, 0); -lean_inc(x_3241); -lean_dec(x_3240); -x_3242 = lean_ctor_get(x_3239, 1); -lean_inc(x_3242); -lean_dec(x_3239); -x_3243 = lean_ctor_get(x_3241, 1); -lean_inc(x_3243); -lean_dec(x_3241); -x_3244 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3243, x_7, x_8, x_3242); -x_3245 = lean_ctor_get(x_3244, 0); -lean_inc(x_3245); -x_3246 = lean_ctor_get(x_3245, 0); -lean_inc(x_3246); -if (lean_is_exclusive(x_3245)) { - lean_ctor_release(x_3245, 0); - x_3247 = x_3245; -} else { - lean_dec_ref(x_3245); - x_3247 = lean_box(0); -} -x_3248 = lean_ctor_get(x_3244, 1); -lean_inc(x_3248); -lean_dec(x_3244); -x_3249 = lean_ctor_get(x_3246, 0); -lean_inc(x_3249); -x_3250 = lean_ctor_get(x_3246, 1); -lean_inc(x_3250); -if (lean_is_exclusive(x_3246)) { - lean_ctor_release(x_3246, 0); - lean_ctor_release(x_3246, 1); - x_3251 = x_3246; -} else { - lean_dec_ref(x_3246); - x_3251 = lean_box(0); -} -x_3273 = l_Lean_Core_getTraceState___rarg(x_8, x_3248); -x_3274 = lean_ctor_get(x_3273, 0); -lean_inc(x_3274); -x_3275 = lean_ctor_get_uint8(x_3274, sizeof(void*)*1); -lean_dec(x_3274); -if (x_3275 == 0) -{ -lean_object* x_3276; lean_object* x_3277; lean_object* x_3278; lean_object* x_3279; -x_3276 = lean_ctor_get(x_3273, 1); -lean_inc(x_3276); -lean_dec(x_3273); -x_3277 = lean_box(x_226); -if (lean_is_scalar(x_3251)) { - x_3278 = lean_alloc_ctor(0, 2, 0); -} else { - x_3278 = x_3251; -} -lean_ctor_set(x_3278, 0, x_3277); -lean_ctor_set(x_3278, 1, x_3250); -if (lean_is_scalar(x_3247)) { - x_3279 = lean_alloc_ctor(1, 1, 0); -} else { - x_3279 = x_3247; -} -lean_ctor_set(x_3279, 0, x_3278); -x_3252 = x_3279; -x_3253 = x_3276; -goto block_3272; -} -else -{ -lean_object* x_3280; lean_object* x_3281; lean_object* x_3282; lean_object* x_3283; lean_object* x_3284; lean_object* x_3285; lean_object* x_3286; -x_3280 = lean_ctor_get(x_3273, 1); -lean_inc(x_3280); -lean_dec(x_3273); -x_3281 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3282 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3281, x_7, x_8, x_3280); -x_3283 = lean_ctor_get(x_3282, 0); -lean_inc(x_3283); -x_3284 = lean_ctor_get(x_3282, 1); -lean_inc(x_3284); -lean_dec(x_3282); -if (lean_is_scalar(x_3251)) { - x_3285 = lean_alloc_ctor(0, 2, 0); -} else { - x_3285 = x_3251; -} -lean_ctor_set(x_3285, 0, x_3283); -lean_ctor_set(x_3285, 1, x_3250); -if (lean_is_scalar(x_3247)) { - x_3286 = lean_alloc_ctor(1, 1, 0); -} else { - x_3286 = x_3247; -} -lean_ctor_set(x_3286, 0, x_3285); -x_3252 = x_3286; -x_3253 = x_3284; -goto block_3272; -} -block_3272: -{ -lean_object* x_3254; lean_object* x_3255; lean_object* x_3256; uint8_t x_3257; -x_3254 = lean_ctor_get(x_3252, 0); -lean_inc(x_3254); -if (lean_is_exclusive(x_3252)) { - lean_ctor_release(x_3252, 0); - x_3255 = x_3252; -} else { - lean_dec_ref(x_3252); - x_3255 = lean_box(0); -} -x_3256 = lean_ctor_get(x_3254, 0); -lean_inc(x_3256); -x_3257 = lean_unbox(x_3256); -lean_dec(x_3256); -if (x_3257 == 0) -{ -lean_object* x_3258; lean_object* x_3259; lean_object* x_3260; lean_object* x_3261; lean_object* x_3262; -lean_dec(x_3249); -lean_dec(x_5); -x_3258 = lean_ctor_get(x_3254, 1); -lean_inc(x_3258); -if (lean_is_exclusive(x_3254)) { - lean_ctor_release(x_3254, 0); - lean_ctor_release(x_3254, 1); - x_3259 = x_3254; -} else { - lean_dec_ref(x_3254); - x_3259 = lean_box(0); -} -x_3260 = lean_box(0); -if (lean_is_scalar(x_3259)) { - x_3261 = lean_alloc_ctor(0, 2, 0); -} else { - x_3261 = x_3259; -} -lean_ctor_set(x_3261, 0, x_3260); -lean_ctor_set(x_3261, 1, x_3258); -if (lean_is_scalar(x_3255)) { - x_3262 = lean_alloc_ctor(1, 1, 0); -} else { - x_3262 = x_3255; -} -lean_ctor_set(x_3262, 0, x_3261); -x_2908 = x_3262; -x_2909 = x_3253; -goto block_2930; -} -else -{ -lean_object* x_3263; lean_object* x_3264; lean_object* x_3265; lean_object* x_3266; lean_object* x_3267; lean_object* x_3268; lean_object* x_3269; lean_object* x_3270; lean_object* x_3271; -lean_dec(x_3255); -x_3263 = lean_ctor_get(x_3254, 1); -lean_inc(x_3263); -lean_dec(x_3254); -x_3264 = l_Lean_Syntax_formatStxAux___main(x_224, x_226, x_2932, x_3249); -x_3265 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3265, 0, x_3264); -x_3266 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3267 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3267, 0, x_3266); -lean_ctor_set(x_3267, 1, x_3265); -x_3268 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3269 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3268, x_3267, x_5, x_3263, x_7, x_8, x_3253); -lean_dec(x_5); -x_3270 = lean_ctor_get(x_3269, 0); -lean_inc(x_3270); -x_3271 = lean_ctor_get(x_3269, 1); -lean_inc(x_3271); -lean_dec(x_3269); -x_2908 = x_3270; -x_2909 = x_3271; -goto block_2930; -} -} -} -} -} -} -} -block_3354: -{ -lean_object* x_3316; lean_object* x_3317; lean_object* x_3318; uint8_t x_3319; -x_3316 = lean_ctor_get(x_3314, 0); -lean_inc(x_3316); -if (lean_is_exclusive(x_3314)) { - lean_ctor_release(x_3314, 0); - x_3317 = x_3314; -} else { - lean_dec_ref(x_3314); - x_3317 = lean_box(0); -} -x_3318 = lean_ctor_get(x_3316, 0); -lean_inc(x_3318); -x_3319 = lean_unbox(x_3318); -lean_dec(x_3318); -if (x_3319 == 0) -{ -lean_object* x_3320; lean_object* x_3321; lean_object* x_3322; lean_object* x_3323; lean_object* x_3324; -lean_dec(x_2891); -x_3320 = lean_ctor_get(x_3316, 1); -lean_inc(x_3320); -if (lean_is_exclusive(x_3316)) { - lean_ctor_release(x_3316, 0); - lean_ctor_release(x_3316, 1); - x_3321 = x_3316; -} else { - lean_dec_ref(x_3316); - x_3321 = lean_box(0); -} -x_3322 = lean_box(0); -if (lean_is_scalar(x_3321)) { - x_3323 = lean_alloc_ctor(0, 2, 0); -} else { - x_3323 = x_3321; -} -lean_ctor_set(x_3323, 0, x_3322); -lean_ctor_set(x_3323, 1, x_3320); -if (lean_is_scalar(x_3317)) { - x_3324 = lean_alloc_ctor(1, 1, 0); -} else { - x_3324 = x_3317; -} -lean_ctor_set(x_3324, 0, x_3323); -x_2902 = x_3324; -x_2903 = x_3315; -goto block_3313; -} -else -{ -lean_object* x_3325; lean_object* x_3326; lean_object* x_3327; lean_object* x_3328; lean_object* x_3329; lean_object* x_3330; lean_object* x_3331; lean_object* x_3332; lean_object* x_3333; lean_object* x_3334; lean_object* x_3335; lean_object* x_3336; lean_object* x_3337; lean_object* x_3338; lean_object* x_3339; lean_object* x_3340; lean_object* x_3341; lean_object* x_3342; lean_object* x_3343; lean_object* x_3344; lean_object* x_3345; lean_object* x_3346; lean_object* x_3347; lean_object* x_3348; lean_object* x_3349; lean_object* x_3350; lean_object* x_3351; lean_object* x_3352; lean_object* x_3353; -lean_dec(x_3317); -x_3325 = lean_ctor_get(x_3316, 1); -lean_inc(x_3325); -if (lean_is_exclusive(x_3316)) { - lean_ctor_release(x_3316, 0); - lean_ctor_release(x_3316, 1); - x_3326 = x_3316; -} else { - lean_dec_ref(x_3316); - x_3326 = lean_box(0); -} -lean_inc(x_3); -x_3327 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); -x_3328 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3328, 0, x_3327); -x_3329 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; -x_3330 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3330, 0, x_3329); -lean_ctor_set(x_3330, 1, x_3328); -x_3331 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22; -x_3332 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3332, 0, x_3330); -lean_ctor_set(x_3332, 1, x_3331); -lean_inc(x_2901); -x_3333 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_2901); -x_3334 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3334, 0, x_3333); -x_3335 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3335, 0, x_3332); -lean_ctor_set(x_3335, 1, x_3334); -x_3336 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; -x_3337 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3337, 0, x_3335); -lean_ctor_set(x_3337, 1, x_3336); -lean_inc(x_1); -lean_inc(x_2900); -if (lean_is_scalar(x_3326)) { - x_3338 = lean_alloc_ctor(0, 2, 0); -} else { - x_3338 = x_3326; -} -lean_ctor_set(x_3338, 0, x_2900); -lean_ctor_set(x_3338, 1, x_1); -x_3339 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_3338); -x_3340 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3340, 0, x_3339); -x_3341 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3341, 0, x_3337); -lean_ctor_set(x_3341, 1, x_3340); -x_3342 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25; -x_3343 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3343, 0, x_3341); -lean_ctor_set(x_3343, 1, x_3342); -x_3344 = lean_ctor_get(x_23, 1); -lean_inc(x_3344); -x_3345 = lean_ctor_get(x_23, 2); -lean_inc(x_3345); -if (lean_is_scalar(x_2891)) { - x_3346 = lean_alloc_ctor(0, 2, 0); -} else { - x_3346 = x_2891; -} -lean_ctor_set(x_3346, 0, x_3344); -lean_ctor_set(x_3346, 1, x_3345); -x_3347 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_3346); -x_3348 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3348, 0, x_3347); -x_3349 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3349, 0, x_3343); -lean_ctor_set(x_3349, 1, x_3348); -x_3350 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3351 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3350, x_3349, x_5, x_3325, x_7, x_8, x_3315); -x_3352 = lean_ctor_get(x_3351, 0); -lean_inc(x_3352); -x_3353 = lean_ctor_get(x_3351, 1); -lean_inc(x_3353); -lean_dec(x_3351); -x_2902 = x_3352; -x_2903 = x_3353; -goto block_3313; -} -} -} -} -} -else -{ -lean_object* x_3369; lean_object* x_3370; lean_object* x_3371; lean_object* x_3372; -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_3369 = lean_ctor_get(x_2880, 0); -lean_inc(x_3369); -x_3370 = lean_ctor_get(x_2880, 1); -lean_inc(x_3370); -if (lean_is_exclusive(x_2880)) { - lean_ctor_release(x_2880, 0); - lean_ctor_release(x_2880, 1); - x_3371 = x_2880; -} else { - lean_dec_ref(x_2880); - x_3371 = lean_box(0); -} -if (lean_is_scalar(x_3371)) { - x_3372 = lean_alloc_ctor(1, 2, 0); -} else { - x_3372 = x_3371; -} -lean_ctor_set(x_3372, 0, x_3369); -lean_ctor_set(x_3372, 1, x_3370); -return x_3372; -} -} -} -block_3492: -{ -uint8_t x_3376; -x_3376 = !lean_is_exclusive(x_3374); -if (x_3376 == 0) -{ -lean_object* x_3377; lean_object* x_3378; uint8_t x_3379; -x_3377 = lean_ctor_get(x_3374, 0); -x_3378 = lean_ctor_get(x_3377, 0); -lean_inc(x_3378); -x_3379 = lean_unbox(x_3378); -lean_dec(x_3378); -if (x_3379 == 0) -{ -uint8_t x_3380; -lean_dec(x_14); -x_3380 = !lean_is_exclusive(x_3377); -if (x_3380 == 0) -{ -lean_object* x_3381; lean_object* x_3382; -x_3381 = lean_ctor_get(x_3377, 0); -lean_dec(x_3381); -x_3382 = lean_box(0); -lean_ctor_set(x_3377, 0, x_3382); -x_228 = x_3374; -x_229 = x_3375; -goto block_3373; -} -else -{ -lean_object* x_3383; lean_object* x_3384; lean_object* x_3385; -x_3383 = lean_ctor_get(x_3377, 1); -lean_inc(x_3383); -lean_dec(x_3377); -x_3384 = lean_box(0); -x_3385 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3385, 0, x_3384); -lean_ctor_set(x_3385, 1, x_3383); -lean_ctor_set(x_3374, 0, x_3385); -x_228 = x_3374; -x_229 = x_3375; -goto block_3373; -} -} -else -{ -lean_object* x_3386; lean_object* x_3387; lean_object* x_3388; lean_object* x_3389; lean_object* x_3390; lean_object* x_3391; lean_object* x_3392; lean_object* x_3393; lean_object* x_3394; lean_object* x_3395; -lean_free_object(x_3374); -x_3386 = lean_ctor_get(x_3377, 1); -lean_inc(x_3386); -lean_dec(x_3377); -x_3387 = lean_ctor_get(x_23, 1); -lean_inc(x_3387); -x_3388 = lean_ctor_get(x_23, 2); -lean_inc(x_3388); -x_3389 = l_Lean_Name_toString___closed__1; -x_3390 = l_Lean_Name_toStringWithSep___main(x_3389, x_3388); -x_3391 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_3391, 0, x_14); -x_3392 = l_Lean_MessageData_ofList___closed__3; -x_3393 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3393, 0, x_3392); -lean_ctor_set(x_3393, 1, x_3391); -x_3394 = lean_unsigned_to_nat(2u); -x_3395 = lean_alloc_ctor(7, 2, 0); -lean_ctor_set(x_3395, 0, x_3394); -lean_ctor_set(x_3395, 1, x_3393); -if (lean_obj_tag(x_3387) == 0) -{ -lean_object* x_3396; lean_object* x_3397; lean_object* x_3398; lean_object* x_3399; lean_object* x_3400; lean_object* x_3401; lean_object* x_3402; lean_object* x_3403; lean_object* x_3404; lean_object* x_3405; lean_object* x_3406; lean_object* x_3407; lean_object* x_3408; lean_object* x_3409; lean_object* x_3410; -x_3396 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31; -x_3397 = lean_string_append(x_3396, x_3390); -lean_dec(x_3390); -x_3398 = l_Option_HasRepr___rarg___closed__3; -x_3399 = lean_string_append(x_3397, x_3398); -x_3400 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_3400, 0, x_3399); -x_3401 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3401, 0, x_3400); -x_3402 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; -x_3403 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3403, 0, x_3402); -lean_ctor_set(x_3403, 1, x_3401); -x_3404 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -x_3405 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3405, 0, x_3403); -lean_ctor_set(x_3405, 1, x_3404); -x_3406 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3406, 0, x_3405); -lean_ctor_set(x_3406, 1, x_3395); -x_3407 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3408 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3407, x_3406, x_5, x_3386, x_7, x_8, x_3375); -x_3409 = lean_ctor_get(x_3408, 0); -lean_inc(x_3409); -x_3410 = lean_ctor_get(x_3408, 1); -lean_inc(x_3410); -lean_dec(x_3408); -x_228 = x_3409; -x_229 = x_3410; -goto block_3373; -} -else -{ -lean_object* x_3411; lean_object* x_3412; lean_object* x_3413; lean_object* x_3414; lean_object* x_3415; lean_object* x_3416; lean_object* x_3417; lean_object* x_3418; lean_object* x_3419; lean_object* x_3420; lean_object* x_3421; lean_object* x_3422; lean_object* x_3423; lean_object* x_3424; lean_object* x_3425; lean_object* x_3426; lean_object* x_3427; lean_object* x_3428; lean_object* x_3429; lean_object* x_3430; lean_object* x_3431; lean_object* x_3432; lean_object* x_3433; lean_object* x_3434; -x_3411 = lean_ctor_get(x_3387, 0); -lean_inc(x_3411); -lean_dec(x_3387); -x_3412 = l_Nat_repr(x_3411); -x_3413 = l_addParenHeuristic(x_3412); -lean_dec(x_3412); -x_3414 = l_Option_HasRepr___rarg___closed__2; -x_3415 = lean_string_append(x_3414, x_3413); -lean_dec(x_3413); -x_3416 = l_Option_HasRepr___rarg___closed__3; -x_3417 = lean_string_append(x_3415, x_3416); -x_3418 = l_Prod_HasRepr___rarg___closed__1; -x_3419 = lean_string_append(x_3418, x_3417); -lean_dec(x_3417); -x_3420 = l_List_reprAux___main___rarg___closed__1; -x_3421 = lean_string_append(x_3419, x_3420); -x_3422 = lean_string_append(x_3421, x_3390); -lean_dec(x_3390); -x_3423 = lean_string_append(x_3422, x_3416); -x_3424 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_3424, 0, x_3423); -x_3425 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3425, 0, x_3424); -x_3426 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; -x_3427 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3427, 0, x_3426); -lean_ctor_set(x_3427, 1, x_3425); -x_3428 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -x_3429 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3429, 0, x_3427); -lean_ctor_set(x_3429, 1, x_3428); -x_3430 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3430, 0, x_3429); -lean_ctor_set(x_3430, 1, x_3395); -x_3431 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3432 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3431, x_3430, x_5, x_3386, x_7, x_8, x_3375); -x_3433 = lean_ctor_get(x_3432, 0); -lean_inc(x_3433); -x_3434 = lean_ctor_get(x_3432, 1); -lean_inc(x_3434); -lean_dec(x_3432); -x_228 = x_3433; -x_229 = x_3434; -goto block_3373; -} -} -} -else -{ -lean_object* x_3435; lean_object* x_3436; uint8_t x_3437; -x_3435 = lean_ctor_get(x_3374, 0); -lean_inc(x_3435); -lean_dec(x_3374); -x_3436 = lean_ctor_get(x_3435, 0); -lean_inc(x_3436); -x_3437 = lean_unbox(x_3436); -lean_dec(x_3436); -if (x_3437 == 0) -{ -lean_object* x_3438; lean_object* x_3439; lean_object* x_3440; lean_object* x_3441; lean_object* x_3442; -lean_dec(x_14); -x_3438 = lean_ctor_get(x_3435, 1); -lean_inc(x_3438); -if (lean_is_exclusive(x_3435)) { - lean_ctor_release(x_3435, 0); - lean_ctor_release(x_3435, 1); - x_3439 = x_3435; -} else { - lean_dec_ref(x_3435); - x_3439 = lean_box(0); -} -x_3440 = lean_box(0); -if (lean_is_scalar(x_3439)) { - x_3441 = lean_alloc_ctor(0, 2, 0); -} else { - x_3441 = x_3439; -} -lean_ctor_set(x_3441, 0, x_3440); -lean_ctor_set(x_3441, 1, x_3438); -x_3442 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_3442, 0, x_3441); -x_228 = x_3442; -x_229 = x_3375; -goto block_3373; -} -else -{ -lean_object* x_3443; lean_object* x_3444; lean_object* x_3445; lean_object* x_3446; lean_object* x_3447; lean_object* x_3448; lean_object* x_3449; lean_object* x_3450; lean_object* x_3451; lean_object* x_3452; -x_3443 = lean_ctor_get(x_3435, 1); -lean_inc(x_3443); -lean_dec(x_3435); -x_3444 = lean_ctor_get(x_23, 1); -lean_inc(x_3444); -x_3445 = lean_ctor_get(x_23, 2); -lean_inc(x_3445); -x_3446 = l_Lean_Name_toString___closed__1; -x_3447 = l_Lean_Name_toStringWithSep___main(x_3446, x_3445); -x_3448 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_3448, 0, x_14); -x_3449 = l_Lean_MessageData_ofList___closed__3; -x_3450 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3450, 0, x_3449); -lean_ctor_set(x_3450, 1, x_3448); -x_3451 = lean_unsigned_to_nat(2u); -x_3452 = lean_alloc_ctor(7, 2, 0); -lean_ctor_set(x_3452, 0, x_3451); -lean_ctor_set(x_3452, 1, x_3450); -if (lean_obj_tag(x_3444) == 0) -{ -lean_object* x_3453; lean_object* x_3454; lean_object* x_3455; lean_object* x_3456; lean_object* x_3457; lean_object* x_3458; lean_object* x_3459; lean_object* x_3460; lean_object* x_3461; lean_object* x_3462; lean_object* x_3463; lean_object* x_3464; lean_object* x_3465; lean_object* x_3466; lean_object* x_3467; -x_3453 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31; -x_3454 = lean_string_append(x_3453, x_3447); -lean_dec(x_3447); -x_3455 = l_Option_HasRepr___rarg___closed__3; -x_3456 = lean_string_append(x_3454, x_3455); -x_3457 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_3457, 0, x_3456); -x_3458 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3458, 0, x_3457); -x_3459 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; -x_3460 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3460, 0, x_3459); -lean_ctor_set(x_3460, 1, x_3458); -x_3461 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -x_3462 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3462, 0, x_3460); -lean_ctor_set(x_3462, 1, x_3461); -x_3463 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3463, 0, x_3462); -lean_ctor_set(x_3463, 1, x_3452); -x_3464 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3465 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3464, x_3463, x_5, x_3443, x_7, x_8, x_3375); -x_3466 = lean_ctor_get(x_3465, 0); -lean_inc(x_3466); -x_3467 = lean_ctor_get(x_3465, 1); -lean_inc(x_3467); -lean_dec(x_3465); -x_228 = x_3466; -x_229 = x_3467; -goto block_3373; -} -else -{ -lean_object* x_3468; lean_object* x_3469; lean_object* x_3470; lean_object* x_3471; lean_object* x_3472; lean_object* x_3473; lean_object* x_3474; lean_object* x_3475; lean_object* x_3476; lean_object* x_3477; lean_object* x_3478; lean_object* x_3479; lean_object* x_3480; lean_object* x_3481; lean_object* x_3482; lean_object* x_3483; lean_object* x_3484; lean_object* x_3485; lean_object* x_3486; lean_object* x_3487; lean_object* x_3488; lean_object* x_3489; lean_object* x_3490; lean_object* x_3491; -x_3468 = lean_ctor_get(x_3444, 0); -lean_inc(x_3468); -lean_dec(x_3444); -x_3469 = l_Nat_repr(x_3468); -x_3470 = l_addParenHeuristic(x_3469); -lean_dec(x_3469); -x_3471 = l_Option_HasRepr___rarg___closed__2; -x_3472 = lean_string_append(x_3471, x_3470); -lean_dec(x_3470); -x_3473 = l_Option_HasRepr___rarg___closed__3; -x_3474 = lean_string_append(x_3472, x_3473); -x_3475 = l_Prod_HasRepr___rarg___closed__1; -x_3476 = lean_string_append(x_3475, x_3474); -lean_dec(x_3474); -x_3477 = l_List_reprAux___main___rarg___closed__1; -x_3478 = lean_string_append(x_3476, x_3477); -x_3479 = lean_string_append(x_3478, x_3447); -lean_dec(x_3447); -x_3480 = lean_string_append(x_3479, x_3473); -x_3481 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_3481, 0, x_3480); -x_3482 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3482, 0, x_3481); -x_3483 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; -x_3484 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3484, 0, x_3483); -lean_ctor_set(x_3484, 1, x_3482); -x_3485 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -x_3486 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3486, 0, x_3484); -lean_ctor_set(x_3486, 1, x_3485); -x_3487 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3487, 0, x_3486); -lean_ctor_set(x_3487, 1, x_3452); -x_3488 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3489 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3488, x_3487, x_5, x_3443, x_7, x_8, x_3375); -x_3490 = lean_ctor_get(x_3489, 0); -lean_inc(x_3490); -x_3491 = lean_ctor_get(x_3489, 1); -lean_inc(x_3491); -lean_dec(x_3489); -x_228 = x_3490; -x_229 = x_3491; -goto block_3373; -} -} -} -} -} -else -{ -lean_object* x_3503; lean_object* x_3504; lean_object* x_3505; lean_object* x_3559; lean_object* x_3560; lean_object* x_3561; uint8_t x_3562; lean_object* x_3563; lean_object* x_3564; lean_object* x_3565; lean_object* x_4063; lean_object* x_4064; lean_object* x_4124; lean_object* x_4125; uint8_t x_4126; -x_3503 = lean_ctor_get(x_19, 0); -x_3504 = lean_ctor_get(x_19, 1); -lean_inc(x_3504); -lean_inc(x_3503); -lean_dec(x_19); -x_3559 = lean_ctor_get(x_3504, 0); -lean_inc(x_3559); -x_3560 = lean_box(0); -x_3561 = lean_box(0); -x_3562 = 0; -x_3563 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_3563, 0, x_3559); -lean_ctor_set(x_3563, 1, x_3560); -lean_ctor_set(x_3563, 2, x_3561); -lean_ctor_set(x_3563, 3, x_3560); -lean_ctor_set(x_3563, 4, x_3560); -lean_ctor_set_uint8(x_3563, sizeof(void*)*5, x_3562); -x_4124 = l_Lean_Core_getTraceState___rarg(x_8, x_20); -x_4125 = lean_ctor_get(x_4124, 0); -lean_inc(x_4125); -x_4126 = lean_ctor_get_uint8(x_4125, sizeof(void*)*1); -lean_dec(x_4125); -if (x_4126 == 0) -{ -lean_object* x_4127; lean_object* x_4128; lean_object* x_4129; -x_4127 = lean_ctor_get(x_4124, 1); -lean_inc(x_4127); -lean_dec(x_4124); -x_4128 = lean_box(x_3562); -x_4129 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_4129, 0, x_4128); -lean_ctor_set(x_4129, 1, x_3563); -lean_ctor_set(x_17, 0, x_4129); -x_4063 = x_17; -x_4064 = x_4127; -goto block_4123; -} -else -{ -lean_object* x_4130; lean_object* x_4131; lean_object* x_4132; lean_object* x_4133; lean_object* x_4134; lean_object* x_4135; -x_4130 = lean_ctor_get(x_4124, 1); -lean_inc(x_4130); -lean_dec(x_4124); -x_4131 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4132 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4131, x_7, x_8, x_4130); -x_4133 = lean_ctor_get(x_4132, 0); -lean_inc(x_4133); -x_4134 = lean_ctor_get(x_4132, 1); -lean_inc(x_4134); -lean_dec(x_4132); -x_4135 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_4135, 0, x_4133); -lean_ctor_set(x_4135, 1, x_3563); -lean_ctor_set(x_17, 0, x_4135); -x_4063 = x_17; -x_4064 = x_4134; -goto block_4123; -} -block_3558: -{ -lean_object* x_3506; lean_object* x_3507; lean_object* x_3508; lean_object* x_3509; lean_object* x_3510; uint8_t x_3511; -x_3506 = lean_ctor_get(x_3505, 0); -lean_inc(x_3506); -x_3507 = lean_ctor_get(x_3506, 0); -lean_inc(x_3507); -if (lean_is_exclusive(x_3506)) { - lean_ctor_release(x_3506, 0); - x_3508 = x_3506; -} else { - lean_dec_ref(x_3506); - x_3508 = lean_box(0); -} -x_3509 = lean_ctor_get(x_3507, 1); -lean_inc(x_3509); -if (lean_is_exclusive(x_3507)) { - lean_ctor_release(x_3507, 0); - lean_ctor_release(x_3507, 1); - x_3510 = x_3507; -} else { - lean_dec_ref(x_3507); - x_3510 = lean_box(0); -} -x_3511 = lean_ctor_get_uint8(x_3504, sizeof(void*)*5); -if (x_3511 == 0) -{ -lean_object* x_3512; -x_3512 = lean_ctor_get(x_3509, 4); -lean_inc(x_3512); -if (lean_obj_tag(x_3512) == 0) -{ -lean_object* x_3513; lean_object* x_3514; lean_object* x_3515; lean_object* x_3516; lean_object* x_3517; uint8_t x_3518; lean_object* x_3519; lean_object* x_3520; lean_object* x_3521; lean_object* x_3522; lean_object* x_3523; lean_object* x_3524; lean_object* x_3525; lean_object* x_3526; -x_3513 = lean_ctor_get(x_3505, 1); -lean_inc(x_3513); -if (lean_is_exclusive(x_3505)) { - lean_ctor_release(x_3505, 0); - lean_ctor_release(x_3505, 1); - x_3514 = x_3505; -} else { - lean_dec_ref(x_3505); - x_3514 = lean_box(0); -} -x_3515 = lean_ctor_get(x_3509, 0); -lean_inc(x_3515); -x_3516 = lean_ctor_get(x_3509, 1); -lean_inc(x_3516); -x_3517 = lean_ctor_get(x_3509, 2); -lean_inc(x_3517); -x_3518 = lean_ctor_get_uint8(x_3509, sizeof(void*)*5); -lean_dec(x_3509); -x_3519 = lean_ctor_get(x_3504, 3); -lean_inc(x_3519); -if (lean_is_exclusive(x_3504)) { - lean_ctor_release(x_3504, 0); - lean_ctor_release(x_3504, 1); - lean_ctor_release(x_3504, 2); - lean_ctor_release(x_3504, 3); - lean_ctor_release(x_3504, 4); - x_3520 = x_3504; -} else { - lean_dec_ref(x_3504); - x_3520 = lean_box(0); -} -x_3521 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_3521, 0, x_3); -if (lean_is_scalar(x_3520)) { - x_3522 = lean_alloc_ctor(0, 5, 1); -} else { - x_3522 = x_3520; -} -lean_ctor_set(x_3522, 0, x_3515); -lean_ctor_set(x_3522, 1, x_3516); -lean_ctor_set(x_3522, 2, x_3517); -lean_ctor_set(x_3522, 3, x_3519); -lean_ctor_set(x_3522, 4, x_3521); -lean_ctor_set_uint8(x_3522, sizeof(void*)*5, x_3518); -x_3523 = lean_box(0); -if (lean_is_scalar(x_3510)) { - x_3524 = lean_alloc_ctor(0, 2, 0); -} else { - x_3524 = x_3510; -} -lean_ctor_set(x_3524, 0, x_3523); -lean_ctor_set(x_3524, 1, x_3522); -if (lean_is_scalar(x_3508)) { - x_3525 = lean_alloc_ctor(1, 1, 0); -} else { - x_3525 = x_3508; -} -lean_ctor_set(x_3525, 0, x_3524); -if (lean_is_scalar(x_3514)) { - x_3526 = lean_alloc_ctor(0, 2, 0); -} else { - x_3526 = x_3514; -} -lean_ctor_set(x_3526, 0, x_3525); -lean_ctor_set(x_3526, 1, x_3513); -return x_3526; -} -else -{ -lean_object* x_3527; lean_object* x_3528; lean_object* x_3529; lean_object* x_3530; lean_object* x_3531; uint8_t x_3532; lean_object* x_3533; lean_object* x_3534; lean_object* x_3535; lean_object* x_3536; lean_object* x_3537; lean_object* x_3538; lean_object* x_3539; lean_object* x_3540; lean_object* x_3541; lean_object* x_3542; lean_object* x_3543; -x_3527 = lean_ctor_get(x_3505, 1); -lean_inc(x_3527); -if (lean_is_exclusive(x_3505)) { - lean_ctor_release(x_3505, 0); - lean_ctor_release(x_3505, 1); - x_3528 = x_3505; -} else { - lean_dec_ref(x_3505); - x_3528 = lean_box(0); -} -x_3529 = lean_ctor_get(x_3509, 0); -lean_inc(x_3529); -x_3530 = lean_ctor_get(x_3509, 1); -lean_inc(x_3530); -x_3531 = lean_ctor_get(x_3509, 2); -lean_inc(x_3531); -x_3532 = lean_ctor_get_uint8(x_3509, sizeof(void*)*5); -lean_dec(x_3509); -x_3533 = lean_ctor_get(x_3504, 3); -lean_inc(x_3533); -if (lean_is_exclusive(x_3504)) { - lean_ctor_release(x_3504, 0); - lean_ctor_release(x_3504, 1); - lean_ctor_release(x_3504, 2); - lean_ctor_release(x_3504, 3); - lean_ctor_release(x_3504, 4); - x_3534 = x_3504; -} else { - lean_dec_ref(x_3504); - x_3534 = lean_box(0); -} -x_3535 = lean_ctor_get(x_3512, 0); -lean_inc(x_3535); -if (lean_is_exclusive(x_3512)) { - lean_ctor_release(x_3512, 0); - x_3536 = x_3512; -} else { - lean_dec_ref(x_3512); - x_3536 = lean_box(0); -} -x_3537 = l_Nat_min(x_3535, x_3); -lean_dec(x_3); -lean_dec(x_3535); -if (lean_is_scalar(x_3536)) { - x_3538 = lean_alloc_ctor(1, 1, 0); -} else { - x_3538 = x_3536; -} -lean_ctor_set(x_3538, 0, x_3537); -if (lean_is_scalar(x_3534)) { - x_3539 = lean_alloc_ctor(0, 5, 1); -} else { - x_3539 = x_3534; -} -lean_ctor_set(x_3539, 0, x_3529); -lean_ctor_set(x_3539, 1, x_3530); -lean_ctor_set(x_3539, 2, x_3531); -lean_ctor_set(x_3539, 3, x_3533); -lean_ctor_set(x_3539, 4, x_3538); -lean_ctor_set_uint8(x_3539, sizeof(void*)*5, x_3532); -x_3540 = lean_box(0); -if (lean_is_scalar(x_3510)) { - x_3541 = lean_alloc_ctor(0, 2, 0); -} else { - x_3541 = x_3510; -} -lean_ctor_set(x_3541, 0, x_3540); -lean_ctor_set(x_3541, 1, x_3539); -if (lean_is_scalar(x_3508)) { - x_3542 = lean_alloc_ctor(1, 1, 0); -} else { - x_3542 = x_3508; -} -lean_ctor_set(x_3542, 0, x_3541); -if (lean_is_scalar(x_3528)) { - x_3543 = lean_alloc_ctor(0, 2, 0); -} else { - x_3543 = x_3528; -} -lean_ctor_set(x_3543, 0, x_3542); -lean_ctor_set(x_3543, 1, x_3527); -return x_3543; -} -} -else -{ -lean_object* x_3544; lean_object* x_3545; lean_object* x_3546; lean_object* x_3547; lean_object* x_3548; uint8_t x_3549; lean_object* x_3550; lean_object* x_3551; lean_object* x_3552; lean_object* x_3553; lean_object* x_3554; lean_object* x_3555; lean_object* x_3556; lean_object* x_3557; -lean_dec(x_3); -x_3544 = lean_ctor_get(x_3505, 1); -lean_inc(x_3544); -if (lean_is_exclusive(x_3505)) { - lean_ctor_release(x_3505, 0); - lean_ctor_release(x_3505, 1); - x_3545 = x_3505; -} else { - lean_dec_ref(x_3505); - x_3545 = lean_box(0); -} -x_3546 = lean_ctor_get(x_3509, 0); -lean_inc(x_3546); -x_3547 = lean_ctor_get(x_3509, 1); -lean_inc(x_3547); -x_3548 = lean_ctor_get(x_3509, 2); -lean_inc(x_3548); -x_3549 = lean_ctor_get_uint8(x_3509, sizeof(void*)*5); -lean_dec(x_3509); -x_3550 = lean_ctor_get(x_3504, 3); -lean_inc(x_3550); -x_3551 = lean_ctor_get(x_3504, 4); -lean_inc(x_3551); -if (lean_is_exclusive(x_3504)) { - lean_ctor_release(x_3504, 0); - lean_ctor_release(x_3504, 1); - lean_ctor_release(x_3504, 2); - lean_ctor_release(x_3504, 3); - lean_ctor_release(x_3504, 4); - x_3552 = x_3504; -} else { - lean_dec_ref(x_3504); - x_3552 = lean_box(0); -} -if (lean_is_scalar(x_3552)) { - x_3553 = lean_alloc_ctor(0, 5, 1); -} else { - x_3553 = x_3552; -} -lean_ctor_set(x_3553, 0, x_3546); -lean_ctor_set(x_3553, 1, x_3547); -lean_ctor_set(x_3553, 2, x_3548); -lean_ctor_set(x_3553, 3, x_3550); -lean_ctor_set(x_3553, 4, x_3551); -lean_ctor_set_uint8(x_3553, sizeof(void*)*5, x_3549); -x_3554 = lean_box(0); -if (lean_is_scalar(x_3510)) { - x_3555 = lean_alloc_ctor(0, 2, 0); -} else { - x_3555 = x_3510; -} -lean_ctor_set(x_3555, 0, x_3554); -lean_ctor_set(x_3555, 1, x_3553); -if (lean_is_scalar(x_3508)) { - x_3556 = lean_alloc_ctor(1, 1, 0); -} else { - x_3556 = x_3508; -} -lean_ctor_set(x_3556, 0, x_3555); -if (lean_is_scalar(x_3545)) { - x_3557 = lean_alloc_ctor(0, 2, 0); -} else { - x_3557 = x_3545; -} -lean_ctor_set(x_3557, 0, x_3556); -lean_ctor_set(x_3557, 1, x_3544); -return x_3557; -} -} -block_4062: -{ -lean_object* x_3566; lean_object* x_3567; lean_object* x_3568; lean_object* x_3569; -x_3566 = lean_ctor_get(x_3564, 0); -lean_inc(x_3566); -lean_dec(x_3564); -x_3567 = lean_ctor_get(x_3566, 1); -lean_inc(x_3567); -if (lean_is_exclusive(x_3566)) { - lean_ctor_release(x_3566, 0); - lean_ctor_release(x_3566, 1); - x_3568 = x_3566; -} else { - lean_dec_ref(x_3566); - x_3568 = lean_box(0); -} -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_5); -x_3569 = lean_apply_5(x_4, x_5, x_3567, x_7, x_8, x_3565); -if (lean_obj_tag(x_3569) == 0) -{ -lean_object* x_3570; -x_3570 = lean_ctor_get(x_3569, 0); -lean_inc(x_3570); -if (lean_obj_tag(x_3570) == 0) -{ -lean_object* x_3571; lean_object* x_3572; lean_object* x_3573; lean_object* x_3574; lean_object* x_3575; lean_object* x_3576; -lean_dec(x_3568); -lean_dec(x_3504); -lean_dec(x_3503); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_3571 = lean_ctor_get(x_3569, 1); -lean_inc(x_3571); -if (lean_is_exclusive(x_3569)) { - lean_ctor_release(x_3569, 0); - lean_ctor_release(x_3569, 1); - x_3572 = x_3569; -} else { - lean_dec_ref(x_3569); - x_3572 = lean_box(0); -} -x_3573 = lean_ctor_get(x_3570, 0); -lean_inc(x_3573); -if (lean_is_exclusive(x_3570)) { - lean_ctor_release(x_3570, 0); - x_3574 = x_3570; -} else { - lean_dec_ref(x_3570); - x_3574 = lean_box(0); -} -if (lean_is_scalar(x_3574)) { - x_3575 = lean_alloc_ctor(0, 1, 0); -} else { - x_3575 = x_3574; -} -lean_ctor_set(x_3575, 0, x_3573); -if (lean_is_scalar(x_3572)) { - x_3576 = lean_alloc_ctor(0, 2, 0); -} else { - x_3576 = x_3572; -} -lean_ctor_set(x_3576, 0, x_3575); -lean_ctor_set(x_3576, 1, x_3571); -return x_3576; -} -else -{ -lean_object* x_3577; lean_object* x_3578; lean_object* x_3579; lean_object* x_3580; lean_object* x_3581; -x_3577 = lean_ctor_get(x_3570, 0); -lean_inc(x_3577); -if (lean_is_exclusive(x_3570)) { - lean_ctor_release(x_3570, 0); - x_3578 = x_3570; -} else { - lean_dec_ref(x_3570); - x_3578 = lean_box(0); -} -x_3579 = lean_ctor_get(x_3577, 1); -lean_inc(x_3579); -if (lean_is_exclusive(x_3577)) { - lean_ctor_release(x_3577, 0); - lean_ctor_release(x_3577, 1); - x_3580 = x_3577; -} else { - lean_dec_ref(x_3577); - x_3580 = lean_box(0); -} -x_3581 = lean_ctor_get(x_3579, 3); -lean_inc(x_3581); -if (lean_obj_tag(x_3581) == 0) -{ -lean_object* x_3582; lean_object* x_3583; lean_object* x_3584; lean_object* x_3585; lean_object* x_3586; -lean_dec(x_3580); -lean_dec(x_3578); -lean_dec(x_3568); -lean_dec(x_3504); -lean_dec(x_3503); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_3582 = lean_ctor_get(x_3569, 1); -lean_inc(x_3582); -lean_dec(x_3569); -x_3583 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; -x_3584 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; -x_3585 = lean_panic_fn(x_3583, x_3584); -x_3586 = lean_apply_5(x_3585, x_5, x_3579, x_7, x_8, x_3582); -return x_3586; -} -else -{ -lean_object* x_3587; lean_object* x_3588; lean_object* x_3589; lean_object* x_3590; lean_object* x_3591; lean_object* x_3592; lean_object* x_4003; lean_object* x_4004; lean_object* x_4044; lean_object* x_4045; uint8_t x_4046; -x_3587 = lean_ctor_get(x_3569, 1); -lean_inc(x_3587); -if (lean_is_exclusive(x_3569)) { - lean_ctor_release(x_3569, 0); - lean_ctor_release(x_3569, 1); - x_3588 = x_3569; -} else { - lean_dec_ref(x_3569); - x_3588 = lean_box(0); -} -x_3589 = lean_ctor_get(x_3579, 4); -lean_inc(x_3589); -x_3590 = lean_ctor_get(x_3581, 0); -lean_inc(x_3590); -lean_dec(x_3581); -x_4044 = l_Lean_Core_getTraceState___rarg(x_8, x_3587); -x_4045 = lean_ctor_get(x_4044, 0); -lean_inc(x_4045); -x_4046 = lean_ctor_get_uint8(x_4045, sizeof(void*)*1); -lean_dec(x_4045); -if (x_4046 == 0) -{ -lean_object* x_4047; lean_object* x_4048; lean_object* x_4049; lean_object* x_4050; -x_4047 = lean_ctor_get(x_4044, 1); -lean_inc(x_4047); -lean_dec(x_4044); -x_4048 = lean_box(x_3562); -if (lean_is_scalar(x_3568)) { - x_4049 = lean_alloc_ctor(0, 2, 0); -} else { - x_4049 = x_3568; -} -lean_ctor_set(x_4049, 0, x_4048); -lean_ctor_set(x_4049, 1, x_3579); -if (lean_is_scalar(x_3578)) { - x_4050 = lean_alloc_ctor(1, 1, 0); -} else { - x_4050 = x_3578; -} -lean_ctor_set(x_4050, 0, x_4049); -x_4003 = x_4050; -x_4004 = x_4047; -goto block_4043; -} -else -{ -lean_object* x_4051; lean_object* x_4052; lean_object* x_4053; lean_object* x_4054; lean_object* x_4055; lean_object* x_4056; lean_object* x_4057; -x_4051 = lean_ctor_get(x_4044, 1); -lean_inc(x_4051); -lean_dec(x_4044); -x_4052 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4053 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4052, x_7, x_8, x_4051); -x_4054 = lean_ctor_get(x_4053, 0); -lean_inc(x_4054); -x_4055 = lean_ctor_get(x_4053, 1); -lean_inc(x_4055); -lean_dec(x_4053); -if (lean_is_scalar(x_3568)) { - x_4056 = lean_alloc_ctor(0, 2, 0); -} else { - x_4056 = x_3568; -} -lean_ctor_set(x_4056, 0, x_4054); -lean_ctor_set(x_4056, 1, x_3579); -if (lean_is_scalar(x_3578)) { - x_4057 = lean_alloc_ctor(1, 1, 0); -} else { - x_4057 = x_3578; -} -lean_ctor_set(x_4057, 0, x_4056); -x_4003 = x_4057; -x_4004 = x_4055; -goto block_4043; -} -block_4002: -{ -lean_object* x_3593; lean_object* x_3594; lean_object* x_3595; lean_object* x_3596; lean_object* x_3597; lean_object* x_3598; lean_object* x_3620; uint8_t x_3977; -x_3593 = lean_ctor_get(x_3591, 0); -lean_inc(x_3593); -if (lean_is_exclusive(x_3591)) { - lean_ctor_release(x_3591, 0); - x_3594 = x_3591; -} else { - lean_dec_ref(x_3591); - x_3594 = lean_box(0); -} -x_3595 = lean_ctor_get(x_3593, 1); -lean_inc(x_3595); -if (lean_is_exclusive(x_3593)) { - lean_ctor_release(x_3593, 0); - lean_ctor_release(x_3593, 1); - x_3596 = x_3593; -} else { - lean_dec_ref(x_3593); - x_3596 = lean_box(0); -} -x_3977 = lean_nat_dec_lt(x_3590, x_3); -lean_dec(x_3590); -if (x_3977 == 0) -{ -if (lean_obj_tag(x_3589) == 0) -{ -lean_object* x_3978; lean_object* x_3979; lean_object* x_3980; lean_object* x_3981; -lean_dec(x_3503); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_3978 = lean_box(0); -if (lean_is_scalar(x_3596)) { - x_3979 = lean_alloc_ctor(0, 2, 0); -} else { - x_3979 = x_3596; -} -lean_ctor_set(x_3979, 0, x_3978); -lean_ctor_set(x_3979, 1, x_3595); -if (lean_is_scalar(x_3594)) { - x_3980 = lean_alloc_ctor(1, 1, 0); -} else { - x_3980 = x_3594; -} -lean_ctor_set(x_3980, 0, x_3979); -if (lean_is_scalar(x_3588)) { - x_3981 = lean_alloc_ctor(0, 2, 0); -} else { - x_3981 = x_3588; -} -lean_ctor_set(x_3981, 0, x_3980); -lean_ctor_set(x_3981, 1, x_3592); -x_3505 = x_3981; -goto block_3558; -} -else -{ -lean_object* x_3982; -x_3982 = lean_ctor_get(x_3504, 1); -lean_inc(x_3982); -if (lean_obj_tag(x_3982) == 0) -{ -lean_object* x_3983; lean_object* x_3984; lean_object* x_3985; lean_object* x_3986; -lean_dec(x_3589); -lean_dec(x_3503); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_3983 = lean_box(0); -if (lean_is_scalar(x_3596)) { - x_3984 = lean_alloc_ctor(0, 2, 0); -} else { - x_3984 = x_3596; -} -lean_ctor_set(x_3984, 0, x_3983); -lean_ctor_set(x_3984, 1, x_3595); -if (lean_is_scalar(x_3594)) { - x_3985 = lean_alloc_ctor(1, 1, 0); -} else { - x_3985 = x_3594; -} -lean_ctor_set(x_3985, 0, x_3984); -if (lean_is_scalar(x_3588)) { - x_3986 = lean_alloc_ctor(0, 2, 0); -} else { - x_3986 = x_3588; -} -lean_ctor_set(x_3986, 0, x_3985); -lean_ctor_set(x_3986, 1, x_3592); -x_3505 = x_3986; -goto block_3558; -} -else -{ -lean_object* x_3987; lean_object* x_3988; lean_object* x_3989; uint8_t x_3990; -x_3987 = lean_ctor_get(x_3589, 0); -lean_inc(x_3987); -lean_dec(x_3589); -x_3988 = lean_ctor_get(x_3982, 0); -lean_inc(x_3988); -lean_dec(x_3982); -x_3989 = lean_ctor_get(x_3504, 2); -lean_inc(x_3989); -x_3990 = lean_name_eq(x_1, x_3989); -lean_dec(x_3989); -if (x_3990 == 0) -{ -lean_object* x_3991; lean_object* x_3992; lean_object* x_3993; lean_object* x_3994; -lean_dec(x_3988); -lean_dec(x_3987); -lean_dec(x_3503); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_3991 = lean_box(0); -if (lean_is_scalar(x_3596)) { - x_3992 = lean_alloc_ctor(0, 2, 0); -} else { - x_3992 = x_3596; -} -lean_ctor_set(x_3992, 0, x_3991); -lean_ctor_set(x_3992, 1, x_3595); -if (lean_is_scalar(x_3594)) { - x_3993 = lean_alloc_ctor(1, 1, 0); -} else { - x_3993 = x_3594; -} -lean_ctor_set(x_3993, 0, x_3992); -if (lean_is_scalar(x_3588)) { - x_3994 = lean_alloc_ctor(0, 2, 0); -} else { - x_3994 = x_3588; -} -lean_ctor_set(x_3994, 0, x_3993); -lean_ctor_set(x_3994, 1, x_3592); -x_3505 = x_3994; -goto block_3558; -} -else -{ -uint8_t x_3995; -x_3995 = lean_nat_dec_le(x_3987, x_3988); -lean_dec(x_3988); -lean_dec(x_3987); -if (x_3995 == 0) -{ -lean_object* x_3996; lean_object* x_3997; lean_object* x_3998; lean_object* x_3999; -lean_dec(x_3503); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_3996 = lean_box(0); -if (lean_is_scalar(x_3596)) { - x_3997 = lean_alloc_ctor(0, 2, 0); -} else { - x_3997 = x_3596; -} -lean_ctor_set(x_3997, 0, x_3996); -lean_ctor_set(x_3997, 1, x_3595); -if (lean_is_scalar(x_3594)) { - x_3998 = lean_alloc_ctor(1, 1, 0); -} else { - x_3998 = x_3594; -} -lean_ctor_set(x_3998, 0, x_3997); -if (lean_is_scalar(x_3588)) { - x_3999 = lean_alloc_ctor(0, 2, 0); -} else { - x_3999 = x_3588; -} -lean_ctor_set(x_3999, 0, x_3998); -lean_ctor_set(x_3999, 1, x_3592); -x_3505 = x_3999; -goto block_3558; -} -else -{ -lean_object* x_4000; -lean_dec(x_3596); -lean_dec(x_3594); -lean_dec(x_3588); -x_4000 = lean_box(0); -x_3620 = x_4000; -goto block_3976; -} -} -} -} -} -else -{ -lean_object* x_4001; -lean_dec(x_3596); -lean_dec(x_3594); -lean_dec(x_3589); -lean_dec(x_3588); -x_4001 = lean_box(0); -x_3620 = x_4001; -goto block_3976; -} -block_3619: -{ -lean_object* x_3599; lean_object* x_3600; lean_object* x_3601; lean_object* x_3602; lean_object* x_3603; lean_object* x_3604; lean_object* x_3605; lean_object* x_3606; lean_object* x_3607; lean_object* x_3608; lean_object* x_3609; lean_object* x_3610; uint8_t x_3611; lean_object* x_3612; lean_object* x_3613; lean_object* x_3614; lean_object* x_3615; lean_object* x_3616; lean_object* x_3617; lean_object* x_3618; -x_3599 = lean_ctor_get(x_3597, 0); -lean_inc(x_3599); -lean_dec(x_3597); -x_3600 = lean_ctor_get(x_3599, 1); -lean_inc(x_3600); -lean_dec(x_3599); -x_3601 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_3600, x_7, x_8, x_3598); -lean_dec(x_8); -lean_dec(x_7); -x_3602 = lean_ctor_get(x_3601, 0); -lean_inc(x_3602); -x_3603 = lean_ctor_get(x_3602, 0); -lean_inc(x_3603); -if (lean_is_exclusive(x_3602)) { - lean_ctor_release(x_3602, 0); - x_3604 = x_3602; -} else { - lean_dec_ref(x_3602); - x_3604 = lean_box(0); -} -x_3605 = lean_ctor_get(x_3603, 1); -lean_inc(x_3605); -if (lean_is_exclusive(x_3603)) { - lean_ctor_release(x_3603, 0); - lean_ctor_release(x_3603, 1); - x_3606 = x_3603; -} else { - lean_dec_ref(x_3603); - x_3606 = lean_box(0); -} -x_3607 = lean_ctor_get(x_3601, 1); -lean_inc(x_3607); -if (lean_is_exclusive(x_3601)) { - lean_ctor_release(x_3601, 0); - lean_ctor_release(x_3601, 1); - x_3608 = x_3601; -} else { - lean_dec_ref(x_3601); - x_3608 = lean_box(0); -} -x_3609 = lean_ctor_get(x_3605, 0); -lean_inc(x_3609); -x_3610 = lean_ctor_get(x_3605, 3); -lean_inc(x_3610); -x_3611 = lean_ctor_get_uint8(x_3605, sizeof(void*)*5); -if (lean_is_exclusive(x_3605)) { - lean_ctor_release(x_3605, 0); - lean_ctor_release(x_3605, 1); - lean_ctor_release(x_3605, 2); - lean_ctor_release(x_3605, 3); - lean_ctor_release(x_3605, 4); - x_3612 = x_3605; -} else { - lean_dec_ref(x_3605); - x_3612 = lean_box(0); -} -x_3613 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_3612)) { - x_3614 = lean_alloc_ctor(0, 5, 1); -} else { - x_3614 = x_3612; -} -lean_ctor_set(x_3614, 0, x_3609); -lean_ctor_set(x_3614, 1, x_3613); -lean_ctor_set(x_3614, 2, x_1); -lean_ctor_set(x_3614, 3, x_3610); -lean_ctor_set(x_3614, 4, x_3560); -lean_ctor_set_uint8(x_3614, sizeof(void*)*5, x_3611); -x_3615 = lean_box(0); -if (lean_is_scalar(x_3606)) { - x_3616 = lean_alloc_ctor(0, 2, 0); -} else { - x_3616 = x_3606; -} -lean_ctor_set(x_3616, 0, x_3615); -lean_ctor_set(x_3616, 1, x_3614); -if (lean_is_scalar(x_3604)) { - x_3617 = lean_alloc_ctor(1, 1, 0); -} else { - x_3617 = x_3604; -} -lean_ctor_set(x_3617, 0, x_3616); -if (lean_is_scalar(x_3608)) { - x_3618 = lean_alloc_ctor(0, 2, 0); -} else { - x_3618 = x_3608; -} -lean_ctor_set(x_3618, 0, x_3617); -lean_ctor_set(x_3618, 1, x_3607); -x_3505 = x_3618; -goto block_3558; -} -block_3976: -{ -lean_object* x_3621; uint8_t x_3622; -lean_dec(x_3620); -x_3621 = lean_unsigned_to_nat(0u); -x_3622 = lean_nat_dec_lt(x_3621, x_3503); -lean_dec(x_3503); -if (x_3622 == 0) -{ -lean_object* x_3623; lean_object* x_3624; lean_object* x_3625; lean_object* x_3626; lean_object* x_3627; lean_object* x_3628; lean_object* x_3629; -x_3623 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3595, x_7, x_8, x_3592); -x_3624 = lean_ctor_get(x_3623, 0); -lean_inc(x_3624); -x_3625 = lean_ctor_get(x_3624, 0); -lean_inc(x_3625); -lean_dec(x_3624); -x_3626 = lean_ctor_get(x_3623, 1); -lean_inc(x_3626); -lean_dec(x_3623); -x_3627 = lean_ctor_get(x_3625, 0); -lean_inc(x_3627); -x_3628 = lean_ctor_get(x_3625, 1); -lean_inc(x_3628); -lean_dec(x_3625); -x_3629 = l_Lean_Syntax_getHeadInfo___main(x_3627); -if (lean_obj_tag(x_3629) == 0) -{ -lean_object* x_3630; lean_object* x_3631; lean_object* x_3632; lean_object* x_3633; lean_object* x_3634; lean_object* x_3635; lean_object* x_3636; lean_object* x_3637; lean_object* x_3638; lean_object* x_3639; lean_object* x_3640; lean_object* x_3641; lean_object* x_3642; lean_object* x_3643; lean_object* x_3644; lean_object* x_3645; lean_object* x_3665; lean_object* x_3666; uint8_t x_3667; -x_3630 = lean_apply_1(x_2, x_3627); -x_3631 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3630, x_5, x_3628, x_7, x_8, x_3626); -x_3632 = lean_ctor_get(x_3631, 0); -lean_inc(x_3632); -x_3633 = lean_ctor_get(x_3632, 0); -lean_inc(x_3633); -lean_dec(x_3632); -x_3634 = lean_ctor_get(x_3631, 1); -lean_inc(x_3634); -lean_dec(x_3631); -x_3635 = lean_ctor_get(x_3633, 1); -lean_inc(x_3635); -lean_dec(x_3633); -x_3636 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3635, x_7, x_8, x_3634); -x_3637 = lean_ctor_get(x_3636, 0); -lean_inc(x_3637); -x_3638 = lean_ctor_get(x_3637, 0); -lean_inc(x_3638); -if (lean_is_exclusive(x_3637)) { - lean_ctor_release(x_3637, 0); - x_3639 = x_3637; -} else { - lean_dec_ref(x_3637); - x_3639 = lean_box(0); -} -x_3640 = lean_ctor_get(x_3636, 1); -lean_inc(x_3640); -lean_dec(x_3636); -x_3641 = lean_ctor_get(x_3638, 0); -lean_inc(x_3641); -x_3642 = lean_ctor_get(x_3638, 1); -lean_inc(x_3642); -if (lean_is_exclusive(x_3638)) { - lean_ctor_release(x_3638, 0); - lean_ctor_release(x_3638, 1); - x_3643 = x_3638; -} else { - lean_dec_ref(x_3638); - x_3643 = lean_box(0); -} -x_3665 = l_Lean_Core_getTraceState___rarg(x_8, x_3640); -x_3666 = lean_ctor_get(x_3665, 0); -lean_inc(x_3666); -x_3667 = lean_ctor_get_uint8(x_3666, sizeof(void*)*1); -lean_dec(x_3666); -if (x_3667 == 0) -{ -lean_object* x_3668; lean_object* x_3669; lean_object* x_3670; lean_object* x_3671; -x_3668 = lean_ctor_get(x_3665, 1); -lean_inc(x_3668); -lean_dec(x_3665); -x_3669 = lean_box(x_3562); -if (lean_is_scalar(x_3643)) { - x_3670 = lean_alloc_ctor(0, 2, 0); -} else { - x_3670 = x_3643; -} -lean_ctor_set(x_3670, 0, x_3669); -lean_ctor_set(x_3670, 1, x_3642); -if (lean_is_scalar(x_3639)) { - x_3671 = lean_alloc_ctor(1, 1, 0); -} else { - x_3671 = x_3639; -} -lean_ctor_set(x_3671, 0, x_3670); -x_3644 = x_3671; -x_3645 = x_3668; -goto block_3664; -} -else -{ -lean_object* x_3672; lean_object* x_3673; lean_object* x_3674; lean_object* x_3675; lean_object* x_3676; lean_object* x_3677; lean_object* x_3678; -x_3672 = lean_ctor_get(x_3665, 1); -lean_inc(x_3672); -lean_dec(x_3665); -x_3673 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3674 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3673, x_7, x_8, x_3672); -x_3675 = lean_ctor_get(x_3674, 0); -lean_inc(x_3675); -x_3676 = lean_ctor_get(x_3674, 1); -lean_inc(x_3676); -lean_dec(x_3674); -if (lean_is_scalar(x_3643)) { - x_3677 = lean_alloc_ctor(0, 2, 0); -} else { - x_3677 = x_3643; -} -lean_ctor_set(x_3677, 0, x_3675); -lean_ctor_set(x_3677, 1, x_3642); -if (lean_is_scalar(x_3639)) { - x_3678 = lean_alloc_ctor(1, 1, 0); -} else { - x_3678 = x_3639; -} -lean_ctor_set(x_3678, 0, x_3677); -x_3644 = x_3678; -x_3645 = x_3676; -goto block_3664; -} -block_3664: -{ -lean_object* x_3646; lean_object* x_3647; lean_object* x_3648; uint8_t x_3649; -x_3646 = lean_ctor_get(x_3644, 0); -lean_inc(x_3646); -if (lean_is_exclusive(x_3644)) { - lean_ctor_release(x_3644, 0); - x_3647 = x_3644; -} else { - lean_dec_ref(x_3644); - x_3647 = lean_box(0); -} -x_3648 = lean_ctor_get(x_3646, 0); -lean_inc(x_3648); -x_3649 = lean_unbox(x_3648); -lean_dec(x_3648); -if (x_3649 == 0) -{ -lean_object* x_3650; lean_object* x_3651; lean_object* x_3652; lean_object* x_3653; lean_object* x_3654; -lean_dec(x_3641); -lean_dec(x_5); -x_3650 = lean_ctor_get(x_3646, 1); -lean_inc(x_3650); -if (lean_is_exclusive(x_3646)) { - lean_ctor_release(x_3646, 0); - lean_ctor_release(x_3646, 1); - x_3651 = x_3646; -} else { - lean_dec_ref(x_3646); - x_3651 = lean_box(0); -} -x_3652 = lean_box(0); -if (lean_is_scalar(x_3651)) { - x_3653 = lean_alloc_ctor(0, 2, 0); -} else { - x_3653 = x_3651; -} -lean_ctor_set(x_3653, 0, x_3652); -lean_ctor_set(x_3653, 1, x_3650); -if (lean_is_scalar(x_3647)) { - x_3654 = lean_alloc_ctor(1, 1, 0); -} else { - x_3654 = x_3647; -} -lean_ctor_set(x_3654, 0, x_3653); -x_3597 = x_3654; -x_3598 = x_3645; -goto block_3619; -} -else -{ -lean_object* x_3655; lean_object* x_3656; lean_object* x_3657; lean_object* x_3658; lean_object* x_3659; lean_object* x_3660; lean_object* x_3661; lean_object* x_3662; lean_object* x_3663; -lean_dec(x_3647); -x_3655 = lean_ctor_get(x_3646, 1); -lean_inc(x_3655); -lean_dec(x_3646); -x_3656 = l_Lean_Syntax_formatStxAux___main(x_3560, x_3562, x_3621, x_3641); -x_3657 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3657, 0, x_3656); -x_3658 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3659 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3659, 0, x_3658); -lean_ctor_set(x_3659, 1, x_3657); -x_3660 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3661 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3660, x_3659, x_5, x_3655, x_7, x_8, x_3645); -lean_dec(x_5); -x_3662 = lean_ctor_get(x_3661, 0); -lean_inc(x_3662); -x_3663 = lean_ctor_get(x_3661, 1); -lean_inc(x_3663); -lean_dec(x_3661); -x_3597 = x_3662; -x_3598 = x_3663; -goto block_3619; -} -} -} -else -{ -lean_object* x_3679; lean_object* x_3680; -x_3679 = lean_ctor_get(x_3629, 0); -lean_inc(x_3679); -lean_dec(x_3629); -x_3680 = l_Lean_Syntax_getTailInfo___main(x_3627); -if (lean_obj_tag(x_3680) == 0) -{ -lean_object* x_3681; lean_object* x_3682; lean_object* x_3683; lean_object* x_3684; lean_object* x_3685; lean_object* x_3686; lean_object* x_3687; lean_object* x_3688; lean_object* x_3689; lean_object* x_3690; lean_object* x_3691; lean_object* x_3692; lean_object* x_3693; lean_object* x_3694; lean_object* x_3695; lean_object* x_3696; lean_object* x_3716; lean_object* x_3717; uint8_t x_3718; -lean_dec(x_3679); -x_3681 = lean_apply_1(x_2, x_3627); -x_3682 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3681, x_5, x_3628, x_7, x_8, x_3626); -x_3683 = lean_ctor_get(x_3682, 0); -lean_inc(x_3683); -x_3684 = lean_ctor_get(x_3683, 0); -lean_inc(x_3684); -lean_dec(x_3683); -x_3685 = lean_ctor_get(x_3682, 1); -lean_inc(x_3685); -lean_dec(x_3682); -x_3686 = lean_ctor_get(x_3684, 1); -lean_inc(x_3686); -lean_dec(x_3684); -x_3687 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3686, x_7, x_8, x_3685); -x_3688 = lean_ctor_get(x_3687, 0); -lean_inc(x_3688); -x_3689 = lean_ctor_get(x_3688, 0); -lean_inc(x_3689); -if (lean_is_exclusive(x_3688)) { - lean_ctor_release(x_3688, 0); - x_3690 = x_3688; -} else { - lean_dec_ref(x_3688); - x_3690 = lean_box(0); -} -x_3691 = lean_ctor_get(x_3687, 1); -lean_inc(x_3691); -lean_dec(x_3687); -x_3692 = lean_ctor_get(x_3689, 0); -lean_inc(x_3692); -x_3693 = lean_ctor_get(x_3689, 1); -lean_inc(x_3693); -if (lean_is_exclusive(x_3689)) { - lean_ctor_release(x_3689, 0); - lean_ctor_release(x_3689, 1); - x_3694 = x_3689; -} else { - lean_dec_ref(x_3689); - x_3694 = lean_box(0); -} -x_3716 = l_Lean_Core_getTraceState___rarg(x_8, x_3691); -x_3717 = lean_ctor_get(x_3716, 0); -lean_inc(x_3717); -x_3718 = lean_ctor_get_uint8(x_3717, sizeof(void*)*1); -lean_dec(x_3717); -if (x_3718 == 0) -{ -lean_object* x_3719; lean_object* x_3720; lean_object* x_3721; lean_object* x_3722; -x_3719 = lean_ctor_get(x_3716, 1); -lean_inc(x_3719); -lean_dec(x_3716); -x_3720 = lean_box(x_3562); -if (lean_is_scalar(x_3694)) { - x_3721 = lean_alloc_ctor(0, 2, 0); -} else { - x_3721 = x_3694; -} -lean_ctor_set(x_3721, 0, x_3720); -lean_ctor_set(x_3721, 1, x_3693); -if (lean_is_scalar(x_3690)) { - x_3722 = lean_alloc_ctor(1, 1, 0); -} else { - x_3722 = x_3690; -} -lean_ctor_set(x_3722, 0, x_3721); -x_3695 = x_3722; -x_3696 = x_3719; -goto block_3715; -} -else -{ -lean_object* x_3723; lean_object* x_3724; lean_object* x_3725; lean_object* x_3726; lean_object* x_3727; lean_object* x_3728; lean_object* x_3729; -x_3723 = lean_ctor_get(x_3716, 1); -lean_inc(x_3723); -lean_dec(x_3716); -x_3724 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3725 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3724, x_7, x_8, x_3723); -x_3726 = lean_ctor_get(x_3725, 0); -lean_inc(x_3726); -x_3727 = lean_ctor_get(x_3725, 1); -lean_inc(x_3727); -lean_dec(x_3725); -if (lean_is_scalar(x_3694)) { - x_3728 = lean_alloc_ctor(0, 2, 0); -} else { - x_3728 = x_3694; -} -lean_ctor_set(x_3728, 0, x_3726); -lean_ctor_set(x_3728, 1, x_3693); -if (lean_is_scalar(x_3690)) { - x_3729 = lean_alloc_ctor(1, 1, 0); -} else { - x_3729 = x_3690; -} -lean_ctor_set(x_3729, 0, x_3728); -x_3695 = x_3729; -x_3696 = x_3727; -goto block_3715; -} -block_3715: -{ -lean_object* x_3697; lean_object* x_3698; lean_object* x_3699; uint8_t x_3700; -x_3697 = lean_ctor_get(x_3695, 0); -lean_inc(x_3697); -if (lean_is_exclusive(x_3695)) { - lean_ctor_release(x_3695, 0); - x_3698 = x_3695; -} else { - lean_dec_ref(x_3695); - x_3698 = lean_box(0); -} -x_3699 = lean_ctor_get(x_3697, 0); -lean_inc(x_3699); -x_3700 = lean_unbox(x_3699); -lean_dec(x_3699); -if (x_3700 == 0) -{ -lean_object* x_3701; lean_object* x_3702; lean_object* x_3703; lean_object* x_3704; lean_object* x_3705; -lean_dec(x_3692); -lean_dec(x_5); -x_3701 = lean_ctor_get(x_3697, 1); -lean_inc(x_3701); -if (lean_is_exclusive(x_3697)) { - lean_ctor_release(x_3697, 0); - lean_ctor_release(x_3697, 1); - x_3702 = x_3697; -} else { - lean_dec_ref(x_3697); - x_3702 = lean_box(0); -} -x_3703 = lean_box(0); -if (lean_is_scalar(x_3702)) { - x_3704 = lean_alloc_ctor(0, 2, 0); -} else { - x_3704 = x_3702; -} -lean_ctor_set(x_3704, 0, x_3703); -lean_ctor_set(x_3704, 1, x_3701); -if (lean_is_scalar(x_3698)) { - x_3705 = lean_alloc_ctor(1, 1, 0); -} else { - x_3705 = x_3698; -} -lean_ctor_set(x_3705, 0, x_3704); -x_3597 = x_3705; -x_3598 = x_3696; -goto block_3619; -} -else -{ -lean_object* x_3706; lean_object* x_3707; lean_object* x_3708; lean_object* x_3709; lean_object* x_3710; lean_object* x_3711; lean_object* x_3712; lean_object* x_3713; lean_object* x_3714; -lean_dec(x_3698); -x_3706 = lean_ctor_get(x_3697, 1); -lean_inc(x_3706); -lean_dec(x_3697); -x_3707 = l_Lean_Syntax_formatStxAux___main(x_3560, x_3562, x_3621, x_3692); -x_3708 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3708, 0, x_3707); -x_3709 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3710 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3710, 0, x_3709); -lean_ctor_set(x_3710, 1, x_3708); -x_3711 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3712 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3711, x_3710, x_5, x_3706, x_7, x_8, x_3696); -lean_dec(x_5); -x_3713 = lean_ctor_get(x_3712, 0); -lean_inc(x_3713); -x_3714 = lean_ctor_get(x_3712, 1); -lean_inc(x_3714); -lean_dec(x_3712); -x_3597 = x_3713; -x_3598 = x_3714; -goto block_3619; -} -} -} -else -{ -lean_object* x_3730; lean_object* x_3731; lean_object* x_3732; lean_object* x_3733; lean_object* x_3734; lean_object* x_3735; lean_object* x_3736; lean_object* x_3737; lean_object* x_3738; lean_object* x_3739; lean_object* x_3740; lean_object* x_3741; lean_object* x_3742; lean_object* x_3743; lean_object* x_3744; lean_object* x_3745; lean_object* x_3746; lean_object* x_3747; lean_object* x_3748; lean_object* x_3749; lean_object* x_3750; lean_object* x_3751; lean_object* x_3752; lean_object* x_3753; lean_object* x_3754; lean_object* x_3755; lean_object* x_3756; lean_object* x_3757; lean_object* x_3758; lean_object* x_3759; lean_object* x_3760; lean_object* x_3761; lean_object* x_3762; lean_object* x_3763; lean_object* x_3783; lean_object* x_3784; uint8_t x_3785; -x_3730 = lean_ctor_get(x_3680, 0); -lean_inc(x_3730); -lean_dec(x_3680); -x_3731 = lean_ctor_get(x_3679, 0); -lean_inc(x_3731); -x_3732 = lean_ctor_get(x_3679, 1); -lean_inc(x_3732); -x_3733 = lean_ctor_get(x_3679, 2); -lean_inc(x_3733); -if (lean_is_exclusive(x_3679)) { - lean_ctor_release(x_3679, 0); - lean_ctor_release(x_3679, 1); - lean_ctor_release(x_3679, 2); - x_3734 = x_3679; -} else { - lean_dec_ref(x_3679); - x_3734 = lean_box(0); -} -x_3735 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_3732); -if (lean_is_scalar(x_3734)) { - x_3736 = lean_alloc_ctor(0, 3, 0); -} else { - x_3736 = x_3734; -} -lean_ctor_set(x_3736, 0, x_3735); -lean_ctor_set(x_3736, 1, x_3732); -lean_ctor_set(x_3736, 2, x_3733); -x_3737 = l_Lean_Syntax_setHeadInfo(x_3627, x_3736); -x_3738 = lean_ctor_get(x_3730, 0); -lean_inc(x_3738); -x_3739 = lean_ctor_get(x_3730, 1); -lean_inc(x_3739); -x_3740 = lean_ctor_get(x_3730, 2); -lean_inc(x_3740); -if (lean_is_exclusive(x_3730)) { - lean_ctor_release(x_3730, 0); - lean_ctor_release(x_3730, 1); - lean_ctor_release(x_3730, 2); - x_3741 = x_3730; -} else { - lean_dec_ref(x_3730); - x_3741 = lean_box(0); -} -lean_inc(x_3739); -if (lean_is_scalar(x_3741)) { - x_3742 = lean_alloc_ctor(0, 3, 0); -} else { - x_3742 = x_3741; -} -lean_ctor_set(x_3742, 0, x_3738); -lean_ctor_set(x_3742, 1, x_3739); -lean_ctor_set(x_3742, 2, x_3735); -x_3743 = l_Lean_Syntax_setTailInfo(x_3737, x_3742); -x_3744 = lean_apply_1(x_2, x_3743); -x_3745 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_3745, 0, x_3731); -lean_ctor_set(x_3745, 1, x_3732); -lean_ctor_set(x_3745, 2, x_3735); -x_3746 = l_Lean_Syntax_setHeadInfo(x_3744, x_3745); -x_3747 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_3747, 0, x_3735); -lean_ctor_set(x_3747, 1, x_3739); -lean_ctor_set(x_3747, 2, x_3740); -x_3748 = l_Lean_Syntax_setTailInfo(x_3746, x_3747); -x_3749 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3748, x_5, x_3628, x_7, x_8, x_3626); -x_3750 = lean_ctor_get(x_3749, 0); -lean_inc(x_3750); -x_3751 = lean_ctor_get(x_3750, 0); -lean_inc(x_3751); -lean_dec(x_3750); -x_3752 = lean_ctor_get(x_3749, 1); -lean_inc(x_3752); -lean_dec(x_3749); -x_3753 = lean_ctor_get(x_3751, 1); -lean_inc(x_3753); -lean_dec(x_3751); -x_3754 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3753, x_7, x_8, x_3752); -x_3755 = lean_ctor_get(x_3754, 0); -lean_inc(x_3755); -x_3756 = lean_ctor_get(x_3755, 0); -lean_inc(x_3756); -if (lean_is_exclusive(x_3755)) { - lean_ctor_release(x_3755, 0); - x_3757 = x_3755; -} else { - lean_dec_ref(x_3755); - x_3757 = lean_box(0); -} -x_3758 = lean_ctor_get(x_3754, 1); -lean_inc(x_3758); -lean_dec(x_3754); -x_3759 = lean_ctor_get(x_3756, 0); -lean_inc(x_3759); -x_3760 = lean_ctor_get(x_3756, 1); -lean_inc(x_3760); -if (lean_is_exclusive(x_3756)) { - lean_ctor_release(x_3756, 0); - lean_ctor_release(x_3756, 1); - x_3761 = x_3756; -} else { - lean_dec_ref(x_3756); - x_3761 = lean_box(0); -} -x_3783 = l_Lean_Core_getTraceState___rarg(x_8, x_3758); -x_3784 = lean_ctor_get(x_3783, 0); -lean_inc(x_3784); -x_3785 = lean_ctor_get_uint8(x_3784, sizeof(void*)*1); -lean_dec(x_3784); -if (x_3785 == 0) -{ -lean_object* x_3786; lean_object* x_3787; lean_object* x_3788; lean_object* x_3789; -x_3786 = lean_ctor_get(x_3783, 1); -lean_inc(x_3786); -lean_dec(x_3783); -x_3787 = lean_box(x_3562); -if (lean_is_scalar(x_3761)) { - x_3788 = lean_alloc_ctor(0, 2, 0); -} else { - x_3788 = x_3761; -} -lean_ctor_set(x_3788, 0, x_3787); -lean_ctor_set(x_3788, 1, x_3760); -if (lean_is_scalar(x_3757)) { - x_3789 = lean_alloc_ctor(1, 1, 0); -} else { - x_3789 = x_3757; -} -lean_ctor_set(x_3789, 0, x_3788); -x_3762 = x_3789; -x_3763 = x_3786; -goto block_3782; -} -else -{ -lean_object* x_3790; lean_object* x_3791; lean_object* x_3792; lean_object* x_3793; lean_object* x_3794; lean_object* x_3795; lean_object* x_3796; -x_3790 = lean_ctor_get(x_3783, 1); -lean_inc(x_3790); -lean_dec(x_3783); -x_3791 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3792 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3791, x_7, x_8, x_3790); -x_3793 = lean_ctor_get(x_3792, 0); -lean_inc(x_3793); -x_3794 = lean_ctor_get(x_3792, 1); -lean_inc(x_3794); -lean_dec(x_3792); -if (lean_is_scalar(x_3761)) { - x_3795 = lean_alloc_ctor(0, 2, 0); -} else { - x_3795 = x_3761; -} -lean_ctor_set(x_3795, 0, x_3793); -lean_ctor_set(x_3795, 1, x_3760); -if (lean_is_scalar(x_3757)) { - x_3796 = lean_alloc_ctor(1, 1, 0); -} else { - x_3796 = x_3757; -} -lean_ctor_set(x_3796, 0, x_3795); -x_3762 = x_3796; -x_3763 = x_3794; -goto block_3782; -} -block_3782: -{ -lean_object* x_3764; lean_object* x_3765; lean_object* x_3766; uint8_t x_3767; -x_3764 = lean_ctor_get(x_3762, 0); -lean_inc(x_3764); -if (lean_is_exclusive(x_3762)) { - lean_ctor_release(x_3762, 0); - x_3765 = x_3762; -} else { - lean_dec_ref(x_3762); - x_3765 = lean_box(0); -} -x_3766 = lean_ctor_get(x_3764, 0); -lean_inc(x_3766); -x_3767 = lean_unbox(x_3766); -lean_dec(x_3766); -if (x_3767 == 0) -{ -lean_object* x_3768; lean_object* x_3769; lean_object* x_3770; lean_object* x_3771; lean_object* x_3772; -lean_dec(x_3759); -lean_dec(x_5); -x_3768 = lean_ctor_get(x_3764, 1); -lean_inc(x_3768); -if (lean_is_exclusive(x_3764)) { - lean_ctor_release(x_3764, 0); - lean_ctor_release(x_3764, 1); - x_3769 = x_3764; -} else { - lean_dec_ref(x_3764); - x_3769 = lean_box(0); -} -x_3770 = lean_box(0); -if (lean_is_scalar(x_3769)) { - x_3771 = lean_alloc_ctor(0, 2, 0); -} else { - x_3771 = x_3769; -} -lean_ctor_set(x_3771, 0, x_3770); -lean_ctor_set(x_3771, 1, x_3768); -if (lean_is_scalar(x_3765)) { - x_3772 = lean_alloc_ctor(1, 1, 0); -} else { - x_3772 = x_3765; -} -lean_ctor_set(x_3772, 0, x_3771); -x_3597 = x_3772; -x_3598 = x_3763; -goto block_3619; -} -else -{ -lean_object* x_3773; lean_object* x_3774; lean_object* x_3775; lean_object* x_3776; lean_object* x_3777; lean_object* x_3778; lean_object* x_3779; lean_object* x_3780; lean_object* x_3781; -lean_dec(x_3765); -x_3773 = lean_ctor_get(x_3764, 1); -lean_inc(x_3773); -lean_dec(x_3764); -x_3774 = l_Lean_Syntax_formatStxAux___main(x_3560, x_3562, x_3621, x_3759); -x_3775 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3775, 0, x_3774); -x_3776 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3777 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3777, 0, x_3776); -lean_ctor_set(x_3777, 1, x_3775); -x_3778 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3779 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3778, x_3777, x_5, x_3773, x_7, x_8, x_3763); -lean_dec(x_5); -x_3780 = lean_ctor_get(x_3779, 0); -lean_inc(x_3780); -x_3781 = lean_ctor_get(x_3779, 1); -lean_inc(x_3781); -lean_dec(x_3779); -x_3597 = x_3780; -x_3598 = x_3781; -goto block_3619; -} -} -} -} -} -else -{ -lean_object* x_3797; lean_object* x_3798; lean_object* x_3799; lean_object* x_3800; lean_object* x_3801; lean_object* x_3802; lean_object* x_3803; lean_object* x_3804; lean_object* x_3805; lean_object* x_3806; lean_object* x_3807; lean_object* x_3808; -x_3797 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_3595, x_7, x_8, x_3592); -x_3798 = lean_ctor_get(x_3797, 0); -lean_inc(x_3798); -x_3799 = lean_ctor_get(x_3798, 0); -lean_inc(x_3799); -lean_dec(x_3798); -x_3800 = lean_ctor_get(x_3797, 1); -lean_inc(x_3800); -lean_dec(x_3797); -x_3801 = lean_ctor_get(x_3799, 1); -lean_inc(x_3801); -lean_dec(x_3799); -x_3802 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3801, x_7, x_8, x_3800); -x_3803 = lean_ctor_get(x_3802, 0); -lean_inc(x_3803); -x_3804 = lean_ctor_get(x_3803, 0); -lean_inc(x_3804); -lean_dec(x_3803); -x_3805 = lean_ctor_get(x_3802, 1); -lean_inc(x_3805); -lean_dec(x_3802); -x_3806 = lean_ctor_get(x_3804, 0); -lean_inc(x_3806); -x_3807 = lean_ctor_get(x_3804, 1); -lean_inc(x_3807); -lean_dec(x_3804); -x_3808 = l_Lean_Syntax_getHeadInfo___main(x_3806); -if (lean_obj_tag(x_3808) == 0) -{ -lean_object* x_3809; lean_object* x_3810; lean_object* x_3811; lean_object* x_3812; lean_object* x_3813; lean_object* x_3814; lean_object* x_3815; lean_object* x_3816; lean_object* x_3817; lean_object* x_3818; lean_object* x_3819; lean_object* x_3820; lean_object* x_3821; lean_object* x_3822; lean_object* x_3823; lean_object* x_3824; lean_object* x_3844; lean_object* x_3845; uint8_t x_3846; -x_3809 = lean_apply_1(x_2, x_3806); -x_3810 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3809, x_5, x_3807, x_7, x_8, x_3805); -x_3811 = lean_ctor_get(x_3810, 0); -lean_inc(x_3811); -x_3812 = lean_ctor_get(x_3811, 0); -lean_inc(x_3812); -lean_dec(x_3811); -x_3813 = lean_ctor_get(x_3810, 1); -lean_inc(x_3813); -lean_dec(x_3810); -x_3814 = lean_ctor_get(x_3812, 1); -lean_inc(x_3814); -lean_dec(x_3812); -x_3815 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3814, x_7, x_8, x_3813); -x_3816 = lean_ctor_get(x_3815, 0); -lean_inc(x_3816); -x_3817 = lean_ctor_get(x_3816, 0); -lean_inc(x_3817); -if (lean_is_exclusive(x_3816)) { - lean_ctor_release(x_3816, 0); - x_3818 = x_3816; -} else { - lean_dec_ref(x_3816); - x_3818 = lean_box(0); -} -x_3819 = lean_ctor_get(x_3815, 1); -lean_inc(x_3819); -lean_dec(x_3815); -x_3820 = lean_ctor_get(x_3817, 0); -lean_inc(x_3820); -x_3821 = lean_ctor_get(x_3817, 1); -lean_inc(x_3821); -if (lean_is_exclusive(x_3817)) { - lean_ctor_release(x_3817, 0); - lean_ctor_release(x_3817, 1); - x_3822 = x_3817; -} else { - lean_dec_ref(x_3817); - x_3822 = lean_box(0); -} -x_3844 = l_Lean_Core_getTraceState___rarg(x_8, x_3819); -x_3845 = lean_ctor_get(x_3844, 0); -lean_inc(x_3845); -x_3846 = lean_ctor_get_uint8(x_3845, sizeof(void*)*1); -lean_dec(x_3845); -if (x_3846 == 0) -{ -lean_object* x_3847; lean_object* x_3848; lean_object* x_3849; lean_object* x_3850; -x_3847 = lean_ctor_get(x_3844, 1); -lean_inc(x_3847); -lean_dec(x_3844); -x_3848 = lean_box(x_3562); -if (lean_is_scalar(x_3822)) { - x_3849 = lean_alloc_ctor(0, 2, 0); -} else { - x_3849 = x_3822; -} -lean_ctor_set(x_3849, 0, x_3848); -lean_ctor_set(x_3849, 1, x_3821); -if (lean_is_scalar(x_3818)) { - x_3850 = lean_alloc_ctor(1, 1, 0); -} else { - x_3850 = x_3818; -} -lean_ctor_set(x_3850, 0, x_3849); -x_3823 = x_3850; -x_3824 = x_3847; -goto block_3843; -} -else -{ -lean_object* x_3851; lean_object* x_3852; lean_object* x_3853; lean_object* x_3854; lean_object* x_3855; lean_object* x_3856; lean_object* x_3857; -x_3851 = lean_ctor_get(x_3844, 1); -lean_inc(x_3851); -lean_dec(x_3844); -x_3852 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3853 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3852, x_7, x_8, x_3851); -x_3854 = lean_ctor_get(x_3853, 0); -lean_inc(x_3854); -x_3855 = lean_ctor_get(x_3853, 1); -lean_inc(x_3855); -lean_dec(x_3853); -if (lean_is_scalar(x_3822)) { - x_3856 = lean_alloc_ctor(0, 2, 0); -} else { - x_3856 = x_3822; -} -lean_ctor_set(x_3856, 0, x_3854); -lean_ctor_set(x_3856, 1, x_3821); -if (lean_is_scalar(x_3818)) { - x_3857 = lean_alloc_ctor(1, 1, 0); -} else { - x_3857 = x_3818; -} -lean_ctor_set(x_3857, 0, x_3856); -x_3823 = x_3857; -x_3824 = x_3855; -goto block_3843; -} -block_3843: -{ -lean_object* x_3825; lean_object* x_3826; lean_object* x_3827; uint8_t x_3828; -x_3825 = lean_ctor_get(x_3823, 0); -lean_inc(x_3825); -if (lean_is_exclusive(x_3823)) { - lean_ctor_release(x_3823, 0); - x_3826 = x_3823; -} else { - lean_dec_ref(x_3823); - x_3826 = lean_box(0); -} -x_3827 = lean_ctor_get(x_3825, 0); -lean_inc(x_3827); -x_3828 = lean_unbox(x_3827); -lean_dec(x_3827); -if (x_3828 == 0) -{ -lean_object* x_3829; lean_object* x_3830; lean_object* x_3831; lean_object* x_3832; lean_object* x_3833; -lean_dec(x_3820); -lean_dec(x_5); -x_3829 = lean_ctor_get(x_3825, 1); -lean_inc(x_3829); -if (lean_is_exclusive(x_3825)) { - lean_ctor_release(x_3825, 0); - lean_ctor_release(x_3825, 1); - x_3830 = x_3825; -} else { - lean_dec_ref(x_3825); - x_3830 = lean_box(0); -} -x_3831 = lean_box(0); -if (lean_is_scalar(x_3830)) { - x_3832 = lean_alloc_ctor(0, 2, 0); -} else { - x_3832 = x_3830; -} -lean_ctor_set(x_3832, 0, x_3831); -lean_ctor_set(x_3832, 1, x_3829); -if (lean_is_scalar(x_3826)) { - x_3833 = lean_alloc_ctor(1, 1, 0); -} else { - x_3833 = x_3826; -} -lean_ctor_set(x_3833, 0, x_3832); -x_3597 = x_3833; -x_3598 = x_3824; -goto block_3619; -} -else -{ -lean_object* x_3834; lean_object* x_3835; lean_object* x_3836; lean_object* x_3837; lean_object* x_3838; lean_object* x_3839; lean_object* x_3840; lean_object* x_3841; lean_object* x_3842; -lean_dec(x_3826); -x_3834 = lean_ctor_get(x_3825, 1); -lean_inc(x_3834); -lean_dec(x_3825); -x_3835 = l_Lean_Syntax_formatStxAux___main(x_3560, x_3562, x_3621, x_3820); -x_3836 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3836, 0, x_3835); -x_3837 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3838 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3838, 0, x_3837); -lean_ctor_set(x_3838, 1, x_3836); -x_3839 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3840 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3839, x_3838, x_5, x_3834, x_7, x_8, x_3824); -lean_dec(x_5); -x_3841 = lean_ctor_get(x_3840, 0); -lean_inc(x_3841); -x_3842 = lean_ctor_get(x_3840, 1); -lean_inc(x_3842); -lean_dec(x_3840); -x_3597 = x_3841; -x_3598 = x_3842; -goto block_3619; -} -} -} -else -{ -lean_object* x_3858; lean_object* x_3859; -x_3858 = lean_ctor_get(x_3808, 0); -lean_inc(x_3858); -lean_dec(x_3808); -x_3859 = l_Lean_Syntax_getTailInfo___main(x_3806); -if (lean_obj_tag(x_3859) == 0) -{ -lean_object* x_3860; lean_object* x_3861; lean_object* x_3862; lean_object* x_3863; lean_object* x_3864; lean_object* x_3865; lean_object* x_3866; lean_object* x_3867; lean_object* x_3868; lean_object* x_3869; lean_object* x_3870; lean_object* x_3871; lean_object* x_3872; lean_object* x_3873; lean_object* x_3874; lean_object* x_3875; lean_object* x_3895; lean_object* x_3896; uint8_t x_3897; -lean_dec(x_3858); -x_3860 = lean_apply_1(x_2, x_3806); -x_3861 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3860, x_5, x_3807, x_7, x_8, x_3805); -x_3862 = lean_ctor_get(x_3861, 0); -lean_inc(x_3862); -x_3863 = lean_ctor_get(x_3862, 0); -lean_inc(x_3863); -lean_dec(x_3862); -x_3864 = lean_ctor_get(x_3861, 1); -lean_inc(x_3864); -lean_dec(x_3861); -x_3865 = lean_ctor_get(x_3863, 1); -lean_inc(x_3865); -lean_dec(x_3863); -x_3866 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3865, x_7, x_8, x_3864); -x_3867 = lean_ctor_get(x_3866, 0); -lean_inc(x_3867); -x_3868 = lean_ctor_get(x_3867, 0); -lean_inc(x_3868); -if (lean_is_exclusive(x_3867)) { - lean_ctor_release(x_3867, 0); - x_3869 = x_3867; -} else { - lean_dec_ref(x_3867); - x_3869 = lean_box(0); -} -x_3870 = lean_ctor_get(x_3866, 1); -lean_inc(x_3870); -lean_dec(x_3866); -x_3871 = lean_ctor_get(x_3868, 0); -lean_inc(x_3871); -x_3872 = lean_ctor_get(x_3868, 1); -lean_inc(x_3872); -if (lean_is_exclusive(x_3868)) { - lean_ctor_release(x_3868, 0); - lean_ctor_release(x_3868, 1); - x_3873 = x_3868; -} else { - lean_dec_ref(x_3868); - x_3873 = lean_box(0); -} -x_3895 = l_Lean_Core_getTraceState___rarg(x_8, x_3870); -x_3896 = lean_ctor_get(x_3895, 0); -lean_inc(x_3896); -x_3897 = lean_ctor_get_uint8(x_3896, sizeof(void*)*1); -lean_dec(x_3896); -if (x_3897 == 0) -{ -lean_object* x_3898; lean_object* x_3899; lean_object* x_3900; lean_object* x_3901; -x_3898 = lean_ctor_get(x_3895, 1); -lean_inc(x_3898); -lean_dec(x_3895); -x_3899 = lean_box(x_3562); -if (lean_is_scalar(x_3873)) { - x_3900 = lean_alloc_ctor(0, 2, 0); -} else { - x_3900 = x_3873; -} -lean_ctor_set(x_3900, 0, x_3899); -lean_ctor_set(x_3900, 1, x_3872); -if (lean_is_scalar(x_3869)) { - x_3901 = lean_alloc_ctor(1, 1, 0); -} else { - x_3901 = x_3869; -} -lean_ctor_set(x_3901, 0, x_3900); -x_3874 = x_3901; -x_3875 = x_3898; -goto block_3894; -} -else -{ -lean_object* x_3902; lean_object* x_3903; lean_object* x_3904; lean_object* x_3905; lean_object* x_3906; lean_object* x_3907; lean_object* x_3908; -x_3902 = lean_ctor_get(x_3895, 1); -lean_inc(x_3902); -lean_dec(x_3895); -x_3903 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3904 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3903, x_7, x_8, x_3902); -x_3905 = lean_ctor_get(x_3904, 0); -lean_inc(x_3905); -x_3906 = lean_ctor_get(x_3904, 1); -lean_inc(x_3906); -lean_dec(x_3904); -if (lean_is_scalar(x_3873)) { - x_3907 = lean_alloc_ctor(0, 2, 0); -} else { - x_3907 = x_3873; -} -lean_ctor_set(x_3907, 0, x_3905); -lean_ctor_set(x_3907, 1, x_3872); -if (lean_is_scalar(x_3869)) { - x_3908 = lean_alloc_ctor(1, 1, 0); -} else { - x_3908 = x_3869; -} -lean_ctor_set(x_3908, 0, x_3907); -x_3874 = x_3908; -x_3875 = x_3906; -goto block_3894; -} -block_3894: -{ -lean_object* x_3876; lean_object* x_3877; lean_object* x_3878; uint8_t x_3879; -x_3876 = lean_ctor_get(x_3874, 0); -lean_inc(x_3876); -if (lean_is_exclusive(x_3874)) { - lean_ctor_release(x_3874, 0); - x_3877 = x_3874; -} else { - lean_dec_ref(x_3874); - x_3877 = lean_box(0); -} -x_3878 = lean_ctor_get(x_3876, 0); -lean_inc(x_3878); -x_3879 = lean_unbox(x_3878); -lean_dec(x_3878); -if (x_3879 == 0) -{ -lean_object* x_3880; lean_object* x_3881; lean_object* x_3882; lean_object* x_3883; lean_object* x_3884; -lean_dec(x_3871); -lean_dec(x_5); -x_3880 = lean_ctor_get(x_3876, 1); -lean_inc(x_3880); -if (lean_is_exclusive(x_3876)) { - lean_ctor_release(x_3876, 0); - lean_ctor_release(x_3876, 1); - x_3881 = x_3876; -} else { - lean_dec_ref(x_3876); - x_3881 = lean_box(0); -} -x_3882 = lean_box(0); -if (lean_is_scalar(x_3881)) { - x_3883 = lean_alloc_ctor(0, 2, 0); -} else { - x_3883 = x_3881; -} -lean_ctor_set(x_3883, 0, x_3882); -lean_ctor_set(x_3883, 1, x_3880); -if (lean_is_scalar(x_3877)) { - x_3884 = lean_alloc_ctor(1, 1, 0); -} else { - x_3884 = x_3877; -} -lean_ctor_set(x_3884, 0, x_3883); -x_3597 = x_3884; -x_3598 = x_3875; -goto block_3619; -} -else -{ -lean_object* x_3885; lean_object* x_3886; lean_object* x_3887; lean_object* x_3888; lean_object* x_3889; lean_object* x_3890; lean_object* x_3891; lean_object* x_3892; lean_object* x_3893; -lean_dec(x_3877); -x_3885 = lean_ctor_get(x_3876, 1); -lean_inc(x_3885); -lean_dec(x_3876); -x_3886 = l_Lean_Syntax_formatStxAux___main(x_3560, x_3562, x_3621, x_3871); -x_3887 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3887, 0, x_3886); -x_3888 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3889 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3889, 0, x_3888); -lean_ctor_set(x_3889, 1, x_3887); -x_3890 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3891 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3890, x_3889, x_5, x_3885, x_7, x_8, x_3875); -lean_dec(x_5); -x_3892 = lean_ctor_get(x_3891, 0); -lean_inc(x_3892); -x_3893 = lean_ctor_get(x_3891, 1); -lean_inc(x_3893); -lean_dec(x_3891); -x_3597 = x_3892; -x_3598 = x_3893; -goto block_3619; -} -} -} -else -{ -lean_object* x_3909; lean_object* x_3910; lean_object* x_3911; lean_object* x_3912; lean_object* x_3913; lean_object* x_3914; lean_object* x_3915; lean_object* x_3916; lean_object* x_3917; lean_object* x_3918; lean_object* x_3919; lean_object* x_3920; lean_object* x_3921; lean_object* x_3922; lean_object* x_3923; lean_object* x_3924; lean_object* x_3925; lean_object* x_3926; lean_object* x_3927; lean_object* x_3928; lean_object* x_3929; lean_object* x_3930; lean_object* x_3931; lean_object* x_3932; lean_object* x_3933; lean_object* x_3934; lean_object* x_3935; lean_object* x_3936; lean_object* x_3937; lean_object* x_3938; lean_object* x_3939; lean_object* x_3940; lean_object* x_3941; lean_object* x_3942; lean_object* x_3962; lean_object* x_3963; uint8_t x_3964; -x_3909 = lean_ctor_get(x_3859, 0); -lean_inc(x_3909); -lean_dec(x_3859); -x_3910 = lean_ctor_get(x_3858, 0); -lean_inc(x_3910); -x_3911 = lean_ctor_get(x_3858, 1); -lean_inc(x_3911); -x_3912 = lean_ctor_get(x_3858, 2); -lean_inc(x_3912); -if (lean_is_exclusive(x_3858)) { - lean_ctor_release(x_3858, 0); - lean_ctor_release(x_3858, 1); - lean_ctor_release(x_3858, 2); - x_3913 = x_3858; -} else { - lean_dec_ref(x_3858); - x_3913 = lean_box(0); -} -x_3914 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_3911); -if (lean_is_scalar(x_3913)) { - x_3915 = lean_alloc_ctor(0, 3, 0); -} else { - x_3915 = x_3913; -} -lean_ctor_set(x_3915, 0, x_3914); -lean_ctor_set(x_3915, 1, x_3911); -lean_ctor_set(x_3915, 2, x_3912); -x_3916 = l_Lean_Syntax_setHeadInfo(x_3806, x_3915); -x_3917 = lean_ctor_get(x_3909, 0); -lean_inc(x_3917); -x_3918 = lean_ctor_get(x_3909, 1); -lean_inc(x_3918); -x_3919 = lean_ctor_get(x_3909, 2); -lean_inc(x_3919); -if (lean_is_exclusive(x_3909)) { - lean_ctor_release(x_3909, 0); - lean_ctor_release(x_3909, 1); - lean_ctor_release(x_3909, 2); - x_3920 = x_3909; -} else { - lean_dec_ref(x_3909); - x_3920 = lean_box(0); -} -lean_inc(x_3918); -if (lean_is_scalar(x_3920)) { - x_3921 = lean_alloc_ctor(0, 3, 0); -} else { - x_3921 = x_3920; -} -lean_ctor_set(x_3921, 0, x_3917); -lean_ctor_set(x_3921, 1, x_3918); -lean_ctor_set(x_3921, 2, x_3914); -x_3922 = l_Lean_Syntax_setTailInfo(x_3916, x_3921); -x_3923 = lean_apply_1(x_2, x_3922); -x_3924 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_3924, 0, x_3910); -lean_ctor_set(x_3924, 1, x_3911); -lean_ctor_set(x_3924, 2, x_3914); -x_3925 = l_Lean_Syntax_setHeadInfo(x_3923, x_3924); -x_3926 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_3926, 0, x_3914); -lean_ctor_set(x_3926, 1, x_3918); -lean_ctor_set(x_3926, 2, x_3919); -x_3927 = l_Lean_Syntax_setTailInfo(x_3925, x_3926); -x_3928 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_3927, x_5, x_3807, x_7, x_8, x_3805); -x_3929 = lean_ctor_get(x_3928, 0); -lean_inc(x_3929); -x_3930 = lean_ctor_get(x_3929, 0); -lean_inc(x_3930); -lean_dec(x_3929); -x_3931 = lean_ctor_get(x_3928, 1); -lean_inc(x_3931); -lean_dec(x_3928); -x_3932 = lean_ctor_get(x_3930, 1); -lean_inc(x_3932); -lean_dec(x_3930); -x_3933 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3932, x_7, x_8, x_3931); -x_3934 = lean_ctor_get(x_3933, 0); -lean_inc(x_3934); -x_3935 = lean_ctor_get(x_3934, 0); -lean_inc(x_3935); -if (lean_is_exclusive(x_3934)) { - lean_ctor_release(x_3934, 0); - x_3936 = x_3934; -} else { - lean_dec_ref(x_3934); - x_3936 = lean_box(0); -} -x_3937 = lean_ctor_get(x_3933, 1); -lean_inc(x_3937); -lean_dec(x_3933); -x_3938 = lean_ctor_get(x_3935, 0); -lean_inc(x_3938); -x_3939 = lean_ctor_get(x_3935, 1); -lean_inc(x_3939); -if (lean_is_exclusive(x_3935)) { - lean_ctor_release(x_3935, 0); - lean_ctor_release(x_3935, 1); - x_3940 = x_3935; -} else { - lean_dec_ref(x_3935); - x_3940 = lean_box(0); -} -x_3962 = l_Lean_Core_getTraceState___rarg(x_8, x_3937); -x_3963 = lean_ctor_get(x_3962, 0); -lean_inc(x_3963); -x_3964 = lean_ctor_get_uint8(x_3963, sizeof(void*)*1); -lean_dec(x_3963); -if (x_3964 == 0) -{ -lean_object* x_3965; lean_object* x_3966; lean_object* x_3967; lean_object* x_3968; -x_3965 = lean_ctor_get(x_3962, 1); -lean_inc(x_3965); -lean_dec(x_3962); -x_3966 = lean_box(x_3562); -if (lean_is_scalar(x_3940)) { - x_3967 = lean_alloc_ctor(0, 2, 0); -} else { - x_3967 = x_3940; -} -lean_ctor_set(x_3967, 0, x_3966); -lean_ctor_set(x_3967, 1, x_3939); -if (lean_is_scalar(x_3936)) { - x_3968 = lean_alloc_ctor(1, 1, 0); -} else { - x_3968 = x_3936; -} -lean_ctor_set(x_3968, 0, x_3967); -x_3941 = x_3968; -x_3942 = x_3965; -goto block_3961; -} -else -{ -lean_object* x_3969; lean_object* x_3970; lean_object* x_3971; lean_object* x_3972; lean_object* x_3973; lean_object* x_3974; lean_object* x_3975; -x_3969 = lean_ctor_get(x_3962, 1); -lean_inc(x_3969); -lean_dec(x_3962); -x_3970 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3971 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_3970, x_7, x_8, x_3969); -x_3972 = lean_ctor_get(x_3971, 0); -lean_inc(x_3972); -x_3973 = lean_ctor_get(x_3971, 1); -lean_inc(x_3973); -lean_dec(x_3971); -if (lean_is_scalar(x_3940)) { - x_3974 = lean_alloc_ctor(0, 2, 0); -} else { - x_3974 = x_3940; -} -lean_ctor_set(x_3974, 0, x_3972); -lean_ctor_set(x_3974, 1, x_3939); -if (lean_is_scalar(x_3936)) { - x_3975 = lean_alloc_ctor(1, 1, 0); -} else { - x_3975 = x_3936; -} -lean_ctor_set(x_3975, 0, x_3974); -x_3941 = x_3975; -x_3942 = x_3973; -goto block_3961; -} -block_3961: -{ -lean_object* x_3943; lean_object* x_3944; lean_object* x_3945; uint8_t x_3946; -x_3943 = lean_ctor_get(x_3941, 0); -lean_inc(x_3943); -if (lean_is_exclusive(x_3941)) { - lean_ctor_release(x_3941, 0); - x_3944 = x_3941; -} else { - lean_dec_ref(x_3941); - x_3944 = lean_box(0); -} -x_3945 = lean_ctor_get(x_3943, 0); -lean_inc(x_3945); -x_3946 = lean_unbox(x_3945); -lean_dec(x_3945); -if (x_3946 == 0) -{ -lean_object* x_3947; lean_object* x_3948; lean_object* x_3949; lean_object* x_3950; lean_object* x_3951; -lean_dec(x_3938); -lean_dec(x_5); -x_3947 = lean_ctor_get(x_3943, 1); -lean_inc(x_3947); -if (lean_is_exclusive(x_3943)) { - lean_ctor_release(x_3943, 0); - lean_ctor_release(x_3943, 1); - x_3948 = x_3943; -} else { - lean_dec_ref(x_3943); - x_3948 = lean_box(0); -} -x_3949 = lean_box(0); -if (lean_is_scalar(x_3948)) { - x_3950 = lean_alloc_ctor(0, 2, 0); -} else { - x_3950 = x_3948; -} -lean_ctor_set(x_3950, 0, x_3949); -lean_ctor_set(x_3950, 1, x_3947); -if (lean_is_scalar(x_3944)) { - x_3951 = lean_alloc_ctor(1, 1, 0); -} else { - x_3951 = x_3944; -} -lean_ctor_set(x_3951, 0, x_3950); -x_3597 = x_3951; -x_3598 = x_3942; -goto block_3619; -} -else -{ -lean_object* x_3952; lean_object* x_3953; lean_object* x_3954; lean_object* x_3955; lean_object* x_3956; lean_object* x_3957; lean_object* x_3958; lean_object* x_3959; lean_object* x_3960; -lean_dec(x_3944); -x_3952 = lean_ctor_get(x_3943, 1); -lean_inc(x_3952); -lean_dec(x_3943); -x_3953 = l_Lean_Syntax_formatStxAux___main(x_3560, x_3562, x_3621, x_3938); -x_3954 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_3954, 0, x_3953); -x_3955 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_3956 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3956, 0, x_3955); -lean_ctor_set(x_3956, 1, x_3954); -x_3957 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_3958 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_3957, x_3956, x_5, x_3952, x_7, x_8, x_3942); -lean_dec(x_5); -x_3959 = lean_ctor_get(x_3958, 0); -lean_inc(x_3959); -x_3960 = lean_ctor_get(x_3958, 1); -lean_inc(x_3960); -lean_dec(x_3958); -x_3597 = x_3959; -x_3598 = x_3960; -goto block_3619; -} -} -} -} -} -} -} -block_4043: -{ -lean_object* x_4005; lean_object* x_4006; lean_object* x_4007; uint8_t x_4008; -x_4005 = lean_ctor_get(x_4003, 0); -lean_inc(x_4005); -if (lean_is_exclusive(x_4003)) { - lean_ctor_release(x_4003, 0); - x_4006 = x_4003; -} else { - lean_dec_ref(x_4003); - x_4006 = lean_box(0); -} -x_4007 = lean_ctor_get(x_4005, 0); -lean_inc(x_4007); -x_4008 = lean_unbox(x_4007); -lean_dec(x_4007); -if (x_4008 == 0) -{ -lean_object* x_4009; lean_object* x_4010; lean_object* x_4011; lean_object* x_4012; lean_object* x_4013; -lean_dec(x_3580); -x_4009 = lean_ctor_get(x_4005, 1); -lean_inc(x_4009); -if (lean_is_exclusive(x_4005)) { - lean_ctor_release(x_4005, 0); - lean_ctor_release(x_4005, 1); - x_4010 = x_4005; -} else { - lean_dec_ref(x_4005); - x_4010 = lean_box(0); -} -x_4011 = lean_box(0); -if (lean_is_scalar(x_4010)) { - x_4012 = lean_alloc_ctor(0, 2, 0); -} else { - x_4012 = x_4010; -} -lean_ctor_set(x_4012, 0, x_4011); -lean_ctor_set(x_4012, 1, x_4009); -if (lean_is_scalar(x_4006)) { - x_4013 = lean_alloc_ctor(1, 1, 0); -} else { - x_4013 = x_4006; -} -lean_ctor_set(x_4013, 0, x_4012); -x_3591 = x_4013; -x_3592 = x_4004; -goto block_4002; -} -else -{ -lean_object* x_4014; lean_object* x_4015; lean_object* x_4016; lean_object* x_4017; lean_object* x_4018; lean_object* x_4019; lean_object* x_4020; lean_object* x_4021; lean_object* x_4022; lean_object* x_4023; lean_object* x_4024; lean_object* x_4025; lean_object* x_4026; lean_object* x_4027; lean_object* x_4028; lean_object* x_4029; lean_object* x_4030; lean_object* x_4031; lean_object* x_4032; lean_object* x_4033; lean_object* x_4034; lean_object* x_4035; lean_object* x_4036; lean_object* x_4037; lean_object* x_4038; lean_object* x_4039; lean_object* x_4040; lean_object* x_4041; lean_object* x_4042; -lean_dec(x_4006); -x_4014 = lean_ctor_get(x_4005, 1); -lean_inc(x_4014); -if (lean_is_exclusive(x_4005)) { - lean_ctor_release(x_4005, 0); - lean_ctor_release(x_4005, 1); - x_4015 = x_4005; -} else { - lean_dec_ref(x_4005); - x_4015 = lean_box(0); -} -lean_inc(x_3); -x_4016 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); -x_4017 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4017, 0, x_4016); -x_4018 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; -x_4019 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4019, 0, x_4018); -lean_ctor_set(x_4019, 1, x_4017); -x_4020 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22; -x_4021 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4021, 0, x_4019); -lean_ctor_set(x_4021, 1, x_4020); -lean_inc(x_3590); -x_4022 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3590); -x_4023 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4023, 0, x_4022); -x_4024 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4024, 0, x_4021); -lean_ctor_set(x_4024, 1, x_4023); -x_4025 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; -x_4026 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4026, 0, x_4024); -lean_ctor_set(x_4026, 1, x_4025); -lean_inc(x_1); -lean_inc(x_3589); -if (lean_is_scalar(x_4015)) { - x_4027 = lean_alloc_ctor(0, 2, 0); -} else { - x_4027 = x_4015; -} -lean_ctor_set(x_4027, 0, x_3589); -lean_ctor_set(x_4027, 1, x_1); -x_4028 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_4027); -x_4029 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4029, 0, x_4028); -x_4030 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4030, 0, x_4026); -lean_ctor_set(x_4030, 1, x_4029); -x_4031 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25; -x_4032 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4032, 0, x_4030); -lean_ctor_set(x_4032, 1, x_4031); -x_4033 = lean_ctor_get(x_3504, 1); -lean_inc(x_4033); -x_4034 = lean_ctor_get(x_3504, 2); -lean_inc(x_4034); -if (lean_is_scalar(x_3580)) { - x_4035 = lean_alloc_ctor(0, 2, 0); -} else { - x_4035 = x_3580; -} -lean_ctor_set(x_4035, 0, x_4033); -lean_ctor_set(x_4035, 1, x_4034); -x_4036 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_4035); -x_4037 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4037, 0, x_4036); -x_4038 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4038, 0, x_4032); -lean_ctor_set(x_4038, 1, x_4037); -x_4039 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4040 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4039, x_4038, x_5, x_4014, x_7, x_8, x_4004); -x_4041 = lean_ctor_get(x_4040, 0); -lean_inc(x_4041); -x_4042 = lean_ctor_get(x_4040, 1); -lean_inc(x_4042); -lean_dec(x_4040); -x_3591 = x_4041; -x_3592 = x_4042; -goto block_4002; -} -} -} -} -} -else -{ -lean_object* x_4058; lean_object* x_4059; lean_object* x_4060; lean_object* x_4061; -lean_dec(x_3568); -lean_dec(x_3504); -lean_dec(x_3503); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_4058 = lean_ctor_get(x_3569, 0); -lean_inc(x_4058); -x_4059 = lean_ctor_get(x_3569, 1); -lean_inc(x_4059); -if (lean_is_exclusive(x_3569)) { - lean_ctor_release(x_3569, 0); - lean_ctor_release(x_3569, 1); - x_4060 = x_3569; -} else { - lean_dec_ref(x_3569); - x_4060 = lean_box(0); -} -if (lean_is_scalar(x_4060)) { - x_4061 = lean_alloc_ctor(1, 2, 0); -} else { - x_4061 = x_4060; -} -lean_ctor_set(x_4061, 0, x_4058); -lean_ctor_set(x_4061, 1, x_4059); -return x_4061; -} -} -block_4123: -{ -lean_object* x_4065; lean_object* x_4066; lean_object* x_4067; uint8_t x_4068; -x_4065 = lean_ctor_get(x_4063, 0); -lean_inc(x_4065); -if (lean_is_exclusive(x_4063)) { - lean_ctor_release(x_4063, 0); - x_4066 = x_4063; -} else { - lean_dec_ref(x_4063); - x_4066 = lean_box(0); -} -x_4067 = lean_ctor_get(x_4065, 0); -lean_inc(x_4067); -x_4068 = lean_unbox(x_4067); -lean_dec(x_4067); -if (x_4068 == 0) -{ -lean_object* x_4069; lean_object* x_4070; lean_object* x_4071; lean_object* x_4072; lean_object* x_4073; -lean_dec(x_14); -x_4069 = lean_ctor_get(x_4065, 1); -lean_inc(x_4069); -if (lean_is_exclusive(x_4065)) { - lean_ctor_release(x_4065, 0); - lean_ctor_release(x_4065, 1); - x_4070 = x_4065; -} else { - lean_dec_ref(x_4065); - x_4070 = lean_box(0); -} -x_4071 = lean_box(0); -if (lean_is_scalar(x_4070)) { - x_4072 = lean_alloc_ctor(0, 2, 0); -} else { - x_4072 = x_4070; -} -lean_ctor_set(x_4072, 0, x_4071); -lean_ctor_set(x_4072, 1, x_4069); -if (lean_is_scalar(x_4066)) { - x_4073 = lean_alloc_ctor(1, 1, 0); -} else { - x_4073 = x_4066; -} -lean_ctor_set(x_4073, 0, x_4072); -x_3564 = x_4073; -x_3565 = x_4064; -goto block_4062; -} -else -{ -lean_object* x_4074; lean_object* x_4075; lean_object* x_4076; lean_object* x_4077; lean_object* x_4078; lean_object* x_4079; lean_object* x_4080; lean_object* x_4081; lean_object* x_4082; lean_object* x_4083; -lean_dec(x_4066); -x_4074 = lean_ctor_get(x_4065, 1); -lean_inc(x_4074); -lean_dec(x_4065); -x_4075 = lean_ctor_get(x_3504, 1); -lean_inc(x_4075); -x_4076 = lean_ctor_get(x_3504, 2); -lean_inc(x_4076); -x_4077 = l_Lean_Name_toString___closed__1; -x_4078 = l_Lean_Name_toStringWithSep___main(x_4077, x_4076); -x_4079 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_4079, 0, x_14); -x_4080 = l_Lean_MessageData_ofList___closed__3; -x_4081 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4081, 0, x_4080); -lean_ctor_set(x_4081, 1, x_4079); -x_4082 = lean_unsigned_to_nat(2u); -x_4083 = lean_alloc_ctor(7, 2, 0); -lean_ctor_set(x_4083, 0, x_4082); -lean_ctor_set(x_4083, 1, x_4081); -if (lean_obj_tag(x_4075) == 0) -{ -lean_object* x_4084; lean_object* x_4085; lean_object* x_4086; lean_object* x_4087; lean_object* x_4088; lean_object* x_4089; lean_object* x_4090; lean_object* x_4091; lean_object* x_4092; lean_object* x_4093; lean_object* x_4094; lean_object* x_4095; lean_object* x_4096; lean_object* x_4097; lean_object* x_4098; -x_4084 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31; -x_4085 = lean_string_append(x_4084, x_4078); -lean_dec(x_4078); -x_4086 = l_Option_HasRepr___rarg___closed__3; -x_4087 = lean_string_append(x_4085, x_4086); -x_4088 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_4088, 0, x_4087); -x_4089 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4089, 0, x_4088); -x_4090 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; -x_4091 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4091, 0, x_4090); -lean_ctor_set(x_4091, 1, x_4089); -x_4092 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -x_4093 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4093, 0, x_4091); -lean_ctor_set(x_4093, 1, x_4092); -x_4094 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4094, 0, x_4093); -lean_ctor_set(x_4094, 1, x_4083); -x_4095 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4096 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4095, x_4094, x_5, x_4074, x_7, x_8, x_4064); -x_4097 = lean_ctor_get(x_4096, 0); -lean_inc(x_4097); -x_4098 = lean_ctor_get(x_4096, 1); -lean_inc(x_4098); -lean_dec(x_4096); -x_3564 = x_4097; -x_3565 = x_4098; -goto block_4062; -} -else -{ -lean_object* x_4099; lean_object* x_4100; lean_object* x_4101; lean_object* x_4102; lean_object* x_4103; lean_object* x_4104; lean_object* x_4105; lean_object* x_4106; lean_object* x_4107; lean_object* x_4108; lean_object* x_4109; lean_object* x_4110; lean_object* x_4111; lean_object* x_4112; lean_object* x_4113; lean_object* x_4114; lean_object* x_4115; lean_object* x_4116; lean_object* x_4117; lean_object* x_4118; lean_object* x_4119; lean_object* x_4120; lean_object* x_4121; lean_object* x_4122; -x_4099 = lean_ctor_get(x_4075, 0); -lean_inc(x_4099); -lean_dec(x_4075); -x_4100 = l_Nat_repr(x_4099); -x_4101 = l_addParenHeuristic(x_4100); -lean_dec(x_4100); -x_4102 = l_Option_HasRepr___rarg___closed__2; -x_4103 = lean_string_append(x_4102, x_4101); -lean_dec(x_4101); -x_4104 = l_Option_HasRepr___rarg___closed__3; -x_4105 = lean_string_append(x_4103, x_4104); -x_4106 = l_Prod_HasRepr___rarg___closed__1; -x_4107 = lean_string_append(x_4106, x_4105); -lean_dec(x_4105); -x_4108 = l_List_reprAux___main___rarg___closed__1; -x_4109 = lean_string_append(x_4107, x_4108); -x_4110 = lean_string_append(x_4109, x_4078); -lean_dec(x_4078); -x_4111 = lean_string_append(x_4110, x_4104); -x_4112 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_4112, 0, x_4111); -x_4113 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4113, 0, x_4112); -x_4114 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; -x_4115 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4115, 0, x_4114); -lean_ctor_set(x_4115, 1, x_4113); -x_4116 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -x_4117 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4117, 0, x_4115); -lean_ctor_set(x_4117, 1, x_4116); -x_4118 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4118, 0, x_4117); -lean_ctor_set(x_4118, 1, x_4083); -x_4119 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4120 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4119, x_4118, x_5, x_4074, x_7, x_8, x_4064); -x_4121 = lean_ctor_get(x_4120, 0); -lean_inc(x_4121); -x_4122 = lean_ctor_get(x_4120, 1); -lean_inc(x_4122); -lean_dec(x_4120); -x_3564 = x_4121; -x_3565 = x_4122; -goto block_4062; -} -} -} -} -} -else -{ -lean_object* x_4136; lean_object* x_4137; lean_object* x_4138; lean_object* x_4139; lean_object* x_4140; lean_object* x_4141; lean_object* x_4195; lean_object* x_4196; lean_object* x_4197; uint8_t x_4198; lean_object* x_4199; lean_object* x_4200; lean_object* x_4201; lean_object* x_4699; lean_object* x_4700; lean_object* x_4760; lean_object* x_4761; uint8_t x_4762; -x_4136 = lean_ctor_get(x_17, 0); -lean_inc(x_4136); -lean_dec(x_17); -x_4137 = lean_ctor_get(x_16, 1); -lean_inc(x_4137); -lean_dec(x_16); -x_4138 = lean_ctor_get(x_4136, 0); -lean_inc(x_4138); -x_4139 = lean_ctor_get(x_4136, 1); -lean_inc(x_4139); -if (lean_is_exclusive(x_4136)) { - lean_ctor_release(x_4136, 0); - lean_ctor_release(x_4136, 1); - x_4140 = x_4136; -} else { - lean_dec_ref(x_4136); - x_4140 = lean_box(0); -} -x_4195 = lean_ctor_get(x_4139, 0); -lean_inc(x_4195); -x_4196 = lean_box(0); -x_4197 = lean_box(0); -x_4198 = 0; -x_4199 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_4199, 0, x_4195); -lean_ctor_set(x_4199, 1, x_4196); -lean_ctor_set(x_4199, 2, x_4197); -lean_ctor_set(x_4199, 3, x_4196); -lean_ctor_set(x_4199, 4, x_4196); -lean_ctor_set_uint8(x_4199, sizeof(void*)*5, x_4198); -x_4760 = l_Lean_Core_getTraceState___rarg(x_8, x_4137); -x_4761 = lean_ctor_get(x_4760, 0); -lean_inc(x_4761); -x_4762 = lean_ctor_get_uint8(x_4761, sizeof(void*)*1); -lean_dec(x_4761); -if (x_4762 == 0) -{ -lean_object* x_4763; lean_object* x_4764; lean_object* x_4765; lean_object* x_4766; -x_4763 = lean_ctor_get(x_4760, 1); -lean_inc(x_4763); -lean_dec(x_4760); -x_4764 = lean_box(x_4198); -if (lean_is_scalar(x_4140)) { - x_4765 = lean_alloc_ctor(0, 2, 0); -} else { - x_4765 = x_4140; -} -lean_ctor_set(x_4765, 0, x_4764); -lean_ctor_set(x_4765, 1, x_4199); -x_4766 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_4766, 0, x_4765); -x_4699 = x_4766; -x_4700 = x_4763; -goto block_4759; -} -else -{ -lean_object* x_4767; lean_object* x_4768; lean_object* x_4769; lean_object* x_4770; lean_object* x_4771; lean_object* x_4772; lean_object* x_4773; -x_4767 = lean_ctor_get(x_4760, 1); -lean_inc(x_4767); -lean_dec(x_4760); -x_4768 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4769 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4768, x_7, x_8, x_4767); -x_4770 = lean_ctor_get(x_4769, 0); -lean_inc(x_4770); -x_4771 = lean_ctor_get(x_4769, 1); -lean_inc(x_4771); -lean_dec(x_4769); -if (lean_is_scalar(x_4140)) { - x_4772 = lean_alloc_ctor(0, 2, 0); -} else { - x_4772 = x_4140; -} -lean_ctor_set(x_4772, 0, x_4770); -lean_ctor_set(x_4772, 1, x_4199); -x_4773 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_4773, 0, x_4772); -x_4699 = x_4773; -x_4700 = x_4771; -goto block_4759; -} -block_4194: -{ -lean_object* x_4142; lean_object* x_4143; lean_object* x_4144; lean_object* x_4145; lean_object* x_4146; uint8_t x_4147; -x_4142 = lean_ctor_get(x_4141, 0); -lean_inc(x_4142); -x_4143 = lean_ctor_get(x_4142, 0); -lean_inc(x_4143); -if (lean_is_exclusive(x_4142)) { - lean_ctor_release(x_4142, 0); - x_4144 = x_4142; -} else { - lean_dec_ref(x_4142); - x_4144 = lean_box(0); -} -x_4145 = lean_ctor_get(x_4143, 1); -lean_inc(x_4145); -if (lean_is_exclusive(x_4143)) { - lean_ctor_release(x_4143, 0); - lean_ctor_release(x_4143, 1); - x_4146 = x_4143; -} else { - lean_dec_ref(x_4143); - x_4146 = lean_box(0); -} -x_4147 = lean_ctor_get_uint8(x_4139, sizeof(void*)*5); -if (x_4147 == 0) -{ -lean_object* x_4148; -x_4148 = lean_ctor_get(x_4145, 4); -lean_inc(x_4148); -if (lean_obj_tag(x_4148) == 0) -{ -lean_object* x_4149; lean_object* x_4150; lean_object* x_4151; lean_object* x_4152; lean_object* x_4153; uint8_t x_4154; lean_object* x_4155; lean_object* x_4156; lean_object* x_4157; lean_object* x_4158; lean_object* x_4159; lean_object* x_4160; lean_object* x_4161; lean_object* x_4162; -x_4149 = lean_ctor_get(x_4141, 1); -lean_inc(x_4149); -if (lean_is_exclusive(x_4141)) { - lean_ctor_release(x_4141, 0); - lean_ctor_release(x_4141, 1); - x_4150 = x_4141; -} else { - lean_dec_ref(x_4141); - x_4150 = lean_box(0); -} -x_4151 = lean_ctor_get(x_4145, 0); -lean_inc(x_4151); -x_4152 = lean_ctor_get(x_4145, 1); -lean_inc(x_4152); -x_4153 = lean_ctor_get(x_4145, 2); -lean_inc(x_4153); -x_4154 = lean_ctor_get_uint8(x_4145, sizeof(void*)*5); -lean_dec(x_4145); -x_4155 = lean_ctor_get(x_4139, 3); -lean_inc(x_4155); -if (lean_is_exclusive(x_4139)) { - lean_ctor_release(x_4139, 0); - lean_ctor_release(x_4139, 1); - lean_ctor_release(x_4139, 2); - lean_ctor_release(x_4139, 3); - lean_ctor_release(x_4139, 4); - x_4156 = x_4139; -} else { - lean_dec_ref(x_4139); - x_4156 = lean_box(0); -} -x_4157 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_4157, 0, x_3); -if (lean_is_scalar(x_4156)) { - x_4158 = lean_alloc_ctor(0, 5, 1); -} else { - x_4158 = x_4156; -} -lean_ctor_set(x_4158, 0, x_4151); -lean_ctor_set(x_4158, 1, x_4152); -lean_ctor_set(x_4158, 2, x_4153); -lean_ctor_set(x_4158, 3, x_4155); -lean_ctor_set(x_4158, 4, x_4157); -lean_ctor_set_uint8(x_4158, sizeof(void*)*5, x_4154); -x_4159 = lean_box(0); -if (lean_is_scalar(x_4146)) { - x_4160 = lean_alloc_ctor(0, 2, 0); -} else { - x_4160 = x_4146; -} -lean_ctor_set(x_4160, 0, x_4159); -lean_ctor_set(x_4160, 1, x_4158); -if (lean_is_scalar(x_4144)) { - x_4161 = lean_alloc_ctor(1, 1, 0); -} else { - x_4161 = x_4144; -} -lean_ctor_set(x_4161, 0, x_4160); -if (lean_is_scalar(x_4150)) { - x_4162 = lean_alloc_ctor(0, 2, 0); -} else { - x_4162 = x_4150; -} -lean_ctor_set(x_4162, 0, x_4161); -lean_ctor_set(x_4162, 1, x_4149); -return x_4162; -} -else -{ -lean_object* x_4163; lean_object* x_4164; lean_object* x_4165; lean_object* x_4166; lean_object* x_4167; uint8_t x_4168; lean_object* x_4169; lean_object* x_4170; lean_object* x_4171; lean_object* x_4172; lean_object* x_4173; lean_object* x_4174; lean_object* x_4175; lean_object* x_4176; lean_object* x_4177; lean_object* x_4178; lean_object* x_4179; -x_4163 = lean_ctor_get(x_4141, 1); -lean_inc(x_4163); -if (lean_is_exclusive(x_4141)) { - lean_ctor_release(x_4141, 0); - lean_ctor_release(x_4141, 1); - x_4164 = x_4141; -} else { - lean_dec_ref(x_4141); - x_4164 = lean_box(0); -} -x_4165 = lean_ctor_get(x_4145, 0); -lean_inc(x_4165); -x_4166 = lean_ctor_get(x_4145, 1); -lean_inc(x_4166); -x_4167 = lean_ctor_get(x_4145, 2); -lean_inc(x_4167); -x_4168 = lean_ctor_get_uint8(x_4145, sizeof(void*)*5); -lean_dec(x_4145); -x_4169 = lean_ctor_get(x_4139, 3); -lean_inc(x_4169); -if (lean_is_exclusive(x_4139)) { - lean_ctor_release(x_4139, 0); - lean_ctor_release(x_4139, 1); - lean_ctor_release(x_4139, 2); - lean_ctor_release(x_4139, 3); - lean_ctor_release(x_4139, 4); - x_4170 = x_4139; -} else { - lean_dec_ref(x_4139); - x_4170 = lean_box(0); -} -x_4171 = lean_ctor_get(x_4148, 0); -lean_inc(x_4171); -if (lean_is_exclusive(x_4148)) { - lean_ctor_release(x_4148, 0); - x_4172 = x_4148; -} else { - lean_dec_ref(x_4148); - x_4172 = lean_box(0); -} -x_4173 = l_Nat_min(x_4171, x_3); -lean_dec(x_3); -lean_dec(x_4171); -if (lean_is_scalar(x_4172)) { - x_4174 = lean_alloc_ctor(1, 1, 0); -} else { - x_4174 = x_4172; -} -lean_ctor_set(x_4174, 0, x_4173); -if (lean_is_scalar(x_4170)) { - x_4175 = lean_alloc_ctor(0, 5, 1); -} else { - x_4175 = x_4170; -} -lean_ctor_set(x_4175, 0, x_4165); -lean_ctor_set(x_4175, 1, x_4166); -lean_ctor_set(x_4175, 2, x_4167); -lean_ctor_set(x_4175, 3, x_4169); -lean_ctor_set(x_4175, 4, x_4174); -lean_ctor_set_uint8(x_4175, sizeof(void*)*5, x_4168); -x_4176 = lean_box(0); -if (lean_is_scalar(x_4146)) { - x_4177 = lean_alloc_ctor(0, 2, 0); -} else { - x_4177 = x_4146; -} -lean_ctor_set(x_4177, 0, x_4176); -lean_ctor_set(x_4177, 1, x_4175); -if (lean_is_scalar(x_4144)) { - x_4178 = lean_alloc_ctor(1, 1, 0); -} else { - x_4178 = x_4144; -} -lean_ctor_set(x_4178, 0, x_4177); -if (lean_is_scalar(x_4164)) { - x_4179 = lean_alloc_ctor(0, 2, 0); -} else { - x_4179 = x_4164; -} -lean_ctor_set(x_4179, 0, x_4178); -lean_ctor_set(x_4179, 1, x_4163); -return x_4179; -} -} -else -{ -lean_object* x_4180; lean_object* x_4181; lean_object* x_4182; lean_object* x_4183; lean_object* x_4184; uint8_t x_4185; lean_object* x_4186; lean_object* x_4187; lean_object* x_4188; lean_object* x_4189; lean_object* x_4190; lean_object* x_4191; lean_object* x_4192; lean_object* x_4193; -lean_dec(x_3); -x_4180 = lean_ctor_get(x_4141, 1); -lean_inc(x_4180); -if (lean_is_exclusive(x_4141)) { - lean_ctor_release(x_4141, 0); - lean_ctor_release(x_4141, 1); - x_4181 = x_4141; -} else { - lean_dec_ref(x_4141); - x_4181 = lean_box(0); -} -x_4182 = lean_ctor_get(x_4145, 0); -lean_inc(x_4182); -x_4183 = lean_ctor_get(x_4145, 1); -lean_inc(x_4183); -x_4184 = lean_ctor_get(x_4145, 2); -lean_inc(x_4184); -x_4185 = lean_ctor_get_uint8(x_4145, sizeof(void*)*5); -lean_dec(x_4145); -x_4186 = lean_ctor_get(x_4139, 3); -lean_inc(x_4186); -x_4187 = lean_ctor_get(x_4139, 4); -lean_inc(x_4187); -if (lean_is_exclusive(x_4139)) { - lean_ctor_release(x_4139, 0); - lean_ctor_release(x_4139, 1); - lean_ctor_release(x_4139, 2); - lean_ctor_release(x_4139, 3); - lean_ctor_release(x_4139, 4); - x_4188 = x_4139; -} else { - lean_dec_ref(x_4139); - x_4188 = lean_box(0); -} -if (lean_is_scalar(x_4188)) { - x_4189 = lean_alloc_ctor(0, 5, 1); -} else { - x_4189 = x_4188; -} -lean_ctor_set(x_4189, 0, x_4182); -lean_ctor_set(x_4189, 1, x_4183); -lean_ctor_set(x_4189, 2, x_4184); -lean_ctor_set(x_4189, 3, x_4186); -lean_ctor_set(x_4189, 4, x_4187); -lean_ctor_set_uint8(x_4189, sizeof(void*)*5, x_4185); -x_4190 = lean_box(0); -if (lean_is_scalar(x_4146)) { - x_4191 = lean_alloc_ctor(0, 2, 0); -} else { - x_4191 = x_4146; -} -lean_ctor_set(x_4191, 0, x_4190); -lean_ctor_set(x_4191, 1, x_4189); -if (lean_is_scalar(x_4144)) { - x_4192 = lean_alloc_ctor(1, 1, 0); -} else { - x_4192 = x_4144; -} -lean_ctor_set(x_4192, 0, x_4191); -if (lean_is_scalar(x_4181)) { - x_4193 = lean_alloc_ctor(0, 2, 0); -} else { - x_4193 = x_4181; -} -lean_ctor_set(x_4193, 0, x_4192); -lean_ctor_set(x_4193, 1, x_4180); -return x_4193; -} -} -block_4698: -{ -lean_object* x_4202; lean_object* x_4203; lean_object* x_4204; lean_object* x_4205; -x_4202 = lean_ctor_get(x_4200, 0); -lean_inc(x_4202); -lean_dec(x_4200); -x_4203 = lean_ctor_get(x_4202, 1); -lean_inc(x_4203); -if (lean_is_exclusive(x_4202)) { - lean_ctor_release(x_4202, 0); - lean_ctor_release(x_4202, 1); - x_4204 = x_4202; -} else { - lean_dec_ref(x_4202); - x_4204 = lean_box(0); -} -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_5); -x_4205 = lean_apply_5(x_4, x_5, x_4203, x_7, x_8, x_4201); -if (lean_obj_tag(x_4205) == 0) -{ -lean_object* x_4206; -x_4206 = lean_ctor_get(x_4205, 0); -lean_inc(x_4206); -if (lean_obj_tag(x_4206) == 0) -{ -lean_object* x_4207; lean_object* x_4208; lean_object* x_4209; lean_object* x_4210; lean_object* x_4211; lean_object* x_4212; -lean_dec(x_4204); -lean_dec(x_4139); -lean_dec(x_4138); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_4207 = lean_ctor_get(x_4205, 1); -lean_inc(x_4207); -if (lean_is_exclusive(x_4205)) { - lean_ctor_release(x_4205, 0); - lean_ctor_release(x_4205, 1); - x_4208 = x_4205; -} else { - lean_dec_ref(x_4205); - x_4208 = lean_box(0); -} -x_4209 = lean_ctor_get(x_4206, 0); -lean_inc(x_4209); -if (lean_is_exclusive(x_4206)) { - lean_ctor_release(x_4206, 0); - x_4210 = x_4206; -} else { - lean_dec_ref(x_4206); - x_4210 = lean_box(0); -} -if (lean_is_scalar(x_4210)) { - x_4211 = lean_alloc_ctor(0, 1, 0); -} else { - x_4211 = x_4210; -} -lean_ctor_set(x_4211, 0, x_4209); -if (lean_is_scalar(x_4208)) { - x_4212 = lean_alloc_ctor(0, 2, 0); -} else { - x_4212 = x_4208; -} -lean_ctor_set(x_4212, 0, x_4211); -lean_ctor_set(x_4212, 1, x_4207); -return x_4212; -} -else -{ -lean_object* x_4213; lean_object* x_4214; lean_object* x_4215; lean_object* x_4216; lean_object* x_4217; -x_4213 = lean_ctor_get(x_4206, 0); -lean_inc(x_4213); -if (lean_is_exclusive(x_4206)) { - lean_ctor_release(x_4206, 0); - x_4214 = x_4206; -} else { - lean_dec_ref(x_4206); - x_4214 = lean_box(0); -} -x_4215 = lean_ctor_get(x_4213, 1); -lean_inc(x_4215); -if (lean_is_exclusive(x_4213)) { - lean_ctor_release(x_4213, 0); - lean_ctor_release(x_4213, 1); - x_4216 = x_4213; -} else { - lean_dec_ref(x_4213); - x_4216 = lean_box(0); -} -x_4217 = lean_ctor_get(x_4215, 3); -lean_inc(x_4217); -if (lean_obj_tag(x_4217) == 0) -{ -lean_object* x_4218; lean_object* x_4219; lean_object* x_4220; lean_object* x_4221; lean_object* x_4222; -lean_dec(x_4216); -lean_dec(x_4214); -lean_dec(x_4204); -lean_dec(x_4139); -lean_dec(x_4138); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_4218 = lean_ctor_get(x_4205, 1); -lean_inc(x_4218); -lean_dec(x_4205); -x_4219 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__8; -x_4220 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__11; -x_4221 = lean_panic_fn(x_4219, x_4220); -x_4222 = lean_apply_5(x_4221, x_5, x_4215, x_7, x_8, x_4218); -return x_4222; -} -else -{ -lean_object* x_4223; lean_object* x_4224; lean_object* x_4225; lean_object* x_4226; lean_object* x_4227; lean_object* x_4228; lean_object* x_4639; lean_object* x_4640; lean_object* x_4680; lean_object* x_4681; uint8_t x_4682; -x_4223 = lean_ctor_get(x_4205, 1); -lean_inc(x_4223); -if (lean_is_exclusive(x_4205)) { - lean_ctor_release(x_4205, 0); - lean_ctor_release(x_4205, 1); - x_4224 = x_4205; -} else { - lean_dec_ref(x_4205); - x_4224 = lean_box(0); -} -x_4225 = lean_ctor_get(x_4215, 4); -lean_inc(x_4225); -x_4226 = lean_ctor_get(x_4217, 0); -lean_inc(x_4226); -lean_dec(x_4217); -x_4680 = l_Lean_Core_getTraceState___rarg(x_8, x_4223); -x_4681 = lean_ctor_get(x_4680, 0); -lean_inc(x_4681); -x_4682 = lean_ctor_get_uint8(x_4681, sizeof(void*)*1); -lean_dec(x_4681); -if (x_4682 == 0) -{ -lean_object* x_4683; lean_object* x_4684; lean_object* x_4685; lean_object* x_4686; -x_4683 = lean_ctor_get(x_4680, 1); -lean_inc(x_4683); -lean_dec(x_4680); -x_4684 = lean_box(x_4198); -if (lean_is_scalar(x_4204)) { - x_4685 = lean_alloc_ctor(0, 2, 0); -} else { - x_4685 = x_4204; -} -lean_ctor_set(x_4685, 0, x_4684); -lean_ctor_set(x_4685, 1, x_4215); -if (lean_is_scalar(x_4214)) { - x_4686 = lean_alloc_ctor(1, 1, 0); -} else { - x_4686 = x_4214; -} -lean_ctor_set(x_4686, 0, x_4685); -x_4639 = x_4686; -x_4640 = x_4683; -goto block_4679; -} -else -{ -lean_object* x_4687; lean_object* x_4688; lean_object* x_4689; lean_object* x_4690; lean_object* x_4691; lean_object* x_4692; lean_object* x_4693; -x_4687 = lean_ctor_get(x_4680, 1); -lean_inc(x_4687); -lean_dec(x_4680); -x_4688 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4689 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4688, x_7, x_8, x_4687); -x_4690 = lean_ctor_get(x_4689, 0); -lean_inc(x_4690); -x_4691 = lean_ctor_get(x_4689, 1); -lean_inc(x_4691); -lean_dec(x_4689); -if (lean_is_scalar(x_4204)) { - x_4692 = lean_alloc_ctor(0, 2, 0); -} else { - x_4692 = x_4204; -} -lean_ctor_set(x_4692, 0, x_4690); -lean_ctor_set(x_4692, 1, x_4215); -if (lean_is_scalar(x_4214)) { - x_4693 = lean_alloc_ctor(1, 1, 0); -} else { - x_4693 = x_4214; -} -lean_ctor_set(x_4693, 0, x_4692); -x_4639 = x_4693; -x_4640 = x_4691; -goto block_4679; -} -block_4638: -{ -lean_object* x_4229; lean_object* x_4230; lean_object* x_4231; lean_object* x_4232; lean_object* x_4233; lean_object* x_4234; lean_object* x_4256; uint8_t x_4613; -x_4229 = lean_ctor_get(x_4227, 0); -lean_inc(x_4229); -if (lean_is_exclusive(x_4227)) { - lean_ctor_release(x_4227, 0); - x_4230 = x_4227; -} else { - lean_dec_ref(x_4227); - x_4230 = lean_box(0); -} -x_4231 = lean_ctor_get(x_4229, 1); -lean_inc(x_4231); -if (lean_is_exclusive(x_4229)) { - lean_ctor_release(x_4229, 0); - lean_ctor_release(x_4229, 1); - x_4232 = x_4229; -} else { - lean_dec_ref(x_4229); - x_4232 = lean_box(0); -} -x_4613 = lean_nat_dec_lt(x_4226, x_3); -lean_dec(x_4226); -if (x_4613 == 0) -{ -if (lean_obj_tag(x_4225) == 0) -{ -lean_object* x_4614; lean_object* x_4615; lean_object* x_4616; lean_object* x_4617; -lean_dec(x_4138); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_4614 = lean_box(0); -if (lean_is_scalar(x_4232)) { - x_4615 = lean_alloc_ctor(0, 2, 0); -} else { - x_4615 = x_4232; -} -lean_ctor_set(x_4615, 0, x_4614); -lean_ctor_set(x_4615, 1, x_4231); -if (lean_is_scalar(x_4230)) { - x_4616 = lean_alloc_ctor(1, 1, 0); -} else { - x_4616 = x_4230; -} -lean_ctor_set(x_4616, 0, x_4615); -if (lean_is_scalar(x_4224)) { - x_4617 = lean_alloc_ctor(0, 2, 0); -} else { - x_4617 = x_4224; -} -lean_ctor_set(x_4617, 0, x_4616); -lean_ctor_set(x_4617, 1, x_4228); -x_4141 = x_4617; -goto block_4194; -} -else -{ -lean_object* x_4618; -x_4618 = lean_ctor_get(x_4139, 1); -lean_inc(x_4618); -if (lean_obj_tag(x_4618) == 0) -{ -lean_object* x_4619; lean_object* x_4620; lean_object* x_4621; lean_object* x_4622; -lean_dec(x_4225); -lean_dec(x_4138); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_4619 = lean_box(0); -if (lean_is_scalar(x_4232)) { - x_4620 = lean_alloc_ctor(0, 2, 0); -} else { - x_4620 = x_4232; -} -lean_ctor_set(x_4620, 0, x_4619); -lean_ctor_set(x_4620, 1, x_4231); -if (lean_is_scalar(x_4230)) { - x_4621 = lean_alloc_ctor(1, 1, 0); -} else { - x_4621 = x_4230; -} -lean_ctor_set(x_4621, 0, x_4620); -if (lean_is_scalar(x_4224)) { - x_4622 = lean_alloc_ctor(0, 2, 0); -} else { - x_4622 = x_4224; -} -lean_ctor_set(x_4622, 0, x_4621); -lean_ctor_set(x_4622, 1, x_4228); -x_4141 = x_4622; -goto block_4194; -} -else -{ -lean_object* x_4623; lean_object* x_4624; lean_object* x_4625; uint8_t x_4626; -x_4623 = lean_ctor_get(x_4225, 0); -lean_inc(x_4623); -lean_dec(x_4225); -x_4624 = lean_ctor_get(x_4618, 0); -lean_inc(x_4624); -lean_dec(x_4618); -x_4625 = lean_ctor_get(x_4139, 2); -lean_inc(x_4625); -x_4626 = lean_name_eq(x_1, x_4625); -lean_dec(x_4625); -if (x_4626 == 0) -{ -lean_object* x_4627; lean_object* x_4628; lean_object* x_4629; lean_object* x_4630; -lean_dec(x_4624); -lean_dec(x_4623); -lean_dec(x_4138); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_4627 = lean_box(0); -if (lean_is_scalar(x_4232)) { - x_4628 = lean_alloc_ctor(0, 2, 0); -} else { - x_4628 = x_4232; -} -lean_ctor_set(x_4628, 0, x_4627); -lean_ctor_set(x_4628, 1, x_4231); -if (lean_is_scalar(x_4230)) { - x_4629 = lean_alloc_ctor(1, 1, 0); -} else { - x_4629 = x_4230; -} -lean_ctor_set(x_4629, 0, x_4628); -if (lean_is_scalar(x_4224)) { - x_4630 = lean_alloc_ctor(0, 2, 0); -} else { - x_4630 = x_4224; -} -lean_ctor_set(x_4630, 0, x_4629); -lean_ctor_set(x_4630, 1, x_4228); -x_4141 = x_4630; -goto block_4194; -} -else -{ -uint8_t x_4631; -x_4631 = lean_nat_dec_le(x_4623, x_4624); -lean_dec(x_4624); -lean_dec(x_4623); -if (x_4631 == 0) -{ -lean_object* x_4632; lean_object* x_4633; lean_object* x_4634; lean_object* x_4635; -lean_dec(x_4138); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_4632 = lean_box(0); -if (lean_is_scalar(x_4232)) { - x_4633 = lean_alloc_ctor(0, 2, 0); -} else { - x_4633 = x_4232; -} -lean_ctor_set(x_4633, 0, x_4632); -lean_ctor_set(x_4633, 1, x_4231); -if (lean_is_scalar(x_4230)) { - x_4634 = lean_alloc_ctor(1, 1, 0); -} else { - x_4634 = x_4230; -} -lean_ctor_set(x_4634, 0, x_4633); -if (lean_is_scalar(x_4224)) { - x_4635 = lean_alloc_ctor(0, 2, 0); -} else { - x_4635 = x_4224; -} -lean_ctor_set(x_4635, 0, x_4634); -lean_ctor_set(x_4635, 1, x_4228); -x_4141 = x_4635; -goto block_4194; -} -else -{ -lean_object* x_4636; -lean_dec(x_4232); -lean_dec(x_4230); -lean_dec(x_4224); -x_4636 = lean_box(0); -x_4256 = x_4636; -goto block_4612; -} -} -} -} -} -else -{ -lean_object* x_4637; -lean_dec(x_4232); -lean_dec(x_4230); -lean_dec(x_4225); -lean_dec(x_4224); -x_4637 = lean_box(0); -x_4256 = x_4637; -goto block_4612; -} -block_4255: -{ -lean_object* x_4235; lean_object* x_4236; lean_object* x_4237; lean_object* x_4238; lean_object* x_4239; lean_object* x_4240; lean_object* x_4241; lean_object* x_4242; lean_object* x_4243; lean_object* x_4244; lean_object* x_4245; lean_object* x_4246; uint8_t x_4247; lean_object* x_4248; lean_object* x_4249; lean_object* x_4250; lean_object* x_4251; lean_object* x_4252; lean_object* x_4253; lean_object* x_4254; -x_4235 = lean_ctor_get(x_4233, 0); -lean_inc(x_4235); -lean_dec(x_4233); -x_4236 = lean_ctor_get(x_4235, 1); -lean_inc(x_4236); -lean_dec(x_4235); -x_4237 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_4236, x_7, x_8, x_4234); -lean_dec(x_8); -lean_dec(x_7); -x_4238 = lean_ctor_get(x_4237, 0); -lean_inc(x_4238); -x_4239 = lean_ctor_get(x_4238, 0); -lean_inc(x_4239); -if (lean_is_exclusive(x_4238)) { - lean_ctor_release(x_4238, 0); - x_4240 = x_4238; -} else { - lean_dec_ref(x_4238); - x_4240 = lean_box(0); -} -x_4241 = lean_ctor_get(x_4239, 1); -lean_inc(x_4241); -if (lean_is_exclusive(x_4239)) { - lean_ctor_release(x_4239, 0); - lean_ctor_release(x_4239, 1); - x_4242 = x_4239; -} else { - lean_dec_ref(x_4239); - x_4242 = lean_box(0); -} -x_4243 = lean_ctor_get(x_4237, 1); -lean_inc(x_4243); -if (lean_is_exclusive(x_4237)) { - lean_ctor_release(x_4237, 0); - lean_ctor_release(x_4237, 1); - x_4244 = x_4237; -} else { - lean_dec_ref(x_4237); - x_4244 = lean_box(0); -} -x_4245 = lean_ctor_get(x_4241, 0); -lean_inc(x_4245); -x_4246 = lean_ctor_get(x_4241, 3); -lean_inc(x_4246); -x_4247 = lean_ctor_get_uint8(x_4241, sizeof(void*)*5); -if (lean_is_exclusive(x_4241)) { - lean_ctor_release(x_4241, 0); - lean_ctor_release(x_4241, 1); - lean_ctor_release(x_4241, 2); - lean_ctor_release(x_4241, 3); - lean_ctor_release(x_4241, 4); - x_4248 = x_4241; -} else { - lean_dec_ref(x_4241); - x_4248 = lean_box(0); -} -x_4249 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__12; -if (lean_is_scalar(x_4248)) { - x_4250 = lean_alloc_ctor(0, 5, 1); -} else { - x_4250 = x_4248; -} -lean_ctor_set(x_4250, 0, x_4245); -lean_ctor_set(x_4250, 1, x_4249); -lean_ctor_set(x_4250, 2, x_1); -lean_ctor_set(x_4250, 3, x_4246); -lean_ctor_set(x_4250, 4, x_4196); -lean_ctor_set_uint8(x_4250, sizeof(void*)*5, x_4247); -x_4251 = lean_box(0); -if (lean_is_scalar(x_4242)) { - x_4252 = lean_alloc_ctor(0, 2, 0); -} else { - x_4252 = x_4242; -} -lean_ctor_set(x_4252, 0, x_4251); -lean_ctor_set(x_4252, 1, x_4250); -if (lean_is_scalar(x_4240)) { - x_4253 = lean_alloc_ctor(1, 1, 0); -} else { - x_4253 = x_4240; -} -lean_ctor_set(x_4253, 0, x_4252); -if (lean_is_scalar(x_4244)) { - x_4254 = lean_alloc_ctor(0, 2, 0); -} else { - x_4254 = x_4244; -} -lean_ctor_set(x_4254, 0, x_4253); -lean_ctor_set(x_4254, 1, x_4243); -x_4141 = x_4254; -goto block_4194; -} -block_4612: -{ -lean_object* x_4257; uint8_t x_4258; -lean_dec(x_4256); -x_4257 = lean_unsigned_to_nat(0u); -x_4258 = lean_nat_dec_lt(x_4257, x_4138); -lean_dec(x_4138); -if (x_4258 == 0) -{ -lean_object* x_4259; lean_object* x_4260; lean_object* x_4261; lean_object* x_4262; lean_object* x_4263; lean_object* x_4264; lean_object* x_4265; -x_4259 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4231, x_7, x_8, x_4228); -x_4260 = lean_ctor_get(x_4259, 0); -lean_inc(x_4260); -x_4261 = lean_ctor_get(x_4260, 0); -lean_inc(x_4261); -lean_dec(x_4260); -x_4262 = lean_ctor_get(x_4259, 1); -lean_inc(x_4262); -lean_dec(x_4259); -x_4263 = lean_ctor_get(x_4261, 0); -lean_inc(x_4263); -x_4264 = lean_ctor_get(x_4261, 1); -lean_inc(x_4264); -lean_dec(x_4261); -x_4265 = l_Lean_Syntax_getHeadInfo___main(x_4263); -if (lean_obj_tag(x_4265) == 0) -{ -lean_object* x_4266; lean_object* x_4267; lean_object* x_4268; lean_object* x_4269; lean_object* x_4270; lean_object* x_4271; lean_object* x_4272; lean_object* x_4273; lean_object* x_4274; lean_object* x_4275; lean_object* x_4276; lean_object* x_4277; lean_object* x_4278; lean_object* x_4279; lean_object* x_4280; lean_object* x_4281; lean_object* x_4301; lean_object* x_4302; uint8_t x_4303; -x_4266 = lean_apply_1(x_2, x_4263); -x_4267 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_4266, x_5, x_4264, x_7, x_8, x_4262); -x_4268 = lean_ctor_get(x_4267, 0); -lean_inc(x_4268); -x_4269 = lean_ctor_get(x_4268, 0); -lean_inc(x_4269); -lean_dec(x_4268); -x_4270 = lean_ctor_get(x_4267, 1); -lean_inc(x_4270); -lean_dec(x_4267); -x_4271 = lean_ctor_get(x_4269, 1); -lean_inc(x_4271); -lean_dec(x_4269); -x_4272 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4271, x_7, x_8, x_4270); -x_4273 = lean_ctor_get(x_4272, 0); -lean_inc(x_4273); -x_4274 = lean_ctor_get(x_4273, 0); -lean_inc(x_4274); -if (lean_is_exclusive(x_4273)) { - lean_ctor_release(x_4273, 0); - x_4275 = x_4273; -} else { - lean_dec_ref(x_4273); - x_4275 = lean_box(0); -} -x_4276 = lean_ctor_get(x_4272, 1); -lean_inc(x_4276); -lean_dec(x_4272); -x_4277 = lean_ctor_get(x_4274, 0); -lean_inc(x_4277); -x_4278 = lean_ctor_get(x_4274, 1); -lean_inc(x_4278); -if (lean_is_exclusive(x_4274)) { - lean_ctor_release(x_4274, 0); - lean_ctor_release(x_4274, 1); - x_4279 = x_4274; -} else { - lean_dec_ref(x_4274); - x_4279 = lean_box(0); -} -x_4301 = l_Lean_Core_getTraceState___rarg(x_8, x_4276); -x_4302 = lean_ctor_get(x_4301, 0); -lean_inc(x_4302); -x_4303 = lean_ctor_get_uint8(x_4302, sizeof(void*)*1); -lean_dec(x_4302); -if (x_4303 == 0) -{ -lean_object* x_4304; lean_object* x_4305; lean_object* x_4306; lean_object* x_4307; -x_4304 = lean_ctor_get(x_4301, 1); -lean_inc(x_4304); -lean_dec(x_4301); -x_4305 = lean_box(x_4198); -if (lean_is_scalar(x_4279)) { - x_4306 = lean_alloc_ctor(0, 2, 0); -} else { - x_4306 = x_4279; -} -lean_ctor_set(x_4306, 0, x_4305); -lean_ctor_set(x_4306, 1, x_4278); -if (lean_is_scalar(x_4275)) { - x_4307 = lean_alloc_ctor(1, 1, 0); -} else { - x_4307 = x_4275; -} -lean_ctor_set(x_4307, 0, x_4306); -x_4280 = x_4307; -x_4281 = x_4304; -goto block_4300; -} -else -{ -lean_object* x_4308; lean_object* x_4309; lean_object* x_4310; lean_object* x_4311; lean_object* x_4312; lean_object* x_4313; lean_object* x_4314; -x_4308 = lean_ctor_get(x_4301, 1); -lean_inc(x_4308); -lean_dec(x_4301); -x_4309 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4310 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4309, x_7, x_8, x_4308); -x_4311 = lean_ctor_get(x_4310, 0); -lean_inc(x_4311); -x_4312 = lean_ctor_get(x_4310, 1); -lean_inc(x_4312); -lean_dec(x_4310); -if (lean_is_scalar(x_4279)) { - x_4313 = lean_alloc_ctor(0, 2, 0); -} else { - x_4313 = x_4279; -} -lean_ctor_set(x_4313, 0, x_4311); -lean_ctor_set(x_4313, 1, x_4278); -if (lean_is_scalar(x_4275)) { - x_4314 = lean_alloc_ctor(1, 1, 0); -} else { - x_4314 = x_4275; -} -lean_ctor_set(x_4314, 0, x_4313); -x_4280 = x_4314; -x_4281 = x_4312; -goto block_4300; -} -block_4300: -{ -lean_object* x_4282; lean_object* x_4283; lean_object* x_4284; uint8_t x_4285; -x_4282 = lean_ctor_get(x_4280, 0); -lean_inc(x_4282); -if (lean_is_exclusive(x_4280)) { - lean_ctor_release(x_4280, 0); - x_4283 = x_4280; -} else { - lean_dec_ref(x_4280); - x_4283 = lean_box(0); -} -x_4284 = lean_ctor_get(x_4282, 0); -lean_inc(x_4284); -x_4285 = lean_unbox(x_4284); -lean_dec(x_4284); -if (x_4285 == 0) -{ -lean_object* x_4286; lean_object* x_4287; lean_object* x_4288; lean_object* x_4289; lean_object* x_4290; -lean_dec(x_4277); -lean_dec(x_5); -x_4286 = lean_ctor_get(x_4282, 1); -lean_inc(x_4286); -if (lean_is_exclusive(x_4282)) { - lean_ctor_release(x_4282, 0); - lean_ctor_release(x_4282, 1); - x_4287 = x_4282; -} else { - lean_dec_ref(x_4282); - x_4287 = lean_box(0); -} -x_4288 = lean_box(0); -if (lean_is_scalar(x_4287)) { - x_4289 = lean_alloc_ctor(0, 2, 0); -} else { - x_4289 = x_4287; -} -lean_ctor_set(x_4289, 0, x_4288); -lean_ctor_set(x_4289, 1, x_4286); -if (lean_is_scalar(x_4283)) { - x_4290 = lean_alloc_ctor(1, 1, 0); -} else { - x_4290 = x_4283; -} -lean_ctor_set(x_4290, 0, x_4289); -x_4233 = x_4290; -x_4234 = x_4281; -goto block_4255; -} -else -{ -lean_object* x_4291; lean_object* x_4292; lean_object* x_4293; lean_object* x_4294; lean_object* x_4295; lean_object* x_4296; lean_object* x_4297; lean_object* x_4298; lean_object* x_4299; -lean_dec(x_4283); -x_4291 = lean_ctor_get(x_4282, 1); -lean_inc(x_4291); -lean_dec(x_4282); -x_4292 = l_Lean_Syntax_formatStxAux___main(x_4196, x_4198, x_4257, x_4277); -x_4293 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4293, 0, x_4292); -x_4294 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_4295 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4295, 0, x_4294); -lean_ctor_set(x_4295, 1, x_4293); -x_4296 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4297 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4296, x_4295, x_5, x_4291, x_7, x_8, x_4281); -lean_dec(x_5); -x_4298 = lean_ctor_get(x_4297, 0); -lean_inc(x_4298); -x_4299 = lean_ctor_get(x_4297, 1); -lean_inc(x_4299); -lean_dec(x_4297); -x_4233 = x_4298; -x_4234 = x_4299; -goto block_4255; -} -} -} -else -{ -lean_object* x_4315; lean_object* x_4316; -x_4315 = lean_ctor_get(x_4265, 0); -lean_inc(x_4315); -lean_dec(x_4265); -x_4316 = l_Lean_Syntax_getTailInfo___main(x_4263); -if (lean_obj_tag(x_4316) == 0) -{ -lean_object* x_4317; lean_object* x_4318; lean_object* x_4319; lean_object* x_4320; lean_object* x_4321; lean_object* x_4322; lean_object* x_4323; lean_object* x_4324; lean_object* x_4325; lean_object* x_4326; lean_object* x_4327; lean_object* x_4328; lean_object* x_4329; lean_object* x_4330; lean_object* x_4331; lean_object* x_4332; lean_object* x_4352; lean_object* x_4353; uint8_t x_4354; -lean_dec(x_4315); -x_4317 = lean_apply_1(x_2, x_4263); -x_4318 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_4317, x_5, x_4264, x_7, x_8, x_4262); -x_4319 = lean_ctor_get(x_4318, 0); -lean_inc(x_4319); -x_4320 = lean_ctor_get(x_4319, 0); -lean_inc(x_4320); -lean_dec(x_4319); -x_4321 = lean_ctor_get(x_4318, 1); -lean_inc(x_4321); -lean_dec(x_4318); -x_4322 = lean_ctor_get(x_4320, 1); -lean_inc(x_4322); -lean_dec(x_4320); -x_4323 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4322, x_7, x_8, x_4321); -x_4324 = lean_ctor_get(x_4323, 0); -lean_inc(x_4324); -x_4325 = lean_ctor_get(x_4324, 0); -lean_inc(x_4325); -if (lean_is_exclusive(x_4324)) { - lean_ctor_release(x_4324, 0); - x_4326 = x_4324; -} else { - lean_dec_ref(x_4324); - x_4326 = lean_box(0); -} -x_4327 = lean_ctor_get(x_4323, 1); -lean_inc(x_4327); -lean_dec(x_4323); -x_4328 = lean_ctor_get(x_4325, 0); -lean_inc(x_4328); -x_4329 = lean_ctor_get(x_4325, 1); -lean_inc(x_4329); -if (lean_is_exclusive(x_4325)) { - lean_ctor_release(x_4325, 0); - lean_ctor_release(x_4325, 1); - x_4330 = x_4325; -} else { - lean_dec_ref(x_4325); - x_4330 = lean_box(0); -} -x_4352 = l_Lean_Core_getTraceState___rarg(x_8, x_4327); -x_4353 = lean_ctor_get(x_4352, 0); -lean_inc(x_4353); -x_4354 = lean_ctor_get_uint8(x_4353, sizeof(void*)*1); -lean_dec(x_4353); -if (x_4354 == 0) -{ -lean_object* x_4355; lean_object* x_4356; lean_object* x_4357; lean_object* x_4358; -x_4355 = lean_ctor_get(x_4352, 1); -lean_inc(x_4355); -lean_dec(x_4352); -x_4356 = lean_box(x_4198); -if (lean_is_scalar(x_4330)) { - x_4357 = lean_alloc_ctor(0, 2, 0); -} else { - x_4357 = x_4330; -} -lean_ctor_set(x_4357, 0, x_4356); -lean_ctor_set(x_4357, 1, x_4329); -if (lean_is_scalar(x_4326)) { - x_4358 = lean_alloc_ctor(1, 1, 0); -} else { - x_4358 = x_4326; -} -lean_ctor_set(x_4358, 0, x_4357); -x_4331 = x_4358; -x_4332 = x_4355; -goto block_4351; -} -else -{ -lean_object* x_4359; lean_object* x_4360; lean_object* x_4361; lean_object* x_4362; lean_object* x_4363; lean_object* x_4364; lean_object* x_4365; -x_4359 = lean_ctor_get(x_4352, 1); -lean_inc(x_4359); -lean_dec(x_4352); -x_4360 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4361 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4360, x_7, x_8, x_4359); -x_4362 = lean_ctor_get(x_4361, 0); -lean_inc(x_4362); -x_4363 = lean_ctor_get(x_4361, 1); -lean_inc(x_4363); -lean_dec(x_4361); -if (lean_is_scalar(x_4330)) { - x_4364 = lean_alloc_ctor(0, 2, 0); -} else { - x_4364 = x_4330; -} -lean_ctor_set(x_4364, 0, x_4362); -lean_ctor_set(x_4364, 1, x_4329); -if (lean_is_scalar(x_4326)) { - x_4365 = lean_alloc_ctor(1, 1, 0); -} else { - x_4365 = x_4326; -} -lean_ctor_set(x_4365, 0, x_4364); -x_4331 = x_4365; -x_4332 = x_4363; -goto block_4351; -} -block_4351: -{ -lean_object* x_4333; lean_object* x_4334; lean_object* x_4335; uint8_t x_4336; -x_4333 = lean_ctor_get(x_4331, 0); -lean_inc(x_4333); -if (lean_is_exclusive(x_4331)) { - lean_ctor_release(x_4331, 0); - x_4334 = x_4331; -} else { - lean_dec_ref(x_4331); - x_4334 = lean_box(0); -} -x_4335 = lean_ctor_get(x_4333, 0); -lean_inc(x_4335); -x_4336 = lean_unbox(x_4335); -lean_dec(x_4335); -if (x_4336 == 0) -{ -lean_object* x_4337; lean_object* x_4338; lean_object* x_4339; lean_object* x_4340; lean_object* x_4341; -lean_dec(x_4328); -lean_dec(x_5); -x_4337 = lean_ctor_get(x_4333, 1); -lean_inc(x_4337); -if (lean_is_exclusive(x_4333)) { - lean_ctor_release(x_4333, 0); - lean_ctor_release(x_4333, 1); - x_4338 = x_4333; -} else { - lean_dec_ref(x_4333); - x_4338 = lean_box(0); -} -x_4339 = lean_box(0); -if (lean_is_scalar(x_4338)) { - x_4340 = lean_alloc_ctor(0, 2, 0); -} else { - x_4340 = x_4338; -} -lean_ctor_set(x_4340, 0, x_4339); -lean_ctor_set(x_4340, 1, x_4337); -if (lean_is_scalar(x_4334)) { - x_4341 = lean_alloc_ctor(1, 1, 0); -} else { - x_4341 = x_4334; -} -lean_ctor_set(x_4341, 0, x_4340); -x_4233 = x_4341; -x_4234 = x_4332; -goto block_4255; -} -else -{ -lean_object* x_4342; lean_object* x_4343; lean_object* x_4344; lean_object* x_4345; lean_object* x_4346; lean_object* x_4347; lean_object* x_4348; lean_object* x_4349; lean_object* x_4350; -lean_dec(x_4334); -x_4342 = lean_ctor_get(x_4333, 1); -lean_inc(x_4342); -lean_dec(x_4333); -x_4343 = l_Lean_Syntax_formatStxAux___main(x_4196, x_4198, x_4257, x_4328); -x_4344 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4344, 0, x_4343); -x_4345 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_4346 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4346, 0, x_4345); -lean_ctor_set(x_4346, 1, x_4344); -x_4347 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4348 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4347, x_4346, x_5, x_4342, x_7, x_8, x_4332); -lean_dec(x_5); -x_4349 = lean_ctor_get(x_4348, 0); -lean_inc(x_4349); -x_4350 = lean_ctor_get(x_4348, 1); -lean_inc(x_4350); -lean_dec(x_4348); -x_4233 = x_4349; -x_4234 = x_4350; -goto block_4255; -} -} -} -else -{ -lean_object* x_4366; lean_object* x_4367; lean_object* x_4368; lean_object* x_4369; lean_object* x_4370; lean_object* x_4371; lean_object* x_4372; lean_object* x_4373; lean_object* x_4374; lean_object* x_4375; lean_object* x_4376; lean_object* x_4377; lean_object* x_4378; lean_object* x_4379; lean_object* x_4380; lean_object* x_4381; lean_object* x_4382; lean_object* x_4383; lean_object* x_4384; lean_object* x_4385; lean_object* x_4386; lean_object* x_4387; lean_object* x_4388; lean_object* x_4389; lean_object* x_4390; lean_object* x_4391; lean_object* x_4392; lean_object* x_4393; lean_object* x_4394; lean_object* x_4395; lean_object* x_4396; lean_object* x_4397; lean_object* x_4398; lean_object* x_4399; lean_object* x_4419; lean_object* x_4420; uint8_t x_4421; -x_4366 = lean_ctor_get(x_4316, 0); -lean_inc(x_4366); -lean_dec(x_4316); -x_4367 = lean_ctor_get(x_4315, 0); -lean_inc(x_4367); -x_4368 = lean_ctor_get(x_4315, 1); -lean_inc(x_4368); -x_4369 = lean_ctor_get(x_4315, 2); -lean_inc(x_4369); -if (lean_is_exclusive(x_4315)) { - lean_ctor_release(x_4315, 0); - lean_ctor_release(x_4315, 1); - lean_ctor_release(x_4315, 2); - x_4370 = x_4315; -} else { - lean_dec_ref(x_4315); - x_4370 = lean_box(0); -} -x_4371 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_4368); -if (lean_is_scalar(x_4370)) { - x_4372 = lean_alloc_ctor(0, 3, 0); -} else { - x_4372 = x_4370; -} -lean_ctor_set(x_4372, 0, x_4371); -lean_ctor_set(x_4372, 1, x_4368); -lean_ctor_set(x_4372, 2, x_4369); -x_4373 = l_Lean_Syntax_setHeadInfo(x_4263, x_4372); -x_4374 = lean_ctor_get(x_4366, 0); -lean_inc(x_4374); -x_4375 = lean_ctor_get(x_4366, 1); -lean_inc(x_4375); -x_4376 = lean_ctor_get(x_4366, 2); -lean_inc(x_4376); -if (lean_is_exclusive(x_4366)) { - lean_ctor_release(x_4366, 0); - lean_ctor_release(x_4366, 1); - lean_ctor_release(x_4366, 2); - x_4377 = x_4366; -} else { - lean_dec_ref(x_4366); - x_4377 = lean_box(0); -} -lean_inc(x_4375); -if (lean_is_scalar(x_4377)) { - x_4378 = lean_alloc_ctor(0, 3, 0); -} else { - x_4378 = x_4377; -} -lean_ctor_set(x_4378, 0, x_4374); -lean_ctor_set(x_4378, 1, x_4375); -lean_ctor_set(x_4378, 2, x_4371); -x_4379 = l_Lean_Syntax_setTailInfo(x_4373, x_4378); -x_4380 = lean_apply_1(x_2, x_4379); -x_4381 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_4381, 0, x_4367); -lean_ctor_set(x_4381, 1, x_4368); -lean_ctor_set(x_4381, 2, x_4371); -x_4382 = l_Lean_Syntax_setHeadInfo(x_4380, x_4381); -x_4383 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_4383, 0, x_4371); -lean_ctor_set(x_4383, 1, x_4375); -lean_ctor_set(x_4383, 2, x_4376); -x_4384 = l_Lean_Syntax_setTailInfo(x_4382, x_4383); -x_4385 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_4384, x_5, x_4264, x_7, x_8, x_4262); -x_4386 = lean_ctor_get(x_4385, 0); -lean_inc(x_4386); -x_4387 = lean_ctor_get(x_4386, 0); -lean_inc(x_4387); -lean_dec(x_4386); -x_4388 = lean_ctor_get(x_4385, 1); -lean_inc(x_4388); -lean_dec(x_4385); -x_4389 = lean_ctor_get(x_4387, 1); -lean_inc(x_4389); -lean_dec(x_4387); -x_4390 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4389, x_7, x_8, x_4388); -x_4391 = lean_ctor_get(x_4390, 0); -lean_inc(x_4391); -x_4392 = lean_ctor_get(x_4391, 0); -lean_inc(x_4392); -if (lean_is_exclusive(x_4391)) { - lean_ctor_release(x_4391, 0); - x_4393 = x_4391; -} else { - lean_dec_ref(x_4391); - x_4393 = lean_box(0); -} -x_4394 = lean_ctor_get(x_4390, 1); -lean_inc(x_4394); -lean_dec(x_4390); -x_4395 = lean_ctor_get(x_4392, 0); -lean_inc(x_4395); -x_4396 = lean_ctor_get(x_4392, 1); -lean_inc(x_4396); -if (lean_is_exclusive(x_4392)) { - lean_ctor_release(x_4392, 0); - lean_ctor_release(x_4392, 1); - x_4397 = x_4392; -} else { - lean_dec_ref(x_4392); - x_4397 = lean_box(0); -} -x_4419 = l_Lean_Core_getTraceState___rarg(x_8, x_4394); -x_4420 = lean_ctor_get(x_4419, 0); -lean_inc(x_4420); -x_4421 = lean_ctor_get_uint8(x_4420, sizeof(void*)*1); -lean_dec(x_4420); -if (x_4421 == 0) -{ -lean_object* x_4422; lean_object* x_4423; lean_object* x_4424; lean_object* x_4425; -x_4422 = lean_ctor_get(x_4419, 1); -lean_inc(x_4422); -lean_dec(x_4419); -x_4423 = lean_box(x_4198); -if (lean_is_scalar(x_4397)) { - x_4424 = lean_alloc_ctor(0, 2, 0); -} else { - x_4424 = x_4397; -} -lean_ctor_set(x_4424, 0, x_4423); -lean_ctor_set(x_4424, 1, x_4396); -if (lean_is_scalar(x_4393)) { - x_4425 = lean_alloc_ctor(1, 1, 0); -} else { - x_4425 = x_4393; -} -lean_ctor_set(x_4425, 0, x_4424); -x_4398 = x_4425; -x_4399 = x_4422; -goto block_4418; -} -else -{ -lean_object* x_4426; lean_object* x_4427; lean_object* x_4428; lean_object* x_4429; lean_object* x_4430; lean_object* x_4431; lean_object* x_4432; -x_4426 = lean_ctor_get(x_4419, 1); -lean_inc(x_4426); -lean_dec(x_4419); -x_4427 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4428 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4427, x_7, x_8, x_4426); -x_4429 = lean_ctor_get(x_4428, 0); -lean_inc(x_4429); -x_4430 = lean_ctor_get(x_4428, 1); -lean_inc(x_4430); -lean_dec(x_4428); -if (lean_is_scalar(x_4397)) { - x_4431 = lean_alloc_ctor(0, 2, 0); -} else { - x_4431 = x_4397; -} -lean_ctor_set(x_4431, 0, x_4429); -lean_ctor_set(x_4431, 1, x_4396); -if (lean_is_scalar(x_4393)) { - x_4432 = lean_alloc_ctor(1, 1, 0); -} else { - x_4432 = x_4393; -} -lean_ctor_set(x_4432, 0, x_4431); -x_4398 = x_4432; -x_4399 = x_4430; -goto block_4418; -} -block_4418: -{ -lean_object* x_4400; lean_object* x_4401; lean_object* x_4402; uint8_t x_4403; -x_4400 = lean_ctor_get(x_4398, 0); -lean_inc(x_4400); -if (lean_is_exclusive(x_4398)) { - lean_ctor_release(x_4398, 0); - x_4401 = x_4398; -} else { - lean_dec_ref(x_4398); - x_4401 = lean_box(0); -} -x_4402 = lean_ctor_get(x_4400, 0); -lean_inc(x_4402); -x_4403 = lean_unbox(x_4402); -lean_dec(x_4402); -if (x_4403 == 0) -{ -lean_object* x_4404; lean_object* x_4405; lean_object* x_4406; lean_object* x_4407; lean_object* x_4408; -lean_dec(x_4395); -lean_dec(x_5); -x_4404 = lean_ctor_get(x_4400, 1); -lean_inc(x_4404); -if (lean_is_exclusive(x_4400)) { - lean_ctor_release(x_4400, 0); - lean_ctor_release(x_4400, 1); - x_4405 = x_4400; -} else { - lean_dec_ref(x_4400); - x_4405 = lean_box(0); -} -x_4406 = lean_box(0); -if (lean_is_scalar(x_4405)) { - x_4407 = lean_alloc_ctor(0, 2, 0); -} else { - x_4407 = x_4405; -} -lean_ctor_set(x_4407, 0, x_4406); -lean_ctor_set(x_4407, 1, x_4404); -if (lean_is_scalar(x_4401)) { - x_4408 = lean_alloc_ctor(1, 1, 0); -} else { - x_4408 = x_4401; -} -lean_ctor_set(x_4408, 0, x_4407); -x_4233 = x_4408; -x_4234 = x_4399; -goto block_4255; -} -else -{ -lean_object* x_4409; lean_object* x_4410; lean_object* x_4411; lean_object* x_4412; lean_object* x_4413; lean_object* x_4414; lean_object* x_4415; lean_object* x_4416; lean_object* x_4417; -lean_dec(x_4401); -x_4409 = lean_ctor_get(x_4400, 1); -lean_inc(x_4409); -lean_dec(x_4400); -x_4410 = l_Lean_Syntax_formatStxAux___main(x_4196, x_4198, x_4257, x_4395); -x_4411 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4411, 0, x_4410); -x_4412 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_4413 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4413, 0, x_4412); -lean_ctor_set(x_4413, 1, x_4411); -x_4414 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4415 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4414, x_4413, x_5, x_4409, x_7, x_8, x_4399); -lean_dec(x_5); -x_4416 = lean_ctor_get(x_4415, 0); -lean_inc(x_4416); -x_4417 = lean_ctor_get(x_4415, 1); -lean_inc(x_4417); -lean_dec(x_4415); -x_4233 = x_4416; -x_4234 = x_4417; -goto block_4255; -} -} -} -} -} -else -{ -lean_object* x_4433; lean_object* x_4434; lean_object* x_4435; lean_object* x_4436; lean_object* x_4437; lean_object* x_4438; lean_object* x_4439; lean_object* x_4440; lean_object* x_4441; lean_object* x_4442; lean_object* x_4443; lean_object* x_4444; -x_4433 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_4231, x_7, x_8, x_4228); -x_4434 = lean_ctor_get(x_4433, 0); -lean_inc(x_4434); -x_4435 = lean_ctor_get(x_4434, 0); -lean_inc(x_4435); -lean_dec(x_4434); -x_4436 = lean_ctor_get(x_4433, 1); -lean_inc(x_4436); -lean_dec(x_4433); -x_4437 = lean_ctor_get(x_4435, 1); -lean_inc(x_4437); -lean_dec(x_4435); -x_4438 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4437, x_7, x_8, x_4436); -x_4439 = lean_ctor_get(x_4438, 0); -lean_inc(x_4439); -x_4440 = lean_ctor_get(x_4439, 0); -lean_inc(x_4440); -lean_dec(x_4439); -x_4441 = lean_ctor_get(x_4438, 1); -lean_inc(x_4441); -lean_dec(x_4438); -x_4442 = lean_ctor_get(x_4440, 0); -lean_inc(x_4442); -x_4443 = lean_ctor_get(x_4440, 1); -lean_inc(x_4443); -lean_dec(x_4440); -x_4444 = l_Lean_Syntax_getHeadInfo___main(x_4442); -if (lean_obj_tag(x_4444) == 0) -{ -lean_object* x_4445; lean_object* x_4446; lean_object* x_4447; lean_object* x_4448; lean_object* x_4449; lean_object* x_4450; lean_object* x_4451; lean_object* x_4452; lean_object* x_4453; lean_object* x_4454; lean_object* x_4455; lean_object* x_4456; lean_object* x_4457; lean_object* x_4458; lean_object* x_4459; lean_object* x_4460; lean_object* x_4480; lean_object* x_4481; uint8_t x_4482; -x_4445 = lean_apply_1(x_2, x_4442); -x_4446 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_4445, x_5, x_4443, x_7, x_8, x_4441); -x_4447 = lean_ctor_get(x_4446, 0); -lean_inc(x_4447); -x_4448 = lean_ctor_get(x_4447, 0); -lean_inc(x_4448); -lean_dec(x_4447); -x_4449 = lean_ctor_get(x_4446, 1); -lean_inc(x_4449); -lean_dec(x_4446); -x_4450 = lean_ctor_get(x_4448, 1); -lean_inc(x_4450); -lean_dec(x_4448); -x_4451 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4450, x_7, x_8, x_4449); -x_4452 = lean_ctor_get(x_4451, 0); -lean_inc(x_4452); -x_4453 = lean_ctor_get(x_4452, 0); -lean_inc(x_4453); -if (lean_is_exclusive(x_4452)) { - lean_ctor_release(x_4452, 0); - x_4454 = x_4452; -} else { - lean_dec_ref(x_4452); - x_4454 = lean_box(0); -} -x_4455 = lean_ctor_get(x_4451, 1); -lean_inc(x_4455); -lean_dec(x_4451); -x_4456 = lean_ctor_get(x_4453, 0); -lean_inc(x_4456); -x_4457 = lean_ctor_get(x_4453, 1); -lean_inc(x_4457); -if (lean_is_exclusive(x_4453)) { - lean_ctor_release(x_4453, 0); - lean_ctor_release(x_4453, 1); - x_4458 = x_4453; -} else { - lean_dec_ref(x_4453); - x_4458 = lean_box(0); -} -x_4480 = l_Lean_Core_getTraceState___rarg(x_8, x_4455); -x_4481 = lean_ctor_get(x_4480, 0); -lean_inc(x_4481); -x_4482 = lean_ctor_get_uint8(x_4481, sizeof(void*)*1); -lean_dec(x_4481); -if (x_4482 == 0) -{ -lean_object* x_4483; lean_object* x_4484; lean_object* x_4485; lean_object* x_4486; -x_4483 = lean_ctor_get(x_4480, 1); -lean_inc(x_4483); -lean_dec(x_4480); -x_4484 = lean_box(x_4198); -if (lean_is_scalar(x_4458)) { - x_4485 = lean_alloc_ctor(0, 2, 0); -} else { - x_4485 = x_4458; -} -lean_ctor_set(x_4485, 0, x_4484); -lean_ctor_set(x_4485, 1, x_4457); -if (lean_is_scalar(x_4454)) { - x_4486 = lean_alloc_ctor(1, 1, 0); -} else { - x_4486 = x_4454; -} -lean_ctor_set(x_4486, 0, x_4485); -x_4459 = x_4486; -x_4460 = x_4483; -goto block_4479; -} -else -{ -lean_object* x_4487; lean_object* x_4488; lean_object* x_4489; lean_object* x_4490; lean_object* x_4491; lean_object* x_4492; lean_object* x_4493; -x_4487 = lean_ctor_get(x_4480, 1); -lean_inc(x_4487); -lean_dec(x_4480); -x_4488 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4489 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4488, x_7, x_8, x_4487); -x_4490 = lean_ctor_get(x_4489, 0); -lean_inc(x_4490); -x_4491 = lean_ctor_get(x_4489, 1); -lean_inc(x_4491); -lean_dec(x_4489); -if (lean_is_scalar(x_4458)) { - x_4492 = lean_alloc_ctor(0, 2, 0); -} else { - x_4492 = x_4458; -} -lean_ctor_set(x_4492, 0, x_4490); -lean_ctor_set(x_4492, 1, x_4457); -if (lean_is_scalar(x_4454)) { - x_4493 = lean_alloc_ctor(1, 1, 0); -} else { - x_4493 = x_4454; -} -lean_ctor_set(x_4493, 0, x_4492); -x_4459 = x_4493; -x_4460 = x_4491; -goto block_4479; -} -block_4479: -{ -lean_object* x_4461; lean_object* x_4462; lean_object* x_4463; uint8_t x_4464; -x_4461 = lean_ctor_get(x_4459, 0); -lean_inc(x_4461); -if (lean_is_exclusive(x_4459)) { - lean_ctor_release(x_4459, 0); - x_4462 = x_4459; -} else { - lean_dec_ref(x_4459); - x_4462 = lean_box(0); -} -x_4463 = lean_ctor_get(x_4461, 0); -lean_inc(x_4463); -x_4464 = lean_unbox(x_4463); -lean_dec(x_4463); -if (x_4464 == 0) -{ -lean_object* x_4465; lean_object* x_4466; lean_object* x_4467; lean_object* x_4468; lean_object* x_4469; -lean_dec(x_4456); -lean_dec(x_5); -x_4465 = lean_ctor_get(x_4461, 1); -lean_inc(x_4465); -if (lean_is_exclusive(x_4461)) { - lean_ctor_release(x_4461, 0); - lean_ctor_release(x_4461, 1); - x_4466 = x_4461; -} else { - lean_dec_ref(x_4461); - x_4466 = lean_box(0); -} -x_4467 = lean_box(0); -if (lean_is_scalar(x_4466)) { - x_4468 = lean_alloc_ctor(0, 2, 0); -} else { - x_4468 = x_4466; -} -lean_ctor_set(x_4468, 0, x_4467); -lean_ctor_set(x_4468, 1, x_4465); -if (lean_is_scalar(x_4462)) { - x_4469 = lean_alloc_ctor(1, 1, 0); -} else { - x_4469 = x_4462; -} -lean_ctor_set(x_4469, 0, x_4468); -x_4233 = x_4469; -x_4234 = x_4460; -goto block_4255; -} -else -{ -lean_object* x_4470; lean_object* x_4471; lean_object* x_4472; lean_object* x_4473; lean_object* x_4474; lean_object* x_4475; lean_object* x_4476; lean_object* x_4477; lean_object* x_4478; -lean_dec(x_4462); -x_4470 = lean_ctor_get(x_4461, 1); -lean_inc(x_4470); -lean_dec(x_4461); -x_4471 = l_Lean_Syntax_formatStxAux___main(x_4196, x_4198, x_4257, x_4456); -x_4472 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4472, 0, x_4471); -x_4473 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_4474 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4474, 0, x_4473); -lean_ctor_set(x_4474, 1, x_4472); -x_4475 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4476 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4475, x_4474, x_5, x_4470, x_7, x_8, x_4460); -lean_dec(x_5); -x_4477 = lean_ctor_get(x_4476, 0); -lean_inc(x_4477); -x_4478 = lean_ctor_get(x_4476, 1); -lean_inc(x_4478); -lean_dec(x_4476); -x_4233 = x_4477; -x_4234 = x_4478; -goto block_4255; -} -} -} -else -{ -lean_object* x_4494; lean_object* x_4495; -x_4494 = lean_ctor_get(x_4444, 0); -lean_inc(x_4494); -lean_dec(x_4444); -x_4495 = l_Lean_Syntax_getTailInfo___main(x_4442); -if (lean_obj_tag(x_4495) == 0) -{ -lean_object* x_4496; lean_object* x_4497; lean_object* x_4498; lean_object* x_4499; lean_object* x_4500; lean_object* x_4501; lean_object* x_4502; lean_object* x_4503; lean_object* x_4504; lean_object* x_4505; lean_object* x_4506; lean_object* x_4507; lean_object* x_4508; lean_object* x_4509; lean_object* x_4510; lean_object* x_4511; lean_object* x_4531; lean_object* x_4532; uint8_t x_4533; -lean_dec(x_4494); -x_4496 = lean_apply_1(x_2, x_4442); -x_4497 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_4496, x_5, x_4443, x_7, x_8, x_4441); -x_4498 = lean_ctor_get(x_4497, 0); -lean_inc(x_4498); -x_4499 = lean_ctor_get(x_4498, 0); -lean_inc(x_4499); -lean_dec(x_4498); -x_4500 = lean_ctor_get(x_4497, 1); -lean_inc(x_4500); -lean_dec(x_4497); -x_4501 = lean_ctor_get(x_4499, 1); -lean_inc(x_4501); -lean_dec(x_4499); -x_4502 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4501, x_7, x_8, x_4500); -x_4503 = lean_ctor_get(x_4502, 0); -lean_inc(x_4503); -x_4504 = lean_ctor_get(x_4503, 0); -lean_inc(x_4504); -if (lean_is_exclusive(x_4503)) { - lean_ctor_release(x_4503, 0); - x_4505 = x_4503; -} else { - lean_dec_ref(x_4503); - x_4505 = lean_box(0); -} -x_4506 = lean_ctor_get(x_4502, 1); -lean_inc(x_4506); -lean_dec(x_4502); -x_4507 = lean_ctor_get(x_4504, 0); -lean_inc(x_4507); -x_4508 = lean_ctor_get(x_4504, 1); -lean_inc(x_4508); -if (lean_is_exclusive(x_4504)) { - lean_ctor_release(x_4504, 0); - lean_ctor_release(x_4504, 1); - x_4509 = x_4504; -} else { - lean_dec_ref(x_4504); - x_4509 = lean_box(0); -} -x_4531 = l_Lean_Core_getTraceState___rarg(x_8, x_4506); -x_4532 = lean_ctor_get(x_4531, 0); -lean_inc(x_4532); -x_4533 = lean_ctor_get_uint8(x_4532, sizeof(void*)*1); -lean_dec(x_4532); -if (x_4533 == 0) -{ -lean_object* x_4534; lean_object* x_4535; lean_object* x_4536; lean_object* x_4537; -x_4534 = lean_ctor_get(x_4531, 1); -lean_inc(x_4534); -lean_dec(x_4531); -x_4535 = lean_box(x_4198); -if (lean_is_scalar(x_4509)) { - x_4536 = lean_alloc_ctor(0, 2, 0); -} else { - x_4536 = x_4509; -} -lean_ctor_set(x_4536, 0, x_4535); -lean_ctor_set(x_4536, 1, x_4508); -if (lean_is_scalar(x_4505)) { - x_4537 = lean_alloc_ctor(1, 1, 0); -} else { - x_4537 = x_4505; -} -lean_ctor_set(x_4537, 0, x_4536); -x_4510 = x_4537; -x_4511 = x_4534; -goto block_4530; -} -else -{ -lean_object* x_4538; lean_object* x_4539; lean_object* x_4540; lean_object* x_4541; lean_object* x_4542; lean_object* x_4543; lean_object* x_4544; -x_4538 = lean_ctor_get(x_4531, 1); -lean_inc(x_4538); -lean_dec(x_4531); -x_4539 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4540 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4539, x_7, x_8, x_4538); -x_4541 = lean_ctor_get(x_4540, 0); -lean_inc(x_4541); -x_4542 = lean_ctor_get(x_4540, 1); -lean_inc(x_4542); -lean_dec(x_4540); -if (lean_is_scalar(x_4509)) { - x_4543 = lean_alloc_ctor(0, 2, 0); -} else { - x_4543 = x_4509; -} -lean_ctor_set(x_4543, 0, x_4541); -lean_ctor_set(x_4543, 1, x_4508); -if (lean_is_scalar(x_4505)) { - x_4544 = lean_alloc_ctor(1, 1, 0); -} else { - x_4544 = x_4505; -} -lean_ctor_set(x_4544, 0, x_4543); -x_4510 = x_4544; -x_4511 = x_4542; -goto block_4530; -} -block_4530: -{ -lean_object* x_4512; lean_object* x_4513; lean_object* x_4514; uint8_t x_4515; -x_4512 = lean_ctor_get(x_4510, 0); -lean_inc(x_4512); -if (lean_is_exclusive(x_4510)) { - lean_ctor_release(x_4510, 0); - x_4513 = x_4510; -} else { - lean_dec_ref(x_4510); - x_4513 = lean_box(0); -} -x_4514 = lean_ctor_get(x_4512, 0); -lean_inc(x_4514); -x_4515 = lean_unbox(x_4514); -lean_dec(x_4514); -if (x_4515 == 0) -{ -lean_object* x_4516; lean_object* x_4517; lean_object* x_4518; lean_object* x_4519; lean_object* x_4520; -lean_dec(x_4507); -lean_dec(x_5); -x_4516 = lean_ctor_get(x_4512, 1); -lean_inc(x_4516); -if (lean_is_exclusive(x_4512)) { - lean_ctor_release(x_4512, 0); - lean_ctor_release(x_4512, 1); - x_4517 = x_4512; -} else { - lean_dec_ref(x_4512); - x_4517 = lean_box(0); -} -x_4518 = lean_box(0); -if (lean_is_scalar(x_4517)) { - x_4519 = lean_alloc_ctor(0, 2, 0); -} else { - x_4519 = x_4517; -} -lean_ctor_set(x_4519, 0, x_4518); -lean_ctor_set(x_4519, 1, x_4516); -if (lean_is_scalar(x_4513)) { - x_4520 = lean_alloc_ctor(1, 1, 0); -} else { - x_4520 = x_4513; -} -lean_ctor_set(x_4520, 0, x_4519); -x_4233 = x_4520; -x_4234 = x_4511; -goto block_4255; -} -else -{ -lean_object* x_4521; lean_object* x_4522; lean_object* x_4523; lean_object* x_4524; lean_object* x_4525; lean_object* x_4526; lean_object* x_4527; lean_object* x_4528; lean_object* x_4529; -lean_dec(x_4513); -x_4521 = lean_ctor_get(x_4512, 1); -lean_inc(x_4521); -lean_dec(x_4512); -x_4522 = l_Lean_Syntax_formatStxAux___main(x_4196, x_4198, x_4257, x_4507); -x_4523 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4523, 0, x_4522); -x_4524 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_4525 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4525, 0, x_4524); -lean_ctor_set(x_4525, 1, x_4523); -x_4526 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4527 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4526, x_4525, x_5, x_4521, x_7, x_8, x_4511); -lean_dec(x_5); -x_4528 = lean_ctor_get(x_4527, 0); -lean_inc(x_4528); -x_4529 = lean_ctor_get(x_4527, 1); -lean_inc(x_4529); -lean_dec(x_4527); -x_4233 = x_4528; -x_4234 = x_4529; -goto block_4255; -} -} -} -else -{ -lean_object* x_4545; lean_object* x_4546; lean_object* x_4547; lean_object* x_4548; lean_object* x_4549; lean_object* x_4550; lean_object* x_4551; lean_object* x_4552; lean_object* x_4553; lean_object* x_4554; lean_object* x_4555; lean_object* x_4556; lean_object* x_4557; lean_object* x_4558; lean_object* x_4559; lean_object* x_4560; lean_object* x_4561; lean_object* x_4562; lean_object* x_4563; lean_object* x_4564; lean_object* x_4565; lean_object* x_4566; lean_object* x_4567; lean_object* x_4568; lean_object* x_4569; lean_object* x_4570; lean_object* x_4571; lean_object* x_4572; lean_object* x_4573; lean_object* x_4574; lean_object* x_4575; lean_object* x_4576; lean_object* x_4577; lean_object* x_4578; lean_object* x_4598; lean_object* x_4599; uint8_t x_4600; -x_4545 = lean_ctor_get(x_4495, 0); -lean_inc(x_4545); -lean_dec(x_4495); -x_4546 = lean_ctor_get(x_4494, 0); -lean_inc(x_4546); -x_4547 = lean_ctor_get(x_4494, 1); -lean_inc(x_4547); -x_4548 = lean_ctor_get(x_4494, 2); -lean_inc(x_4548); -if (lean_is_exclusive(x_4494)) { - lean_ctor_release(x_4494, 0); - lean_ctor_release(x_4494, 1); - lean_ctor_release(x_4494, 2); - x_4549 = x_4494; -} else { - lean_dec_ref(x_4494); - x_4549 = lean_box(0); -} -x_4550 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__16; -lean_inc(x_4547); -if (lean_is_scalar(x_4549)) { - x_4551 = lean_alloc_ctor(0, 3, 0); -} else { - x_4551 = x_4549; -} -lean_ctor_set(x_4551, 0, x_4550); -lean_ctor_set(x_4551, 1, x_4547); -lean_ctor_set(x_4551, 2, x_4548); -x_4552 = l_Lean_Syntax_setHeadInfo(x_4442, x_4551); -x_4553 = lean_ctor_get(x_4545, 0); -lean_inc(x_4553); -x_4554 = lean_ctor_get(x_4545, 1); -lean_inc(x_4554); -x_4555 = lean_ctor_get(x_4545, 2); -lean_inc(x_4555); -if (lean_is_exclusive(x_4545)) { - lean_ctor_release(x_4545, 0); - lean_ctor_release(x_4545, 1); - lean_ctor_release(x_4545, 2); - x_4556 = x_4545; -} else { - lean_dec_ref(x_4545); - x_4556 = lean_box(0); -} -lean_inc(x_4554); -if (lean_is_scalar(x_4556)) { - x_4557 = lean_alloc_ctor(0, 3, 0); -} else { - x_4557 = x_4556; -} -lean_ctor_set(x_4557, 0, x_4553); -lean_ctor_set(x_4557, 1, x_4554); -lean_ctor_set(x_4557, 2, x_4550); -x_4558 = l_Lean_Syntax_setTailInfo(x_4552, x_4557); -x_4559 = lean_apply_1(x_2, x_4558); -x_4560 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_4560, 0, x_4546); -lean_ctor_set(x_4560, 1, x_4547); -lean_ctor_set(x_4560, 2, x_4550); -x_4561 = l_Lean_Syntax_setHeadInfo(x_4559, x_4560); -x_4562 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_4562, 0, x_4550); -lean_ctor_set(x_4562, 1, x_4554); -lean_ctor_set(x_4562, 2, x_4555); -x_4563 = l_Lean_Syntax_setTailInfo(x_4561, x_4562); -x_4564 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_4563, x_5, x_4443, x_7, x_8, x_4441); -x_4565 = lean_ctor_get(x_4564, 0); -lean_inc(x_4565); -x_4566 = lean_ctor_get(x_4565, 0); -lean_inc(x_4566); -lean_dec(x_4565); -x_4567 = lean_ctor_get(x_4564, 1); -lean_inc(x_4567); -lean_dec(x_4564); -x_4568 = lean_ctor_get(x_4566, 1); -lean_inc(x_4568); -lean_dec(x_4566); -x_4569 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4568, x_7, x_8, x_4567); -x_4570 = lean_ctor_get(x_4569, 0); -lean_inc(x_4570); -x_4571 = lean_ctor_get(x_4570, 0); -lean_inc(x_4571); -if (lean_is_exclusive(x_4570)) { - lean_ctor_release(x_4570, 0); - x_4572 = x_4570; -} else { - lean_dec_ref(x_4570); - x_4572 = lean_box(0); -} -x_4573 = lean_ctor_get(x_4569, 1); -lean_inc(x_4573); -lean_dec(x_4569); -x_4574 = lean_ctor_get(x_4571, 0); -lean_inc(x_4574); -x_4575 = lean_ctor_get(x_4571, 1); -lean_inc(x_4575); -if (lean_is_exclusive(x_4571)) { - lean_ctor_release(x_4571, 0); - lean_ctor_release(x_4571, 1); - x_4576 = x_4571; -} else { - lean_dec_ref(x_4571); - x_4576 = lean_box(0); -} -x_4598 = l_Lean_Core_getTraceState___rarg(x_8, x_4573); -x_4599 = lean_ctor_get(x_4598, 0); -lean_inc(x_4599); -x_4600 = lean_ctor_get_uint8(x_4599, sizeof(void*)*1); -lean_dec(x_4599); -if (x_4600 == 0) -{ -lean_object* x_4601; lean_object* x_4602; lean_object* x_4603; lean_object* x_4604; -x_4601 = lean_ctor_get(x_4598, 1); -lean_inc(x_4601); -lean_dec(x_4598); -x_4602 = lean_box(x_4198); -if (lean_is_scalar(x_4576)) { - x_4603 = lean_alloc_ctor(0, 2, 0); -} else { - x_4603 = x_4576; -} -lean_ctor_set(x_4603, 0, x_4602); -lean_ctor_set(x_4603, 1, x_4575); -if (lean_is_scalar(x_4572)) { - x_4604 = lean_alloc_ctor(1, 1, 0); -} else { - x_4604 = x_4572; -} -lean_ctor_set(x_4604, 0, x_4603); -x_4577 = x_4604; -x_4578 = x_4601; -goto block_4597; -} -else -{ -lean_object* x_4605; lean_object* x_4606; lean_object* x_4607; lean_object* x_4608; lean_object* x_4609; lean_object* x_4610; lean_object* x_4611; -x_4605 = lean_ctor_get(x_4598, 1); -lean_inc(x_4605); -lean_dec(x_4598); -x_4606 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4607 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_4606, x_7, x_8, x_4605); -x_4608 = lean_ctor_get(x_4607, 0); -lean_inc(x_4608); -x_4609 = lean_ctor_get(x_4607, 1); -lean_inc(x_4609); -lean_dec(x_4607); -if (lean_is_scalar(x_4576)) { - x_4610 = lean_alloc_ctor(0, 2, 0); -} else { - x_4610 = x_4576; -} -lean_ctor_set(x_4610, 0, x_4608); -lean_ctor_set(x_4610, 1, x_4575); -if (lean_is_scalar(x_4572)) { - x_4611 = lean_alloc_ctor(1, 1, 0); -} else { - x_4611 = x_4572; -} -lean_ctor_set(x_4611, 0, x_4610); -x_4577 = x_4611; -x_4578 = x_4609; -goto block_4597; -} -block_4597: -{ -lean_object* x_4579; lean_object* x_4580; lean_object* x_4581; uint8_t x_4582; -x_4579 = lean_ctor_get(x_4577, 0); -lean_inc(x_4579); -if (lean_is_exclusive(x_4577)) { - lean_ctor_release(x_4577, 0); - x_4580 = x_4577; -} else { - lean_dec_ref(x_4577); - x_4580 = lean_box(0); -} -x_4581 = lean_ctor_get(x_4579, 0); -lean_inc(x_4581); -x_4582 = lean_unbox(x_4581); -lean_dec(x_4581); -if (x_4582 == 0) -{ -lean_object* x_4583; lean_object* x_4584; lean_object* x_4585; lean_object* x_4586; lean_object* x_4587; -lean_dec(x_4574); -lean_dec(x_5); -x_4583 = lean_ctor_get(x_4579, 1); -lean_inc(x_4583); -if (lean_is_exclusive(x_4579)) { - lean_ctor_release(x_4579, 0); - lean_ctor_release(x_4579, 1); - x_4584 = x_4579; -} else { - lean_dec_ref(x_4579); - x_4584 = lean_box(0); -} -x_4585 = lean_box(0); -if (lean_is_scalar(x_4584)) { - x_4586 = lean_alloc_ctor(0, 2, 0); -} else { - x_4586 = x_4584; -} -lean_ctor_set(x_4586, 0, x_4585); -lean_ctor_set(x_4586, 1, x_4583); -if (lean_is_scalar(x_4580)) { - x_4587 = lean_alloc_ctor(1, 1, 0); -} else { - x_4587 = x_4580; -} -lean_ctor_set(x_4587, 0, x_4586); -x_4233 = x_4587; -x_4234 = x_4578; -goto block_4255; -} -else -{ -lean_object* x_4588; lean_object* x_4589; lean_object* x_4590; lean_object* x_4591; lean_object* x_4592; lean_object* x_4593; lean_object* x_4594; lean_object* x_4595; lean_object* x_4596; -lean_dec(x_4580); -x_4588 = lean_ctor_get(x_4579, 1); -lean_inc(x_4588); -lean_dec(x_4579); -x_4589 = l_Lean_Syntax_formatStxAux___main(x_4196, x_4198, x_4257, x_4574); -x_4590 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4590, 0, x_4589); -x_4591 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__15; -x_4592 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4592, 0, x_4591); -lean_ctor_set(x_4592, 1, x_4590); -x_4593 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4594 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4593, x_4592, x_5, x_4588, x_7, x_8, x_4578); -lean_dec(x_5); -x_4595 = lean_ctor_get(x_4594, 0); -lean_inc(x_4595); -x_4596 = lean_ctor_get(x_4594, 1); -lean_inc(x_4596); -lean_dec(x_4594); -x_4233 = x_4595; -x_4234 = x_4596; -goto block_4255; -} -} -} -} -} -} -} -block_4679: -{ -lean_object* x_4641; lean_object* x_4642; lean_object* x_4643; uint8_t x_4644; -x_4641 = lean_ctor_get(x_4639, 0); -lean_inc(x_4641); -if (lean_is_exclusive(x_4639)) { - lean_ctor_release(x_4639, 0); - x_4642 = x_4639; -} else { - lean_dec_ref(x_4639); - x_4642 = lean_box(0); -} -x_4643 = lean_ctor_get(x_4641, 0); -lean_inc(x_4643); -x_4644 = lean_unbox(x_4643); -lean_dec(x_4643); -if (x_4644 == 0) -{ -lean_object* x_4645; lean_object* x_4646; lean_object* x_4647; lean_object* x_4648; lean_object* x_4649; -lean_dec(x_4216); -x_4645 = lean_ctor_get(x_4641, 1); -lean_inc(x_4645); -if (lean_is_exclusive(x_4641)) { - lean_ctor_release(x_4641, 0); - lean_ctor_release(x_4641, 1); - x_4646 = x_4641; -} else { - lean_dec_ref(x_4641); - x_4646 = lean_box(0); -} -x_4647 = lean_box(0); -if (lean_is_scalar(x_4646)) { - x_4648 = lean_alloc_ctor(0, 2, 0); -} else { - x_4648 = x_4646; -} -lean_ctor_set(x_4648, 0, x_4647); -lean_ctor_set(x_4648, 1, x_4645); -if (lean_is_scalar(x_4642)) { - x_4649 = lean_alloc_ctor(1, 1, 0); -} else { - x_4649 = x_4642; -} -lean_ctor_set(x_4649, 0, x_4648); -x_4227 = x_4649; -x_4228 = x_4640; -goto block_4638; -} -else -{ -lean_object* x_4650; lean_object* x_4651; lean_object* x_4652; lean_object* x_4653; lean_object* x_4654; lean_object* x_4655; lean_object* x_4656; lean_object* x_4657; lean_object* x_4658; lean_object* x_4659; lean_object* x_4660; lean_object* x_4661; lean_object* x_4662; lean_object* x_4663; lean_object* x_4664; lean_object* x_4665; lean_object* x_4666; lean_object* x_4667; lean_object* x_4668; lean_object* x_4669; lean_object* x_4670; lean_object* x_4671; lean_object* x_4672; lean_object* x_4673; lean_object* x_4674; lean_object* x_4675; lean_object* x_4676; lean_object* x_4677; lean_object* x_4678; -lean_dec(x_4642); -x_4650 = lean_ctor_get(x_4641, 1); -lean_inc(x_4650); -if (lean_is_exclusive(x_4641)) { - lean_ctor_release(x_4641, 0); - lean_ctor_release(x_4641, 1); - x_4651 = x_4641; -} else { - lean_dec_ref(x_4641); - x_4651 = lean_box(0); -} -lean_inc(x_3); -x_4652 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_3); -x_4653 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4653, 0, x_4652); -x_4654 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__19; -x_4655 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4655, 0, x_4654); -lean_ctor_set(x_4655, 1, x_4653); -x_4656 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__22; -x_4657 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4657, 0, x_4655); -lean_ctor_set(x_4657, 1, x_4656); -lean_inc(x_4226); -x_4658 = l_Lean_fmt___at_Lean_Level_LevelToFormat_Result_format___main___spec__1(x_4226); -x_4659 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4659, 0, x_4658); -x_4660 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4660, 0, x_4657); -lean_ctor_set(x_4660, 1, x_4659); -x_4661 = l_Lean_MessageData_arrayExpr_toMessageData___main___closed__2; -x_4662 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4662, 0, x_4660); -lean_ctor_set(x_4662, 1, x_4661); -lean_inc(x_1); -lean_inc(x_4225); -if (lean_is_scalar(x_4651)) { - x_4663 = lean_alloc_ctor(0, 2, 0); -} else { - x_4663 = x_4651; -} -lean_ctor_set(x_4663, 0, x_4225); -lean_ctor_set(x_4663, 1, x_1); -x_4664 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_4663); -x_4665 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4665, 0, x_4664); -x_4666 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4666, 0, x_4662); -lean_ctor_set(x_4666, 1, x_4665); -x_4667 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__25; -x_4668 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4668, 0, x_4666); -lean_ctor_set(x_4668, 1, x_4667); -x_4669 = lean_ctor_get(x_4139, 1); -lean_inc(x_4669); -x_4670 = lean_ctor_get(x_4139, 2); -lean_inc(x_4670); -if (lean_is_scalar(x_4216)) { - x_4671 = lean_alloc_ctor(0, 2, 0); -} else { - x_4671 = x_4216; -} -lean_ctor_set(x_4671, 0, x_4669); -lean_ctor_set(x_4671, 1, x_4670); -x_4672 = l_Lean_fmt___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6(x_4671); -x_4673 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4673, 0, x_4672); -x_4674 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4674, 0, x_4668); -lean_ctor_set(x_4674, 1, x_4673); -x_4675 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4676 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4675, x_4674, x_5, x_4650, x_7, x_8, x_4640); -x_4677 = lean_ctor_get(x_4676, 0); -lean_inc(x_4677); -x_4678 = lean_ctor_get(x_4676, 1); -lean_inc(x_4678); -lean_dec(x_4676); -x_4227 = x_4677; -x_4228 = x_4678; -goto block_4638; -} -} -} -} -} -else -{ -lean_object* x_4694; lean_object* x_4695; lean_object* x_4696; lean_object* x_4697; -lean_dec(x_4204); -lean_dec(x_4139); -lean_dec(x_4138); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_4694 = lean_ctor_get(x_4205, 0); -lean_inc(x_4694); -x_4695 = lean_ctor_get(x_4205, 1); -lean_inc(x_4695); -if (lean_is_exclusive(x_4205)) { - lean_ctor_release(x_4205, 0); - lean_ctor_release(x_4205, 1); - x_4696 = x_4205; -} else { - lean_dec_ref(x_4205); - x_4696 = lean_box(0); -} -if (lean_is_scalar(x_4696)) { - x_4697 = lean_alloc_ctor(1, 2, 0); -} else { - x_4697 = x_4696; -} -lean_ctor_set(x_4697, 0, x_4694); -lean_ctor_set(x_4697, 1, x_4695); -return x_4697; -} -} -block_4759: -{ -lean_object* x_4701; lean_object* x_4702; lean_object* x_4703; uint8_t x_4704; -x_4701 = lean_ctor_get(x_4699, 0); -lean_inc(x_4701); -if (lean_is_exclusive(x_4699)) { - lean_ctor_release(x_4699, 0); - x_4702 = x_4699; -} else { - lean_dec_ref(x_4699); - x_4702 = lean_box(0); -} -x_4703 = lean_ctor_get(x_4701, 0); -lean_inc(x_4703); -x_4704 = lean_unbox(x_4703); -lean_dec(x_4703); -if (x_4704 == 0) -{ -lean_object* x_4705; lean_object* x_4706; lean_object* x_4707; lean_object* x_4708; lean_object* x_4709; -lean_dec(x_14); -x_4705 = lean_ctor_get(x_4701, 1); -lean_inc(x_4705); -if (lean_is_exclusive(x_4701)) { - lean_ctor_release(x_4701, 0); - lean_ctor_release(x_4701, 1); - x_4706 = x_4701; -} else { - lean_dec_ref(x_4701); - x_4706 = lean_box(0); -} -x_4707 = lean_box(0); -if (lean_is_scalar(x_4706)) { - x_4708 = lean_alloc_ctor(0, 2, 0); -} else { - x_4708 = x_4706; -} -lean_ctor_set(x_4708, 0, x_4707); -lean_ctor_set(x_4708, 1, x_4705); -if (lean_is_scalar(x_4702)) { - x_4709 = lean_alloc_ctor(1, 1, 0); -} else { - x_4709 = x_4702; -} -lean_ctor_set(x_4709, 0, x_4708); -x_4200 = x_4709; -x_4201 = x_4700; -goto block_4698; -} -else -{ -lean_object* x_4710; lean_object* x_4711; lean_object* x_4712; lean_object* x_4713; lean_object* x_4714; lean_object* x_4715; lean_object* x_4716; lean_object* x_4717; lean_object* x_4718; lean_object* x_4719; -lean_dec(x_4702); -x_4710 = lean_ctor_get(x_4701, 1); -lean_inc(x_4710); -lean_dec(x_4701); -x_4711 = lean_ctor_get(x_4139, 1); -lean_inc(x_4711); -x_4712 = lean_ctor_get(x_4139, 2); -lean_inc(x_4712); -x_4713 = l_Lean_Name_toString___closed__1; -x_4714 = l_Lean_Name_toStringWithSep___main(x_4713, x_4712); -x_4715 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_4715, 0, x_14); -x_4716 = l_Lean_MessageData_ofList___closed__3; -x_4717 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4717, 0, x_4716); -lean_ctor_set(x_4717, 1, x_4715); -x_4718 = lean_unsigned_to_nat(2u); -x_4719 = lean_alloc_ctor(7, 2, 0); -lean_ctor_set(x_4719, 0, x_4718); -lean_ctor_set(x_4719, 1, x_4717); -if (lean_obj_tag(x_4711) == 0) -{ -lean_object* x_4720; lean_object* x_4721; lean_object* x_4722; lean_object* x_4723; lean_object* x_4724; lean_object* x_4725; lean_object* x_4726; lean_object* x_4727; lean_object* x_4728; lean_object* x_4729; lean_object* x_4730; lean_object* x_4731; lean_object* x_4732; lean_object* x_4733; lean_object* x_4734; -x_4720 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31; -x_4721 = lean_string_append(x_4720, x_4714); -lean_dec(x_4714); -x_4722 = l_Option_HasRepr___rarg___closed__3; -x_4723 = lean_string_append(x_4721, x_4722); -x_4724 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_4724, 0, x_4723); -x_4725 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4725, 0, x_4724); -x_4726 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; -x_4727 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4727, 0, x_4726); -lean_ctor_set(x_4727, 1, x_4725); -x_4728 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -x_4729 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4729, 0, x_4727); -lean_ctor_set(x_4729, 1, x_4728); -x_4730 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4730, 0, x_4729); -lean_ctor_set(x_4730, 1, x_4719); -x_4731 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4732 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4731, x_4730, x_5, x_4710, x_7, x_8, x_4700); -x_4733 = lean_ctor_get(x_4732, 0); -lean_inc(x_4733); -x_4734 = lean_ctor_get(x_4732, 1); -lean_inc(x_4734); -lean_dec(x_4732); -x_4200 = x_4733; -x_4201 = x_4734; -goto block_4698; -} -else -{ -lean_object* x_4735; lean_object* x_4736; lean_object* x_4737; lean_object* x_4738; lean_object* x_4739; lean_object* x_4740; lean_object* x_4741; lean_object* x_4742; lean_object* x_4743; lean_object* x_4744; lean_object* x_4745; lean_object* x_4746; lean_object* x_4747; lean_object* x_4748; lean_object* x_4749; lean_object* x_4750; lean_object* x_4751; lean_object* x_4752; lean_object* x_4753; lean_object* x_4754; lean_object* x_4755; lean_object* x_4756; lean_object* x_4757; lean_object* x_4758; -x_4735 = lean_ctor_get(x_4711, 0); -lean_inc(x_4735); -lean_dec(x_4711); -x_4736 = l_Nat_repr(x_4735); -x_4737 = l_addParenHeuristic(x_4736); -lean_dec(x_4736); -x_4738 = l_Option_HasRepr___rarg___closed__2; -x_4739 = lean_string_append(x_4738, x_4737); -lean_dec(x_4737); -x_4740 = l_Option_HasRepr___rarg___closed__3; -x_4741 = lean_string_append(x_4739, x_4740); -x_4742 = l_Prod_HasRepr___rarg___closed__1; -x_4743 = lean_string_append(x_4742, x_4741); -lean_dec(x_4741); -x_4744 = l_List_reprAux___main___rarg___closed__1; -x_4745 = lean_string_append(x_4743, x_4744); -x_4746 = lean_string_append(x_4745, x_4714); -lean_dec(x_4714); -x_4747 = lean_string_append(x_4746, x_4740); -x_4748 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_4748, 0, x_4747); -x_4749 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_4749, 0, x_4748); -x_4750 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; -x_4751 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4751, 0, x_4750); -lean_ctor_set(x_4751, 1, x_4749); -x_4752 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29; -x_4753 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4753, 0, x_4751); -lean_ctor_set(x_4753, 1, x_4752); -x_4754 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_4754, 0, x_4753); -lean_ctor_set(x_4754, 1, x_4719); -x_4755 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; -x_4756 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_4755, x_4754, x_5, x_4710, x_7, x_8, x_4700); -x_4757 = lean_ctor_get(x_4756, 0); -lean_inc(x_4757); -x_4758 = lean_ctor_get(x_4756, 1); -lean_inc(x_4758); -lean_dec(x_4756); -x_4200 = x_4757; -x_4201 = x_4758; -goto block_4698; +x_707 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_707, 0, x_706); +x_708 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__27; +x_709 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_709, 0, x_708); +lean_ctor_set(x_709, 1, x_707); +x_710 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__28; +x_711 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_711, 0, x_709); +lean_ctor_set(x_711, 1, x_710); +x_712 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_712, 0, x_711); +lean_ctor_set(x_712, 1, x_678); +x_713 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; +x_714 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_713, x_712, x_5, x_6, x_7, x_8, x_671); +x_715 = lean_ctor_get(x_714, 1); +lean_inc(x_715); +lean_dec(x_714); +x_436 = x_715; +goto block_669; } } } @@ -21305,6 +6149,7 @@ lean_object* x_5; x_5 = l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -21317,38 +6162,40 @@ lean_dec(x_1); return x_2; } } -lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; -x_7 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -return x_7; -} -} -lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; -x_8 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); return x_8; } } -lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1, x_2, x_3, x_4); +x_5 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); return x_5; } } +lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_7; +} +} lean_object* l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -21356,6 +6203,7 @@ lean_object* x_5; x_5 = l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__5___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -21371,46 +6219,60 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitToken___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -uint8_t x_5; -x_5 = !lean_is_exclusive(x_1); -if (x_5 == 0) +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_io_ref_take(x_1, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = !lean_is_exclusive(x_6); +if (x_8 == 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; -x_6 = lean_ctor_get(x_1, 2); -lean_dec(x_6); -x_7 = lean_ctor_get(x_1, 1); -lean_dec(x_7); -x_8 = lean_box(0); -x_9 = lean_box(0); -x_10 = 1; -lean_ctor_set(x_1, 2, x_9); -lean_ctor_set(x_1, 1, x_8); -lean_ctor_set_uint8(x_1, sizeof(void*)*5, x_10); -x_11 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_1, x_2, x_3, x_4); -return x_11; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_9 = lean_ctor_get(x_6, 2); +lean_dec(x_9); +x_10 = lean_ctor_get(x_6, 1); +lean_dec(x_10); +x_11 = lean_box(0); +x_12 = lean_box(0); +x_13 = 1; +lean_ctor_set(x_6, 2, x_12); +lean_ctor_set(x_6, 1, x_11); +lean_ctor_set_uint8(x_6, sizeof(void*)*5, x_13); +x_14 = lean_io_ref_set(x_1, x_6, x_7); +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_16 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1, x_2, x_3, x_15); +return x_16; } else { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_19; -x_12 = lean_ctor_get(x_1, 0); -x_13 = lean_ctor_get(x_1, 3); -x_14 = lean_ctor_get(x_1, 4); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_1); -x_15 = lean_box(0); -x_16 = lean_box(0); -x_17 = 1; -x_18 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_18, 0, x_12); -lean_ctor_set(x_18, 1, x_15); -lean_ctor_set(x_18, 2, x_16); -lean_ctor_set(x_18, 3, x_13); -lean_ctor_set(x_18, 4, x_14); -lean_ctor_set_uint8(x_18, sizeof(void*)*5, x_17); -x_19 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_18, x_2, x_3, x_4); -return x_19; +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_17 = lean_ctor_get(x_6, 0); +x_18 = lean_ctor_get(x_6, 3); +x_19 = lean_ctor_get(x_6, 4); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_6); +x_20 = lean_box(0); +x_21 = lean_box(0); +x_22 = 1; +x_23 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_23, 0, x_17); +lean_ctor_set(x_23, 1, x_20); +lean_ctor_set(x_23, 2, x_21); +lean_ctor_set(x_23, 3, x_18); +lean_ctor_set(x_23, 4, x_19); +lean_ctor_set_uint8(x_23, sizeof(void*)*5, x_22); +x_24 = lean_io_ref_set(x_1, x_23, x_7); +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +lean_dec(x_24); +x_26 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1, x_2, x_3, x_25); +return x_26; } } } @@ -21429,6 +6291,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_visitToken___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -21444,81 +6307,141 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(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; +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_8 = lean_io_ref_get(x_4, x_7); +x_9 = lean_ctor_get(x_8, 1); +lean_inc(x_9); +lean_dec(x_8); +x_10 = lean_io_ref_get(x_4, x_9); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_8 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_8) == 0) +x_13 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_12); +if (lean_obj_tag(x_13) == 0) { -lean_object* x_9; -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) -{ -lean_object* x_10; lean_object* x_11; -lean_dec(x_9); -x_10 = lean_ctor_get(x_8, 1); -lean_inc(x_10); -lean_dec(x_8); -x_11 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_10); -return x_11; -} -else -{ -uint8_t x_12; +lean_dec(x_11); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_12 = !lean_is_exclusive(x_8); -if (x_12 == 0) -{ -lean_object* x_13; -x_13 = lean_ctor_get(x_8, 0); -lean_dec(x_13); -return x_8; +return x_13; } else { -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_8, 1); +lean_object* x_14; +x_14 = lean_ctor_get(x_13, 0); lean_inc(x_14); -lean_dec(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_9); -lean_ctor_set(x_15, 1, x_14); -return x_15; -} -} -} -else +if (lean_obj_tag(x_14) == 0) { -uint8_t x_16; +uint8_t x_15; +lean_dec(x_11); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_16 = !lean_is_exclusive(x_8); -if (x_16 == 0) +x_15 = !lean_is_exclusive(x_13); +if (x_15 == 0) { -return x_8; +lean_object* x_16; +x_16 = lean_ctor_get(x_13, 0); +lean_dec(x_16); +return x_13; } else { -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_8, 0); -x_18 = lean_ctor_get(x_8, 1); -lean_inc(x_18); +lean_object* x_17; lean_object* x_18; +x_17 = lean_ctor_get(x_13, 1); lean_inc(x_17); -lean_dec(x_8); -x_19 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; +lean_dec(x_13); +x_18 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_18, 0, x_14); +lean_ctor_set(x_18, 1, x_17); +return x_18; +} +} +else +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_13); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; +x_20 = lean_ctor_get(x_13, 1); +x_21 = lean_ctor_get(x_13, 0); +lean_dec(x_21); +x_22 = lean_ctor_get(x_14, 0); +lean_inc(x_22); +x_23 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_24 = lean_nat_dec_eq(x_23, x_22); +lean_dec(x_22); +if (x_24 == 0) +{ +lean_dec(x_11); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_13; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; +lean_free_object(x_13); +lean_dec(x_14); +x_25 = lean_io_ref_set(x_4, x_11, x_20); +x_26 = lean_ctor_get(x_25, 1); +lean_inc(x_26); +lean_dec(x_25); +x_27 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_26); +return x_27; +} +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_28 = lean_ctor_get(x_13, 1); +lean_inc(x_28); +lean_dec(x_13); +x_29 = lean_ctor_get(x_14, 0); +lean_inc(x_29); +x_30 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_31 = lean_nat_dec_eq(x_30, x_29); +lean_dec(x_29); +if (x_31 == 0) +{ +lean_object* x_32; +lean_dec(x_11); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_32 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_32, 0, x_14); +lean_ctor_set(x_32, 1, x_28); +return x_32; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; +lean_dec(x_14); +x_33 = lean_io_ref_set(x_4, x_11, x_28); +x_34 = lean_ctor_get(x_33, 1); +lean_inc(x_34); +lean_dec(x_33); +x_35 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_34); +return x_35; +} +} } } } @@ -21538,65 +6461,8 @@ _start: { lean_object* x_7; x_7 = lean_apply_3(x_1, x_4, x_5, x_6); -if (lean_obj_tag(x_7) == 0) -{ -uint8_t x_8; -x_8 = !lean_is_exclusive(x_7); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_9 = lean_ctor_get(x_7, 0); -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_3); -x_11 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_7, 0, x_11); 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); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_12); -lean_ctor_set(x_14, 1, x_3); -x_15 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_15, 0, 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; -} -} -else -{ -uint8_t x_17; -lean_dec(x_3); -x_17 = !lean_is_exclusive(x_7); -if (x_17 == 0) -{ -return x_7; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_7, 0); -x_19 = lean_ctor_get(x_7, 1); -lean_inc(x_19); -lean_inc(x_18); -lean_dec(x_7); -x_20 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_20, 0, x_18); -lean_ctor_set(x_20, 1, x_19); -return x_20; -} -} -} } lean_object* l_Lean_PrettyPrinter_Parenthesizer_liftCoreM(lean_object* x_1) { _start: @@ -21611,99 +6477,54 @@ _start: { lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Parenthesizer_liftCoreM___rarg(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_PrettyPrinter_Parenthesizer_getEnv___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_5; uint8_t x_6; -x_5 = l_Lean_Core_getEnv___rarg(x_3, x_4); -x_6 = !lean_is_exclusive(x_5); -if (x_6 == 0) -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; -x_7 = lean_ctor_get(x_5, 0); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_1); -x_9 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_5, 0, x_9); -return x_5; -} -else -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_10 = lean_ctor_get(x_5, 0); -x_11 = lean_ctor_get(x_5, 1); -lean_inc(x_11); -lean_inc(x_10); -lean_dec(x_5); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_10); -lean_ctor_set(x_12, 1, x_1); -x_13 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_13, 0, x_12); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_14, 1, x_11); -return x_14; +lean_object* x_3; +x_3 = l_Lean_Core_getEnv___rarg(x_1, x_2); +return x_3; } } -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg___boxed), 4, 0); -return x_2; +lean_object* x_4; +x_4 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg___boxed), 2, 0); +return x_4; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg___boxed(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg(x_1, x_2, x_3, x_4); +lean_object* x_3; +x_3 = l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_PrettyPrinter_Parenthesizer_getEnv(x_1, x_2, x_3); lean_dec(x_3); lean_dec(x_2); -return x_5; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_getEnv___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_getEnv(x_1); lean_dec(x_1); -return x_2; +return x_4; } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwError___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) { _start: { -lean_object* x_7; uint8_t x_8; +lean_object* x_7; x_7 = l_Lean_Core_throwError___rarg(x_1, x_4, x_5, x_6); -x_8 = !lean_is_exclusive(x_7); -if (x_8 == 0) -{ return x_7; } -else -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_9 = lean_ctor_get(x_7, 0); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -lean_inc(x_9); -lean_dec(x_7); -x_11 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_11, 0, x_9); -lean_ctor_set(x_11, 1, x_10); -return x_11; -} -} } lean_object* l_Lean_PrettyPrinter_Parenthesizer_throwError(lean_object* x_1) { _start: @@ -21756,57 +6577,49 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_7 = l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = l_Lean_Core_getEnv___rarg(x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_dec(x_9); -x_13 = l_Lean_PrettyPrinter_parenthesizerAttribute; -x_14 = l_Lean_KeyedDeclsAttribute_getValues___rarg(x_13, x_11, x_1); -lean_dec(x_11); -if (lean_obj_tag(x_14) == 0) +x_10 = l_Lean_PrettyPrinter_parenthesizerAttribute; +x_11 = l_Lean_KeyedDeclsAttribute_getValues___rarg(x_10, x_8, x_1); +lean_dec(x_8); +if (lean_obj_tag(x_11) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_15 = l_Lean_Name_toString___closed__1; -x_16 = l_Lean_Name_toStringWithSep___main(x_15, x_1); -x_17 = lean_alloc_ctor(2, 1, 0); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_dec(x_3); +lean_dec(x_2); +x_12 = l_Lean_Name_toString___closed__1; +x_13 = l_Lean_Name_toStringWithSep___main(x_12, x_1); +x_14 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_14, 0, x_13); +x_15 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_15, 0, x_14); +x_16 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__3; +x_17 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_17, 0, x_16); -x_18 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_18, 0, x_17); -x_19 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__3; -x_20 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -x_21 = l_Lean_Core_getConstInfo___closed__5; -x_22 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_22, 0, x_20); -lean_ctor_set(x_22, 1, x_21); -x_23 = l_Lean_PrettyPrinter_Parenthesizer_throwError___rarg(x_22, x_2, x_12, x_4, x_5, x_10); +lean_ctor_set(x_17, 1, x_15); +x_18 = l_Lean_Core_getConstInfo___closed__5; +x_19 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +x_20 = l_Lean_Core_throwError___rarg(x_19, x_4, x_5, x_9); lean_dec(x_5); lean_dec(x_4); -lean_dec(x_12); -lean_dec(x_2); -return x_23; +return x_20; } else { -lean_object* x_24; lean_object* x_25; +lean_object* x_21; lean_object* x_22; lean_dec(x_1); -x_24 = lean_ctor_get(x_14, 0); -lean_inc(x_24); -lean_dec(x_14); -x_25 = lean_apply_5(x_24, x_2, x_12, x_4, x_5, x_10); -return x_25; +x_21 = lean_ctor_get(x_11, 0); +lean_inc(x_21); +lean_dec(x_11); +x_22 = lean_apply_5(x_21, x_2, x_3, x_4, x_5, x_9); +return x_22; } } } @@ -21826,861 +6639,345 @@ x_8 = lean_unsigned_to_nat(0u); x_9 = lean_nat_dec_eq(x_2, x_8); if (x_9 == 0) { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; x_10 = lean_unsigned_to_nat(1u); x_11 = lean_nat_sub(x_2, x_10); lean_dec(x_2); -x_12 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_7); +x_12 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); -x_14 = lean_ctor_get(x_13, 0); +x_14 = lean_ctor_get(x_12, 1); lean_inc(x_14); -lean_dec(x_13); -x_15 = lean_ctor_get(x_12, 1); -lean_inc(x_15); lean_dec(x_12); -x_16 = lean_ctor_get(x_14, 0); -lean_inc(x_16); -x_17 = lean_ctor_get(x_14, 1); -lean_inc(x_17); -lean_dec(x_14); -x_18 = l_Lean_Syntax_getKind(x_16); +x_15 = l_Lean_Syntax_getKind(x_13); lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); -x_19 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind(x_18, x_3, x_17, x_5, x_6, x_15); -if (lean_obj_tag(x_19) == 0) +x_16 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind(x_15, x_3, x_4, x_5, x_6, x_14); +if (lean_obj_tag(x_16) == 0) { -lean_object* x_20; -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -if (lean_obj_tag(x_20) == 0) -{ -uint8_t x_21; -lean_dec(x_11); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_21 = !lean_is_exclusive(x_19); -if (x_21 == 0) -{ -lean_object* x_22; uint8_t x_23; -x_22 = lean_ctor_get(x_19, 0); -lean_dec(x_22); -x_23 = !lean_is_exclusive(x_20); -if (x_23 == 0) -{ -return x_19; -} -else -{ -lean_object* x_24; lean_object* x_25; -x_24 = lean_ctor_get(x_20, 0); -lean_inc(x_24); -lean_dec(x_20); -x_25 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_19, 0, x_25); -return x_19; -} -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_26 = lean_ctor_get(x_19, 1); -lean_inc(x_26); -lean_dec(x_19); -x_27 = lean_ctor_get(x_20, 0); -lean_inc(x_27); -if (lean_is_exclusive(x_20)) { - lean_ctor_release(x_20, 0); - x_28 = x_20; -} else { - lean_dec_ref(x_20); - x_28 = lean_box(0); -} -if (lean_is_scalar(x_28)) { - x_29 = lean_alloc_ctor(0, 1, 0); -} else { - x_29 = x_28; -} -lean_ctor_set(x_29, 0, x_27); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_26); -return x_30; -} -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_20, 0); -lean_inc(x_31); -lean_dec(x_20); -x_32 = lean_ctor_get(x_19, 1); -lean_inc(x_32); -lean_dec(x_19); -x_33 = lean_ctor_get(x_31, 1); -lean_inc(x_33); -lean_dec(x_31); +lean_object* x_17; +x_17 = lean_ctor_get(x_16, 1); +lean_inc(x_17); +lean_dec(x_16); x_2 = x_11; -x_4 = x_33; -x_7 = x_32; +x_7 = x_17; goto _start; } -} else { -uint8_t x_35; +uint8_t x_19; lean_dec(x_11); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); -x_35 = !lean_is_exclusive(x_19); -if (x_35 == 0) +x_19 = !lean_is_exclusive(x_16); +if (x_19 == 0) { -return x_19; +return x_16; } else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_19, 0); -x_37 = lean_ctor_get(x_19, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_19); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_16, 0); +x_21 = lean_ctor_get(x_16, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_16); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +return x_22; } } } else { -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_object* x_23; lean_object* x_24; lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_39 = lean_box(0); -x_40 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_40, 0, x_39); -lean_ctor_set(x_40, 1, x_4); -x_41 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_41, 0, x_40); -x_42 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_42, 0, x_41); -lean_ctor_set(x_42, 1, x_7); -return x_42; +x_23 = lean_box(0); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_7); +return x_24; } } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore(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; 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; uint8_t x_16; -x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); +x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 1); -lean_inc(x_11); lean_dec(x_8); -x_12 = lean_ctor_get(x_10, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); -lean_dec(x_10); -lean_inc(x_12); -x_14 = l_Lean_Syntax_getKind(x_12); -x_15 = l_Lean_choiceKind___closed__2; -x_16 = lean_name_eq(x_14, x_15); -if (x_16 == 0) +lean_inc(x_9); +x_11 = l_Lean_Syntax_getKind(x_9); +x_12 = l_Lean_choiceKind___closed__2; +x_13 = lean_name_eq(x_11, x_12); +if (x_13 == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -lean_dec(x_12); -x_17 = l_Lean_Name_toString___closed__1; +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_dec(x_9); +x_14 = l_Lean_Name_toString___closed__1; lean_inc(x_1); -x_18 = l_Lean_Name_toStringWithSep___main(x_17, x_1); -x_19 = lean_box(0); -x_20 = 1; -x_21 = lean_box(x_20); -x_22 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_mkAntiquot_parenthesizer_x27___boxed), 8, 3); -lean_closure_set(x_22, 0, x_18); -lean_closure_set(x_22, 1, x_19); -lean_closure_set(x_22, 2, x_21); -x_23 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind), 6, 1); -lean_closure_set(x_23, 0, x_14); +x_15 = l_Lean_Name_toStringWithSep___main(x_14, x_1); +x_16 = lean_box(0); +x_17 = 1; +x_18 = lean_box(x_17); +x_19 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_mkAntiquot_parenthesizer_x27___boxed), 8, 3); +lean_closure_set(x_19, 0, x_15); +lean_closure_set(x_19, 1, x_16); +lean_closure_set(x_19, 2, x_18); +x_20 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind), 6, 1); +lean_closure_set(x_20, 0, x_11); +lean_inc(x_4); lean_inc(x_1); -x_24 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(x_22, x_23, x_1, x_13, x_5, x_6, x_11); -if (lean_obj_tag(x_24) == 0) +x_21 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(x_19, x_20, x_1, x_4, x_5, x_6, x_10); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_25; -x_25 = lean_ctor_get(x_24, 0); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; +x_22 = lean_ctor_get(x_21, 1); +lean_inc(x_22); +lean_dec(x_21); +x_23 = lean_io_ref_take(x_4, x_22); +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); lean_inc(x_25); -if (lean_obj_tag(x_25) == 0) -{ -uint8_t x_26; -lean_dec(x_1); +lean_dec(x_23); x_26 = !lean_is_exclusive(x_24); if (x_26 == 0) { -lean_object* x_27; uint8_t x_28; -x_27 = lean_ctor_get(x_24, 0); +lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_27 = lean_ctor_get(x_24, 2); lean_dec(x_27); -x_28 = !lean_is_exclusive(x_25); -if (x_28 == 0) +lean_ctor_set(x_24, 2, x_1); +x_28 = lean_io_ref_set(x_4, x_24, x_25); +lean_dec(x_4); +x_29 = !lean_is_exclusive(x_28); +if (x_29 == 0) { -return x_24; +lean_object* x_30; lean_object* x_31; +x_30 = lean_ctor_get(x_28, 0); +lean_dec(x_30); +x_31 = lean_box(0); +lean_ctor_set(x_28, 0, x_31); +return x_28; } else { -lean_object* x_29; lean_object* x_30; -x_29 = lean_ctor_get(x_25, 0); -lean_inc(x_29); -lean_dec(x_25); -x_30 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_24, 0, x_30); -return x_24; -} -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_31 = lean_ctor_get(x_24, 1); -lean_inc(x_31); -lean_dec(x_24); -x_32 = lean_ctor_get(x_25, 0); +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_28, 1); lean_inc(x_32); -if (lean_is_exclusive(x_25)) { - lean_ctor_release(x_25, 0); - x_33 = x_25; -} else { - lean_dec_ref(x_25); - x_33 = lean_box(0); -} -if (lean_is_scalar(x_33)) { - x_34 = lean_alloc_ctor(0, 1, 0); -} else { - x_34 = x_33; -} -lean_ctor_set(x_34, 0, x_32); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_34); -lean_ctor_set(x_35, 1, x_31); -return x_35; +lean_dec(x_28); +x_33 = lean_box(0); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +return x_34; } } else { -uint8_t x_36; -x_36 = !lean_is_exclusive(x_25); -if (x_36 == 0) -{ -lean_object* x_37; uint8_t x_38; -x_37 = lean_ctor_get(x_25, 0); -x_38 = !lean_is_exclusive(x_37); -if (x_38 == 0) -{ -lean_object* x_39; lean_object* x_40; uint8_t x_41; -x_39 = lean_ctor_get(x_37, 1); -x_40 = lean_ctor_get(x_37, 0); -lean_dec(x_40); -x_41 = !lean_is_exclusive(x_24); -if (x_41 == 0) -{ -lean_object* x_42; uint8_t x_43; -x_42 = lean_ctor_get(x_24, 0); -lean_dec(x_42); -x_43 = !lean_is_exclusive(x_39); -if (x_43 == 0) -{ -lean_object* x_44; lean_object* x_45; -x_44 = lean_ctor_get(x_39, 2); -lean_dec(x_44); -lean_ctor_set(x_39, 2, x_1); -x_45 = lean_box(0); -lean_ctor_set(x_37, 0, x_45); -return x_24; +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t 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; +x_35 = lean_ctor_get(x_24, 0); +x_36 = lean_ctor_get(x_24, 1); +x_37 = lean_ctor_get(x_24, 3); +x_38 = lean_ctor_get(x_24, 4); +x_39 = lean_ctor_get_uint8(x_24, sizeof(void*)*5); +lean_inc(x_38); +lean_inc(x_37); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_24); +x_40 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_40, 0, x_35); +lean_ctor_set(x_40, 1, x_36); +lean_ctor_set(x_40, 2, x_1); +lean_ctor_set(x_40, 3, x_37); +lean_ctor_set(x_40, 4, x_38); +lean_ctor_set_uint8(x_40, sizeof(void*)*5, x_39); +x_41 = lean_io_ref_set(x_4, x_40, x_25); +lean_dec(x_4); +x_42 = lean_ctor_get(x_41, 1); +lean_inc(x_42); +if (lean_is_exclusive(x_41)) { + lean_ctor_release(x_41, 0); + lean_ctor_release(x_41, 1); + x_43 = x_41; +} else { + lean_dec_ref(x_41); + x_43 = lean_box(0); +} +x_44 = lean_box(0); +if (lean_is_scalar(x_43)) { + x_45 = lean_alloc_ctor(0, 2, 0); +} else { + x_45 = x_43; +} +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set(x_45, 1, x_42); +return x_45; +} } else { -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; uint8_t x_50; lean_object* x_51; lean_object* x_52; -x_46 = lean_ctor_get(x_39, 0); -x_47 = lean_ctor_get(x_39, 1); -x_48 = lean_ctor_get(x_39, 3); -x_49 = lean_ctor_get(x_39, 4); -x_50 = lean_ctor_get_uint8(x_39, sizeof(void*)*5); -lean_inc(x_49); +uint8_t x_46; +lean_dec(x_4); +lean_dec(x_1); +x_46 = !lean_is_exclusive(x_21); +if (x_46 == 0) +{ +return x_21; +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_21, 0); +x_48 = lean_ctor_get(x_21, 1); lean_inc(x_48); lean_inc(x_47); -lean_inc(x_46); -lean_dec(x_39); -x_51 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_51, 0, x_46); -lean_ctor_set(x_51, 1, x_47); -lean_ctor_set(x_51, 2, x_1); -lean_ctor_set(x_51, 3, x_48); -lean_ctor_set(x_51, 4, x_49); -lean_ctor_set_uint8(x_51, sizeof(void*)*5, x_50); -x_52 = lean_box(0); -lean_ctor_set(x_37, 1, x_51); -lean_ctor_set(x_37, 0, x_52); -return x_24; -} -} -else -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; uint8_t x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; -x_53 = lean_ctor_get(x_24, 1); -lean_inc(x_53); -lean_dec(x_24); -x_54 = lean_ctor_get(x_39, 0); -lean_inc(x_54); -x_55 = lean_ctor_get(x_39, 1); -lean_inc(x_55); -x_56 = lean_ctor_get(x_39, 3); -lean_inc(x_56); -x_57 = lean_ctor_get(x_39, 4); -lean_inc(x_57); -x_58 = lean_ctor_get_uint8(x_39, sizeof(void*)*5); -if (lean_is_exclusive(x_39)) { - lean_ctor_release(x_39, 0); - lean_ctor_release(x_39, 1); - lean_ctor_release(x_39, 2); - lean_ctor_release(x_39, 3); - lean_ctor_release(x_39, 4); - x_59 = x_39; -} else { - lean_dec_ref(x_39); - x_59 = lean_box(0); -} -if (lean_is_scalar(x_59)) { - x_60 = lean_alloc_ctor(0, 5, 1); -} else { - x_60 = x_59; -} -lean_ctor_set(x_60, 0, x_54); -lean_ctor_set(x_60, 1, x_55); -lean_ctor_set(x_60, 2, x_1); -lean_ctor_set(x_60, 3, x_56); -lean_ctor_set(x_60, 4, x_57); -lean_ctor_set_uint8(x_60, sizeof(void*)*5, x_58); -x_61 = lean_box(0); -lean_ctor_set(x_37, 1, x_60); -lean_ctor_set(x_37, 0, x_61); -x_62 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_62, 0, x_25); -lean_ctor_set(x_62, 1, x_53); -return x_62; -} -} -else -{ -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; uint8_t x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_63 = lean_ctor_get(x_37, 1); -lean_inc(x_63); -lean_dec(x_37); -x_64 = lean_ctor_get(x_24, 1); -lean_inc(x_64); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_65 = x_24; -} else { - lean_dec_ref(x_24); - x_65 = lean_box(0); -} -x_66 = lean_ctor_get(x_63, 0); -lean_inc(x_66); -x_67 = lean_ctor_get(x_63, 1); -lean_inc(x_67); -x_68 = lean_ctor_get(x_63, 3); -lean_inc(x_68); -x_69 = lean_ctor_get(x_63, 4); -lean_inc(x_69); -x_70 = lean_ctor_get_uint8(x_63, sizeof(void*)*5); -if (lean_is_exclusive(x_63)) { - lean_ctor_release(x_63, 0); - lean_ctor_release(x_63, 1); - lean_ctor_release(x_63, 2); - lean_ctor_release(x_63, 3); - lean_ctor_release(x_63, 4); - x_71 = x_63; -} else { - lean_dec_ref(x_63); - x_71 = lean_box(0); -} -if (lean_is_scalar(x_71)) { - x_72 = lean_alloc_ctor(0, 5, 1); -} else { - x_72 = x_71; -} -lean_ctor_set(x_72, 0, x_66); -lean_ctor_set(x_72, 1, x_67); -lean_ctor_set(x_72, 2, x_1); -lean_ctor_set(x_72, 3, x_68); -lean_ctor_set(x_72, 4, x_69); -lean_ctor_set_uint8(x_72, sizeof(void*)*5, x_70); -x_73 = lean_box(0); -x_74 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_74, 0, x_73); -lean_ctor_set(x_74, 1, x_72); -lean_ctor_set(x_25, 0, x_74); -if (lean_is_scalar(x_65)) { - x_75 = lean_alloc_ctor(0, 2, 0); -} else { - x_75 = x_65; -} -lean_ctor_set(x_75, 0, x_25); -lean_ctor_set(x_75, 1, x_64); -return x_75; -} -} -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; lean_object* x_83; lean_object* x_84; uint8_t 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; -x_76 = lean_ctor_get(x_25, 0); -lean_inc(x_76); -lean_dec(x_25); -x_77 = lean_ctor_get(x_76, 1); -lean_inc(x_77); -if (lean_is_exclusive(x_76)) { - lean_ctor_release(x_76, 0); - lean_ctor_release(x_76, 1); - x_78 = x_76; -} else { - lean_dec_ref(x_76); - x_78 = lean_box(0); -} -x_79 = lean_ctor_get(x_24, 1); -lean_inc(x_79); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_80 = x_24; -} else { - lean_dec_ref(x_24); - x_80 = lean_box(0); -} -x_81 = lean_ctor_get(x_77, 0); -lean_inc(x_81); -x_82 = lean_ctor_get(x_77, 1); -lean_inc(x_82); -x_83 = lean_ctor_get(x_77, 3); -lean_inc(x_83); -x_84 = lean_ctor_get(x_77, 4); -lean_inc(x_84); -x_85 = lean_ctor_get_uint8(x_77, sizeof(void*)*5); -if (lean_is_exclusive(x_77)) { - lean_ctor_release(x_77, 0); - lean_ctor_release(x_77, 1); - lean_ctor_release(x_77, 2); - lean_ctor_release(x_77, 3); - lean_ctor_release(x_77, 4); - x_86 = x_77; -} else { - lean_dec_ref(x_77); - x_86 = lean_box(0); -} -if (lean_is_scalar(x_86)) { - x_87 = lean_alloc_ctor(0, 5, 1); -} else { - x_87 = x_86; -} -lean_ctor_set(x_87, 0, x_81); -lean_ctor_set(x_87, 1, x_82); -lean_ctor_set(x_87, 2, x_1); -lean_ctor_set(x_87, 3, x_83); -lean_ctor_set(x_87, 4, x_84); -lean_ctor_set_uint8(x_87, sizeof(void*)*5, x_85); -x_88 = lean_box(0); -if (lean_is_scalar(x_78)) { - x_89 = lean_alloc_ctor(0, 2, 0); -} else { - x_89 = x_78; -} -lean_ctor_set(x_89, 0, x_88); -lean_ctor_set(x_89, 1, x_87); -x_90 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_90, 0, x_89); -if (lean_is_scalar(x_80)) { - x_91 = lean_alloc_ctor(0, 2, 0); -} else { - x_91 = x_80; -} -lean_ctor_set(x_91, 0, x_90); -lean_ctor_set(x_91, 1, x_79); -return x_91; +lean_dec(x_21); +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_92; -lean_dec(x_1); -x_92 = !lean_is_exclusive(x_24); -if (x_92 == 0) -{ -return x_24; -} -else -{ -lean_object* x_93; lean_object* x_94; lean_object* x_95; -x_93 = lean_ctor_get(x_24, 0); -x_94 = lean_ctor_get(x_24, 1); -lean_inc(x_94); -lean_inc(x_93); -lean_dec(x_24); -x_95 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_95, 0, x_93); -lean_ctor_set(x_95, 1, 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_14); -x_96 = l_Lean_Syntax_getArgs(x_12); -lean_dec(x_12); -x_97 = lean_array_get_size(x_96); -lean_dec(x_96); -lean_inc(x_97); -x_98 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed), 7, 2); -lean_closure_set(x_98, 0, x_97); -lean_closure_set(x_98, 1, x_97); +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +lean_dec(x_11); +x_50 = l_Lean_Syntax_getArgs(x_9); +lean_dec(x_9); +x_51 = lean_array_get_size(x_50); +lean_dec(x_50); +lean_inc(x_51); +x_52 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed), 7, 2); +lean_closure_set(x_52, 0, x_51); +lean_closure_set(x_52, 1, x_51); +lean_inc(x_4); lean_inc(x_1); -x_99 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_98, x_1, x_13, x_5, x_6, x_11); -if (lean_obj_tag(x_99) == 0) +x_53 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_52, x_1, x_4, x_5, x_6, x_10); +if (lean_obj_tag(x_53) == 0) { -lean_object* x_100; -x_100 = lean_ctor_get(x_99, 0); -lean_inc(x_100); -if (lean_obj_tag(x_100) == 0) +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; uint8_t x_58; +x_54 = lean_ctor_get(x_53, 1); +lean_inc(x_54); +lean_dec(x_53); +x_55 = lean_io_ref_take(x_4, x_54); +x_56 = lean_ctor_get(x_55, 0); +lean_inc(x_56); +x_57 = lean_ctor_get(x_55, 1); +lean_inc(x_57); +lean_dec(x_55); +x_58 = !lean_is_exclusive(x_56); +if (x_58 == 0) { -uint8_t x_101; +lean_object* x_59; lean_object* x_60; uint8_t x_61; +x_59 = lean_ctor_get(x_56, 2); +lean_dec(x_59); +lean_ctor_set(x_56, 2, x_1); +x_60 = lean_io_ref_set(x_4, x_56, x_57); +lean_dec(x_4); +x_61 = !lean_is_exclusive(x_60); +if (x_61 == 0) +{ +lean_object* x_62; lean_object* x_63; +x_62 = lean_ctor_get(x_60, 0); +lean_dec(x_62); +x_63 = lean_box(0); +lean_ctor_set(x_60, 0, x_63); +return x_60; +} +else +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_64 = lean_ctor_get(x_60, 1); +lean_inc(x_64); +lean_dec(x_60); +x_65 = lean_box(0); +x_66 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_66, 0, x_65); +lean_ctor_set(x_66, 1, x_64); +return x_66; +} +} +else +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; uint8_t 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; +x_67 = lean_ctor_get(x_56, 0); +x_68 = lean_ctor_get(x_56, 1); +x_69 = lean_ctor_get(x_56, 3); +x_70 = lean_ctor_get(x_56, 4); +x_71 = lean_ctor_get_uint8(x_56, sizeof(void*)*5); +lean_inc(x_70); +lean_inc(x_69); +lean_inc(x_68); +lean_inc(x_67); +lean_dec(x_56); +x_72 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_72, 0, x_67); +lean_ctor_set(x_72, 1, x_68); +lean_ctor_set(x_72, 2, x_1); +lean_ctor_set(x_72, 3, x_69); +lean_ctor_set(x_72, 4, x_70); +lean_ctor_set_uint8(x_72, sizeof(void*)*5, x_71); +x_73 = lean_io_ref_set(x_4, x_72, x_57); +lean_dec(x_4); +x_74 = lean_ctor_get(x_73, 1); +lean_inc(x_74); +if (lean_is_exclusive(x_73)) { + lean_ctor_release(x_73, 0); + lean_ctor_release(x_73, 1); + x_75 = x_73; +} else { + lean_dec_ref(x_73); + x_75 = lean_box(0); +} +x_76 = lean_box(0); +if (lean_is_scalar(x_75)) { + x_77 = lean_alloc_ctor(0, 2, 0); +} else { + x_77 = x_75; +} +lean_ctor_set(x_77, 0, x_76); +lean_ctor_set(x_77, 1, x_74); +return x_77; +} +} +else +{ +uint8_t x_78; +lean_dec(x_4); lean_dec(x_1); -x_101 = !lean_is_exclusive(x_99); -if (x_101 == 0) +x_78 = !lean_is_exclusive(x_53); +if (x_78 == 0) { -lean_object* x_102; uint8_t x_103; -x_102 = lean_ctor_get(x_99, 0); -lean_dec(x_102); -x_103 = !lean_is_exclusive(x_100); -if (x_103 == 0) -{ -return x_99; +return x_53; } else { -lean_object* x_104; lean_object* x_105; -x_104 = lean_ctor_get(x_100, 0); -lean_inc(x_104); -lean_dec(x_100); -x_105 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_105, 0, x_104); -lean_ctor_set(x_99, 0, x_105); -return x_99; -} -} -else -{ -lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; -x_106 = lean_ctor_get(x_99, 1); -lean_inc(x_106); -lean_dec(x_99); -x_107 = lean_ctor_get(x_100, 0); -lean_inc(x_107); -if (lean_is_exclusive(x_100)) { - lean_ctor_release(x_100, 0); - x_108 = x_100; -} else { - lean_dec_ref(x_100); - x_108 = lean_box(0); -} -if (lean_is_scalar(x_108)) { - x_109 = lean_alloc_ctor(0, 1, 0); -} else { - x_109 = x_108; -} -lean_ctor_set(x_109, 0, x_107); -x_110 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_110, 0, x_109); -lean_ctor_set(x_110, 1, x_106); -return x_110; -} -} -else -{ -uint8_t x_111; -x_111 = !lean_is_exclusive(x_100); -if (x_111 == 0) -{ -lean_object* x_112; uint8_t x_113; -x_112 = lean_ctor_get(x_100, 0); -x_113 = !lean_is_exclusive(x_112); -if (x_113 == 0) -{ -lean_object* x_114; lean_object* x_115; uint8_t x_116; -x_114 = lean_ctor_get(x_112, 1); -x_115 = lean_ctor_get(x_112, 0); -lean_dec(x_115); -x_116 = !lean_is_exclusive(x_99); -if (x_116 == 0) -{ -lean_object* x_117; uint8_t x_118; -x_117 = lean_ctor_get(x_99, 0); -lean_dec(x_117); -x_118 = !lean_is_exclusive(x_114); -if (x_118 == 0) -{ -lean_object* x_119; lean_object* x_120; -x_119 = lean_ctor_get(x_114, 2); -lean_dec(x_119); -lean_ctor_set(x_114, 2, x_1); -x_120 = lean_box(0); -lean_ctor_set(x_112, 0, x_120); -return x_99; -} -else -{ -lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; uint8_t x_125; lean_object* x_126; lean_object* x_127; -x_121 = lean_ctor_get(x_114, 0); -x_122 = lean_ctor_get(x_114, 1); -x_123 = lean_ctor_get(x_114, 3); -x_124 = lean_ctor_get(x_114, 4); -x_125 = lean_ctor_get_uint8(x_114, sizeof(void*)*5); -lean_inc(x_124); -lean_inc(x_123); -lean_inc(x_122); -lean_inc(x_121); -lean_dec(x_114); -x_126 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_126, 0, x_121); -lean_ctor_set(x_126, 1, x_122); -lean_ctor_set(x_126, 2, x_1); -lean_ctor_set(x_126, 3, x_123); -lean_ctor_set(x_126, 4, x_124); -lean_ctor_set_uint8(x_126, sizeof(void*)*5, x_125); -x_127 = lean_box(0); -lean_ctor_set(x_112, 1, x_126); -lean_ctor_set(x_112, 0, x_127); -return x_99; -} -} -else -{ -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; uint8_t x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; -x_128 = lean_ctor_get(x_99, 1); -lean_inc(x_128); -lean_dec(x_99); -x_129 = lean_ctor_get(x_114, 0); -lean_inc(x_129); -x_130 = lean_ctor_get(x_114, 1); -lean_inc(x_130); -x_131 = lean_ctor_get(x_114, 3); -lean_inc(x_131); -x_132 = lean_ctor_get(x_114, 4); -lean_inc(x_132); -x_133 = lean_ctor_get_uint8(x_114, sizeof(void*)*5); -if (lean_is_exclusive(x_114)) { - lean_ctor_release(x_114, 0); - lean_ctor_release(x_114, 1); - lean_ctor_release(x_114, 2); - lean_ctor_release(x_114, 3); - lean_ctor_release(x_114, 4); - x_134 = x_114; -} else { - lean_dec_ref(x_114); - x_134 = lean_box(0); -} -if (lean_is_scalar(x_134)) { - x_135 = lean_alloc_ctor(0, 5, 1); -} else { - x_135 = x_134; -} -lean_ctor_set(x_135, 0, x_129); -lean_ctor_set(x_135, 1, x_130); -lean_ctor_set(x_135, 2, x_1); -lean_ctor_set(x_135, 3, x_131); -lean_ctor_set(x_135, 4, x_132); -lean_ctor_set_uint8(x_135, sizeof(void*)*5, x_133); -x_136 = lean_box(0); -lean_ctor_set(x_112, 1, x_135); -lean_ctor_set(x_112, 0, x_136); -x_137 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_137, 0, x_100); -lean_ctor_set(x_137, 1, x_128); -return x_137; -} -} -else -{ -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; uint8_t x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; -x_138 = lean_ctor_get(x_112, 1); -lean_inc(x_138); -lean_dec(x_112); -x_139 = lean_ctor_get(x_99, 1); -lean_inc(x_139); -if (lean_is_exclusive(x_99)) { - lean_ctor_release(x_99, 0); - lean_ctor_release(x_99, 1); - x_140 = x_99; -} else { - lean_dec_ref(x_99); - x_140 = lean_box(0); -} -x_141 = lean_ctor_get(x_138, 0); -lean_inc(x_141); -x_142 = lean_ctor_get(x_138, 1); -lean_inc(x_142); -x_143 = lean_ctor_get(x_138, 3); -lean_inc(x_143); -x_144 = lean_ctor_get(x_138, 4); -lean_inc(x_144); -x_145 = lean_ctor_get_uint8(x_138, sizeof(void*)*5); -if (lean_is_exclusive(x_138)) { - lean_ctor_release(x_138, 0); - lean_ctor_release(x_138, 1); - lean_ctor_release(x_138, 2); - lean_ctor_release(x_138, 3); - lean_ctor_release(x_138, 4); - x_146 = x_138; -} else { - lean_dec_ref(x_138); - x_146 = lean_box(0); -} -if (lean_is_scalar(x_146)) { - x_147 = lean_alloc_ctor(0, 5, 1); -} else { - x_147 = x_146; -} -lean_ctor_set(x_147, 0, x_141); -lean_ctor_set(x_147, 1, x_142); -lean_ctor_set(x_147, 2, x_1); -lean_ctor_set(x_147, 3, x_143); -lean_ctor_set(x_147, 4, x_144); -lean_ctor_set_uint8(x_147, sizeof(void*)*5, x_145); -x_148 = lean_box(0); -x_149 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_149, 0, x_148); -lean_ctor_set(x_149, 1, x_147); -lean_ctor_set(x_100, 0, x_149); -if (lean_is_scalar(x_140)) { - x_150 = lean_alloc_ctor(0, 2, 0); -} else { - x_150 = x_140; -} -lean_ctor_set(x_150, 0, x_100); -lean_ctor_set(x_150, 1, x_139); -return x_150; -} -} -else -{ -lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; uint8_t 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; -x_151 = lean_ctor_get(x_100, 0); -lean_inc(x_151); -lean_dec(x_100); -x_152 = lean_ctor_get(x_151, 1); -lean_inc(x_152); -if (lean_is_exclusive(x_151)) { - lean_ctor_release(x_151, 0); - lean_ctor_release(x_151, 1); - x_153 = x_151; -} else { - lean_dec_ref(x_151); - x_153 = lean_box(0); -} -x_154 = lean_ctor_get(x_99, 1); -lean_inc(x_154); -if (lean_is_exclusive(x_99)) { - lean_ctor_release(x_99, 0); - lean_ctor_release(x_99, 1); - x_155 = x_99; -} else { - lean_dec_ref(x_99); - x_155 = lean_box(0); -} -x_156 = lean_ctor_get(x_152, 0); -lean_inc(x_156); -x_157 = lean_ctor_get(x_152, 1); -lean_inc(x_157); -x_158 = lean_ctor_get(x_152, 3); -lean_inc(x_158); -x_159 = lean_ctor_get(x_152, 4); -lean_inc(x_159); -x_160 = lean_ctor_get_uint8(x_152, sizeof(void*)*5); -if (lean_is_exclusive(x_152)) { - lean_ctor_release(x_152, 0); - lean_ctor_release(x_152, 1); - lean_ctor_release(x_152, 2); - lean_ctor_release(x_152, 3); - lean_ctor_release(x_152, 4); - x_161 = x_152; -} else { - lean_dec_ref(x_152); - x_161 = lean_box(0); -} -if (lean_is_scalar(x_161)) { - x_162 = lean_alloc_ctor(0, 5, 1); -} else { - x_162 = x_161; -} -lean_ctor_set(x_162, 0, x_156); -lean_ctor_set(x_162, 1, x_157); -lean_ctor_set(x_162, 2, x_1); -lean_ctor_set(x_162, 3, x_158); -lean_ctor_set(x_162, 4, x_159); -lean_ctor_set_uint8(x_162, sizeof(void*)*5, x_160); -x_163 = lean_box(0); -if (lean_is_scalar(x_153)) { - x_164 = lean_alloc_ctor(0, 2, 0); -} else { - x_164 = x_153; -} -lean_ctor_set(x_164, 0, x_163); -lean_ctor_set(x_164, 1, x_162); -x_165 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_165, 0, x_164); -if (lean_is_scalar(x_155)) { - x_166 = lean_alloc_ctor(0, 2, 0); -} else { - x_166 = x_155; -} -lean_ctor_set(x_166, 0, x_165); -lean_ctor_set(x_166, 1, x_154); -return x_166; -} -} -} -else -{ -uint8_t x_167; -lean_dec(x_1); -x_167 = !lean_is_exclusive(x_99); -if (x_167 == 0) -{ -return x_99; -} -else -{ -lean_object* x_168; lean_object* x_169; lean_object* x_170; -x_168 = lean_ctor_get(x_99, 0); -x_169 = lean_ctor_get(x_99, 1); -lean_inc(x_169); -lean_inc(x_168); -lean_dec(x_99); -x_170 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_170, 0, x_168); -lean_ctor_set(x_170, 1, x_169); -return x_170; +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_ctor_get(x_53, 0); +x_80 = lean_ctor_get(x_53, 1); +lean_inc(x_80); +lean_inc(x_79); +lean_dec(x_53); +x_81 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_81, 0, x_79); +lean_ctor_set(x_81, 1, x_80); +return x_81; } } } @@ -22708,68 +7005,67 @@ return x_8; lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_8 = l_Lean_PrettyPrinter_Parenthesizer_getEnv___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = l_Lean_Core_getEnv___rarg(x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); +x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 1); -lean_inc(x_11); lean_dec(x_8); -x_12 = lean_ctor_get(x_10, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); -lean_dec(x_10); -x_14 = l_Lean_PrettyPrinter_categoryParenthesizerAttribute; -x_15 = l_Lean_KeyedDeclsAttribute_getValues___rarg(x_14, x_12, x_1); -lean_dec(x_12); -if (lean_obj_tag(x_15) == 0) +x_11 = l_Lean_PrettyPrinter_categoryParenthesizerAttribute; +x_12 = l_Lean_KeyedDeclsAttribute_getValues___rarg(x_11, x_9, x_1); +lean_dec(x_9); +if (lean_obj_tag(x_12) == 0) { -lean_object* x_16; -x_16 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore(x_1, x_2, x_3, x_13, x_5, x_6, x_11); +lean_object* x_13; +x_13 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore(x_1, x_2, x_3, x_4, x_5, x_6, x_10); lean_dec(x_3); lean_dec(x_2); -return x_16; +return x_13; } else { -lean_object* x_17; lean_object* x_18; +lean_object* x_14; lean_object* x_15; lean_dec(x_1); -x_17 = lean_ctor_get(x_15, 0); -lean_inc(x_17); -lean_dec(x_15); -x_18 = lean_apply_6(x_17, x_2, x_3, x_13, x_5, x_6, x_11); -return x_18; +x_14 = lean_ctor_get(x_12, 0); +lean_inc(x_14); +lean_dec(x_12); +x_15 = lean_apply_6(x_14, x_2, x_3, x_4, x_5, x_6, x_10); +return x_15; } } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParserOfStack_parenthesizer(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_8 = lean_ctor_get(x_4, 0); -lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 1); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_8 = lean_io_ref_get(x_4, x_7); +x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_9); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 2); -lean_inc(x_11); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); lean_dec(x_8); -x_12 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_11); -lean_dec(x_11); -x_13 = lean_nat_sub(x_12, x_1); +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_11); +lean_dec(x_9); +x_12 = lean_ctor_get(x_11, 1); +lean_inc(x_12); +x_13 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__2(x_12); lean_dec(x_12); -x_14 = l_Lean_Syntax_getArg(x_10, x_13); -lean_dec(x_13); -lean_dec(x_10); -x_15 = l_Lean_Syntax_getId(x_14); +x_14 = lean_ctor_get(x_11, 2); +lean_inc(x_14); +lean_dec(x_11); +x_15 = l_Array_back___at_Lean_Syntax_Traverser_up___spec__1(x_14); lean_dec(x_14); -x_16 = l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(x_15, x_2, x_3, x_4, x_5, x_6, x_7); -return x_16; +x_16 = lean_nat_sub(x_15, x_1); +lean_dec(x_15); +x_17 = l_Lean_Syntax_getArg(x_13, x_16); +lean_dec(x_16); +lean_dec(x_13); +x_18 = l_Lean_Syntax_getId(x_17); +lean_dec(x_17); +x_19 = l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(x_18, x_2, x_3, x_4, x_5, x_6, x_10); +return x_19; } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParserOfStack_parenthesizer___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) { @@ -22916,109 +7212,42 @@ x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_term_parenth return x_1; } } -lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = lean_box(0); -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; -x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = !lean_is_exclusive(x_7); -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; uint8_t x_17; -x_11 = lean_ctor_get(x_7, 1); -x_12 = lean_ctor_get(x_7, 0); -lean_dec(x_12); -x_13 = lean_ctor_get(x_9, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_9, 1); -lean_inc(x_14); -lean_dec(x_9); -x_15 = l_Lean_Syntax_getKind(x_13); -x_16 = l_Lean_nullKind; -x_17 = lean_name_eq(x_15, x_16); -lean_dec(x_15); -if (x_17 == 0) -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -lean_free_object(x_7); -x_18 = l_Lean_Parser_termParser___closed__2; -lean_inc(x_1); -x_19 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___boxed), 7, 2); -lean_closure_set(x_19, 0, x_18); -lean_closure_set(x_19, 1, x_1); -x_20 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1; -x_21 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize(x_18, x_20, x_1, x_19, x_2, x_14, x_4, x_5, x_11); -return x_21; -} -else -{ -lean_object* x_22; -lean_dec(x_14); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_22 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -lean_ctor_set(x_7, 0, x_22); -return x_7; -} -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; -x_23 = lean_ctor_get(x_7, 1); -lean_inc(x_23); lean_dec(x_7); -x_24 = lean_ctor_get(x_9, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_9, 1); -lean_inc(x_25); -lean_dec(x_9); -x_26 = l_Lean_Syntax_getKind(x_24); -x_27 = l_Lean_nullKind; -x_28 = lean_name_eq(x_26, x_27); -lean_dec(x_26); -if (x_28 == 0) +x_10 = l_Lean_Syntax_getKind(x_8); +x_11 = l_Lean_nullKind; +x_12 = lean_name_eq(x_10, x_11); +lean_dec(x_10); +if (x_12 == 0) { -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_29 = l_Lean_Parser_termParser___closed__2; +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = l_Lean_Parser_termParser___closed__2; lean_inc(x_1); -x_30 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___boxed), 7, 2); -lean_closure_set(x_30, 0, x_29); -lean_closure_set(x_30, 1, x_1); -x_31 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1; -x_32 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize(x_29, x_31, x_1, x_30, x_2, x_25, x_4, x_5, x_23); -return x_32; +x_14 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___boxed), 7, 2); +lean_closure_set(x_14, 0, x_13); +lean_closure_set(x_14, 1, x_1); +x_15 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1; +x_16 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize(x_13, x_15, x_1, x_14, x_2, x_3, x_4, x_5, x_9); +return x_16; } else { -lean_object* x_33; lean_object* x_34; -lean_dec(x_25); +lean_object* x_17; lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_33 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -x_34 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_23); -return x_34; -} +x_17 = l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg(x_9); +return x_17; } } } @@ -23360,110 +7589,43 @@ _start: lean_object* x_8; lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); x_8 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { -lean_object* x_9; -x_9 = lean_ctor_get(x_8, 0); +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_8, 1); lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) +lean_dec(x_8); +x_10 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_9); +return x_10; +} +else { -uint8_t x_10; +uint8_t x_11; lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_10 = !lean_is_exclusive(x_8); -if (x_10 == 0) -{ -lean_object* x_11; uint8_t x_12; -x_11 = lean_ctor_get(x_8, 0); -lean_dec(x_11); -x_12 = !lean_is_exclusive(x_9); -if (x_12 == 0) +x_11 = !lean_is_exclusive(x_8); +if (x_11 == 0) { return x_8; } else { -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_9, 0); +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_8, 0); +x_13 = lean_ctor_get(x_8, 1); lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_8, 0, x_14); -return x_8; -} -} -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_8, 1); -lean_inc(x_15); +lean_inc(x_12); lean_dec(x_8); -x_16 = lean_ctor_get(x_9, 0); -lean_inc(x_16); -if (lean_is_exclusive(x_9)) { - lean_ctor_release(x_9, 0); - x_17 = x_9; -} else { - lean_dec_ref(x_9); - x_17 = lean_box(0); -} -if (lean_is_scalar(x_17)) { - x_18 = lean_alloc_ctor(0, 1, 0); -} else { - x_18 = x_17; -} -lean_ctor_set(x_18, 0, x_16); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_15); -return x_19; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_20 = lean_ctor_get(x_9, 0); -lean_inc(x_20); -lean_dec(x_9); -x_21 = lean_ctor_get(x_8, 1); -lean_inc(x_21); -lean_dec(x_8); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = lean_apply_5(x_1, x_3, x_22, x_5, x_6, x_21); -return x_23; -} -} -else -{ -uint8_t x_24; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_1); -x_24 = !lean_is_exclusive(x_8); -if (x_24 == 0) -{ -return x_8; -} -else -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = lean_ctor_get(x_8, 0); -x_26 = lean_ctor_get(x_8, 1); -lean_inc(x_26); -lean_inc(x_25); -lean_dec(x_8); -x_27 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_27, 0, x_25); -lean_ctor_set(x_27, 1, x_26); -return x_27; +x_14 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_14, 0, x_12); +lean_ctor_set(x_14, 1, x_13); +return x_14; } } } @@ -23480,7 +7642,7 @@ lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___close _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; x_2 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -23545,519 +7707,152 @@ return x_2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer(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; lean_object* x_9; uint8_t x_10; -x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = !lean_is_exclusive(x_9); -if (x_10 == 0) +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +x_11 = l_Lean_Syntax_getKind(x_9); +x_12 = lean_name_eq(x_1, x_11); +if (x_12 == 0) { -lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_11 = lean_ctor_get(x_9, 0); -x_12 = lean_ctor_get(x_8, 1); -lean_inc(x_12); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - lean_ctor_release(x_8, 1); - x_13 = x_8; -} else { - lean_dec_ref(x_8); - x_13 = lean_box(0); -} -x_14 = !lean_is_exclusive(x_11); -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_15 = lean_ctor_get(x_11, 0); -x_16 = lean_ctor_get(x_11, 1); -x_17 = l_Lean_Syntax_getKind(x_15); -x_18 = lean_name_eq(x_1, x_17); -if (x_18 == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_50; lean_object* x_51; uint8_t x_52; +uint8_t x_13; lean_object* x_14; lean_object* x_43; lean_object* x_44; uint8_t x_45; lean_dec(x_2); -x_50 = l_Lean_Core_getTraceState___rarg(x_6, x_12); +x_43 = l_Lean_Core_getTraceState___rarg(x_6, x_10); +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_ctor_get_uint8(x_44, sizeof(void*)*1); +lean_dec(x_44); +if (x_45 == 0) +{ +lean_object* x_46; uint8_t x_47; +x_46 = lean_ctor_get(x_43, 1); +lean_inc(x_46); +lean_dec(x_43); +x_47 = 0; +x_13 = x_47; +x_14 = x_46; +goto block_42; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_48 = lean_ctor_get(x_43, 1); +lean_inc(x_48); +lean_dec(x_43); +x_49 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; +x_50 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_49, x_5, x_6, x_48); x_51 = lean_ctor_get(x_50, 0); lean_inc(x_51); -x_52 = lean_ctor_get_uint8(x_51, sizeof(void*)*1); +x_52 = lean_ctor_get(x_50, 1); +lean_inc(x_52); +lean_dec(x_50); +x_53 = lean_unbox(x_51); lean_dec(x_51); -if (x_52 == 0) -{ -lean_object* x_53; uint8_t x_54; lean_object* x_55; -x_53 = lean_ctor_get(x_50, 1); -lean_inc(x_53); -lean_dec(x_50); -x_54 = 0; -x_55 = lean_box(x_54); -lean_ctor_set(x_11, 0, x_55); -x_19 = x_9; -x_20 = x_53; -goto block_49; +x_13 = x_53; +x_14 = x_52; +goto block_42; } -else +block_42: { -lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_56 = lean_ctor_get(x_50, 1); -lean_inc(x_56); -lean_dec(x_50); -x_57 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_58 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_57, x_5, x_6, x_56); -x_59 = lean_ctor_get(x_58, 0); -lean_inc(x_59); -x_60 = lean_ctor_get(x_58, 1); -lean_inc(x_60); -lean_dec(x_58); -lean_ctor_set(x_11, 0, x_59); -x_19 = x_9; -x_20 = x_60; -goto block_49; -} -block_49: +if (x_13 == 0) { -lean_object* x_21; lean_object* x_22; uint8_t x_23; -x_21 = lean_ctor_get(x_19, 0); -lean_inc(x_21); -lean_dec(x_19); -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_unbox(x_22); -lean_dec(x_22); -if (x_23 == 0) -{ -lean_object* x_24; lean_object* x_25; -lean_dec(x_21); -lean_dec(x_17); +lean_object* x_15; uint8_t x_16; +lean_dec(x_11); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_24 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -if (lean_is_scalar(x_13)) { - x_25 = lean_alloc_ctor(0, 2, 0); -} else { - x_25 = x_13; -} -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_20); -return x_25; +x_15 = l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg(x_14); +x_16 = !lean_is_exclusive(x_15); +if (x_16 == 0) +{ +return x_15; } else { -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; uint8_t x_43; -lean_dec(x_13); -x_26 = lean_ctor_get(x_21, 1); -lean_inc(x_26); -lean_dec(x_21); -x_27 = l_Lean_Name_toString___closed__1; -x_28 = l_Lean_Name_toStringWithSep___main(x_27, x_17); +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_15, 0); +x_18 = lean_ctor_get(x_15, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_15); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; +x_20 = l_Lean_Name_toString___closed__1; +x_21 = l_Lean_Name_toStringWithSep___main(x_20, x_11); +x_22 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_22, 0, x_21); +x_23 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_23, 0, x_22); +x_24 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; +x_25 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +x_26 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; +x_27 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +x_28 = l_Lean_Name_toStringWithSep___main(x_20, x_1); x_29 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_29, 0, x_28); x_30 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_30, 0, x_29); -x_31 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; -x_32 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_32, 0, x_31); -lean_ctor_set(x_32, 1, x_30); -x_33 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; -x_34 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -x_35 = l_Lean_Name_toStringWithSep___main(x_27, x_1); -x_36 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_36, 0, x_35); -x_37 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_37, 0, x_36); -x_38 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_38, 0, x_34); -lean_ctor_set(x_38, 1, x_37); -x_39 = l_Lean_Core_getConstInfo___closed__5; -x_40 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_40, 0, x_38); -lean_ctor_set(x_40, 1, x_39); -x_41 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_42 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_41, x_40, x_3, x_26, x_5, x_6, x_20); +x_31 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_31, 0, x_27); +lean_ctor_set(x_31, 1, x_30); +x_32 = l_Lean_Core_getConstInfo___closed__5; +x_33 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +x_34 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; +x_35 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_34, x_33, x_3, x_4, x_5, x_6, x_14); lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); -x_43 = !lean_is_exclusive(x_42); -if (x_43 == 0) +x_36 = lean_ctor_get(x_35, 1); +lean_inc(x_36); +lean_dec(x_35); +x_37 = l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg(x_36); +x_38 = !lean_is_exclusive(x_37); +if (x_38 == 0) { -lean_object* x_44; lean_object* x_45; -x_44 = lean_ctor_get(x_42, 0); -lean_dec(x_44); -x_45 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -lean_ctor_set(x_42, 0, x_45); -return x_42; +return x_37; } else { -lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_46 = lean_ctor_get(x_42, 1); -lean_inc(x_46); -lean_dec(x_42); -x_47 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -x_48 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_48, 0, x_47); -lean_ctor_set(x_48, 1, x_46); -return x_48; +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_37, 0); +x_40 = lean_ctor_get(x_37, 1); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_37); +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_39); +lean_ctor_set(x_41, 1, x_40); +return x_41; } } } } else { -lean_object* x_61; -lean_dec(x_17); -lean_free_object(x_11); -lean_dec(x_13); -lean_free_object(x_9); -lean_dec(x_1); -x_61 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_2, x_3, x_16, x_5, x_6, x_12); -return x_61; -} -} -else -{ -lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; -x_62 = lean_ctor_get(x_11, 0); -x_63 = lean_ctor_get(x_11, 1); -lean_inc(x_63); -lean_inc(x_62); +lean_object* x_54; lean_dec(x_11); -x_64 = l_Lean_Syntax_getKind(x_62); -x_65 = lean_name_eq(x_1, x_64); -if (x_65 == 0) -{ -lean_object* x_66; lean_object* x_67; lean_object* x_95; lean_object* x_96; uint8_t x_97; -lean_dec(x_2); -x_95 = l_Lean_Core_getTraceState___rarg(x_6, x_12); -x_96 = lean_ctor_get(x_95, 0); -lean_inc(x_96); -x_97 = lean_ctor_get_uint8(x_96, sizeof(void*)*1); -lean_dec(x_96); -if (x_97 == 0) -{ -lean_object* x_98; uint8_t x_99; lean_object* x_100; lean_object* x_101; -x_98 = lean_ctor_get(x_95, 1); -lean_inc(x_98); -lean_dec(x_95); -x_99 = 0; -x_100 = lean_box(x_99); -x_101 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_101, 0, x_100); -lean_ctor_set(x_101, 1, x_63); -lean_ctor_set(x_9, 0, x_101); -x_66 = x_9; -x_67 = x_98; -goto block_94; -} -else -{ -lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; -x_102 = lean_ctor_get(x_95, 1); -lean_inc(x_102); -lean_dec(x_95); -x_103 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_104 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_103, x_5, x_6, x_102); -x_105 = lean_ctor_get(x_104, 0); -lean_inc(x_105); -x_106 = lean_ctor_get(x_104, 1); -lean_inc(x_106); -lean_dec(x_104); -x_107 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_107, 0, x_105); -lean_ctor_set(x_107, 1, x_63); -lean_ctor_set(x_9, 0, x_107); -x_66 = x_9; -x_67 = x_106; -goto block_94; -} -block_94: -{ -lean_object* x_68; lean_object* x_69; uint8_t x_70; -x_68 = lean_ctor_get(x_66, 0); -lean_inc(x_68); -lean_dec(x_66); -x_69 = lean_ctor_get(x_68, 0); -lean_inc(x_69); -x_70 = lean_unbox(x_69); -lean_dec(x_69); -if (x_70 == 0) -{ -lean_object* x_71; lean_object* x_72; -lean_dec(x_68); -lean_dec(x_64); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); lean_dec(x_1); -x_71 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -if (lean_is_scalar(x_13)) { - x_72 = lean_alloc_ctor(0, 2, 0); -} else { - x_72 = x_13; -} -lean_ctor_set(x_72, 0, x_71); -lean_ctor_set(x_72, 1, x_67); -return x_72; -} -else -{ -lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; -lean_dec(x_13); -x_73 = lean_ctor_get(x_68, 1); -lean_inc(x_73); -lean_dec(x_68); -x_74 = l_Lean_Name_toString___closed__1; -x_75 = l_Lean_Name_toStringWithSep___main(x_74, x_64); -x_76 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_76, 0, x_75); -x_77 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_77, 0, x_76); -x_78 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; -x_79 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_79, 0, x_78); -lean_ctor_set(x_79, 1, x_77); -x_80 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; -x_81 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_81, 0, x_79); -lean_ctor_set(x_81, 1, x_80); -x_82 = l_Lean_Name_toStringWithSep___main(x_74, x_1); -x_83 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_83, 0, x_82); -x_84 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_84, 0, x_83); -x_85 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_85, 0, x_81); -lean_ctor_set(x_85, 1, x_84); -x_86 = l_Lean_Core_getConstInfo___closed__5; -x_87 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_87, 0, x_85); -lean_ctor_set(x_87, 1, x_86); -x_88 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_89 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_88, x_87, x_3, x_73, x_5, x_6, x_67); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_90 = lean_ctor_get(x_89, 1); -lean_inc(x_90); -if (lean_is_exclusive(x_89)) { - lean_ctor_release(x_89, 0); - lean_ctor_release(x_89, 1); - x_91 = x_89; -} else { - lean_dec_ref(x_89); - x_91 = lean_box(0); -} -x_92 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -if (lean_is_scalar(x_91)) { - x_93 = lean_alloc_ctor(0, 2, 0); -} else { - x_93 = x_91; -} -lean_ctor_set(x_93, 0, x_92); -lean_ctor_set(x_93, 1, x_90); -return x_93; -} -} -} -else -{ -lean_object* x_108; -lean_dec(x_64); -lean_dec(x_13); -lean_free_object(x_9); -lean_dec(x_1); -x_108 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_2, x_3, x_63, x_5, x_6, x_12); -return x_108; -} -} -} -else -{ -lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; uint8_t x_116; -x_109 = lean_ctor_get(x_9, 0); -lean_inc(x_109); -lean_dec(x_9); -x_110 = lean_ctor_get(x_8, 1); -lean_inc(x_110); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - lean_ctor_release(x_8, 1); - x_111 = x_8; -} else { - lean_dec_ref(x_8); - x_111 = lean_box(0); -} -x_112 = lean_ctor_get(x_109, 0); -lean_inc(x_112); -x_113 = lean_ctor_get(x_109, 1); -lean_inc(x_113); -if (lean_is_exclusive(x_109)) { - lean_ctor_release(x_109, 0); - lean_ctor_release(x_109, 1); - x_114 = x_109; -} else { - lean_dec_ref(x_109); - x_114 = lean_box(0); -} -x_115 = l_Lean_Syntax_getKind(x_112); -x_116 = lean_name_eq(x_1, x_115); -if (x_116 == 0) -{ -lean_object* x_117; lean_object* x_118; lean_object* x_146; lean_object* x_147; uint8_t x_148; -lean_dec(x_2); -x_146 = l_Lean_Core_getTraceState___rarg(x_6, x_110); -x_147 = lean_ctor_get(x_146, 0); -lean_inc(x_147); -x_148 = lean_ctor_get_uint8(x_147, sizeof(void*)*1); -lean_dec(x_147); -if (x_148 == 0) -{ -lean_object* x_149; uint8_t x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -x_149 = lean_ctor_get(x_146, 1); -lean_inc(x_149); -lean_dec(x_146); -x_150 = 0; -x_151 = lean_box(x_150); -if (lean_is_scalar(x_114)) { - x_152 = lean_alloc_ctor(0, 2, 0); -} else { - x_152 = x_114; -} -lean_ctor_set(x_152, 0, x_151); -lean_ctor_set(x_152, 1, x_113); -x_153 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_153, 0, x_152); -x_117 = x_153; -x_118 = x_149; -goto block_145; -} -else -{ -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; -x_154 = lean_ctor_get(x_146, 1); -lean_inc(x_154); -lean_dec(x_146); -x_155 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_156 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_155, x_5, x_6, x_154); -x_157 = lean_ctor_get(x_156, 0); -lean_inc(x_157); -x_158 = lean_ctor_get(x_156, 1); -lean_inc(x_158); -lean_dec(x_156); -if (lean_is_scalar(x_114)) { - x_159 = lean_alloc_ctor(0, 2, 0); -} else { - x_159 = x_114; -} -lean_ctor_set(x_159, 0, x_157); -lean_ctor_set(x_159, 1, x_113); -x_160 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_160, 0, x_159); -x_117 = x_160; -x_118 = x_158; -goto block_145; -} -block_145: -{ -lean_object* x_119; lean_object* x_120; uint8_t x_121; -x_119 = lean_ctor_get(x_117, 0); -lean_inc(x_119); -lean_dec(x_117); -x_120 = lean_ctor_get(x_119, 0); -lean_inc(x_120); -x_121 = lean_unbox(x_120); -lean_dec(x_120); -if (x_121 == 0) -{ -lean_object* x_122; lean_object* x_123; -lean_dec(x_119); -lean_dec(x_115); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_1); -x_122 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -if (lean_is_scalar(x_111)) { - x_123 = lean_alloc_ctor(0, 2, 0); -} else { - x_123 = x_111; -} -lean_ctor_set(x_123, 0, x_122); -lean_ctor_set(x_123, 1, x_118); -return x_123; -} -else -{ -lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; -lean_dec(x_111); -x_124 = lean_ctor_get(x_119, 1); -lean_inc(x_124); -lean_dec(x_119); -x_125 = l_Lean_Name_toString___closed__1; -x_126 = l_Lean_Name_toStringWithSep___main(x_125, x_115); -x_127 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_127, 0, x_126); -x_128 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_128, 0, x_127); -x_129 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; -x_130 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_130, 0, x_129); -lean_ctor_set(x_130, 1, x_128); -x_131 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; -x_132 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_132, 0, x_130); -lean_ctor_set(x_132, 1, x_131); -x_133 = l_Lean_Name_toStringWithSep___main(x_125, x_1); -x_134 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_134, 0, x_133); -x_135 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_135, 0, x_134); -x_136 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_136, 0, x_132); -lean_ctor_set(x_136, 1, x_135); -x_137 = l_Lean_Core_getConstInfo___closed__5; -x_138 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_138, 0, x_136); -lean_ctor_set(x_138, 1, x_137); -x_139 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_140 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_139, x_138, x_3, x_124, x_5, x_6, x_118); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_141 = lean_ctor_get(x_140, 1); -lean_inc(x_141); -if (lean_is_exclusive(x_140)) { - lean_ctor_release(x_140, 0); - lean_ctor_release(x_140, 1); - x_142 = x_140; -} else { - lean_dec_ref(x_140); - x_142 = lean_box(0); -} -x_143 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -if (lean_is_scalar(x_142)) { - x_144 = lean_alloc_ctor(0, 2, 0); -} else { - x_144 = x_142; -} -lean_ctor_set(x_144, 0, x_143); -lean_ctor_set(x_144, 1, x_141); -return x_144; -} -} -} -else -{ -lean_object* x_161; -lean_dec(x_115); -lean_dec(x_114); -lean_dec(x_111); -lean_dec(x_1); -x_161 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_2, x_3, x_113, x_5, x_6, x_110); -return x_161; -} +x_54 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_2, x_3, x_4, x_5, x_6, x_10); +return x_54; } } } @@ -24076,6 +7871,7 @@ lean_object* x_7; x_7 = l_Lean_PrettyPrinter_Parenthesizer_checkPrec_parenthesizer(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); return x_7; @@ -24097,371 +7893,135 @@ _start: lean_object* x_9; lean_inc(x_7); lean_inc(x_6); +lean_inc(x_5); lean_inc(x_4); x_9 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer(x_1, x_3, x_4, x_5, x_6, x_7, x_8); if (lean_obj_tag(x_9) == 0) { -lean_object* x_10; -x_10 = lean_ctor_get(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; uint8_t x_16; +x_10 = lean_ctor_get(x_9, 1); lean_inc(x_10); -if (lean_obj_tag(x_10) == 0) -{ -uint8_t x_11; +lean_dec(x_9); +x_11 = l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck(x_2, x_4, x_5, x_6, x_7, x_10); lean_dec(x_7); lean_dec(x_6); lean_dec(x_4); -x_11 = !lean_is_exclusive(x_9); -if (x_11 == 0) -{ -lean_object* x_12; uint8_t x_13; -x_12 = lean_ctor_get(x_9, 0); -lean_dec(x_12); -x_13 = !lean_is_exclusive(x_10); -if (x_13 == 0) -{ -return x_9; -} -else -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_10, 0); +x_12 = lean_ctor_get(x_11, 1); +lean_inc(x_12); +lean_dec(x_11); +x_13 = lean_io_ref_take(x_5, x_12); +x_14 = lean_ctor_get(x_13, 0); lean_inc(x_14); -lean_dec(x_10); -x_15 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_9, 0, x_15); -return x_9; -} -} -else +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = !lean_is_exclusive(x_14); +if (x_16 == 0) { -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_16 = lean_ctor_get(x_9, 1); -lean_inc(x_16); -lean_dec(x_9); -x_17 = lean_ctor_get(x_10, 0); -lean_inc(x_17); -if (lean_is_exclusive(x_10)) { - lean_ctor_release(x_10, 0); - x_18 = x_10; -} else { - lean_dec_ref(x_10); - x_18 = lean_box(0); -} -if (lean_is_scalar(x_18)) { - x_19 = lean_alloc_ctor(0, 1, 0); -} else { - x_19 = x_18; -} -lean_ctor_set(x_19, 0, x_17); -x_20 = lean_alloc_ctor(0, 2, 0); +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_17 = lean_ctor_get(x_14, 1); +lean_dec(x_17); +x_18 = l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___closed__1; +x_19 = l_Nat_min(x_18, x_2); +x_20 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_16); -return x_20; -} +lean_ctor_set(x_14, 1, x_20); +x_21 = lean_io_ref_set(x_5, x_14, x_15); +lean_dec(x_5); +x_22 = !lean_is_exclusive(x_21); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; +x_23 = lean_ctor_get(x_21, 0); +lean_dec(x_23); +x_24 = lean_box(0); +lean_ctor_set(x_21, 0, x_24); +return x_21; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; -x_21 = lean_ctor_get(x_10, 0); -lean_inc(x_21); -lean_dec(x_10); -x_22 = lean_ctor_get(x_9, 1); -lean_inc(x_22); -lean_dec(x_9); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck(x_2, x_4, x_23, x_6, x_7, x_22); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -x_25 = lean_ctor_get(x_24, 0); +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_21, 1); lean_inc(x_25); -x_26 = !lean_is_exclusive(x_25); -if (x_26 == 0) -{ -lean_object* x_27; uint8_t x_28; -x_27 = lean_ctor_get(x_25, 0); -x_28 = !lean_is_exclusive(x_27); -if (x_28 == 0) -{ -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_27, 1); -x_30 = lean_ctor_get(x_27, 0); -lean_dec(x_30); -x_31 = !lean_is_exclusive(x_24); -if (x_31 == 0) -{ -lean_object* x_32; uint8_t x_33; -x_32 = lean_ctor_get(x_24, 0); -lean_dec(x_32); -x_33 = !lean_is_exclusive(x_29); -if (x_33 == 0) -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_34 = lean_ctor_get(x_29, 1); -lean_dec(x_34); -x_35 = l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___closed__1; -x_36 = l_Nat_min(x_35, x_2); -x_37 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_29, 1, x_37); -x_38 = lean_box(0); -lean_ctor_set(x_27, 0, x_38); -return x_24; -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; uint8_t x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_39 = lean_ctor_get(x_29, 0); -x_40 = lean_ctor_get(x_29, 2); -x_41 = lean_ctor_get(x_29, 3); -x_42 = lean_ctor_get(x_29, 4); -x_43 = lean_ctor_get_uint8(x_29, sizeof(void*)*5); -lean_inc(x_42); -lean_inc(x_41); -lean_inc(x_40); -lean_inc(x_39); -lean_dec(x_29); -x_44 = l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___closed__1; -x_45 = l_Nat_min(x_44, x_2); -x_46 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_46, 0, x_45); -x_47 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_47, 0, x_39); -lean_ctor_set(x_47, 1, x_46); -lean_ctor_set(x_47, 2, x_40); -lean_ctor_set(x_47, 3, x_41); -lean_ctor_set(x_47, 4, x_42); -lean_ctor_set_uint8(x_47, sizeof(void*)*5, x_43); -x_48 = lean_box(0); -lean_ctor_set(x_27, 1, x_47); -lean_ctor_set(x_27, 0, x_48); -return x_24; +lean_dec(x_21); +x_26 = lean_box(0); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_25); +return x_27; } } else { -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; uint8_t x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_49 = lean_ctor_get(x_24, 1); -lean_inc(x_49); -lean_dec(x_24); -x_50 = lean_ctor_get(x_29, 0); -lean_inc(x_50); -x_51 = lean_ctor_get(x_29, 2); -lean_inc(x_51); -x_52 = lean_ctor_get(x_29, 3); -lean_inc(x_52); -x_53 = lean_ctor_get(x_29, 4); -lean_inc(x_53); -x_54 = lean_ctor_get_uint8(x_29, sizeof(void*)*5); -if (lean_is_exclusive(x_29)) { - lean_ctor_release(x_29, 0); - lean_ctor_release(x_29, 1); - lean_ctor_release(x_29, 2); - lean_ctor_release(x_29, 3); - lean_ctor_release(x_29, 4); - x_55 = x_29; +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t 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; +x_28 = lean_ctor_get(x_14, 0); +x_29 = lean_ctor_get(x_14, 2); +x_30 = lean_ctor_get(x_14, 3); +x_31 = lean_ctor_get(x_14, 4); +x_32 = lean_ctor_get_uint8(x_14, sizeof(void*)*5); +lean_inc(x_31); +lean_inc(x_30); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_14); +x_33 = l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___closed__1; +x_34 = l_Nat_min(x_33, x_2); +x_35 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_35, 0, x_34); +x_36 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_36, 0, x_28); +lean_ctor_set(x_36, 1, x_35); +lean_ctor_set(x_36, 2, x_29); +lean_ctor_set(x_36, 3, x_30); +lean_ctor_set(x_36, 4, x_31); +lean_ctor_set_uint8(x_36, sizeof(void*)*5, x_32); +x_37 = lean_io_ref_set(x_5, x_36, x_15); +lean_dec(x_5); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +if (lean_is_exclusive(x_37)) { + lean_ctor_release(x_37, 0); + lean_ctor_release(x_37, 1); + x_39 = x_37; } else { - lean_dec_ref(x_29); - x_55 = lean_box(0); + lean_dec_ref(x_37); + x_39 = lean_box(0); } -x_56 = l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___closed__1; -x_57 = l_Nat_min(x_56, x_2); -x_58 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_58, 0, x_57); -if (lean_is_scalar(x_55)) { - x_59 = lean_alloc_ctor(0, 5, 1); +x_40 = lean_box(0); +if (lean_is_scalar(x_39)) { + x_41 = lean_alloc_ctor(0, 2, 0); } else { - x_59 = x_55; + x_41 = x_39; } -lean_ctor_set(x_59, 0, x_50); -lean_ctor_set(x_59, 1, x_58); -lean_ctor_set(x_59, 2, x_51); -lean_ctor_set(x_59, 3, x_52); -lean_ctor_set(x_59, 4, x_53); -lean_ctor_set_uint8(x_59, sizeof(void*)*5, x_54); -x_60 = lean_box(0); -lean_ctor_set(x_27, 1, x_59); -lean_ctor_set(x_27, 0, x_60); -x_61 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_61, 0, x_25); -lean_ctor_set(x_61, 1, x_49); -return x_61; +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_38); +return x_41; } } else { -lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t 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; -x_62 = lean_ctor_get(x_27, 1); -lean_inc(x_62); -lean_dec(x_27); -x_63 = lean_ctor_get(x_24, 1); -lean_inc(x_63); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_64 = x_24; -} else { - lean_dec_ref(x_24); - x_64 = lean_box(0); -} -x_65 = lean_ctor_get(x_62, 0); -lean_inc(x_65); -x_66 = lean_ctor_get(x_62, 2); -lean_inc(x_66); -x_67 = lean_ctor_get(x_62, 3); -lean_inc(x_67); -x_68 = lean_ctor_get(x_62, 4); -lean_inc(x_68); -x_69 = lean_ctor_get_uint8(x_62, sizeof(void*)*5); -if (lean_is_exclusive(x_62)) { - lean_ctor_release(x_62, 0); - lean_ctor_release(x_62, 1); - lean_ctor_release(x_62, 2); - lean_ctor_release(x_62, 3); - lean_ctor_release(x_62, 4); - x_70 = x_62; -} else { - lean_dec_ref(x_62); - x_70 = lean_box(0); -} -x_71 = l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___closed__1; -x_72 = l_Nat_min(x_71, x_2); -x_73 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_73, 0, x_72); -if (lean_is_scalar(x_70)) { - x_74 = lean_alloc_ctor(0, 5, 1); -} else { - x_74 = x_70; -} -lean_ctor_set(x_74, 0, x_65); -lean_ctor_set(x_74, 1, x_73); -lean_ctor_set(x_74, 2, x_66); -lean_ctor_set(x_74, 3, x_67); -lean_ctor_set(x_74, 4, x_68); -lean_ctor_set_uint8(x_74, sizeof(void*)*5, x_69); -x_75 = lean_box(0); -x_76 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_76, 0, x_75); -lean_ctor_set(x_76, 1, x_74); -lean_ctor_set(x_25, 0, x_76); -if (lean_is_scalar(x_64)) { - x_77 = lean_alloc_ctor(0, 2, 0); -} else { - x_77 = x_64; -} -lean_ctor_set(x_77, 0, x_25); -lean_ctor_set(x_77, 1, x_63); -return x_77; -} -} -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; uint8_t 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; -x_78 = lean_ctor_get(x_25, 0); -lean_inc(x_78); -lean_dec(x_25); -x_79 = lean_ctor_get(x_78, 1); -lean_inc(x_79); -if (lean_is_exclusive(x_78)) { - lean_ctor_release(x_78, 0); - lean_ctor_release(x_78, 1); - x_80 = x_78; -} else { - lean_dec_ref(x_78); - x_80 = lean_box(0); -} -x_81 = lean_ctor_get(x_24, 1); -lean_inc(x_81); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_82 = x_24; -} else { - lean_dec_ref(x_24); - x_82 = lean_box(0); -} -x_83 = lean_ctor_get(x_79, 0); -lean_inc(x_83); -x_84 = lean_ctor_get(x_79, 2); -lean_inc(x_84); -x_85 = lean_ctor_get(x_79, 3); -lean_inc(x_85); -x_86 = lean_ctor_get(x_79, 4); -lean_inc(x_86); -x_87 = lean_ctor_get_uint8(x_79, sizeof(void*)*5); -if (lean_is_exclusive(x_79)) { - lean_ctor_release(x_79, 0); - lean_ctor_release(x_79, 1); - lean_ctor_release(x_79, 2); - lean_ctor_release(x_79, 3); - lean_ctor_release(x_79, 4); - x_88 = x_79; -} else { - lean_dec_ref(x_79); - x_88 = lean_box(0); -} -x_89 = l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer___closed__1; -x_90 = l_Nat_min(x_89, x_2); -x_91 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_91, 0, x_90); -if (lean_is_scalar(x_88)) { - x_92 = lean_alloc_ctor(0, 5, 1); -} else { - x_92 = x_88; -} -lean_ctor_set(x_92, 0, x_83); -lean_ctor_set(x_92, 1, x_91); -lean_ctor_set(x_92, 2, x_84); -lean_ctor_set(x_92, 3, x_85); -lean_ctor_set(x_92, 4, x_86); -lean_ctor_set_uint8(x_92, sizeof(void*)*5, x_87); -x_93 = lean_box(0); -if (lean_is_scalar(x_80)) { - x_94 = lean_alloc_ctor(0, 2, 0); -} else { - x_94 = x_80; -} -lean_ctor_set(x_94, 0, x_93); -lean_ctor_set(x_94, 1, x_92); -x_95 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_95, 0, x_94); -if (lean_is_scalar(x_82)) { - x_96 = lean_alloc_ctor(0, 2, 0); -} else { - x_96 = x_82; -} -lean_ctor_set(x_96, 0, x_95); -lean_ctor_set(x_96, 1, x_81); -return x_96; -} -} -} -else -{ -uint8_t x_97; +uint8_t x_42; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); -x_97 = !lean_is_exclusive(x_9); -if (x_97 == 0) +x_42 = !lean_is_exclusive(x_9); +if (x_42 == 0) { return x_9; } else { -lean_object* x_98; lean_object* x_99; lean_object* x_100; -x_98 = lean_ctor_get(x_9, 0); -x_99 = lean_ctor_get(x_9, 1); -lean_inc(x_99); -lean_inc(x_98); +lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_43 = lean_ctor_get(x_9, 0); +x_44 = lean_ctor_get(x_9, 1); +lean_inc(x_44); +lean_inc(x_43); lean_dec(x_9); -x_100 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_100, 0, x_98); -lean_ctor_set(x_100, 1, x_99); -return x_100; +x_45 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_45, 0, x_43); +lean_ctor_set(x_45, 1, x_44); +return x_45; } } } @@ -24481,112 +8041,45 @@ _start: lean_object* x_8; lean_inc(x_6); lean_inc(x_5); +lean_inc(x_4); lean_inc(x_3); x_8 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { -lean_object* x_9; +lean_object* x_9; lean_object* x_10; lean_object* x_11; x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -if (lean_obj_tag(x_9) == 0) +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +x_11 = lean_apply_6(x_2, x_9, x_3, x_4, x_5, x_6, x_10); +return x_11; +} +else { -uint8_t x_10; +uint8_t x_12; lean_dec(x_6); lean_dec(x_5); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_10 = !lean_is_exclusive(x_8); -if (x_10 == 0) -{ -lean_object* x_11; uint8_t x_12; -x_11 = lean_ctor_get(x_8, 0); -lean_dec(x_11); -x_12 = !lean_is_exclusive(x_9); +x_12 = !lean_is_exclusive(x_8); if (x_12 == 0) { return x_8; } else { -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_9, 0); +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_8, 0); +x_14 = lean_ctor_get(x_8, 1); +lean_inc(x_14); lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_8, 0, x_14); -return x_8; -} -} -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_8, 1); -lean_inc(x_15); lean_dec(x_8); -x_16 = lean_ctor_get(x_9, 0); -lean_inc(x_16); -if (lean_is_exclusive(x_9)) { - lean_ctor_release(x_9, 0); - x_17 = x_9; -} else { - lean_dec_ref(x_9); - x_17 = lean_box(0); -} -if (lean_is_scalar(x_17)) { - x_18 = lean_alloc_ctor(0, 1, 0); -} else { - x_18 = x_17; -} -lean_ctor_set(x_18, 0, x_16); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_15); -return x_19; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_20 = lean_ctor_get(x_9, 0); -lean_inc(x_20); -lean_dec(x_9); -x_21 = lean_ctor_get(x_8, 1); -lean_inc(x_21); -lean_dec(x_8); -x_22 = lean_ctor_get(x_20, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_20, 1); -lean_inc(x_23); -lean_dec(x_20); -x_24 = lean_apply_6(x_2, x_22, x_3, x_23, x_5, x_6, x_21); -return x_24; -} -} -else -{ -uint8_t x_25; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_25 = !lean_is_exclusive(x_8); -if (x_25 == 0) -{ -return x_8; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_8, 0); -x_27 = lean_ctor_get(x_8, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_8); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -return x_28; +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +return x_15; } } } @@ -24604,545 +8097,225 @@ _start: { lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; x_8 = l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck(x_1, x_3, x_4, x_5, x_6, x_7); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_8, 1); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_10, 1); -lean_inc(x_11); -lean_dec(x_10); -x_12 = lean_ctor_get(x_8, 1); -lean_inc(x_12); lean_dec(x_8); +x_10 = lean_io_ref_take(x_4, x_9); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); x_13 = !lean_is_exclusive(x_11); if (x_13 == 0) { -lean_object* x_14; lean_object* x_15; lean_object* x_16; +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; x_14 = lean_ctor_get(x_11, 2); lean_dec(x_14); lean_inc(x_3); lean_ctor_set(x_11, 2, x_3); -x_15 = lean_unsigned_to_nat(0u); +x_15 = lean_io_ref_set(x_4, x_11, x_12); +x_16 = lean_ctor_get(x_15, 1); +lean_inc(x_16); +lean_dec(x_15); +x_17 = lean_unsigned_to_nat(0u); lean_inc(x_3); -x_16 = l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(x_3, x_15, x_3, x_11, x_5, x_6, x_12); -return x_16; +x_18 = l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(x_3, x_17, x_3, x_4, x_5, x_6, x_16); +return x_18; } else { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_17 = lean_ctor_get(x_11, 0); -x_18 = lean_ctor_get(x_11, 1); -x_19 = lean_ctor_get(x_11, 3); -x_20 = lean_ctor_get(x_11, 4); -x_21 = lean_ctor_get_uint8(x_11, sizeof(void*)*5); +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_19 = lean_ctor_get(x_11, 0); +x_20 = lean_ctor_get(x_11, 1); +x_21 = lean_ctor_get(x_11, 3); +x_22 = lean_ctor_get(x_11, 4); +x_23 = lean_ctor_get_uint8(x_11, sizeof(void*)*5); +lean_inc(x_22); +lean_inc(x_21); lean_inc(x_20); lean_inc(x_19); -lean_inc(x_18); -lean_inc(x_17); lean_dec(x_11); lean_inc(x_3); -x_22 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_22, 0, x_17); -lean_ctor_set(x_22, 1, x_18); -lean_ctor_set(x_22, 2, x_3); -lean_ctor_set(x_22, 3, x_19); -lean_ctor_set(x_22, 4, x_20); -lean_ctor_set_uint8(x_22, sizeof(void*)*5, x_21); -x_23 = lean_unsigned_to_nat(0u); +x_24 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_24, 0, x_19); +lean_ctor_set(x_24, 1, x_20); +lean_ctor_set(x_24, 2, x_3); +lean_ctor_set(x_24, 3, x_21); +lean_ctor_set(x_24, 4, x_22); +lean_ctor_set_uint8(x_24, sizeof(void*)*5, x_23); +x_25 = lean_io_ref_set(x_4, x_24, x_12); +x_26 = lean_ctor_get(x_25, 1); +lean_inc(x_26); +lean_dec(x_25); +x_27 = lean_unsigned_to_nat(0u); lean_inc(x_3); -x_24 = l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(x_3, x_23, x_3, x_22, x_5, x_6, x_12); -return x_24; +x_28 = l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(x_3, x_27, x_3, x_4, x_5, x_6, x_26); +return x_28; } } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer(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_9; lean_object* x_10; lean_object* x_17; lean_object* x_18; uint8_t x_19; -x_17 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_5, x_6, x_7, x_8); -x_18 = lean_ctor_get(x_17, 0); -lean_inc(x_18); -x_19 = !lean_is_exclusive(x_18); +lean_object* x_9; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_14 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_5, x_6, x_7, x_8); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l_Lean_Syntax_getKind(x_15); +x_18 = lean_name_eq(x_1, x_17); +if (x_18 == 0) +{ +uint8_t x_19; lean_object* x_20; lean_object* x_49; lean_object* x_50; uint8_t x_51; +lean_dec(x_3); +lean_dec(x_2); +x_49 = l_Lean_Core_getTraceState___rarg(x_7, x_16); +x_50 = lean_ctor_get(x_49, 0); +lean_inc(x_50); +x_51 = lean_ctor_get_uint8(x_50, sizeof(void*)*1); +lean_dec(x_50); +if (x_51 == 0) +{ +lean_object* x_52; uint8_t x_53; +x_52 = lean_ctor_get(x_49, 1); +lean_inc(x_52); +lean_dec(x_49); +x_53 = 0; +x_19 = x_53; +x_20 = x_52; +goto block_48; +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_59; +x_54 = lean_ctor_get(x_49, 1); +lean_inc(x_54); +lean_dec(x_49); +x_55 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; +x_56 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_55, x_6, x_7, x_54); +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_ctor_get(x_56, 1); +lean_inc(x_58); +lean_dec(x_56); +x_59 = lean_unbox(x_57); +lean_dec(x_57); +x_19 = x_59; +x_20 = x_58; +goto block_48; +} +block_48: +{ if (x_19 == 0) { -lean_object* x_20; lean_object* x_21; uint8_t x_22; -x_20 = lean_ctor_get(x_18, 0); -x_21 = lean_ctor_get(x_17, 1); -lean_inc(x_21); +lean_object* x_21; uint8_t x_22; lean_dec(x_17); -x_22 = !lean_is_exclusive(x_20); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_21 = l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg(x_20); +x_22 = !lean_is_exclusive(x_21); if (x_22 == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; -x_23 = lean_ctor_get(x_20, 0); -x_24 = lean_ctor_get(x_20, 1); -x_25 = l_Lean_Syntax_getKind(x_23); -x_26 = lean_name_eq(x_1, x_25); -if (x_26 == 0) -{ -lean_object* x_27; lean_object* x_28; lean_object* x_53; lean_object* x_54; uint8_t x_55; -lean_dec(x_3); -lean_dec(x_2); -x_53 = l_Lean_Core_getTraceState___rarg(x_7, x_21); -x_54 = lean_ctor_get(x_53, 0); -lean_inc(x_54); -x_55 = lean_ctor_get_uint8(x_54, sizeof(void*)*1); -lean_dec(x_54); -if (x_55 == 0) -{ -lean_object* x_56; uint8_t x_57; lean_object* x_58; -x_56 = lean_ctor_get(x_53, 1); -lean_inc(x_56); -lean_dec(x_53); -x_57 = 0; -x_58 = lean_box(x_57); -lean_ctor_set(x_20, 0, x_58); -x_27 = x_18; -x_28 = x_56; -goto block_52; +return x_21; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_59 = lean_ctor_get(x_53, 1); -lean_inc(x_59); -lean_dec(x_53); -x_60 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_61 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_60, x_6, x_7, x_59); -x_62 = lean_ctor_get(x_61, 0); -lean_inc(x_62); -x_63 = lean_ctor_get(x_61, 1); -lean_inc(x_63); -lean_dec(x_61); -lean_ctor_set(x_20, 0, x_62); -x_27 = x_18; -x_28 = x_63; -goto block_52; +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_21, 0); +x_24 = lean_ctor_get(x_21, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_21); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; } -block_52: +} +else { -lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_29 = lean_ctor_get(x_27, 0); -lean_inc(x_29); -lean_dec(x_27); -x_30 = lean_ctor_get(x_29, 0); -lean_inc(x_30); -x_31 = lean_unbox(x_30); -lean_dec(x_30); -if (x_31 == 0) -{ -lean_object* x_32; -lean_dec(x_29); -lean_dec(x_25); +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; +x_26 = l_Lean_Name_toString___closed__1; +x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_17); +x_28 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_28, 0, x_27); +x_29 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; +x_31 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_29); +x_32 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; +x_33 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +x_34 = l_Lean_Name_toStringWithSep___main(x_26, x_1); +x_35 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_35, 0, x_34); +x_36 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_36, 0, x_35); +x_37 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_37, 0, x_33); +lean_ctor_set(x_37, 1, x_36); +x_38 = l_Lean_Core_getConstInfo___closed__5; +x_39 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +x_40 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; +x_41 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(x_40, x_39, x_4, x_5, x_6, x_7, x_20); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); -lean_dec(x_1); -x_32 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -x_9 = x_32; -x_10 = x_28; -goto block_16; +x_42 = lean_ctor_get(x_41, 1); +lean_inc(x_42); +lean_dec(x_41); +x_43 = l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg(x_42); +x_44 = !lean_is_exclusive(x_43); +if (x_44 == 0) +{ +return x_43; } else { -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_33 = lean_ctor_get(x_29, 1); -lean_inc(x_33); -lean_dec(x_29); -x_34 = l_Lean_Name_toString___closed__1; -x_35 = l_Lean_Name_toStringWithSep___main(x_34, x_25); -x_36 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_36, 0, x_35); -x_37 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_37, 0, x_36); -x_38 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; -x_39 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_37); -x_40 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; -x_41 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_41, 0, x_39); -lean_ctor_set(x_41, 1, x_40); -x_42 = l_Lean_Name_toStringWithSep___main(x_34, x_1); -x_43 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_43, 0, x_42); -x_44 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_44, 0, x_43); -x_45 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_45, 0, x_41); -lean_ctor_set(x_45, 1, x_44); -x_46 = l_Lean_Core_getConstInfo___closed__5; -x_47 = lean_alloc_ctor(9, 2, 0); +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_43, 0); +x_46 = lean_ctor_get(x_43, 1); +lean_inc(x_46); +lean_inc(x_45); +lean_dec(x_43); +x_47 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_47, 0, x_45); lean_ctor_set(x_47, 1, x_46); -x_48 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_49 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_48, x_47, x_4, x_33, x_6, x_7, x_28); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -x_50 = lean_ctor_get(x_49, 1); -lean_inc(x_50); -lean_dec(x_49); -x_51 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -x_9 = x_51; -x_10 = x_50; -goto block_16; +return x_47; +} } } } else { -lean_object* x_64; lean_object* x_65; lean_object* x_66; -lean_dec(x_25); -lean_free_object(x_20); -lean_free_object(x_18); -lean_dec(x_1); -x_64 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___lambda__1___boxed), 7, 1); -lean_closure_set(x_64, 0, x_2); -x_65 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___spec__1___rarg), 7, 2); -lean_closure_set(x_65, 0, x_3); -lean_closure_set(x_65, 1, x_64); -x_66 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_65, x_4, x_24, x_6, x_7, x_21); -return x_66; -} -} -else -{ -lean_object* x_67; lean_object* x_68; lean_object* x_69; uint8_t x_70; -x_67 = lean_ctor_get(x_20, 0); -x_68 = lean_ctor_get(x_20, 1); -lean_inc(x_68); -lean_inc(x_67); -lean_dec(x_20); -x_69 = l_Lean_Syntax_getKind(x_67); -x_70 = lean_name_eq(x_1, x_69); -if (x_70 == 0) -{ -lean_object* x_71; lean_object* x_72; lean_object* x_97; lean_object* x_98; uint8_t x_99; -lean_dec(x_3); -lean_dec(x_2); -x_97 = l_Lean_Core_getTraceState___rarg(x_7, x_21); -x_98 = lean_ctor_get(x_97, 0); -lean_inc(x_98); -x_99 = lean_ctor_get_uint8(x_98, sizeof(void*)*1); -lean_dec(x_98); -if (x_99 == 0) -{ -lean_object* x_100; uint8_t x_101; lean_object* x_102; lean_object* x_103; -x_100 = lean_ctor_get(x_97, 1); -lean_inc(x_100); -lean_dec(x_97); -x_101 = 0; -x_102 = lean_box(x_101); -x_103 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_103, 0, x_102); -lean_ctor_set(x_103, 1, x_68); -lean_ctor_set(x_18, 0, x_103); -x_71 = x_18; -x_72 = x_100; -goto block_96; -} -else -{ -lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_104 = lean_ctor_get(x_97, 1); -lean_inc(x_104); -lean_dec(x_97); -x_105 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_106 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_105, x_6, x_7, x_104); -x_107 = lean_ctor_get(x_106, 0); -lean_inc(x_107); -x_108 = lean_ctor_get(x_106, 1); -lean_inc(x_108); -lean_dec(x_106); -x_109 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_109, 0, x_107); -lean_ctor_set(x_109, 1, x_68); -lean_ctor_set(x_18, 0, x_109); -x_71 = x_18; -x_72 = x_108; -goto block_96; -} -block_96: -{ -lean_object* x_73; lean_object* x_74; uint8_t x_75; -x_73 = lean_ctor_get(x_71, 0); -lean_inc(x_73); -lean_dec(x_71); -x_74 = lean_ctor_get(x_73, 0); -lean_inc(x_74); -x_75 = lean_unbox(x_74); -lean_dec(x_74); -if (x_75 == 0) -{ -lean_object* x_76; -lean_dec(x_73); -lean_dec(x_69); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_1); -x_76 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -x_9 = x_76; -x_10 = x_72; -goto block_16; -} -else -{ -lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; -x_77 = lean_ctor_get(x_73, 1); -lean_inc(x_77); -lean_dec(x_73); -x_78 = l_Lean_Name_toString___closed__1; -x_79 = l_Lean_Name_toStringWithSep___main(x_78, x_69); -x_80 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_80, 0, x_79); -x_81 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_81, 0, x_80); -x_82 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; -x_83 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_83, 0, x_82); -lean_ctor_set(x_83, 1, x_81); -x_84 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; -x_85 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_85, 0, x_83); -lean_ctor_set(x_85, 1, x_84); -x_86 = l_Lean_Name_toStringWithSep___main(x_78, x_1); -x_87 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_87, 0, x_86); -x_88 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_88, 0, x_87); -x_89 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_89, 0, x_85); -lean_ctor_set(x_89, 1, x_88); -x_90 = l_Lean_Core_getConstInfo___closed__5; -x_91 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_91, 0, x_89); -lean_ctor_set(x_91, 1, x_90); -x_92 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_93 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_92, x_91, x_4, x_77, x_6, x_7, x_72); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -x_94 = lean_ctor_get(x_93, 1); -lean_inc(x_94); -lean_dec(x_93); -x_95 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -x_9 = x_95; -x_10 = x_94; -goto block_16; -} -} -} -else -{ -lean_object* x_110; lean_object* x_111; lean_object* x_112; -lean_dec(x_69); -lean_free_object(x_18); -lean_dec(x_1); -x_110 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___lambda__1___boxed), 7, 1); -lean_closure_set(x_110, 0, x_2); -x_111 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___spec__1___rarg), 7, 2); -lean_closure_set(x_111, 0, x_3); -lean_closure_set(x_111, 1, x_110); -x_112 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_111, x_4, x_68, x_6, x_7, x_21); -return x_112; -} -} -} -else -{ -lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; uint8_t x_119; -x_113 = lean_ctor_get(x_18, 0); -lean_inc(x_113); -lean_dec(x_18); -x_114 = lean_ctor_get(x_17, 1); -lean_inc(x_114); lean_dec(x_17); -x_115 = lean_ctor_get(x_113, 0); -lean_inc(x_115); -x_116 = lean_ctor_get(x_113, 1); -lean_inc(x_116); -if (lean_is_exclusive(x_113)) { - lean_ctor_release(x_113, 0); - lean_ctor_release(x_113, 1); - x_117 = x_113; -} else { - lean_dec_ref(x_113); - x_117 = lean_box(0); -} -x_118 = l_Lean_Syntax_getKind(x_115); -x_119 = lean_name_eq(x_1, x_118); -if (x_119 == 0) -{ -lean_object* x_120; lean_object* x_121; lean_object* x_146; lean_object* x_147; uint8_t x_148; -lean_dec(x_3); -lean_dec(x_2); -x_146 = l_Lean_Core_getTraceState___rarg(x_7, x_114); -x_147 = lean_ctor_get(x_146, 0); -lean_inc(x_147); -x_148 = lean_ctor_get_uint8(x_147, sizeof(void*)*1); -lean_dec(x_147); -if (x_148 == 0) -{ -lean_object* x_149; uint8_t x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -x_149 = lean_ctor_get(x_146, 1); -lean_inc(x_149); -lean_dec(x_146); -x_150 = 0; -x_151 = lean_box(x_150); -if (lean_is_scalar(x_117)) { - x_152 = lean_alloc_ctor(0, 2, 0); -} else { - x_152 = x_117; -} -lean_ctor_set(x_152, 0, x_151); -lean_ctor_set(x_152, 1, x_116); -x_153 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_153, 0, x_152); -x_120 = x_153; -x_121 = x_149; -goto block_145; -} -else -{ -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; -x_154 = lean_ctor_get(x_146, 1); -lean_inc(x_154); -lean_dec(x_146); -x_155 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_156 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4(x_155, x_6, x_7, x_154); -x_157 = lean_ctor_get(x_156, 0); -lean_inc(x_157); -x_158 = lean_ctor_get(x_156, 1); -lean_inc(x_158); -lean_dec(x_156); -if (lean_is_scalar(x_117)) { - x_159 = lean_alloc_ctor(0, 2, 0); -} else { - x_159 = x_117; -} -lean_ctor_set(x_159, 0, x_157); -lean_ctor_set(x_159, 1, x_116); -x_160 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_160, 0, x_159); -x_120 = x_160; -x_121 = x_158; -goto block_145; -} -block_145: -{ -lean_object* x_122; lean_object* x_123; uint8_t x_124; -x_122 = lean_ctor_get(x_120, 0); -lean_inc(x_122); -lean_dec(x_120); -x_123 = lean_ctor_get(x_122, 0); -lean_inc(x_123); -x_124 = lean_unbox(x_123); -lean_dec(x_123); -if (x_124 == 0) -{ -lean_object* x_125; -lean_dec(x_122); -lean_dec(x_118); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); lean_dec(x_1); -x_125 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -x_9 = x_125; -x_10 = x_121; -goto block_16; +x_9 = x_16; +goto block_13; } -else +block_13: { -lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; -x_126 = lean_ctor_get(x_122, 1); -lean_inc(x_126); -lean_dec(x_122); -x_127 = l_Lean_Name_toString___closed__1; -x_128 = l_Lean_Name_toStringWithSep___main(x_127, x_118); -x_129 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_129, 0, x_128); -x_130 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_130, 0, x_129); -x_131 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__5; -x_132 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_132, 0, x_131); -lean_ctor_set(x_132, 1, x_130); -x_133 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__8; -x_134 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_134, 0, x_132); -lean_ctor_set(x_134, 1, x_133); -x_135 = l_Lean_Name_toStringWithSep___main(x_127, x_1); -x_136 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_136, 0, x_135); -x_137 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_137, 0, x_136); -x_138 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_138, 0, x_134); -lean_ctor_set(x_138, 1, x_137); -x_139 = l_Lean_Core_getConstInfo___closed__5; -x_140 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_140, 0, x_138); -lean_ctor_set(x_140, 1, x_139); -x_141 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer___closed__2; -x_142 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3(x_141, x_140, x_4, x_126, x_6, x_7, x_121); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -x_143 = lean_ctor_get(x_142, 1); -lean_inc(x_143); -lean_dec(x_142); -x_144 = l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; -x_9 = x_144; -x_10 = x_143; -goto block_16; -} -} -} -else -{ -lean_object* x_161; lean_object* x_162; lean_object* x_163; -lean_dec(x_118); -lean_dec(x_117); -lean_dec(x_1); -x_161 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___lambda__1___boxed), 7, 1); -lean_closure_set(x_161, 0, x_2); -x_162 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___spec__1___rarg), 7, 2); -lean_closure_set(x_162, 0, x_3); -lean_closure_set(x_162, 1, x_161); -x_163 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_162, x_4, x_116, x_6, x_7, x_114); -return x_163; -} -} -block_16: -{ -uint8_t x_11; -x_11 = !lean_is_exclusive(x_9); -if (x_11 == 0) -{ -lean_object* x_12; -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_9); -lean_ctor_set(x_12, 1, x_10); +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___lambda__1___boxed), 7, 1); +lean_closure_set(x_10, 0, x_2); +x_11 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___spec__1___rarg), 7, 2); +lean_closure_set(x_11, 0, x_3); +lean_closure_set(x_11, 1, x_10); +x_12 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_11, x_4, x_5, x_6, x_7, x_9); return x_12; } -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_13 = lean_ctor_get(x_9, 0); -lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_14, 0, x_13); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_10); -return x_15; -} -} } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___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) { @@ -25178,6 +8351,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_symbol_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25213,6 +8387,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_symbolNoWs_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25248,6 +8423,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_unicodeSymbol_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25283,6 +8459,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25318,6 +8495,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_rawIdent_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25353,6 +8531,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_identEq_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25388,6 +8567,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_nonReservedSymbol_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25423,6 +8603,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_charLitNoAntiquot_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25458,6 +8639,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_strLitNoAntiquot_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25493,6 +8675,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_nameLitNoAntiquot_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25528,6 +8711,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_numLitNoAntiquot_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25563,6 +8747,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_fieldIdx_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -25590,167 +8775,86 @@ lean_dec(x_3); lean_inc(x_1); lean_inc(x_7); lean_inc(x_6); +lean_inc(x_5); lean_inc(x_4); x_13 = lean_apply_5(x_1, x_4, x_5, x_6, x_7, x_8); if (lean_obj_tag(x_13) == 0) { lean_object* x_14; -x_14 = lean_ctor_get(x_13, 0); +x_14 = lean_ctor_get(x_13, 1); lean_inc(x_14); -if (lean_obj_tag(x_14) == 0) -{ -uint8_t x_15; -lean_dec(x_12); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_1); -x_15 = !lean_is_exclusive(x_13); -if (x_15 == 0) -{ -lean_object* x_16; uint8_t x_17; -x_16 = lean_ctor_get(x_13, 0); -lean_dec(x_16); -x_17 = !lean_is_exclusive(x_14); -if (x_17 == 0) -{ -return x_13; -} -else -{ -lean_object* x_18; lean_object* x_19; -x_18 = lean_ctor_get(x_14, 0); -lean_inc(x_18); -lean_dec(x_14); -x_19 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_13, 0, x_19); -return x_13; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_20 = lean_ctor_get(x_13, 1); -lean_inc(x_20); lean_dec(x_13); -x_21 = lean_ctor_get(x_14, 0); -lean_inc(x_21); -if (lean_is_exclusive(x_14)) { - lean_ctor_release(x_14, 0); - x_22 = x_14; -} else { - lean_dec_ref(x_14); - x_22 = lean_box(0); -} -if (lean_is_scalar(x_22)) { - x_23 = lean_alloc_ctor(0, 1, 0); -} else { - x_23 = x_22; -} -lean_ctor_set(x_23, 0, x_21); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_20); -return x_24; -} -} -else -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = lean_ctor_get(x_14, 0); -lean_inc(x_25); -lean_dec(x_14); -x_26 = lean_ctor_get(x_13, 1); -lean_inc(x_26); -lean_dec(x_13); -x_27 = lean_ctor_get(x_25, 1); -lean_inc(x_27); -lean_dec(x_25); x_3 = x_12; -x_5 = x_27; -x_8 = x_26; +x_8 = x_14; goto _start; } -} else { -uint8_t x_29; +uint8_t x_16; lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_29 = !lean_is_exclusive(x_13); -if (x_29 == 0) +x_16 = !lean_is_exclusive(x_13); +if (x_16 == 0) { return x_13; } else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_30 = lean_ctor_get(x_13, 0); -x_31 = lean_ctor_get(x_13, 1); -lean_inc(x_31); -lean_inc(x_30); +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 0); +x_18 = lean_ctor_get(x_13, 1); +lean_inc(x_18); +lean_inc(x_17); lean_dec(x_13); -x_32 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -return x_32; +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; } } } else { -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_object* x_20; lean_object* x_21; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_33 = lean_box(0); -x_34 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_5); -x_35 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_35, 0, x_34); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set(x_36, 1, x_8); -return x_36; +x_20 = lean_box(0); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_8); +return x_21; } } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 0); +x_10 = l_Lean_Syntax_getArgs(x_8); +lean_dec(x_8); +x_11 = lean_array_get_size(x_10); +lean_dec(x_10); lean_inc(x_11); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_dec(x_9); -x_13 = l_Lean_Syntax_getArgs(x_11); -lean_dec(x_11); -x_14 = lean_array_get_size(x_13); -lean_dec(x_13); -lean_inc(x_14); -x_15 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer___spec__1___boxed), 8, 3); -lean_closure_set(x_15, 0, x_1); -lean_closure_set(x_15, 1, x_14); -lean_closure_set(x_15, 2, x_14); -x_16 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_15, x_2, x_12, x_4, x_5, x_10); -return x_16; +x_12 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer___spec__1___boxed), 8, 3); +lean_closure_set(x_12, 0, x_1); +lean_closure_set(x_12, 1, x_11); +lean_closure_set(x_12, 2, x_11); +x_13 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_12, x_2, x_3, x_4, x_5, x_9); +return x_13; } } lean_object* l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer___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, lean_object* x_7, lean_object* x_8) { @@ -25765,36 +8869,28 @@ return x_9; lean_object* l_Lean_PrettyPrinter_Parenthesizer_many1_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_7 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_3, x_4, x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); -x_9 = lean_ctor_get(x_8, 0); +x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); lean_dec(x_7); -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); -lean_dec(x_9); -x_13 = l_Lean_Syntax_getKind(x_11); -x_14 = l_Lean_nullKind; -x_15 = lean_name_eq(x_13, x_14); -lean_dec(x_13); -if (x_15 == 0) +x_10 = l_Lean_Syntax_getKind(x_8); +x_11 = l_Lean_nullKind; +x_12 = lean_name_eq(x_10, x_11); +lean_dec(x_10); +if (x_12 == 0) { -lean_object* x_16; -x_16 = lean_apply_5(x_1, x_2, x_12, x_4, x_5, x_10); -return x_16; +lean_object* x_13; +x_13 = lean_apply_5(x_1, x_2, x_3, x_4, x_5, x_9); +return x_13; } else { -lean_object* x_17; -x_17 = l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer(x_1, x_2, x_12, x_4, x_5, x_10); -return x_17; +lean_object* x_14; +x_14 = l_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer(x_1, x_2, x_3, x_4, x_5, x_9); +return x_14; } } } @@ -25811,264 +8907,122 @@ _start: { if (lean_obj_tag(x_3) == 0) { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +lean_object* x_9; lean_object* x_10; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); x_9 = lean_box(0); x_10 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_5); -x_11 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_11, 0, x_10); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_11); -lean_ctor_set(x_12, 1, x_8); -return x_12; +lean_ctor_set(x_10, 1, x_8); +return x_10; } else { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_13 = lean_ctor_get(x_3, 0); -x_14 = lean_ctor_get(x_3, 1); -x_15 = lean_unsigned_to_nat(2u); -x_16 = lean_nat_mod(x_13, x_15); -x_17 = lean_unsigned_to_nat(0u); -x_18 = lean_nat_dec_eq(x_16, x_17); -lean_dec(x_16); -if (x_18 == 0) +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_11 = lean_ctor_get(x_3, 0); +x_12 = lean_ctor_get(x_3, 1); +x_13 = lean_unsigned_to_nat(2u); +x_14 = lean_nat_mod(x_11, x_13); +x_15 = lean_unsigned_to_nat(0u); +x_16 = lean_nat_dec_eq(x_14, x_15); +lean_dec(x_14); +if (x_16 == 0) { -lean_object* x_19; +lean_object* x_17; lean_inc(x_2); lean_inc(x_7); lean_inc(x_6); +lean_inc(x_5); lean_inc(x_4); -x_19 = lean_apply_5(x_2, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_19) == 0) +x_17 = lean_apply_5(x_2, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_20; -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -if (lean_obj_tag(x_20) == 0) -{ -uint8_t x_21; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_21 = !lean_is_exclusive(x_19); -if (x_21 == 0) -{ -lean_object* x_22; uint8_t x_23; -x_22 = lean_ctor_get(x_19, 0); -lean_dec(x_22); -x_23 = !lean_is_exclusive(x_20); -if (x_23 == 0) -{ -return x_19; -} -else -{ -lean_object* x_24; lean_object* x_25; -x_24 = lean_ctor_get(x_20, 0); -lean_inc(x_24); -lean_dec(x_20); -x_25 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_19, 0, x_25); -return x_19; -} -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_26 = lean_ctor_get(x_19, 1); -lean_inc(x_26); -lean_dec(x_19); -x_27 = lean_ctor_get(x_20, 0); -lean_inc(x_27); -if (lean_is_exclusive(x_20)) { - lean_ctor_release(x_20, 0); - x_28 = x_20; -} else { - lean_dec_ref(x_20); - x_28 = lean_box(0); -} -if (lean_is_scalar(x_28)) { - x_29 = lean_alloc_ctor(0, 1, 0); -} else { - x_29 = x_28; -} -lean_ctor_set(x_29, 0, x_27); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_26); -return x_30; -} -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_20, 0); -lean_inc(x_31); -lean_dec(x_20); -x_32 = lean_ctor_get(x_19, 1); -lean_inc(x_32); -lean_dec(x_19); -x_33 = lean_ctor_get(x_31, 1); -lean_inc(x_33); -lean_dec(x_31); -x_3 = x_14; -x_5 = x_33; -x_8 = x_32; +lean_object* x_18; +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_3 = x_12; +x_8 = x_18; goto _start; } -} else { -uint8_t x_35; +uint8_t x_20; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_35 = !lean_is_exclusive(x_19); -if (x_35 == 0) +x_20 = !lean_is_exclusive(x_17); +if (x_20 == 0) { -return x_19; +return x_17; } else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_19, 0); -x_37 = lean_ctor_get(x_19, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_19); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_17, 0); +x_22 = lean_ctor_get(x_17, 1); +lean_inc(x_22); +lean_inc(x_21); +lean_dec(x_17); +x_23 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_23, 0, x_21); +lean_ctor_set(x_23, 1, x_22); +return x_23; } } } else { -lean_object* x_39; +lean_object* x_24; lean_inc(x_1); lean_inc(x_7); lean_inc(x_6); +lean_inc(x_5); lean_inc(x_4); -x_39 = lean_apply_5(x_1, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_39) == 0) +x_24 = lean_apply_5(x_1, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_24) == 0) { -lean_object* x_40; -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -if (lean_obj_tag(x_40) == 0) -{ -uint8_t x_41; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_41 = !lean_is_exclusive(x_39); -if (x_41 == 0) -{ -lean_object* x_42; uint8_t x_43; -x_42 = lean_ctor_get(x_39, 0); -lean_dec(x_42); -x_43 = !lean_is_exclusive(x_40); -if (x_43 == 0) -{ -return x_39; -} -else -{ -lean_object* x_44; lean_object* x_45; -x_44 = lean_ctor_get(x_40, 0); -lean_inc(x_44); -lean_dec(x_40); -x_45 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_45, 0, x_44); -lean_ctor_set(x_39, 0, x_45); -return x_39; -} -} -else -{ -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_46 = lean_ctor_get(x_39, 1); -lean_inc(x_46); -lean_dec(x_39); -x_47 = lean_ctor_get(x_40, 0); -lean_inc(x_47); -if (lean_is_exclusive(x_40)) { - lean_ctor_release(x_40, 0); - x_48 = x_40; -} else { - lean_dec_ref(x_40); - x_48 = lean_box(0); -} -if (lean_is_scalar(x_48)) { - x_49 = lean_alloc_ctor(0, 1, 0); -} else { - x_49 = x_48; -} -lean_ctor_set(x_49, 0, x_47); -x_50 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_50, 0, x_49); -lean_ctor_set(x_50, 1, x_46); -return x_50; -} -} -else -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_40, 0); -lean_inc(x_51); -lean_dec(x_40); -x_52 = lean_ctor_get(x_39, 1); -lean_inc(x_52); -lean_dec(x_39); -x_53 = lean_ctor_get(x_51, 1); -lean_inc(x_53); -lean_dec(x_51); -x_3 = x_14; -x_5 = x_53; -x_8 = x_52; +lean_object* x_25; +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +lean_dec(x_24); +x_3 = x_12; +x_8 = x_25; goto _start; } -} else { -uint8_t x_55; +uint8_t x_27; lean_dec(x_7); lean_dec(x_6); +lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_55 = !lean_is_exclusive(x_39); -if (x_55 == 0) +x_27 = !lean_is_exclusive(x_24); +if (x_27 == 0) { -return x_39; +return x_24; } else { -lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_56 = lean_ctor_get(x_39, 0); -x_57 = lean_ctor_get(x_39, 1); -lean_inc(x_57); -lean_inc(x_56); -lean_dec(x_39); -x_58 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_58, 0, x_56); -lean_ctor_set(x_58, 1, x_57); -return x_58; +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_24, 0); +x_29 = lean_ctor_get(x_24, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_24); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; } } } @@ -26078,33 +9032,25 @@ return x_58; lean_object* l_Lean_PrettyPrinter_Parenthesizer_sepBy_parenthesizer(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -x_10 = lean_ctor_get(x_9, 0); +x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_ctor_get(x_8, 1); -lean_inc(x_11); lean_dec(x_8); -x_12 = lean_ctor_get(x_10, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); -lean_dec(x_10); -x_14 = l_Lean_Syntax_getArgs(x_12); -lean_dec(x_12); -x_15 = lean_array_get_size(x_14); -lean_dec(x_14); -x_16 = l_List_range(x_15); -x_17 = l_List_reverse___rarg(x_16); -x_18 = lean_alloc_closure((void*)(l_List_forM___main___at_Lean_PrettyPrinter_Parenthesizer_sepBy_parenthesizer___spec__1___boxed), 8, 3); -lean_closure_set(x_18, 0, x_1); -lean_closure_set(x_18, 1, x_2); -lean_closure_set(x_18, 2, x_17); -x_19 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_18, x_3, x_13, x_5, x_6, x_11); -return x_19; +x_11 = l_Lean_Syntax_getArgs(x_9); +lean_dec(x_9); +x_12 = lean_array_get_size(x_11); +lean_dec(x_11); +x_13 = l_List_range(x_12); +x_14 = l_List_reverse___rarg(x_13); +x_15 = lean_alloc_closure((void*)(l_List_forM___main___at_Lean_PrettyPrinter_Parenthesizer_sepBy_parenthesizer___spec__1___boxed), 8, 3); +lean_closure_set(x_15, 0, x_1); +lean_closure_set(x_15, 1, x_2); +lean_closure_set(x_15, 2, x_14); +x_16 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_15, x_3, x_4, x_5, x_6, x_10); +return x_16; } } lean_object* l_List_forM___main___at_Lean_PrettyPrinter_Parenthesizer_sepBy_parenthesizer___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, lean_object* x_7, lean_object* x_8) { @@ -26177,355 +9123,259 @@ x_7 = lean_apply_5(x_1, x_2, x_3, x_4, x_5, x_6); return x_7; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg(lean_object* x_1) { _start: { -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___rarg), 1, 0); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer(x_1, x_2, x_3, x_4); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___boxed(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg(lean_object* x_1) { _start: { -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer(x_1); -lean_dec(x_1); -return x_2; +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___rarg), 1, 0); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer(x_1, x_2, x_3, x_4); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___boxed(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg(lean_object* x_1) { _start: { -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer(x_1); -lean_dec(x_1); -return x_2; +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___rarg), 1, 0); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer(x_1, x_2, x_3, x_4); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg(lean_object* x_1) { _start: { -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer(x_1); -lean_dec(x_1); -return x_2; +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___rarg), 1, 0); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___boxed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer(x_1); -lean_dec(x_1); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_1); -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkTailWs_parenthesizer(x_1, x_2, x_3, x_4); +lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } -lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___boxed(lean_object* x_1) { +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg(lean_object* x_1) { _start: { -lean_object* x_2; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer(x_1); +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___rarg), 1, 0); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkColGe_parenthesizer(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); lean_dec(x_1); -return x_2; +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___rarg), 1, 0); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___rarg), 1, 0); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkInsideQuot_parenthesizer(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___rarg), 1, 0); +return x_5; +} +} +lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_PrettyPrinter_Parenthesizer_checkOutsideQuot_parenthesizer(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_5; } } lean_object* l_Lean_PrettyPrinter_Parenthesizer_pushNone_parenthesizer___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__2___rarg(x_1, x_2, x_3, x_4); return x_5; } } @@ -26544,6 +9394,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_pushNone_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -26579,6 +9430,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_quotedSymbol_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -26614,6 +9466,7 @@ lean_object* x_5; x_5 = l_Lean_PrettyPrinter_Parenthesizer_unquotedSymbol_parenthesizer___rarg(x_1, x_2, x_3, x_4); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); return x_5; } } @@ -26694,7 +9547,7 @@ return x_2; lean_object* l_Lean_PrettyPrinter_parenthesize(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; lean_object* x_11; +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; lean_object* x_13; lean_object* x_14; x_6 = l_Lean_Syntax_Traverser_fromSyntax(x_2); x_7 = lean_box(0); x_8 = lean_box(0); @@ -26706,59 +9559,49 @@ lean_ctor_set(x_10, 2, x_8); lean_ctor_set(x_10, 3, x_7); lean_ctor_set(x_10, 4, x_7); lean_ctor_set_uint8(x_10, sizeof(void*)*5, x_9); -lean_inc(x_4); -lean_inc(x_3); -x_11 = lean_apply_5(x_1, x_8, x_10, x_3, x_4, x_5); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; +x_11 = lean_io_mk_ref(x_10, x_5); x_12 = lean_ctor_get(x_11, 0); lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; -lean_dec(x_12); x_13 = lean_ctor_get(x_11, 1); lean_inc(x_13); lean_dec(x_11); -x_14 = l_Lean_PrettyPrinter_parenthesize___closed__3; -x_15 = l_Lean_Core_throwError___rarg(x_14, x_3, x_4, x_13); -lean_dec(x_4); -lean_dec(x_3); -return x_15; -} -else +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_12); +x_14 = lean_apply_5(x_1, x_8, x_12, x_3, x_4, x_13); +if (lean_obj_tag(x_14) == 0) { -lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_dec(x_4); lean_dec(x_3); -x_16 = lean_ctor_get(x_12, 0); -lean_inc(x_16); +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_16 = lean_io_ref_get(x_12, x_15); lean_dec(x_12); -x_17 = lean_ctor_get(x_16, 1); +x_17 = lean_ctor_get(x_16, 0); lean_inc(x_17); -lean_dec(x_16); x_18 = lean_ctor_get(x_17, 0); lean_inc(x_18); lean_dec(x_17); -x_19 = !lean_is_exclusive(x_11); +x_19 = !lean_is_exclusive(x_16); if (x_19 == 0) { lean_object* x_20; lean_object* x_21; -x_20 = lean_ctor_get(x_11, 0); +x_20 = lean_ctor_get(x_16, 0); lean_dec(x_20); x_21 = lean_ctor_get(x_18, 0); lean_inc(x_21); lean_dec(x_18); -lean_ctor_set(x_11, 0, x_21); -return x_11; +lean_ctor_set(x_16, 0, x_21); +return x_16; } else { lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_22 = lean_ctor_get(x_11, 1); +x_22 = lean_ctor_get(x_16, 1); lean_inc(x_22); -lean_dec(x_11); +lean_dec(x_16); x_23 = lean_ctor_get(x_18, 0); lean_inc(x_23); lean_dec(x_18); @@ -26768,29 +9611,102 @@ lean_ctor_set(x_24, 1, x_22); return x_24; } } -} else { -uint8_t x_25; +lean_object* x_25; +lean_dec(x_12); +x_25 = lean_ctor_get(x_14, 0); +lean_inc(x_25); +if (lean_obj_tag(x_25) == 0) +{ +uint8_t x_26; lean_dec(x_4); lean_dec(x_3); -x_25 = !lean_is_exclusive(x_11); -if (x_25 == 0) +x_26 = !lean_is_exclusive(x_14); +if (x_26 == 0) { -return x_11; +lean_object* x_27; +x_27 = lean_ctor_get(x_14, 0); +lean_dec(x_27); +return x_14; } else { -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_11, 0); -x_27 = lean_ctor_get(x_11, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_11); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -return x_28; +lean_object* x_28; lean_object* x_29; +x_28 = lean_ctor_get(x_14, 1); +lean_inc(x_28); +lean_dec(x_14); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_25); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +else +{ +uint8_t x_30; +x_30 = !lean_is_exclusive(x_14); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; +x_31 = lean_ctor_get(x_14, 1); +x_32 = lean_ctor_get(x_14, 0); +lean_dec(x_32); +x_33 = lean_ctor_get(x_25, 0); +lean_inc(x_33); +x_34 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_35 = lean_nat_dec_eq(x_34, x_33); +lean_dec(x_33); +if (x_35 == 0) +{ +lean_dec(x_4); +lean_dec(x_3); +return x_14; +} +else +{ +lean_object* x_36; lean_object* x_37; +lean_free_object(x_14); +lean_dec(x_25); +x_36 = l_Lean_PrettyPrinter_parenthesize___closed__3; +x_37 = l_Lean_Core_throwError___rarg(x_36, x_3, x_4, x_31); +lean_dec(x_4); +lean_dec(x_3); +return x_37; +} +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; +x_38 = lean_ctor_get(x_14, 1); +lean_inc(x_38); +lean_dec(x_14); +x_39 = lean_ctor_get(x_25, 0); +lean_inc(x_39); +x_40 = l_Lean_PrettyPrinter_backtrackExceptionId; +x_41 = lean_nat_dec_eq(x_40, x_39); +lean_dec(x_39); +if (x_41 == 0) +{ +lean_object* x_42; +lean_dec(x_4); +lean_dec(x_3); +x_42 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_42, 0, x_25); +lean_ctor_set(x_42, 1, x_38); +return x_42; +} +else +{ +lean_object* x_43; lean_object* x_44; +lean_dec(x_25); +x_43 = l_Lean_PrettyPrinter_parenthesize___closed__3; +x_44 = l_Lean_Core_throwError___rarg(x_43, x_3, x_4, x_38); +lean_dec(x_4); +lean_dec(x_3); +return x_44; +} +} } } } @@ -26859,7 +9775,7 @@ lean_object* l___private_Lean_PrettyPrinter_Parenthesizer_1__regTraceClasses(lea _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__6; +x_2 = l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5; x_3 = l_Lean_registerTraceClass(x_2, x_1); if (lean_obj_tag(x_3) == 0) { @@ -26916,6 +9832,7 @@ lean_object* initialize_Lean_CoreM(lean_object*); lean_object* initialize_Lean_KeyedDeclsAttribute(lean_object*); lean_object* initialize_Lean_Parser_Extension(lean_object*); lean_object* initialize_Lean_ParserCompiler_Attribute(lean_object*); +lean_object* initialize_Lean_PrettyPrinter_Backtrack(lean_object*); static bool _G_initialized = false; lean_object* initialize_Lean_PrettyPrinter_Parenthesizer(lean_object* w) { lean_object * res; @@ -26936,6 +9853,11 @@ lean_dec_ref(res); res = initialize_Lean_ParserCompiler_Attribute(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +res = initialize_Lean_PrettyPrinter_Backtrack(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_PrettyPrinter_Parenthesizer_orelse___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_orelse___closed__1(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_orelse___closed__1); l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__1 = _init_l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__1); l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__2 = _init_l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__2(); @@ -27049,6 +9971,8 @@ if (lean_io_result_is_error(res)) return res; l_Lean_PrettyPrinter_combinatorParenthesizerAttribute = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_PrettyPrinter_combinatorParenthesizerAttribute); lean_dec_ref(res); +l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg___closed__1(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_throwBacktrack___rarg___closed__1); l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__1); l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___closed__2(); @@ -27135,8 +10059,6 @@ l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29 = _init_l_Lean lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__29); l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30 = _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__30); -l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31 = _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31(); -lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__31); l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__1); l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKind___closed__2(); @@ -27157,8 +10079,6 @@ l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__6 = lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__6); l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1); -l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2(); -lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2); l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1 = _init_l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__1); res = l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer(lean_io_mk_world()); diff --git a/stage0/stdlib/Lean/Util/Sorry.c b/stage0/stdlib/Lean/Util/Sorry.c index aaeeb58864..9e2da87189 100644 --- a/stage0/stdlib/Lean/Util/Sorry.c +++ b/stage0/stdlib/Lean/Util/Sorry.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Lean.Util.Sorry -// Imports: Init Lean.Message Lean.CoreM +// Imports: Init Lean.Message Lean.Exception #include #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -22,7 +22,6 @@ uint8_t lean_name_eq(lean_object*, lean_object*); lean_object* l_Lean_MessageData_hasSyntheticSorry___main___boxed(lean_object*); uint8_t l_Lean_Expr_hasSorry___main(lean_object*); lean_object* l_Lean_MessageData_hasSyntheticSorry___boxed(lean_object*); -lean_object* l_Lean_Core_Exception_hasSyntheticSorry___boxed(lean_object*); lean_object* lean_array_get_size(lean_object*); uint8_t l_Lean_Expr_hasSyntheticSorry(lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); @@ -32,10 +31,10 @@ lean_object* l_Lean_Expr_isSyntheticSorry___closed__1; lean_object* l_Lean_Expr_hasSyntheticSorry___boxed(lean_object*); lean_object* l_Lean_Expr_isSyntheticSorry___boxed(lean_object*); uint8_t l_Lean_MessageData_hasSorry___main(lean_object*); +uint8_t l_Lean_Exception_hasSyntheticSorry(lean_object*); uint8_t l_Array_anyRangeMAux___main___at_Lean_MessageData_hasSorry___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_hasSyntheticSorry___main(lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); -uint8_t l_Lean_Core_Exception_hasSyntheticSorry(lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_MessageData_hasSorry___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_isSorry___closed__1; uint8_t l_Lean_MessageData_hasSyntheticSorry(lean_object*); @@ -43,6 +42,7 @@ lean_object* l_Array_anyRangeMAux___main___at_Lean_MessageData_hasSyntheticSorry lean_object* l_Lean_MessageData_hasSorry___boxed(lean_object*); lean_object* l_Lean_Expr_isSorry___boxed(lean_object*); extern lean_object* l_Bool_HasRepr___closed__2; +lean_object* l_Lean_Exception_hasSyntheticSorry___boxed(lean_object*); uint8_t l_Lean_Expr_hasSorry(lean_object*); lean_object* l_Lean_Expr_hasSorry___boxed(lean_object*); lean_object* l_Lean_Expr_hasSyntheticSorry___main___boxed(lean_object*); @@ -890,7 +890,7 @@ x_3 = lean_box(x_2); return x_3; } } -uint8_t l_Lean_Core_Exception_hasSyntheticSorry(lean_object* x_1) { +uint8_t l_Lean_Exception_hasSyntheticSorry(lean_object* x_1) { _start: { if (lean_obj_tag(x_1) == 0) @@ -908,11 +908,11 @@ return x_4; } } } -lean_object* l_Lean_Core_Exception_hasSyntheticSorry___boxed(lean_object* x_1) { +lean_object* l_Lean_Exception_hasSyntheticSorry___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; -x_2 = l_Lean_Core_Exception_hasSyntheticSorry(x_1); +x_2 = l_Lean_Exception_hasSyntheticSorry(x_1); lean_dec(x_1); x_3 = lean_box(x_2); return x_3; @@ -920,7 +920,7 @@ return x_3; } lean_object* initialize_Init(lean_object*); lean_object* initialize_Lean_Message(lean_object*); -lean_object* initialize_Lean_CoreM(lean_object*); +lean_object* initialize_Lean_Exception(lean_object*); static bool _G_initialized = false; lean_object* initialize_Lean_Util_Sorry(lean_object* w) { lean_object * res; @@ -932,7 +932,7 @@ lean_dec_ref(res); res = initialize_Lean_Message(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -res = initialize_Lean_CoreM(lean_io_mk_world()); +res = initialize_Lean_Exception(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); l_Lean_Expr_isSorry___closed__1 = _init_l_Lean_Expr_isSorry___closed__1();