diff --git a/stage0/src/Lean/Elab/Binders.lean b/stage0/src/Lean/Elab/Binders.lean index 8b1f36fea3..7f48ffe718 100644 --- a/stage0/src/Lean/Elab/Binders.lean +++ b/stage0/src/Lean/Elab/Binders.lean @@ -39,10 +39,11 @@ private def expandOptIdent (stx : Syntax) : TermElabM Syntax := do else return stx[0] +/-- Auxiliary datatype for elaborating binders. -/ structure BinderView where - id : Syntax + id : Syntax type : Syntax - bi : BinderInfo + bi : BinderInfo partial def quoteAutoTactic : Syntax → TermElabM Syntax | stx@(.ident ..) => throwErrorAt stx "invalid auto tactic, identifier is not allowed" @@ -77,8 +78,10 @@ def declareTacticSyntax (tactic : Syntax) : TermElabM Name := /-- Expand `optional (binderTactic <|> binderDefault)` +``` def binderTactic := leading_parser " := " >> " by " >> tacticParser def binderDefault := leading_parser " := " >> termParser +``` -/ private def expandBinderModifier (type : Syntax) (optBinderModifier : Syntax) : TermElabM Syntax := do if optBinderModifier.isNone then @@ -149,6 +152,13 @@ register_builtin_option checkBinderAnnotations : Bool := { descr := "check whether type is a class instance whenever the binder annotation `[...]` is used" } +/-- Throw an error if `type` is not a valid local instance. -/ +private partial def checkLocalInstanceParameters (type : Expr) : TermElabM Unit := do + let .forallE n d b bi ← whnf type | return () + if !b.hasLooseBVar 0 then + throwError "invalid parametric local instance, parameter with type{indentExpr d}\ndoes not have forward dependencies, type class resolution cannot use this kind of local instance because it will not be able to infer a value for this parameter." + withLocalDecl n bi d fun x => checkLocalInstanceParameters (b.instantiate1 x) + private partial def elabBinderViews (binderViews : Array BinderView) (fvars : Array (Syntax × Expr)) (k : Array (Syntax × Expr) → TermElabM α) : TermElabM α := let rec loop (i : Nat) (fvars : Array (Syntax × Expr)) : TermElabM α := do @@ -160,6 +170,7 @@ private partial def elabBinderViews (binderViews : Array BinderView) (fvars : Ar if binderView.bi.isInstImplicit && checkBinderAnnotations.get (← getOptions) then unless (← isClass? type).isSome do throwErrorAt binderView.type "invalid binder annotation, type is not a class instance{indentExpr type}\nuse the command `set_option checkBinderAnnotations false` to disable the check" + withRef binderView.type <| checkLocalInstanceParameters type withLocalDecl binderView.id.getId binderView.bi type fun fvar => do addLocalVarInfo binderView.id fvar loop (i+1) (fvars.push (binderView.id, fvar)) diff --git a/stage0/src/Lean/Meta/Basic.lean b/stage0/src/Lean/Meta/Basic.lean index 49baa83aa0..5e757f045c 100644 --- a/stage0/src/Lean/Meta/Basic.lean +++ b/stage0/src/Lean/Meta/Basic.lean @@ -503,10 +503,15 @@ def mkFreshLevelMVars (num : Nat) : MetaM (List Level) := def mkFreshLevelMVarsFor (info : ConstantInfo) : MetaM (List Level) := mkFreshLevelMVars info.numLevelParams +/-- +Create a constant with the given name and new universe metavariables. +Example: ``mkConstWithFreshMVarLevels `Monad`` returns `@Monad.{?u, ?v}` +-/ def mkConstWithFreshMVarLevels (declName : Name) : MetaM Expr := do let info ← getConstInfo declName return mkConst declName (← mkFreshLevelMVarsFor info) +/-- Return current transparency setting/mode. -/ def getTransparency : MetaM TransparencyMode := return (← getConfig).transparency @@ -516,6 +521,10 @@ def shouldReduceAll : MetaM Bool := def shouldReduceReducibleOnly : MetaM Bool := return (← getTransparency) == TransparencyMode.reducible +/-- +Return `some mvarDecl` where `mvarDecl` is `mvarId` declaration in the current metavariable context. +Return `none` if `mvarId` has no declaration in the current metavariable context. +-/ def _root_.Lean.MVarId.findDecl? (mvarId : MVarId) : MetaM (Option MetavarDecl) := return (← getMCtx).findDecl? mvarId @@ -523,6 +532,10 @@ def _root_.Lean.MVarId.findDecl? (mvarId : MVarId) : MetaM (Option MetavarDecl) def findMVarDecl? (mvarId : MVarId) : MetaM (Option MetavarDecl) := mvarId.findDecl? +/-- +Return `mvarId` declaration in the current metavariable context. +Throw an exception if `mvarId` is not declarated in the current metavariable context. +-/ def _root_.Lean.MVarId.getDecl (mvarId : MVarId) : MetaM MetavarDecl := do match (← mvarId.findDecl?) with | some d => pure d @@ -532,6 +545,9 @@ def _root_.Lean.MVarId.getDecl (mvarId : MVarId) : MetaM MetavarDecl := do def getMVarDecl (mvarId : MVarId) : MetaM MetavarDecl := do mvarId.getDecl +/-- +Return `mvarId` kind. Throw an exception if `mvarId` is not declarated in the current metavariable context. +-/ def _root_.Lean.MVarId.getKind (mvarId : MVarId) : MetaM MetavarKind := return (← mvarId.getDecl).kind @@ -546,6 +562,9 @@ def isSyntheticMVar (e : Expr) : MetaM Bool := do else return false +/-- +Set `mvarId` kind in the current metavariable context. +-/ def _root_.Lean.MVarId.setKind (mvarId : MVarId) (kind : MetavarKind) : MetaM Unit := modifyMCtx fun mctx => mctx.setMVarKind mvarId kind @@ -562,6 +581,10 @@ def _root_.Lean.MVarId.setType (mvarId : MVarId) (type : Expr) : MetaM Unit := d def setMVarType (mvarId : MVarId) (type : Expr) : MetaM Unit := do mvarId.setType type +/-- +Return true if the given metavariable is "read-only". +That is, its `depth` is different from the current metavariable context depth. +-/ def _root_.Lean.MVarId.isReadOnly (mvarId : MVarId) : MetaM Bool := do return (← mvarId.getDecl).depth != (← getMCtx).depth @@ -569,6 +592,11 @@ def _root_.Lean.MVarId.isReadOnly (mvarId : MVarId) : MetaM Bool := do def isReadOnlyExprMVar (mvarId : MVarId) : MetaM Bool := do mvarId.isReadOnly +/-- +Return true if `mvarId.isReadOnly` return true or if `mvarId` is a synthetic opaque metavariable. + +Recall `isDefEq` will not assign a value to `mvarId` if `mvarId.isReadOnlyOrSyntheticOpaque`. +-/ def _root_.Lean.MVarId.isReadOnlyOrSyntheticOpaque (mvarId : MVarId) : MetaM Bool := do let mvarDecl ← mvarId.getDecl match mvarDecl.kind with @@ -579,17 +607,35 @@ def _root_.Lean.MVarId.isReadOnlyOrSyntheticOpaque (mvarId : MVarId) : MetaM Boo def isReadOnlyOrSyntheticOpaqueExprMVar (mvarId : MVarId) : MetaM Bool := do mvarId.isReadOnlyOrSyntheticOpaque -def getLevelMVarDepth (mvarId : LMVarId) : MetaM Nat := do +/-- +Return the level of the given universe level metavariable. +-/ +def _root_.Lean.LMVarId.getLevel (mvarId : LMVarId) : MetaM Nat := do match (← getMCtx).findLevelDepth? mvarId with | some depth => return depth | _ => throwError "unknown universe metavariable '?{mvarId.name}'" -def isReadOnlyLevelMVar (mvarId : LMVarId) : MetaM Bool := do +@[deprecated LMVarId.getLevel] +def getLevelMVarDepth (mvarId : LMVarId) : MetaM Nat := + mvarId.getLevel + +/-- +Return true if the given universe metavariable is "read-only". +That is, its `depth` is different from the current metavariable context depth. +-/ +def _root_.Lean.LMVarId.isReadOnly (mvarId : LMVarId) : MetaM Bool := do if (← getConfig).ignoreLevelMVarDepth then return false else - return (← getLevelMVarDepth mvarId) != (← getMCtx).depth + return (← mvarId.getLevel) != (← getMCtx).depth +@[deprecated LMVarId.isReadOnly] +def isReadOnlyLevelMVar (mvarId : LMVarId) : MetaM Bool := do + mvarId.isReadOnly + +/-- +Set the user-facing name for the given metavariable. +-/ def _root_.Lean.MVarId.setUserName (mvarId : MVarId) (newUserName : Name) : MetaM Unit := modifyMCtx fun mctx => mctx.setMVarUserName mvarId newUserName @@ -597,9 +643,16 @@ def _root_.Lean.MVarId.setUserName (mvarId : MVarId) (newUserName : Name) : Meta def setMVarUserName (mvarId : MVarId) (userNameNew : Name) : MetaM Unit := mvarId.setUserName userNameNew -def throwUnknownFVar (fvarId : FVarId) : MetaM α := +/-- +Throw an exception saying `fvarId` is not declared in the current local context. +-/ +def _root_.Lean.FVarId.throwUnknown (fvarId : FVarId) : MetaM α := throwError "unknown free variable '{mkFVar fvarId}'" +@[deprecated FVarId.throwUnknown] +def throwUnknownFVar (fvarId : FVarId) : MetaM α := + fvarId.throwUnknown + /-- Return `some decl` if `fvarId` is declared in the current local context. -/ @@ -616,8 +669,8 @@ def findLocalDecl? (fvarId : FVarId) : MetaM (Option LocalDecl) := -/ def _root_.Lean.FVarId.getDecl (fvarId : FVarId) : MetaM LocalDecl := do match (← getLCtx).find? fvarId with - | some d => pure d - | none => throwUnknownFVar fvarId + | some d => return d + | none => fvarId.throwUnknown @[deprecated FVarId.getDecl] def getLocalDecl (fvarId : FVarId) : MetaM LocalDecl := do @@ -646,32 +699,61 @@ def _root_.Lean.FVarId.isLetVar (fvarId : FVarId) : MetaM Bool := def getFVarLocalDecl (fvar : Expr) : MetaM LocalDecl := fvar.fvarId!.getDecl +/-- +Given a user-facing name for a free variable, return its declaration in the current local context. +Throw an exception if free variable is not declared. +-/ def getLocalDeclFromUserName (userName : Name) : MetaM LocalDecl := do match (← getLCtx).findFromUserName? userName with | some d => pure d | none => throwError "unknown local declaration '{userName}'" +/-- +Lift a `MkBindingM` monadic action `x` to `MetaM`. +-/ @[inline] def liftMkBindingM (x : MetavarContext.MkBindingM α) : MetaM α := do match x { lctx := (← getLCtx), mainModule := (← getEnv).mainModule } { mctx := (← getMCtx), ngen := (← getNGen), nextMacroScope := (← getThe Core.State).nextMacroScope } with - | EStateM.Result.ok e sNew => do + | .ok e sNew => do setMCtx sNew.mctx modifyThe Core.State fun s => { s with ngen := sNew.ngen, nextMacroScope := sNew.nextMacroScope } pure e - | EStateM.Result.error (.revertFailure ..) sNew => do + | .error (.revertFailure ..) sNew => do setMCtx sNew.mctx modifyThe Core.State fun s => { s with ngen := sNew.ngen, nextMacroScope := sNew.nextMacroScope } throwError "failed to create binder due to failure when reverting variable dependencies" -def abstractRange (e : Expr) (n : Nat) (xs : Array Expr) : MetaM Expr := +/-- +Similar to `abstracM` but consider only the first `min n xs.size` entries in `xs` + +It is also similar to `Expr.abstractRange`, but handles metavariables correctly. +It uses `elimMVarDeps` to ensure `e` and the type of the free variables `xs` do not +contain a metavariable `?m` s.t. local context of `?m` contains a free variable in `xs`. +-/ +def _root_.Lean.Expr.abstractRangeM (e : Expr) (n : Nat) (xs : Array Expr) : MetaM Expr := liftMkBindingM <| MetavarContext.abstractRange e n xs -def abstract (e : Expr) (xs : Array Expr) : MetaM Expr := - abstractRange e xs.size xs +@[deprecated Expr.abstractRangeM] +def abstractRange (e : Expr) (n : Nat) (xs : Array Expr) : MetaM Expr := + e.abstractRangeM n xs +/-- +Replace free (or meta) variables `xs` with loose bound variables. +Similar to `Expr.abstract`, but handles metavariables correctly. +-/ +def _root_.Lean.Expr.abstractM (e : Expr) (xs : Array Expr) : MetaM Expr := + e.abstractRangeM xs.size xs + +@[deprecated Expr.abstractM] +def abstract (e : Expr) (xs : Array Expr) : MetaM Expr := + e.abstractM xs + +/-- +Collect forward dependencies for the free variables in `toRevert`. +Recall that when reverting free variables `xs`, we must also revert their forward dependencies. +-/ def collectForwardDeps (toRevert : Array Expr) (preserveOrder : Bool) : MetaM (Array Expr) := do liftMkBindingM <| MetavarContext.collectForwardDeps toRevert preserveOrder - /-- Takes an array `xs` of free variables or metavariables and a term `e` that may contain those variables, and abstracts and binds them as universal quantifiers. - if `usedOnly = true` then only variables that the expression body depends on will appear. @@ -700,6 +782,7 @@ def mkFunUnit (a : Expr) : MetaM Expr := def elimMVarDeps (xs : Array Expr) (e : Expr) (preserveOrder : Bool := false) : MetaM Expr := if xs.isEmpty then pure e else liftMkBindingM <| MetavarContext.elimMVarDeps xs e preserveOrder +/-- `withConfig f x` executes `x` using the updated configuration object obtained by applying `f`. -/ @[inline] def withConfig (f : Config → Config) : n α → n α := mapMetaM <| withReader (fun ctx => { ctx with config := f ctx.config }) @@ -712,15 +795,25 @@ def elimMVarDeps (xs : Array Expr) (e : Expr) (preserveOrder : Bool := false) : @[inline] def withTransparency (mode : TransparencyMode) : n α → n α := mapMetaM <| withConfig (fun config => { config with transparency := mode }) +/-- `withDefault x` excutes `x` using the default transparency setting. -/ @[inline] def withDefault (x : n α) : n α := withTransparency TransparencyMode.default x +/-- `withReducible x` excutes `x` using the reducible transparency setting. In this setting only definitions tagged as `[reducible]` are unfolded. -/ @[inline] def withReducible (x : n α) : n α := withTransparency TransparencyMode.reducible x +/-- +`withReducibleAndInstances x` excutes `x` using the `.instances` transparency setting. In this setting only definitions tagged as `[reducible]` +or type class instances are unfolded. +-/ @[inline] def withReducibleAndInstances (x : n α) : n α := withTransparency TransparencyMode.instances x +/-- +Execute `x` ensuring the transparency setting is at least `mode`. +Recall that `.all > .default > .instances > .reducible`. +-/ @[inline] def withAtLeastTransparency (mode : TransparencyMode) (x : n α) : n α := withConfig (fun config => @@ -770,37 +863,37 @@ private def getConstTemp? (constName : Name) : MetaM (Option ConstantInfo) := do private def isClassQuickConst? (constName : Name) : MetaM (LOption Name) := do if isClass (← getEnv) constName then - pure (LOption.some constName) + return .some constName else match (← getConstTemp? constName) with - | some (ConstantInfo.defnInfo ..) => pure LOption.undef -- We may be able to unfold the definition - | _ => pure LOption.none + | some (.defnInfo ..) => return .undef -- We may be able to unfold the definition + | _ => return .none private partial def isClassQuick? : Expr → MetaM (LOption Name) - | Expr.bvar .. => pure LOption.none - | Expr.lit .. => pure LOption.none - | Expr.fvar .. => pure LOption.none - | Expr.sort .. => pure LOption.none - | Expr.lam .. => pure LOption.none - | Expr.letE .. => pure LOption.undef - | Expr.proj .. => pure LOption.undef - | Expr.forallE _ _ b _ => isClassQuick? b - | Expr.mdata _ e => isClassQuick? e - | Expr.const n _ => isClassQuickConst? n - | Expr.mvar mvarId => do + | .bvar .. => return .none + | .lit .. => return .none + | .fvar .. => return .none + | .sort .. => return .none + | .lam .. => return .none + | .letE .. => return .undef + | .proj .. => return .undef + | .forallE _ _ b _ => isClassQuick? b + | .mdata _ e => isClassQuick? e + | .const n _ => isClassQuickConst? n + | .mvar mvarId => do match (← getExprMVarAssignment? mvarId) with | some val => isClassQuick? val - | none => pure LOption.none - | Expr.app f _ => + | none => return .none + | .app f _ => match f.getAppFn with - | Expr.const n .. => isClassQuickConst? n - | Expr.lam .. => pure LOption.undef - | _ => pure LOption.none + | .const n .. => isClassQuickConst? n + | .lam .. => return .undef + | _ => return .none def saveAndResetSynthInstanceCache : MetaM SynthInstanceCache := do let savedSythInstance := (← get).cache.synthInstance modifyCache fun c => { c with synthInstance := {} } - pure savedSythInstance + return savedSythInstance def restoreSynthInstanceCache (cache : SynthInstanceCache) : MetaM Unit := modifyCache fun c => { c with synthInstance := cache } @@ -820,7 +913,7 @@ private def withNewLocalInstanceImp (className : Name) (fvar : Expr) (k : MetaM let localDecl ← getFVarLocalDecl fvar /- Recall that we use `auxDecl` binderInfo when compiling recursive declarations. -/ match localDecl.binderInfo with - | BinderInfo.auxDecl => k + | .auxDecl => k | _ => resettingSynthInstanceCache <| withReader @@ -853,12 +946,12 @@ mutual let fvar := fvars.get ⟨i, h⟩ let decl ← getFVarLocalDecl fvar match (← isClassQuick? decl.type) with - | LOption.none => withNewLocalInstancesImp fvars (i+1) k - | LOption.undef => + | .none => withNewLocalInstancesImp fvars (i+1) k + | .undef => match (← isClassExpensive? decl.type) with | none => withNewLocalInstancesImp fvars (i+1) k | some c => withNewLocalInstance c fvar <| withNewLocalInstancesImp fvars (i+1) k - | LOption.some c => withNewLocalInstance c fvar <| withNewLocalInstancesImp fvars (i+1) k + | .some c => withNewLocalInstance c fvar <| withNewLocalInstancesImp fvars (i+1) k else k @@ -893,7 +986,7 @@ mutual (k : Array Expr → Expr → MetaM α) : MetaM α := do let rec process (lctx : LocalContext) (fvars : Array Expr) (j : Nat) (type : Expr) : MetaM α := do match type with - | Expr.forallE n d b bi => + | .forallE n d b bi => if fvarsSizeLtMaxFVars fvars maxFVars? then let d := d.instantiateRevRange j fvars.size fvars let fvarId ← mkFreshFVarId @@ -935,21 +1028,21 @@ mutual forallTelescopeReducingAux type none fun _ type => do let env ← getEnv match type.getAppFn with - | Expr.const c _ => do + | .const c _ => do if isClass env c then return some c else -- make sure abbreviations are unfolded match (← whnf type).getAppFn with - | Expr.const c _ => return if isClass env c then some c else none + | .const c _ => return if isClass env c then some c else none | _ => return none | _ => return none private partial def isClassImp? (type : Expr) : MetaM (Option Name) := do match (← isClassQuick? type) with - | LOption.none => pure none - | LOption.some c => pure (some c) - | LOption.undef => isClassExpensive? type + | .none => return none + | .some c => return (some c) + | .undef => isClassExpensive? type end @@ -964,7 +1057,7 @@ end ``` -/ def isClass? (type : Expr) : MetaM (Option Name) := - try isClassImp? type catch _ => pure none + try isClassImp? type catch _ => return none private def withNewLocalInstancesImpAux (fvars : Array Expr) (j : Nat) : n α → n α := mapMetaM <| withNewLocalInstancesImp fvars j @@ -1005,13 +1098,13 @@ private partial def lambdaTelescopeImp (e : Expr) (consumeLet : Bool) (k : Array where process (consumeLet : Bool) (lctx : LocalContext) (fvars : Array Expr) (j : Nat) (e : Expr) : MetaM α := do match consumeLet, e with - | _, Expr.lam n d b bi => + | _, .lam n d b bi => let d := d.instantiateRevRange j fvars.size fvars let fvarId ← mkFreshFVarId let lctx := lctx.mkLocalDecl fvarId n d bi let fvar := mkFVar fvarId process consumeLet lctx (fvars.push fvar) j b - | true, Expr.letE n t v b _ => do + | true, .letE n t v b _ => do let t := t.instantiateRevRange j fvars.size fvars let v := v.instantiateRevRange j fvars.size fvars let fvarId ← mkFreshFVarId @@ -1040,7 +1133,7 @@ def getParamNames (declName : Name) : MetaM (Array Name) := do forallTelescopeReducing (← getConstInfo declName).type fun xs _ => do xs.mapM fun x => do let localDecl ← x.fvarId!.getDecl - pure localDecl.userName + return localDecl.userName -- `kind` specifies the metavariable kind for metavariables not corresponding to instance implicit `[ ... ]` arguments. private partial def forallMetaTelescopeReducingAux @@ -1053,7 +1146,7 @@ where return (mvars, bis, type) else match type with - | Expr.forallE n d b bi => + | .forallE n d b bi => let d := d.instantiateRevRange j mvars.size mvars let k := if bi.isInstImplicit then MetavarKind.synthetic else kind let mvar ← mkFreshExprMVar d k n @@ -1098,12 +1191,12 @@ where process (mvars : Array Expr) (bis : Array BinderInfo) (j : Nat) (type : Expr) : MetaM (Array Expr × Array BinderInfo × Expr) := do let finalize : Unit → MetaM (Array Expr × Array BinderInfo × Expr) := fun _ => do let type := type.instantiateRevRange j mvars.size mvars - pure (mvars, bis, type) + return (mvars, bis, type) if maxMVars?.isEqSome mvars.size then finalize () else match type with - | Expr.lam _ d b bi => + | .lam _ d b bi => let d := d.instantiateRevRange j mvars.size mvars let mvar ← mkFreshExprMVar d let mvars := mvars.push mvar @@ -1336,17 +1429,17 @@ def whnfI (e : Expr) : MetaM Expr := def setInlineAttribute (declName : Name) (kind := Compiler.InlineAttributeKind.inline): MetaM Unit := do let env ← getEnv match Compiler.setInlineAttribute env declName kind with - | Except.ok env => setEnv env - | Except.error msg => throwError msg + | .ok env => setEnv env + | .error msg => throwError msg private partial def instantiateForallAux (ps : Array Expr) (i : Nat) (e : Expr) : MetaM Expr := do if h : i < ps.size then let p := ps.get ⟨i, h⟩ match (← whnf e) with - | Expr.forallE _ _ b _ => instantiateForallAux ps (i+1) (b.instantiate1 p) - | _ => throwError "invalid instantiateForall, too many parameters" + | .forallE _ _ b _ => instantiateForallAux ps (i+1) (b.instantiate1 p) + | _ => throwError "invalid instantiateForall, too many parameters" else - pure e + return e /-- Given `e` of the form `forall (a_1 : A_1) ... (a_n : A_n), B[a_1, ..., a_n]` and `p_1 : A_1, ... p_n : A_n`, return `B[p_1, ..., p_n]`. -/ def instantiateForall (e : Expr) (ps : Array Expr) : MetaM Expr := @@ -1356,10 +1449,10 @@ private partial def instantiateLambdaAux (ps : Array Expr) (i : Nat) (e : Expr) if h : i < ps.size then let p := ps.get ⟨i, h⟩ match (← whnf e) with - | Expr.lam _ _ b _ => instantiateLambdaAux ps (i+1) (b.instantiate1 p) - | _ => throwError "invalid instantiateLambda, too many parameters" + | .lam _ _ b _ => instantiateLambdaAux ps (i+1) (b.instantiate1 p) + | _ => throwError "invalid instantiateLambda, too many parameters" else - pure e + return e /-- Given `e` of the form `fun (a_1 : A_1) ... (a_n : A_n) => t[a_1, ..., a_n]` and `p_1 : A_1, ... p_n : A_n`, return `t[p_1, ..., p_n]`. It uses `whnf` to reduce `e` if it is not a lambda -/ @@ -1434,6 +1527,7 @@ def sortFVarIds (fvarIds : Array FVarId) : MetaM (Array FVarId) := do end Methods +/-- Return `true` if `declName` is an inductive predicate. That is, `inductive` type in `Prop`. -/ def isInductivePredicate (declName : Name) : MetaM Bool := do match (← getEnv).find? declName with | some (.inductInfo { type := type, ..}) => @@ -1459,9 +1553,9 @@ def getResetPostponed : MetaM (PersistentArray PostponedEntry) := do /-- Annotate any constant and sort in `e` that satisfies `p` with `pp.universes true` -/ private def exposeRelevantUniverses (e : Expr) (p : Level → Bool) : Expr := e.replace fun - | Expr.const _ us => if us.any p then some (e.setPPUniverses true) else none - | Expr.sort u => if p u then some (e.setPPUniverses true) else none - | _ => none + | .const _ us => if us.any p then some (e.setPPUniverses true) else none + | .sort u => if p u then some (e.setPPUniverses true) else none + | _ => none private def mkLeveErrorMessageCore (header : String) (entry : PostponedEntry) : MetaM MessageData := do match entry.ctx? with @@ -1471,7 +1565,7 @@ private def mkLeveErrorMessageCore (header : String) (entry : PostponedEntry) : withLCtx ctx.lctx ctx.localInstances do let s := entry.lhs.collectMVars entry.rhs.collectMVars /- `p u` is true if it contains a universe metavariable in `s` -/ - let p (u : Level) := u.any fun | Level.mvar m => s.contains m | _ => false + let p (u : Level) := u.any fun | .mvar m => s.contains m | _ => false let lhs := exposeRelevantUniverses (← instantiateMVars ctx.lhs) p let rhs := exposeRelevantUniverses (← instantiateMVars ctx.rhs) p try @@ -1557,6 +1651,7 @@ def isLevelDefEq (u v : Level) : MetaM Bool := trace[Meta.isLevelDefEq] "{u} =?= {v} ... {if b then "success" else "failure"}" return b +/-- See `isDefEq`. -/ def isExprDefEq (t s : Expr) : MetaM Bool := traceCtx `Meta.isDefEq <| withReader (fun ctx => { ctx with defEqCtx? := some { lhs := t, rhs := s, lctx := ctx.lctx, localInstances := ctx.localInstances } }) do let b ← checkpointDefEq (mayPostpone := true) <| Meta.isExprDefEqAux t s @@ -1592,7 +1687,7 @@ def isDefEqNoConstantApprox (t s : Expr) : MetaM Bool := Eta expand the given expression. Example: ``` - etaExpand (mkConst `Nat.add) + etaExpand (mkConst ``Nat.add) ``` produces `fun x y => Nat.add x y` -/ diff --git a/stage0/src/Lean/Meta/DecLevel.lean b/stage0/src/Lean/Meta/DecLevel.lean index 565147f10e..3cc5fe3c91 100644 --- a/stage0/src/Lean/Meta/DecLevel.lean +++ b/stage0/src/Lean/Meta/DecLevel.lean @@ -22,7 +22,7 @@ private partial def decAux? : Level → ReaderT DecLevelContext MetaM (Option Le match (← getLevelMVarAssignment? mvarId) with | some u => decAux? u | none => - if (← isReadOnlyLevelMVar mvarId) || !(← read).canAssignMVars then + if (← mvarId.isReadOnly) || !(← read).canAssignMVars then return none else let u ← mkFreshLevelMVar diff --git a/stage0/src/Lean/Meta/InferType.lean b/stage0/src/Lean/Meta/InferType.lean index 32fc68229c..65bb432163 100644 --- a/stage0/src/Lean/Meta/InferType.lean +++ b/stage0/src/Lean/Meta/InferType.lean @@ -168,7 +168,7 @@ private def inferMVarType (mvarId : MVarId) : MetaM Expr := do private def inferFVarType (fvarId : FVarId) : MetaM Expr := do match (← getLCtx).find? fvarId with | some d => return d.type - | none => throwUnknownFVar fvarId + | none => fvarId.throwUnknown @[inline] private def checkInferTypeCache (e : Expr) (inferType : MetaM Expr) : MetaM Expr := do match (← get).cache.inferType.find? e with diff --git a/stage0/src/Lean/Meta/LevelDefEq.lean b/stage0/src/Lean/Meta/LevelDefEq.lean index 157ef614f9..dee6aedca4 100644 --- a/stage0/src/Lean/Meta/LevelDefEq.lean +++ b/stage0/src/Lean/Meta/LevelDefEq.lean @@ -43,7 +43,7 @@ private def postponeIsLevelDefEq (lhs : Level) (rhs : Level) : MetaM Unit := do private def isMVarWithGreaterDepth (v : Level) (mvarId : LMVarId) : MetaM Bool := match v with - | Level.mvar mvarId' => return (← getLevelMVarDepth mvarId') > (← getLevelMVarDepth mvarId) + | Level.mvar mvarId' => return (← mvarId'.getLevel) > (← mvarId.getLevel) | _ => return false mutual @@ -51,7 +51,7 @@ mutual private partial def solve (u v : Level) : MetaM LBool := do match u, v with | Level.mvar mvarId, _ => - if (← isReadOnlyLevelMVar mvarId) then + if (← mvarId.isReadOnly) then return LBool.undef else if (← getConfig).ignoreLevelMVarDepth && (← isMVarWithGreaterDepth v mvarId) then -- If both `u` and `v` are both metavariables, but depth of v is greater, then we assign `v := u`. diff --git a/stage0/src/Lean/Meta/Tactic/Induction.lean b/stage0/src/Lean/Meta/Tactic/Induction.lean index 8774e0224b..d8bb03cf24 100644 --- a/stage0/src/Lean/Meta/Tactic/Induction.lean +++ b/stage0/src/Lean/Meta/Tactic/Induction.lean @@ -197,7 +197,7 @@ def _root_.Lean.MVarId.induction (mvarId : MVarId) (majorFVarId : FVarId) (recur -- Compute motive let motive := target let motive ← if recursorInfo.depElim then - pure <| mkLambda `x BinderInfo.default (← inferType major) (← abstract motive #[major]) + pure <| mkLambda `x BinderInfo.default (← inferType major) (← motive.abstractM #[major]) else pure motive let motive ← mkLambdaFVars indices motive diff --git a/stage0/src/Lean/Meta/Tactic/Simp/Main.lean b/stage0/src/Lean/Meta/Tactic/Simp/Main.lean index 6061439994..af691ce682 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/Main.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/Main.lean @@ -668,7 +668,7 @@ where let hb? ← match rbx.proof? with | none => pure none | some h => pure (some (← mkLambdaFVars #[x] h)) - let e' := mkLet n t rv.expr (← abstract rbx.expr #[x]) + let e' := mkLet n t rv.expr (← rbx.expr.abstractM #[x]) match rv.proof?, hb? with | none, none => return { expr := e' } | some h, none => return { expr := e', proof? := some (← mkLetValCongr (← mkLambdaFVars #[x] rbx.expr) h) } @@ -678,7 +678,7 @@ where withLocalDeclD n t fun x => do let bx := b.instantiate1 x let rbx ← simp bx - let e' := mkLet n t v' (← abstract rbx.expr #[x]) + let e' := mkLet n t v' (← rbx.expr.abstractM #[x]) match rbx.proof? with | none => return { expr := e' } | some h => diff --git a/stage0/stdlib/Init/Conv.c b/stage0/stdlib/Init/Conv.c index 60579d1d5e..dcc69cd615 100644 --- a/stage0/stdlib/Init/Conv.c +++ b/stage0/stdlib/Init/Conv.c @@ -142,6 +142,7 @@ static lean_object* l_Lean_Parser_Tactic_Conv_convSeq1Indented___closed__1; static lean_object* l_Lean_Parser_Tactic_Conv___aux__Init__Conv______macroRules__Lean__Parser__Tactic__Conv__convErw____1___closed__11; static lean_object* l_Lean_Parser_Tactic_Conv_conv_quot___closed__13; static lean_object* l_Lean_Parser_Tactic_Conv_nestedTacticCore___closed__10; +LEAN_EXPORT lean_object* l_Lean_Parser_Category_conv; static lean_object* l_Lean_Parser_Tactic_Conv_ext___closed__5; static lean_object* l_Lean_Parser_Tactic_Conv_arg___closed__9; static lean_object* l_Lean_Parser_Tactic_Conv_ext___closed__3; @@ -711,6 +712,14 @@ x_1 = l_Lean_Parser_Tactic_Conv_conv_quot___closed__22; return x_1; } } +static lean_object* _init_l_Lean_Parser_Category_conv() { +_start: +{ +lean_object* x_1; +x_1 = lean_box(0); +return x_1; +} +} static lean_object* _init_l_Lean_Parser_Tactic_Conv_convSeq1Indented___closed__1() { _start: { @@ -7602,6 +7611,8 @@ l_Lean_Parser_Tactic_Conv_conv_quot___closed__22 = _init_l_Lean_Parser_Tactic_Co lean_mark_persistent(l_Lean_Parser_Tactic_Conv_conv_quot___closed__22); l_Lean_Parser_Tactic_Conv_conv_quot = _init_l_Lean_Parser_Tactic_Conv_conv_quot(); lean_mark_persistent(l_Lean_Parser_Tactic_Conv_conv_quot); +l_Lean_Parser_Category_conv = _init_l_Lean_Parser_Category_conv(); +lean_mark_persistent(l_Lean_Parser_Category_conv); l_Lean_Parser_Tactic_Conv_convSeq1Indented___closed__1 = _init_l_Lean_Parser_Tactic_Conv_convSeq1Indented___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_Conv_convSeq1Indented___closed__1); l_Lean_Parser_Tactic_Conv_convSeq1Indented___closed__2 = _init_l_Lean_Parser_Tactic_Conv_convSeq1Indented___closed__2(); diff --git a/stage0/stdlib/Init/Notation.c b/stage0/stdlib/Init/Notation.c index 82910e714c..3c6c0fda63 100644 --- a/stage0/stdlib/Init/Notation.c +++ b/stage0/stdlib/Init/Notation.c @@ -831,6 +831,7 @@ static lean_object* l___aux__Init__Notation______macroRules__term___x3c_x2a_x3e_ LEAN_EXPORT lean_object* l___aux__Init__Notation______unexpand__HAdd__hAdd__1___boxed(lean_object*, lean_object*, lean_object*); static lean_object* l_term_x7b___x3a___x2f_x2f___x7d___closed__7; static lean_object* l___aux__Init__Notation______macroRules__term___x26_x26_x26____1___closed__8; +LEAN_EXPORT lean_object* l_Lean_Parser_Category_rawStx; LEAN_EXPORT lean_object* l___aux__Init__Notation______macroRules__precMin__1(lean_object*, lean_object*, lean_object*); static lean_object* l___aux__Init__Notation______macroRules__term___x3c_x24_x3e____1___closed__9; static lean_object* l_term___x5e_____closed__1; @@ -36910,6 +36911,14 @@ x_1 = l_Lean_rawStx_quot___closed__12; return x_1; } } +static lean_object* _init_l_Lean_Parser_Category_rawStx() { +_start: +{ +lean_object* x_1; +x_1 = lean_box(0); +return x_1; +} +} LEAN_EXPORT lean_object* l_Lean_instCoeSyntaxTSyntaxConsSyntaxNodeKindStrAnonymousNil(lean_object* x_1) { _start: { @@ -39447,6 +39456,8 @@ l_Lean_rawStx_quot___closed__12 = _init_l_Lean_rawStx_quot___closed__12(); lean_mark_persistent(l_Lean_rawStx_quot___closed__12); l_Lean_rawStx_quot = _init_l_Lean_rawStx_quot(); lean_mark_persistent(l_Lean_rawStx_quot); +l_Lean_Parser_Category_rawStx = _init_l_Lean_Parser_Category_rawStx(); +lean_mark_persistent(l_Lean_Parser_Category_rawStx); l_Lean_withAnnotateTerm___closed__1 = _init_l_Lean_withAnnotateTerm___closed__1(); lean_mark_persistent(l_Lean_withAnnotateTerm___closed__1); l_Lean_withAnnotateTerm___closed__2 = _init_l_Lean_withAnnotateTerm___closed__2(); diff --git a/stage0/stdlib/Lean/Elab/Binders.c b/stage0/stdlib/Lean/Elab/Binders.c index 481a422c54..05a59877f9 100644 --- a/stage0/stdlib/Lean/Elab/Binders.c +++ b/stage0/stdlib/Lean/Elab/Binders.c @@ -29,6 +29,7 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Term_mkFreshBinderName___at___private_Lean_ uint8_t l_Lean_Syntax_isAntiquotSuffixSplice(lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Term_precheckFun___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_throwErrorAt___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__1; static lean_object* l_Lean_Elab_Term_quoteAutoTactic___closed__6; LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabLetFunDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_Quotation_withNewLocals___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -98,6 +99,7 @@ static lean_object* l___regBuiltin_Lean_Elab_Term_elabLetDelayedDecl_declRange__ static lean_object* l_Lean_Elab_Term_elabArrow___closed__2; LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabLetDeclAux___lambda__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*); static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_expandMatchAltsIntoMatchAux___closed__3; +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_expandOptIdent___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabBinder___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_expandOptIdent___closed__1; @@ -114,6 +116,7 @@ static lean_object* l_Lean_mkAuxFunDiscr___at___private_Lean_Elab_Binders_0__Lea LEAN_EXPORT lean_object* l_Lean_Elab_liftMacroM___at_Lean_Elab_Term_precheckFun___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabLetDeclAux___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_expandOptIdent___closed__2; +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__2(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Term_elabLetDeclAux___spec__1(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_expandFunBinders___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_quoteAutoTactic___closed__37; @@ -150,6 +153,7 @@ static lean_object* l_Lean_Elab_Term_quoteAutoTactic___closed__4; static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_registerFailedToInferBinderTypeInfo___closed__2; LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabLetTmpDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Term_elabFun___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__4; LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_expandFunBinders_loop___spec__5(lean_object*, size_t, size_t, lean_object*); static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_ensureAtomicBinderName___closed__3; LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabFunBinders___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -235,6 +239,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_ensureA static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_expandMatchAltsIntoMatchAux___closed__6; static lean_object* l_Lean_Elab_Term_expandForall___closed__1; static lean_object* l_Lean_Elab_Term_precheckArrow___closed__2; +uint8_t lean_expr_has_loose_bvar(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___regBuiltin_Lean_Elab_Term_elabLetDecl_declRange(lean_object*); static lean_object* l_Lean_Elab_Term_expandForall___closed__2; lean_object* l_List_forM___at_Lean_Elab_Term_Quotation_precheck___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -242,6 +247,7 @@ static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_expandBinder static lean_object* l_Lean_Elab_Term_precheckArrow___closed__1; lean_object* l_Lean_Expr_FindImpl_findUnsafe_x3f(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_expandMatchAltsWhereDecls___boxed(lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_instMonadLiftReaderT(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_elabLetDeclAux___closed__8; lean_object* l_Lean_Elab_liftMacroM___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -346,7 +352,7 @@ static lean_object* l_Lean_Elab_Term_elabBinder___rarg___lambda__1___closed__2; LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_expandFunBinders_loop___spec__4(lean_object*, size_t, size_t, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_elabLetTmpDecl___closed__4; static lean_object* l___regBuiltin_Lean_Elab_Term_expandFun_declRange___closed__4; -LEAN_EXPORT lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_10107_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_10309_(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_1952_(lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_elabDepArrow___closed__4; LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabLetDeclAux___lambda__6(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -463,6 +469,7 @@ lean_object* l_Lean_ResolveName_resolveGlobalName(lean_object*, lean_object*, le static lean_object* l_Lean_Elab_Term_expandWhereDecls___closed__7; LEAN_EXPORT lean_object* l___regBuiltin_Lean_Elab_Term_expandExplicitFun_declRange(lean_object*); uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t); +lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_liftMacroM___at_Lean_Elab_Term_precheckFun___spec__1___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Term_precheckFun___spec__6___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*); static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_expandBinderModifier___closed__14; @@ -492,6 +499,7 @@ LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_elabBinders_ static lean_object* l_Lean_Elab_Term_expandFunBinders_loop___closed__13; static lean_object* l___regBuiltin_Lean_Elab_Term_expandExplicitFun_declRange___closed__2; static lean_object* l___regBuiltin_Lean_Elab_Term_elabLetTmpDecl_declRange___closed__7; +static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__3; static lean_object* l_Lean_Elab_Term_declareTacticSyntax___lambda__2___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_getFunBinderIds_x3f(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_quoteAutoTactic___closed__58; @@ -650,6 +658,7 @@ LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_expandFunBin static lean_object* l_Lean_Elab_Term_expandFunBinders_loop___closed__5; LEAN_EXPORT lean_object* l_Lean_Elab_Term_expandSimpleBinderWithType(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_elabFun_declRange___closed__1; +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_mkFreshBinderName___at___private_Lean_Elab_Binders_0__Lean_Elab_Term_expandBinderIdent___spec__2___rarg___closed__1; static lean_object* l_Lean_Elab_Term_expandFunBinders_loop___closed__15; LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__2(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*); @@ -664,6 +673,7 @@ uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_elabArrow_declRange___closed__3; LEAN_EXPORT lean_object* l_Lean_Elab_Term_precheckFun___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_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBindersAux_loop___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_elabArrow_declRange___closed__5; static lean_object* l_Lean_Elab_Term_quoteAutoTactic___closed__44; LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabBinders___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -692,12 +702,14 @@ LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_expandFunBin static lean_object* l___regBuiltin_Lean_Elab_Term_elabLetDecl___closed__4; lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_elabLetDeclAux___lambda__3___closed__2; +static lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__2; LEAN_EXPORT uint8_t l_List_foldlM___at_Lean_Elab_Term_declareTacticSyntax___spec__6___lambda__1(lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_elabForall_declRange___closed__6; lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_Term_0__Lean_Elab_Term_tryCoe___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_expandForall___closed__3; LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Term_elabFun___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_quoteAutoTactic___closed__11; +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_mkFreshId___at___private_Lean_Elab_Binders_0__Lean_Elab_Term_FunBinders_elabFunBinderViews___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___regBuiltin_Lean_Elab_Term_elabLetDecl(lean_object*); lean_object* l_Lean_Environment_compileDecl(lean_object*, lean_object*, lean_object*); @@ -6495,6 +6507,213 @@ x_4 = l_Lean_Option_register___at_Lean_Elab_initFn____x40_Lean_Elab_AutoBound___ return x_4; } } +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_expr_instantiate1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_11 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters(x_10, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +return x_11; +} +} +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__2(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +_start: +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_alloc_closure((void*)(l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__1), 9, 1); +lean_closure_set(x_13, 0, x_1); +x_14 = l_Lean_Meta_withLocalDecl___at_Lean_Elab_Term_withAuxDecl___spec__3___rarg(x_2, x_3, x_4, x_13, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +return x_14; +} +} +static lean_object* _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("invalid parametric local instance, parameter with type", 54); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("\ndoes not have forward dependencies, type class resolution cannot use this kind of local instance because it will not be able to infer a value for this parameter.", 162); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters(lean_object* x_1, lean_object* 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_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +x_9 = lean_whnf(x_1, 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_inc(x_10); +if (lean_obj_tag(x_10) == 7) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; lean_object* x_16; uint8_t x_17; +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = lean_ctor_get(x_10, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_10, 1); +lean_inc(x_13); +x_14 = lean_ctor_get(x_10, 2); +lean_inc(x_14); +x_15 = lean_ctor_get_uint8(x_10, sizeof(void*)*3 + 8); +lean_dec(x_10); +x_16 = lean_unsigned_to_nat(0u); +x_17 = lean_expr_has_loose_bvar(x_14, 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; lean_object* x_23; uint8_t x_24; +lean_dec(x_14); +lean_dec(x_12); +x_18 = l_Lean_indentExpr(x_13); +x_19 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__2; +x_20 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_18); +x_21 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__4; +x_22 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +x_23 = l_Lean_throwError___at_Lean_Elab_Term_synthesizeInstMVarCore___spec__4(x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_11); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_24 = !lean_is_exclusive(x_23); +if (x_24 == 0) +{ +return x_23; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_23, 0); +x_26 = lean_ctor_get(x_23, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_23); +x_27 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +return x_27; +} +} +else +{ +lean_object* x_28; lean_object* x_29; +x_28 = lean_box(0); +x_29 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__2(x_14, x_12, x_15, x_13, x_28, x_2, x_3, x_4, x_5, x_6, x_7, x_11); +return x_29; +} +} +else +{ +uint8_t x_30; +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_30 = !lean_is_exclusive(x_9); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; +x_31 = lean_ctor_get(x_9, 0); +lean_dec(x_31); +x_32 = lean_box(0); +lean_ctor_set(x_9, 0, x_32); +return x_9; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_33 = lean_ctor_get(x_9, 1); +lean_inc(x_33); +lean_dec(x_9); +x_34 = lean_box(0); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_33); +return x_35; +} +} +} +else +{ +uint8_t x_36; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_36 = !lean_is_exclusive(x_9); +if (x_36 == 0) +{ +return x_9; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_37 = lean_ctor_get(x_9, 0); +x_38 = lean_ctor_get(x_9, 1); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_9); +x_39 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +return x_39; +} +} +} +} +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +_start: +{ +uint8_t x_13; lean_object* x_14; +x_13 = lean_unbox(x_3); +lean_dec(x_3); +x_14 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___lambda__2(x_1, x_2, x_13, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_5); +return x_14; +} +} LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___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) { _start: { @@ -6637,6 +6856,94 @@ x_18 = l_Lean_Meta_withLocalDecl___at_Lean_Elab_Term_withAuxDecl___spec__3___rar return x_18; } } +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___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, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_12 = lean_ctor_get(x_9, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_9, 1); +lean_inc(x_13); +x_14 = lean_ctor_get(x_9, 2); +lean_inc(x_14); +x_15 = lean_ctor_get(x_9, 3); +lean_inc(x_15); +x_16 = lean_ctor_get(x_9, 4); +lean_inc(x_16); +x_17 = lean_ctor_get(x_9, 5); +lean_inc(x_17); +x_18 = lean_ctor_get(x_9, 6); +lean_inc(x_18); +x_19 = lean_ctor_get(x_9, 7); +lean_inc(x_19); +x_20 = lean_ctor_get(x_9, 8); +lean_inc(x_20); +x_21 = lean_ctor_get(x_9, 9); +lean_inc(x_21); +x_22 = lean_ctor_get(x_9, 10); +lean_inc(x_22); +x_23 = l_Lean_replaceRef(x_1, x_17); +lean_dec(x_17); +x_24 = lean_alloc_ctor(0, 11, 0); +lean_ctor_set(x_24, 0, x_12); +lean_ctor_set(x_24, 1, x_13); +lean_ctor_set(x_24, 2, x_14); +lean_ctor_set(x_24, 3, x_15); +lean_ctor_set(x_24, 4, x_16); +lean_ctor_set(x_24, 5, x_23); +lean_ctor_set(x_24, 6, x_18); +lean_ctor_set(x_24, 7, x_19); +lean_ctor_set(x_24, 8, x_20); +lean_ctor_set(x_24, 9, x_21); +lean_ctor_set(x_24, 10, x_22); +lean_inc(x_10); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_25 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters(x_2, x_5, x_6, x_7, x_8, x_24, x_10, x_11); +if (lean_obj_tag(x_25) == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_25, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_25, 1); +lean_inc(x_27); +lean_dec(x_25); +x_28 = lean_apply_8(x_3, x_26, x_5, x_6, x_7, x_8, x_9, x_10, x_27); +return x_28; +} +else +{ +uint8_t x_29; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_29 = !lean_is_exclusive(x_25); +if (x_29 == 0) +{ +return x_25; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_25, 0); +x_31 = lean_ctor_get(x_25, 1); +lean_inc(x_31); +lean_inc(x_30); +lean_dec(x_25); +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; +} +} +} +} static lean_object* _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__1() { _start: { @@ -6728,7 +7035,7 @@ lean_inc(x_19); x_21 = l_Lean_Elab_Term_elabType(x_19, x_5, x_6, x_7, x_8, x_9, x_10, x_17); if (lean_obj_tag(x_21) == 0) { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_object* x_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; uint8_t x_29; x_22 = lean_ctor_get(x_21, 0); lean_inc(x_22); x_23 = lean_ctor_get(x_21, 1); @@ -6741,106 +7048,122 @@ lean_inc(x_25); lean_dec(x_24); x_26 = lean_ctor_get(x_9, 2); lean_inc(x_26); -x_27 = l_Lean_BinderInfo_isInstImplicit(x_20); -if (x_27 == 0) +x_27 = lean_box(x_20); +lean_inc(x_22); +lean_inc(x_2); +lean_inc(x_1); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_18); +x_28 = lean_alloc_closure((void*)(l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__2___boxed), 15, 7); +lean_closure_set(x_28, 0, x_18); +lean_closure_set(x_28, 1, x_3); +lean_closure_set(x_28, 2, x_4); +lean_closure_set(x_28, 3, x_1); +lean_closure_set(x_28, 4, x_2); +lean_closure_set(x_28, 5, x_27); +lean_closure_set(x_28, 6, x_22); +x_29 = l_Lean_BinderInfo_isInstImplicit(x_20); +if (x_29 == 0) { -lean_object* x_28; lean_object* x_29; +lean_object* x_30; lean_object* x_31; +lean_dec(x_28); lean_dec(x_26); lean_dec(x_19); -x_28 = lean_box(0); -x_29 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__2(x_18, x_3, x_4, x_1, x_2, x_20, x_22, x_28, x_5, x_6, x_7, x_8, x_9, x_10, x_25); -return x_29; +x_30 = lean_box(0); +x_31 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__2(x_18, x_3, x_4, x_1, x_2, x_20, x_22, x_30, x_5, x_6, x_7, x_8, x_9, x_10, x_25); +return x_31; } else { -lean_object* x_30; uint8_t x_31; -x_30 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__1; -x_31 = l_Lean_Option_get___at_Lean_getSanitizeNames___spec__1(x_26, x_30); +lean_object* x_32; uint8_t x_33; +x_32 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__1; +x_33 = l_Lean_Option_get___at_Lean_getSanitizeNames___spec__1(x_26, x_32); lean_dec(x_26); -if (x_31 == 0) +if (x_33 == 0) { -lean_object* x_32; lean_object* x_33; +lean_object* x_34; lean_object* x_35; +lean_dec(x_28); lean_dec(x_19); -x_32 = lean_box(0); -x_33 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__2(x_18, x_3, x_4, x_1, x_2, x_20, x_22, x_32, x_5, x_6, x_7, x_8, x_9, x_10, x_25); -return x_33; +x_34 = lean_box(0); +x_35 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__2(x_18, x_3, x_4, x_1, x_2, x_20, x_22, x_34, x_5, x_6, x_7, x_8, x_9, x_10, x_25); +return x_35; } else { -lean_object* x_34; +lean_object* x_36; lean_object* x_37; +lean_dec(x_18); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_22); -x_34 = l_Lean_Meta_isClass_x3f(x_22, x_7, x_8, x_9, x_10, x_25); -if (lean_obj_tag(x_34) == 0) +x_36 = l_Lean_Meta_isClass_x3f(x_22, x_7, x_8, x_9, x_10, x_25); +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +if (lean_obj_tag(x_37) == 0) { -lean_object* x_35; -x_35 = lean_ctor_get(x_34, 0); -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_object* x_41; lean_object* x_42; uint8_t x_43; -lean_dec(x_18); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_36 = lean_ctor_get(x_34, 1); -lean_inc(x_36); -lean_dec(x_34); -x_37 = l_Lean_indentExpr(x_22); -x_38 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__3; -x_39 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_37); -x_40 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__5; +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; uint8_t x_45; +lean_dec(x_28); +x_38 = lean_ctor_get(x_36, 1); +lean_inc(x_38); +lean_dec(x_36); +x_39 = l_Lean_indentExpr(x_22); +x_40 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__3; x_41 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_41, 0, x_39); -lean_ctor_set(x_41, 1, x_40); -x_42 = l_Lean_throwErrorAt___at___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___spec__1(x_19, x_41, x_5, x_6, x_7, x_8, x_9, x_10, x_36); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +x_42 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__5; +x_43 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +x_44 = l_Lean_throwErrorAt___at___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___spec__1(x_19, x_43, x_5, x_6, x_7, x_8, x_9, x_10, x_38); lean_dec(x_10); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_19); -x_43 = !lean_is_exclusive(x_42); -if (x_43 == 0) +x_45 = !lean_is_exclusive(x_44); +if (x_45 == 0) { -return x_42; +return x_44; } else { -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_42, 0); -x_45 = lean_ctor_get(x_42, 1); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_42); -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_object* x_47; lean_object* x_48; lean_object* x_49; -lean_dec(x_35); -lean_dec(x_19); -x_47 = lean_ctor_get(x_34, 1); +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_44, 0); +x_47 = lean_ctor_get(x_44, 1); lean_inc(x_47); -lean_dec(x_34); -x_48 = lean_box(0); -x_49 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__2(x_18, x_3, x_4, x_1, x_2, x_20, x_22, x_48, x_5, x_6, x_7, x_8, x_9, x_10, x_47); -return x_49; +lean_inc(x_46); +lean_dec(x_44); +x_48 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_48, 0, x_46); +lean_ctor_set(x_48, 1, x_47); +return x_48; } } else { -uint8_t x_50; -lean_dec(x_22); +lean_object* x_49; lean_object* x_50; lean_object* x_51; +lean_dec(x_37); +x_49 = lean_ctor_get(x_36, 1); +lean_inc(x_49); +lean_dec(x_36); +x_50 = lean_box(0); +x_51 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__3(x_19, x_22, x_28, x_50, x_5, x_6, x_7, x_8, x_9, x_10, x_49); +lean_dec(x_19); +return x_51; +} +} +} +} +else +{ +uint8_t x_52; lean_dec(x_19); lean_dec(x_18); lean_dec(x_10); @@ -6853,66 +7176,29 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_50 = !lean_is_exclusive(x_34); -if (x_50 == 0) -{ -return x_34; -} -else -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_34, 0); -x_52 = lean_ctor_get(x_34, 1); -lean_inc(x_52); -lean_inc(x_51); -lean_dec(x_34); -x_53 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_53, 0, x_51); -lean_ctor_set(x_53, 1, x_52); -return x_53; -} -} -} -} -} -else -{ -uint8_t x_54; -lean_dec(x_19); -lean_dec(x_18); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_54 = !lean_is_exclusive(x_21); -if (x_54 == 0) +x_52 = !lean_is_exclusive(x_21); +if (x_52 == 0) { return x_21; } else { -lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_55 = lean_ctor_get(x_21, 0); -x_56 = lean_ctor_get(x_21, 1); -lean_inc(x_56); -lean_inc(x_55); +lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_53 = lean_ctor_get(x_21, 0); +x_54 = lean_ctor_get(x_21, 1); +lean_inc(x_54); +lean_inc(x_53); lean_dec(x_21); -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; +x_55 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_55, 0, x_53); +lean_ctor_set(x_55, 1, x_54); +return x_55; } } } else { -uint8_t x_58; +uint8_t x_56; lean_dec(x_15); lean_dec(x_10); lean_dec(x_9); @@ -6924,23 +7210,23 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_58 = !lean_is_exclusive(x_16); -if (x_58 == 0) +x_56 = !lean_is_exclusive(x_16); +if (x_56 == 0) { return x_16; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_59 = lean_ctor_get(x_16, 0); -x_60 = lean_ctor_get(x_16, 1); -lean_inc(x_60); -lean_inc(x_59); +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_ctor_get(x_16, 0); +x_58 = lean_ctor_get(x_16, 1); +lean_inc(x_58); +lean_inc(x_57); lean_dec(x_16); -x_61 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_61, 0, x_59); -lean_ctor_set(x_61, 1, x_60); -return x_61; +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +return x_59; } } } @@ -6978,6 +7264,16 @@ lean_dec(x_8); return x_17; } } +LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__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) { +_start: +{ +lean_object* x_12; +x_12 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); +lean_dec(x_4); +lean_dec(x_1); +return x_12; +} +} LEAN_EXPORT lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews___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* x_9, lean_object* x_10) { _start: { @@ -7901,7 +8197,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandForall_declRange__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(213u); +x_1 = lean_unsigned_to_nat(224u); x_2 = lean_unsigned_to_nat(40u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -7913,7 +8209,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandForall_declRange__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(217u); +x_1 = lean_unsigned_to_nat(228u); x_2 = lean_unsigned_to_nat(31u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -7941,7 +8237,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandForall_declRange__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(213u); +x_1 = lean_unsigned_to_nat(224u); x_2 = lean_unsigned_to_nat(44u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -7953,7 +8249,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandForall_declRange__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(213u); +x_1 = lean_unsigned_to_nat(224u); x_2 = lean_unsigned_to_nat(56u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8206,7 +8502,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabForall_declRange___c _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(219u); +x_1 = lean_unsigned_to_nat(230u); x_2 = lean_unsigned_to_nat(28u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8218,7 +8514,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabForall_declRange___c _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(225u); +x_1 = lean_unsigned_to_nat(236u); x_2 = lean_unsigned_to_nat(31u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8246,7 +8542,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabForall_declRange___c _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(219u); +x_1 = lean_unsigned_to_nat(230u); x_2 = lean_unsigned_to_nat(32u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8258,7 +8554,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabForall_declRange___c _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(219u); +x_1 = lean_unsigned_to_nat(230u); x_2 = lean_unsigned_to_nat(42u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8674,7 +8970,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabArrow_declRange___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(234u); +x_1 = lean_unsigned_to_nat(245u); x_2 = lean_unsigned_to_nat(25u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8686,7 +8982,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabArrow_declRange___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(241u); +x_1 = lean_unsigned_to_nat(252u); x_2 = lean_unsigned_to_nat(50u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8714,7 +9010,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabArrow_declRange___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(234u); +x_1 = lean_unsigned_to_nat(245u); x_2 = lean_unsigned_to_nat(29u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8726,7 +9022,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabArrow_declRange___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(234u); +x_1 = lean_unsigned_to_nat(245u); x_2 = lean_unsigned_to_nat(38u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8876,7 +9172,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabDepArrow_declRange__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(247u); +x_1 = lean_unsigned_to_nat(258u); x_2 = lean_unsigned_to_nat(28u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8888,7 +9184,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabDepArrow_declRange__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(252u); +x_1 = lean_unsigned_to_nat(263u); x_2 = lean_unsigned_to_nat(38u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8916,7 +9212,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabDepArrow_declRange__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(247u); +x_1 = lean_unsigned_to_nat(258u); x_2 = lean_unsigned_to_nat(32u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -8928,7 +9224,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabDepArrow_declRange__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(247u); +x_1 = lean_unsigned_to_nat(258u); x_2 = lean_unsigned_to_nat(44u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -18795,7 +19091,7 @@ lean_dec(x_51); x_54 = !lean_is_exclusive(x_52); if (x_54 == 0) { -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +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_52, 0); x_56 = lean_ctor_get(x_52, 2); x_57 = lean_ctor_get(x_52, 3); @@ -18811,9 +19107,6 @@ lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); x_59 = l_Lean_Meta_isClass_x3f(x_16, x_10, x_11, x_12, x_13, x_53); -if (lean_obj_tag(x_59) == 0) -{ -lean_object* x_60; x_60 = lean_ctor_get(x_59, 0); lean_inc(x_60); if (lean_obj_tag(x_60) == 0) @@ -18939,230 +19232,151 @@ return x_89; } else { -uint8_t x_90; -lean_dec(x_52); -lean_dec(x_57); -lean_dec(x_56); -lean_dec(x_55); -lean_dec(x_31); -lean_dec(x_23); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_90 = !lean_is_exclusive(x_59); -if (x_90 == 0) -{ -return x_59; -} -else -{ -lean_object* x_91; lean_object* x_92; lean_object* x_93; -x_91 = lean_ctor_get(x_59, 0); -x_92 = lean_ctor_get(x_59, 1); +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_90 = lean_ctor_get(x_52, 0); +x_91 = lean_ctor_get(x_52, 2); +x_92 = lean_ctor_get(x_52, 3); lean_inc(x_92); lean_inc(x_91); -lean_dec(x_59); -x_93 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_93, 0, x_91); -lean_ctor_set(x_93, 1, x_92); -return x_93; -} -} -} -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_52, 0); -x_95 = lean_ctor_get(x_52, 2); -x_96 = lean_ctor_get(x_52, 3); -lean_inc(x_96); -lean_inc(x_95); -lean_inc(x_94); +lean_inc(x_90); lean_dec(x_52); -lean_inc(x_96); -lean_inc(x_95); +lean_inc(x_92); +lean_inc(x_91); lean_inc(x_31); -lean_inc(x_94); -x_97 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_97, 0, x_94); -lean_ctor_set(x_97, 1, x_31); -lean_ctor_set(x_97, 2, x_95); -lean_ctor_set(x_97, 3, x_96); +lean_inc(x_90); +x_93 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_93, 0, x_90); +lean_ctor_set(x_93, 1, x_31); +lean_ctor_set(x_93, 2, x_91); +lean_ctor_set(x_93, 3, x_92); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -x_98 = l_Lean_Meta_isClass_x3f(x_16, x_10, x_11, x_12, x_13, x_53); -if (lean_obj_tag(x_98) == 0) +x_94 = l_Lean_Meta_isClass_x3f(x_16, x_10, x_11, x_12, x_13, x_53); +x_95 = lean_ctor_get(x_94, 0); +lean_inc(x_95); +if (lean_obj_tag(x_95) == 0) { -lean_object* x_99; -x_99 = lean_ctor_get(x_98, 0); -lean_inc(x_99); -if (lean_obj_tag(x_99) == 0) -{ -lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; -lean_dec(x_96); -lean_dec(x_95); -lean_dec(x_94); +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; +lean_dec(x_92); +lean_dec(x_91); +lean_dec(x_90); lean_dec(x_31); lean_dec(x_23); -x_100 = lean_ctor_get(x_98, 1); +x_96 = lean_ctor_get(x_94, 1); +lean_inc(x_96); +lean_dec(x_94); +x_97 = lean_unsigned_to_nat(1u); +x_98 = lean_nat_add(x_6, x_97); +lean_dec(x_6); +x_99 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_FunBinders_elabFunBinderViews(x_7, x_98, x_93, x_8, x_9, x_10, x_11, x_12, x_13, x_96); +return x_99; +} +else +{ +lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; +lean_dec(x_93); +x_100 = lean_ctor_get(x_94, 1); lean_inc(x_100); -lean_dec(x_98); -x_101 = lean_unsigned_to_nat(1u); -x_102 = lean_nat_add(x_6, x_101); +lean_dec(x_94); +x_101 = lean_ctor_get(x_95, 0); +lean_inc(x_101); +lean_dec(x_95); +x_102 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_102, 0, x_101); +lean_ctor_set(x_102, 1, x_23); +x_103 = lean_array_push(x_91, x_102); +x_104 = lean_unsigned_to_nat(1u); +x_105 = lean_nat_add(x_6, x_104); lean_dec(x_6); -x_103 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_FunBinders_elabFunBinderViews(x_7, x_102, x_97, x_8, x_9, x_10, x_11, x_12, x_13, x_100); -return x_103; -} -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; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; -lean_dec(x_97); -x_104 = lean_ctor_get(x_98, 1); -lean_inc(x_104); -lean_dec(x_98); -x_105 = lean_ctor_get(x_99, 0); -lean_inc(x_105); -lean_dec(x_99); -x_106 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_106, 0, x_105); -lean_ctor_set(x_106, 1, x_23); -x_107 = lean_array_push(x_95, x_106); -x_108 = lean_unsigned_to_nat(1u); -x_109 = lean_nat_add(x_6, x_108); -lean_dec(x_6); -x_110 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_110, 0, x_94); -lean_ctor_set(x_110, 1, x_31); -lean_ctor_set(x_110, 2, x_107); -lean_ctor_set(x_110, 3, x_96); -x_111 = l_Lean_Meta_saveAndResetSynthInstanceCache___rarg(x_11, x_12, x_13, x_104); -x_112 = lean_ctor_get(x_111, 0); -lean_inc(x_112); -x_113 = lean_ctor_get(x_111, 1); -lean_inc(x_113); -lean_dec(x_111); +x_106 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_106, 0, x_90); +lean_ctor_set(x_106, 1, x_31); +lean_ctor_set(x_106, 2, x_103); +lean_ctor_set(x_106, 3, x_92); +x_107 = l_Lean_Meta_saveAndResetSynthInstanceCache___rarg(x_11, x_12, x_13, x_100); +x_108 = lean_ctor_get(x_107, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_107, 1); +lean_inc(x_109); +lean_dec(x_107); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -x_114 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_FunBinders_elabFunBinderViews(x_7, x_109, x_110, x_8, x_9, x_10, x_11, x_12, x_13, x_113); -if (lean_obj_tag(x_114) == 0) +x_110 = l___private_Lean_Elab_Binders_0__Lean_Elab_Term_FunBinders_elabFunBinderViews(x_7, x_105, x_106, x_8, x_9, x_10, x_11, x_12, x_13, x_109); +if (lean_obj_tag(x_110) == 0) { -lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; -x_115 = lean_ctor_get(x_114, 0); -lean_inc(x_115); -x_116 = lean_ctor_get(x_114, 1); -lean_inc(x_116); -lean_dec(x_114); -x_117 = l_Lean_Meta_restoreSynthInstanceCache(x_112, x_10, x_11, x_12, x_13, x_116); +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_111 = lean_ctor_get(x_110, 0); +lean_inc(x_111); +x_112 = lean_ctor_get(x_110, 1); +lean_inc(x_112); +lean_dec(x_110); +x_113 = l_Lean_Meta_restoreSynthInstanceCache(x_108, x_10, x_11, x_12, x_13, x_112); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); -x_118 = lean_ctor_get(x_117, 1); +x_114 = lean_ctor_get(x_113, 1); +lean_inc(x_114); +if (lean_is_exclusive(x_113)) { + lean_ctor_release(x_113, 0); + lean_ctor_release(x_113, 1); + x_115 = x_113; +} else { + lean_dec_ref(x_113); + x_115 = lean_box(0); +} +if (lean_is_scalar(x_115)) { + x_116 = lean_alloc_ctor(0, 2, 0); +} else { + x_116 = x_115; +} +lean_ctor_set(x_116, 0, x_111); +lean_ctor_set(x_116, 1, x_114); +return x_116; +} +else +{ +lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; +x_117 = lean_ctor_get(x_110, 0); +lean_inc(x_117); +x_118 = lean_ctor_get(x_110, 1); lean_inc(x_118); -if (lean_is_exclusive(x_117)) { - lean_ctor_release(x_117, 0); - lean_ctor_release(x_117, 1); - x_119 = x_117; -} else { - lean_dec_ref(x_117); - x_119 = lean_box(0); -} -if (lean_is_scalar(x_119)) { - x_120 = lean_alloc_ctor(0, 2, 0); -} else { - x_120 = x_119; -} -lean_ctor_set(x_120, 0, x_115); -lean_ctor_set(x_120, 1, x_118); -return x_120; -} -else -{ -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_121 = lean_ctor_get(x_114, 0); -lean_inc(x_121); -x_122 = lean_ctor_get(x_114, 1); -lean_inc(x_122); -lean_dec(x_114); -x_123 = l_Lean_Meta_restoreSynthInstanceCache(x_112, x_10, x_11, x_12, x_13, x_122); +lean_dec(x_110); +x_119 = l_Lean_Meta_restoreSynthInstanceCache(x_108, x_10, x_11, x_12, x_13, x_118); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); -x_124 = lean_ctor_get(x_123, 1); -lean_inc(x_124); -if (lean_is_exclusive(x_123)) { - lean_ctor_release(x_123, 0); - lean_ctor_release(x_123, 1); - x_125 = x_123; +x_120 = lean_ctor_get(x_119, 1); +lean_inc(x_120); +if (lean_is_exclusive(x_119)) { + lean_ctor_release(x_119, 0); + lean_ctor_release(x_119, 1); + x_121 = x_119; } else { - lean_dec_ref(x_123); - x_125 = lean_box(0); + lean_dec_ref(x_119); + x_121 = lean_box(0); } -if (lean_is_scalar(x_125)) { - x_126 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_121)) { + x_122 = lean_alloc_ctor(1, 2, 0); } else { - x_126 = x_125; - lean_ctor_set_tag(x_126, 1); + x_122 = x_121; + lean_ctor_set_tag(x_122, 1); +} +lean_ctor_set(x_122, 0, x_117); +lean_ctor_set(x_122, 1, x_120); +return x_122; } -lean_ctor_set(x_126, 0, x_121); -lean_ctor_set(x_126, 1, x_124); -return x_126; } } } else { -lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; -lean_dec(x_97); -lean_dec(x_96); -lean_dec(x_95); -lean_dec(x_94); -lean_dec(x_31); -lean_dec(x_23); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_127 = lean_ctor_get(x_98, 0); -lean_inc(x_127); -x_128 = lean_ctor_get(x_98, 1); -lean_inc(x_128); -if (lean_is_exclusive(x_98)) { - lean_ctor_release(x_98, 0); - lean_ctor_release(x_98, 1); - x_129 = x_98; -} else { - lean_dec_ref(x_98); - x_129 = lean_box(0); -} -if (lean_is_scalar(x_129)) { - x_130 = lean_alloc_ctor(1, 2, 0); -} else { - x_130 = x_129; -} -lean_ctor_set(x_130, 0, x_127); -lean_ctor_set(x_130, 1, x_128); -return x_130; -} -} -} -else -{ -uint8_t x_131; +uint8_t x_123; lean_dec(x_31); lean_dec(x_23); lean_dec(x_16); @@ -19174,29 +19388,29 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -x_131 = !lean_is_exclusive(x_51); -if (x_131 == 0) +x_123 = !lean_is_exclusive(x_51); +if (x_123 == 0) { return x_51; } else { -lean_object* x_132; lean_object* x_133; lean_object* x_134; -x_132 = lean_ctor_get(x_51, 0); -x_133 = lean_ctor_get(x_51, 1); -lean_inc(x_133); -lean_inc(x_132); +lean_object* x_124; lean_object* x_125; lean_object* x_126; +x_124 = lean_ctor_get(x_51, 0); +x_125 = lean_ctor_get(x_51, 1); +lean_inc(x_125); +lean_inc(x_124); lean_dec(x_51); -x_134 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_134, 0, x_132); -lean_ctor_set(x_134, 1, x_133); -return x_134; +x_126 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_126, 0, x_124); +lean_ctor_set(x_126, 1, x_125); +return x_126; } } } else { -uint8_t x_135; +uint8_t x_127; lean_dec(x_31); lean_dec(x_28); lean_dec(x_27); @@ -19210,29 +19424,29 @@ lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -x_135 = !lean_is_exclusive(x_36); -if (x_135 == 0) +x_127 = !lean_is_exclusive(x_36); +if (x_127 == 0) { return x_36; } else { -lean_object* x_136; lean_object* x_137; lean_object* x_138; -x_136 = lean_ctor_get(x_36, 0); -x_137 = lean_ctor_get(x_36, 1); -lean_inc(x_137); -lean_inc(x_136); +lean_object* x_128; lean_object* x_129; lean_object* x_130; +x_128 = lean_ctor_get(x_36, 0); +x_129 = lean_ctor_get(x_36, 1); +lean_inc(x_129); +lean_inc(x_128); lean_dec(x_36); -x_138 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_138, 0, x_136); -lean_ctor_set(x_138, 1, x_137); -return x_138; +x_130 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_130, 0, x_128); +lean_ctor_set(x_130, 1, x_129); +return x_130; } } } else { -uint8_t x_139; +uint8_t x_131; lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -19246,23 +19460,23 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_139 = !lean_is_exclusive(x_15); -if (x_139 == 0) +x_131 = !lean_is_exclusive(x_15); +if (x_131 == 0) { return x_15; } else { -lean_object* x_140; lean_object* x_141; lean_object* x_142; -x_140 = lean_ctor_get(x_15, 0); -x_141 = lean_ctor_get(x_15, 1); -lean_inc(x_141); -lean_inc(x_140); +lean_object* x_132; lean_object* x_133; lean_object* x_134; +x_132 = lean_ctor_get(x_15, 0); +x_133 = lean_ctor_get(x_15, 1); +lean_inc(x_133); +lean_inc(x_132); lean_dec(x_15); -x_142 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_142, 0, x_140); -lean_ctor_set(x_142, 1, x_141); -return x_142; +x_134 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_134, 0, x_132); +lean_ctor_set(x_134, 1, x_133); +return x_134; } } } @@ -23211,7 +23425,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandFun_declRange___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(546u); +x_1 = lean_unsigned_to_nat(557u); x_2 = lean_unsigned_to_nat(40u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23223,7 +23437,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandFun_declRange___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(557u); +x_1 = lean_unsigned_to_nat(568u); x_2 = lean_unsigned_to_nat(31u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23251,7 +23465,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandFun_declRange___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(546u); +x_1 = lean_unsigned_to_nat(557u); x_2 = lean_unsigned_to_nat(44u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23263,7 +23477,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandFun_declRange___cl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(546u); +x_1 = lean_unsigned_to_nat(557u); x_2 = lean_unsigned_to_nat(53u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23423,7 +23637,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandExplicitFun_declRa _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(559u); +x_1 = lean_unsigned_to_nat(570u); x_2 = lean_unsigned_to_nat(45u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23435,7 +23649,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandExplicitFun_declRa _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(562u); +x_1 = lean_unsigned_to_nat(573u); x_2 = lean_unsigned_to_nat(31u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23463,7 +23677,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandExplicitFun_declRa _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(559u); +x_1 = lean_unsigned_to_nat(570u); x_2 = lean_unsigned_to_nat(49u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23475,7 +23689,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_expandExplicitFun_declRa _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(559u); +x_1 = lean_unsigned_to_nat(570u); x_2 = lean_unsigned_to_nat(66u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -25450,7 +25664,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabFun_declRange___clos _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(576u); +x_1 = lean_unsigned_to_nat(587u); x_2 = lean_unsigned_to_nat(33u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -25462,7 +25676,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabFun_declRange___clos _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(589u); +x_1 = lean_unsigned_to_nat(600u); x_2 = lean_unsigned_to_nat(31u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -25490,7 +25704,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabFun_declRange___clos _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(576u); +x_1 = lean_unsigned_to_nat(587u); x_2 = lean_unsigned_to_nat(37u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -25502,7 +25716,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabFun_declRange___clos _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(576u); +x_1 = lean_unsigned_to_nat(587u); x_2 = lean_unsigned_to_nat(44u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28310,7 +28524,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetDecl_declRange___ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(700u); +x_1 = lean_unsigned_to_nat(711u); x_2 = lean_unsigned_to_nat(25u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28322,7 +28536,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetDecl_declRange___ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(701u); +x_1 = lean_unsigned_to_nat(712u); x_2 = lean_unsigned_to_nat(129u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28350,7 +28564,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetDecl_declRange___ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(700u); +x_1 = lean_unsigned_to_nat(711u); x_2 = lean_unsigned_to_nat(29u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28362,7 +28576,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetDecl_declRange___ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(700u); +x_1 = lean_unsigned_to_nat(711u); x_2 = lean_unsigned_to_nat(40u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28477,7 +28691,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetFunDecl_declRange _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(703u); +x_1 = lean_unsigned_to_nat(714u); x_2 = lean_unsigned_to_nat(29u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28489,7 +28703,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetFunDecl_declRange _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(704u); +x_1 = lean_unsigned_to_nat(715u); x_2 = lean_unsigned_to_nat(130u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28517,7 +28731,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetFunDecl_declRange _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(703u); +x_1 = lean_unsigned_to_nat(714u); x_2 = lean_unsigned_to_nat(33u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28529,7 +28743,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetFunDecl_declRange _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(703u); +x_1 = lean_unsigned_to_nat(714u); x_2 = lean_unsigned_to_nat(47u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28645,7 +28859,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetDelayedDecl_declR _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(706u); +x_1 = lean_unsigned_to_nat(717u); x_2 = lean_unsigned_to_nat(33u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28657,7 +28871,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetDelayedDecl_declR _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(707u); +x_1 = lean_unsigned_to_nat(718u); x_2 = lean_unsigned_to_nat(128u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28685,7 +28899,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetDelayedDecl_declR _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(706u); +x_1 = lean_unsigned_to_nat(717u); x_2 = lean_unsigned_to_nat(37u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28697,7 +28911,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetDelayedDecl_declR _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(706u); +x_1 = lean_unsigned_to_nat(717u); x_2 = lean_unsigned_to_nat(55u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28813,7 +29027,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetTmpDecl_declRange _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(709u); +x_1 = lean_unsigned_to_nat(720u); x_2 = lean_unsigned_to_nat(29u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28825,7 +29039,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetTmpDecl_declRange _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(710u); +x_1 = lean_unsigned_to_nat(721u); x_2 = lean_unsigned_to_nat(128u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28853,7 +29067,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetTmpDecl_declRange _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(709u); +x_1 = lean_unsigned_to_nat(720u); x_2 = lean_unsigned_to_nat(33u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28865,7 +29079,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Term_elabLetTmpDecl_declRange _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(709u); +x_1 = lean_unsigned_to_nat(720u); x_2 = lean_unsigned_to_nat(47u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -28911,7 +29125,7 @@ x_4 = l_Lean_addBuiltinDeclarationRanges(x_2, x_3, x_1); return x_4; } } -LEAN_EXPORT lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_10107_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_10309_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -29236,7 +29450,15 @@ if (lean_io_result_is_error(res)) return res; l_Lean_Elab_Term_checkBinderAnnotations = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_Elab_Term_checkBinderAnnotations); lean_dec_ref(res); -}l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__1 = _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__1(); +}l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__1 = _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__1); +l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__2 = _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__2); +l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__3 = _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__3); +l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__4 = _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_Binders_0__Lean_Elab_Term_checkLocalInstanceParameters___closed__4); +l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__1 = _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__1(); lean_mark_persistent(l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__1); l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__2 = _init_l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__2(); lean_mark_persistent(l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg___closed__2); @@ -29775,7 +29997,7 @@ lean_mark_persistent(l___regBuiltin_Lean_Elab_Term_elabLetTmpDecl_declRange___cl res = l___regBuiltin_Lean_Elab_Term_elabLetTmpDecl_declRange(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -res = l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_10107_(lean_io_mk_world()); +res = l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_10309_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Elab/BuiltinCommand.c b/stage0/stdlib/Lean/Elab/BuiltinCommand.c index 7fb74d9c3d..f06c427cc3 100644 --- a/stage0/stdlib/Lean/Elab/BuiltinCommand.c +++ b/stage0/stdlib/Lean/Elab/BuiltinCommand.c @@ -644,7 +644,6 @@ LEAN_EXPORT lean_object* l___regBuiltin_Lean_Elab_Command_elabAddDeclDoc_declRan LEAN_EXPORT lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_BuiltinCommand_0__Lean_Elab_Command_replaceBinderAnnotation___spec__2___closed__2; static lean_object* l___regBuiltin_Lean_Elab_Command_elabInitQuot_declRange___closed__1; -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MonadRef_mkInfoFromRefPos___at___private_Lean_Elab_BuiltinCommand_0__Lean_Elab_Command_replaceBinderAnnotation___spec__1___boxed(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_elabExport___closed__1; lean_object* l_Lean_Elab_addMacroStack___at_Lean_Elab_Command_instAddErrorMessageContextCommandElabM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -942,6 +941,7 @@ uint8_t lean_nat_dec_lt(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Command_elabAddDeclDoc___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Command_elabModuleDoc___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__8___closed__14; +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_add_decl(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_addCompletionInfo___at_Lean_Elab_Command_elabEnd___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Command_elabModuleDoc___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { @@ -16613,7 +16613,7 @@ x_45 = l___private_Lean_Elab_BuiltinCommand_0__Lean_Elab_Command_mkEvalInstCore_ x_46 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_46, 0, x_44); lean_ctor_set(x_46, 1, x_45); -x_47 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_46, x_3, x_4, x_5, x_6, x_29); +x_47 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_46, x_3, x_4, x_5, x_6, x_29); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); @@ -16662,7 +16662,7 @@ x_64 = l___private_Lean_Elab_BuiltinCommand_0__Lean_Elab_Command_mkEvalInstCore_ x_65 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_65, 0, x_63); lean_ctor_set(x_65, 1, x_64); -x_66 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_65, x_3, x_4, x_5, x_6, x_48); +x_66 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_65, x_3, x_4, x_5, x_6, x_48); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); diff --git a/stage0/stdlib/Lean/Elab/BuiltinTerm.c b/stage0/stdlib/Lean/Elab/BuiltinTerm.c index 426b19a6ab..22c5e3dc15 100644 --- a/stage0/stdlib/Lean/Elab/BuiltinTerm.c +++ b/stage0/stdlib/Lean/Elab/BuiltinTerm.c @@ -565,7 +565,6 @@ static lean_object* l___regBuiltin_Lean_Elab_Term_elabEnsureExpectedType___close LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabScientificLit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabWithAnnotateTerm___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_Open_0__Lean_Elab_OpenDecl_addOpenDecl___at_Lean_Elab_Term_elabOpen___spec__17(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_panic___at___private_Lean_Elab_Open_0__Lean_Elab_OpenDecl_resolveNameUsingNamespacesCore___spec__9(lean_object*); static lean_object* l_Lean_Elab_Term_elabWithAnnotateTerm___closed__2; static lean_object* l___regBuiltin_Lean_Elab_Term_elabQuotedName___closed__5; @@ -868,6 +867,7 @@ static lean_object* l___regBuiltin_Lean_Elab_Term_elabNoImplicitLambda___closed_ static lean_object* l___regBuiltin_Lean_Elab_Term_elabBadCDot___closed__5; uint8_t l_Lean_Syntax_isIdent(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_BuiltinTerm_0__Lean_Elab_Term_mkTacticMVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_elabTypeOf___closed__1; static lean_object* _init_l_Lean_Elab_Term_elabProp___rarg___closed__1() { _start: @@ -5111,7 +5111,7 @@ x_18 = l___private_Lean_Elab_BuiltinTerm_0__Lean_Elab_Term_getMVarFromUserName__ x_19 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_19, 0, x_17); lean_ctor_set(x_19, 1, x_18); -x_20 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_19, x_2, x_3, x_4, x_5, x_11); +x_20 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_19, x_2, x_3, x_4, x_5, x_11); return x_20; } else diff --git a/stage0/stdlib/Lean/Elab/ComputedFields.c b/stage0/stdlib/Lean/Elab/ComputedFields.c index 26d9e8c513..594a4d9395 100644 --- a/stage0/stdlib/Lean/Elab/ComputedFields.c +++ b/stage0/stdlib/Lean/Elab/ComputedFields.c @@ -238,7 +238,6 @@ lean_object* l_List_redLength___rarg(lean_object*); lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); lean_object* l_Lean_Expr_const___override(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_ComputedFields_overrideCasesOn___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_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_ComputedFields_setComputedFields___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_setEnv___at_Lean_Elab_ComputedFields_mkImplType___spec__6___closed__11; LEAN_EXPORT lean_object* l_Lean_setImplementedBy___at_Lean_Elab_ComputedFields_overrideConstructors___spec__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -350,6 +349,7 @@ LEAN_EXPORT lean_object* l_Lean_throwKernelException___at_Lean_Elab_ComputedFiel static lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_ComputedFields_setComputedFields___spec__3___closed__3; LEAN_EXPORT lean_object* l_Lean_Elab_ComputedFields_mkComputedFieldOverrides___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_add_decl(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_logWarning___at_Lean_Elab_ComputedFields_mkImplType___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* _init_l_Lean_Elab_ComputedFields_initFn____x40_Lean_Elab_ComputedFields___hyg_6____lambda__1___closed__1() { @@ -2318,7 +2318,7 @@ x_16 = l_Lean_Elab_ComputedFields_getComputedFieldValue___lambda__1___closed__6; x_17 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_17, 0, x_15); lean_ctor_set(x_17, 1, x_16); -x_18 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_17, x_4, x_5, x_6, x_7, x_8); +x_18 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_17, x_4, x_5, x_6, x_7, x_8); return x_18; } } diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/MkInhabitant.c b/stage0/stdlib/Lean/Elab/PreDefinition/MkInhabitant.c index 9f1968ed0f..c7a57b83bd 100644 --- a/stage0/stdlib/Lean/Elab/PreDefinition/MkInhabitant.c +++ b/stage0/stdlib/Lean/Elab/PreDefinition/MkInhabitant.c @@ -45,7 +45,6 @@ lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_ size_t lean_usize_of_nat(lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_MkInhabitant_0__Lean_Elab_findAssumption_x3f___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*); static lean_object* l_Lean_Elab_mkInhabitantFor___closed__3; -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkDefault(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_PreDefinition_MkInhabitant_0__Lean_Elab_mkFnInhabitant_x3f_loop___closed__5; static lean_object* l___private_Lean_Elab_PreDefinition_MkInhabitant_0__Lean_Elab_mkFnInhabitant_x3f_loop___closed__3; @@ -59,6 +58,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Elab_PreDefinition_MkInhabitant_0__Lea LEAN_EXPORT lean_object* l___private_Lean_Elab_PreDefinition_MkInhabitant_0__Lean_Elab_mkInhabitant_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_PreDefinition_MkInhabitant_0__Lean_Elab_mkFnInhabitant_x3f_loop___closed__4; uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_PreDefinition_MkInhabitant_0__Lean_Elab_mkInhabitant_x3f(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { @@ -1831,7 +1831,7 @@ x_16 = l_Lean_Elab_mkInhabitantFor___closed__4; x_17 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_17, 0, x_15); lean_ctor_set(x_17, 1, x_16); -x_18 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_17, x_4, x_5, x_6, x_7, x_12); +x_18 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_17, x_4, x_5, x_6, x_7, x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); diff --git a/stage0/stdlib/Lean/Elab/SyntheticMVars.c b/stage0/stdlib/Lean/Elab/SyntheticMVars.c index e215ecf8f7..e8c347fff9 100644 --- a/stage0/stdlib/Lean/Elab/SyntheticMVars.c +++ b/stage0/stdlib/Lean/Elab/SyntheticMVars.c @@ -6040,7 +6040,7 @@ lean_inc(x_1); x_10 = l_Lean_MVarId_getType(x_1, x_5, x_6, x_7, x_8, x_9); if (lean_obj_tag(x_10) == 0) { -lean_object* x_11; lean_object* x_12; lean_object* x_13; +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; x_11 = lean_ctor_get(x_10, 0); lean_inc(x_11); x_12 = lean_ctor_get(x_10, 1); @@ -6051,9 +6051,6 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); x_13 = l_Lean_Meta_isClass_x3f(x_11, x_5, x_6, x_7, x_8, x_12); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; x_14 = lean_ctor_get(x_13, 0); lean_inc(x_14); if (lean_obj_tag(x_14) == 0) @@ -6250,53 +6247,23 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_54 = !lean_is_exclusive(x_13); +x_54 = !lean_is_exclusive(x_10); if (x_54 == 0) { -return x_13; -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_55 = lean_ctor_get(x_13, 0); -x_56 = lean_ctor_get(x_13, 1); -lean_inc(x_56); -lean_inc(x_55); -lean_dec(x_13); -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; -} -} -} -else -{ -uint8_t x_58; -lean_dec(x_8); -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_58 = !lean_is_exclusive(x_10); -if (x_58 == 0) -{ return x_10; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_59 = lean_ctor_get(x_10, 0); -x_60 = lean_ctor_get(x_10, 1); -lean_inc(x_60); -lean_inc(x_59); +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_10, 0); +x_56 = lean_ctor_get(x_10, 1); +lean_inc(x_56); +lean_inc(x_55); lean_dec(x_10); -x_61 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_61, 0, x_59); -lean_ctor_set(x_61, 1, x_60); -return x_61; +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; } } } diff --git a/stage0/stdlib/Lean/Meta/Basic.c b/stage0/stdlib/Lean/Meta/Basic.c index 3d1a191be6..609eda0663 100644 --- a/stage0/stdlib/Lean/Meta/Basic.c +++ b/stage0/stdlib/Lean/Meta/Basic.c @@ -72,13 +72,11 @@ static lean_object* l_Lean_Meta_instInhabitedState___closed__4; LEAN_EXPORT uint8_t l_Lean_Meta_Config_zetaNonDep___default; lean_object* l_Lean_LocalDecl_userName(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_whnfForall(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___spec__1(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_mapMetaM___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_setInlineAttribute___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_instInhabitedSavedState___closed__13; LEAN_EXPORT uint8_t l_Lean_Meta_ParamInfo_binderInfo___default; uint8_t lean_usize_dec_eq(size_t, size_t); -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_uget(lean_object*, size_t); lean_object* lean_io_error_to_string(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallMetaTelescopeReducingAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -118,6 +116,7 @@ extern lean_object* l_Lean_maxRecDepthErrorMessage; LEAN_EXPORT lean_object* l_Lean_Meta_processPostponed_loop___lambda__2(uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_mkFunUnit___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_instMonadMetaM___closed__1; +LEAN_EXPORT lean_object* l_Lean_LMVarId_isReadOnly___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_uset(lean_object*, size_t, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_mkLetFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -159,6 +158,7 @@ lean_object* l_Std_PersistentArray_append___rarg(lean_object*, lean_object*); static lean_object* l_Lean_Meta_instInhabitedState___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_withNewBinderInfos___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_forallTelescope(lean_object*); +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withNewMCtxDepthImp(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withAssignableSyntheticOpaque___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -186,6 +186,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_map1MetaM___rarg(lean_object*, lean_object* LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAuxAux_process___rarg___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1___closed__5; LEAN_EXPORT lean_object* l_Lean_Meta_saveState___boxed(lean_object*); +LEAN_EXPORT lean_object* l_Lean_FVarId_throwUnknown___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_local_ctx_find_from_user_name(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_instantiateLevelMVars___at_Lean_Meta_normalizeLevel___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_forallBoundedTelescope(lean_object*); @@ -203,7 +204,6 @@ lean_object* lean_array_get_size(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withNewLocalInstance___at___private_Lean_Meta_Basic_0__Lean_Meta_withNewLocalInstancesImp___spec__1(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withLocalDeclsD___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_exposeRelevantUniverses___lambda__1(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Lean_Meta_ParamInfo_isProp___default; LEAN_EXPORT lean_object* l_Lean_Meta_setMVarType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -274,7 +274,6 @@ lean_object* lean_nat_add(lean_object*, lean_object*); static lean_object* l_Lean_Meta_instInhabitedCache___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_mapMetaM(lean_object*); LEAN_EXPORT lean_object* l_Std_PersistentArray_forInAux___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__9(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withTransparency___rarg(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2(lean_object*); LEAN_EXPORT lean_object* l_Lean_isReducible___at___private_Lean_Meta_Basic_0__Lean_Meta_getDefInfoTemp___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -289,6 +288,7 @@ static lean_object* l_Lean_Meta_Cache_synthInstance___default___closed__1; extern lean_object* l_Lean_maxRecDepth; LEAN_EXPORT lean_object* l_Lean_Meta_getMVarDeclKind(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_is_level_def_eq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_FVarId_throwUnknown___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_instMonadBacktrackSavedStateMetaM___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_mkFreshExprMVarImpl___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_liftMkBindingM___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -304,7 +304,6 @@ static lean_object* l_Lean_Meta_instAlternativeMetaM___closed__1; LEAN_EXPORT lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalContext_setBinderInfo(lean_object*, lean_object*, uint8_t); LEAN_EXPORT uint8_t l_Lean_Meta_ParamInfo_isDecInst___default; -static lean_object* l_Lean_Meta_throwUnknownFVar___rarg___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_isInductivePredicate(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_getConfig___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_isClassQuickConst_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -317,6 +316,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_withNewLocalInstances___rarg(lean_object*, LEAN_EXPORT lean_object* l_Nat_foldM_loop___at_Lean_Meta_mkFreshLevelMVars___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_instInhabitedSavedState___closed__11; static lean_object* l_Lean_Meta_instMonadMCtxMetaM___closed__2; +static lean_object* l_Lean_FVarId_throwUnknown___rarg___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_instInhabitedMetaM(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withNewLocalInstance___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_mkLeveErrorMessageCore___lambda__3___closed__3; @@ -326,8 +326,10 @@ static lean_object* l_Lean_Meta_State_postponed___default___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_restoreSynthInstanceCache(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withNewBinderInfos___at_Lean_Meta_withInstImplicitAsImplict___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux___closed__2; +static lean_object* l_Lean_LMVarId_getLevel___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_instAlternativeMetaM___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Lean_Meta_Config_assignSyntheticOpaque___default; +LEAN_EXPORT lean_object* l_Lean_LMVarId_getLevel___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallMetaTelescopeReducingAux_process___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_EXPORT uint8_t l_Lean_Meta_Config_isDefEqStuckEx___default; LEAN_EXPORT lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_withLocalDecls_loop___spec__1(lean_object*); @@ -384,6 +386,7 @@ lean_object* lean_array_swap(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_instMetaEvalMetaM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); LEAN_EXPORT uint8_t l___private_Lean_Meta_Basic_0__Lean_Meta_mkLeveErrorMessageCore___lambda__1(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_instantiateForall___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_FVarId_throwUnknown___rarg___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_withMCtx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_FVarId_getBinderInfo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_modifyCache___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -396,7 +399,6 @@ LEAN_EXPORT lean_object* l_Lean_Meta_withNewMCtxDepth___rarg(lean_object*, lean_ LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withNewFVar___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_5____closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_collectForwardDeps___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_getLevelMVarDepth___closed__1; static lean_object* l_Lean_MVarId_getDecl___closed__2; uint8_t l_Lean_Level_any(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_mkFreshMVarId___at_Lean_Meta_mkFreshExprMVarAt___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -435,6 +437,7 @@ LEAN_EXPORT lean_object* l_Lean_markUsedAssignment___at___private_Lean_Meta_Basi lean_object* l_Std_mkHashMapImp___rarg(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_throwIsDefEqStuck___rarg(lean_object*); static lean_object* l_Lean_Meta_instMonadBacktrackSavedStateMetaM___closed__2; +LEAN_EXPORT lean_object* l_Lean_Expr_abstractRangeM___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_instAddMessageContextMetaM___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_mkLevelErrorMessage(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -458,6 +461,7 @@ LEAN_EXPORT lean_object* l_Lean_FVarId_getUserName___boxed(lean_object*, lean_ob LEAN_EXPORT lean_object* l_Lean_Meta_lambdaTelescope___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_map2MetaM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withInstImplicitAsImplict(lean_object*); +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_FVarId_throwUnknown___spec__1(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withLocalDecls_loop___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_markUsedAssignment___at___private_Lean_Meta_Basic_0__Lean_Meta_isClassQuick_x3f___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_mkFreshLMVarId___at_Lean_Meta_mkFreshLevelMVar___spec__1___boxed(lean_object*, lean_object*, lean_object*); @@ -482,6 +486,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_savingCache___rarg(lean_object*, lean_objec lean_object* lean_st_mk_ref(lean_object*, lean_object*); lean_object* l_Lean_MetavarContext_setMVarType(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_orelseMergeErrors___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_LMVarId_getLevel___closed__2; lean_object* l_Lean_Core_getMaxHeartbeats(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_saveAndResetSynthInstanceCache___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_liftMkBindingM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -526,7 +531,6 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_isClassExpensi LEAN_EXPORT lean_object* l_Lean_Meta_InfoCacheKey_instHashableInfoCacheKey___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_checkpointDefEq___at_Lean_Meta_isLevelDefEq___spec__2(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Cache_whnfAll___default; -static lean_object* l_Lean_Meta_getLevelMVarDepth___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_liftMkBindingM(lean_object*); lean_object* l_Lean_printTraces___at_Lean_Core_instMetaEvalCoreM___spec__1(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withNewLocalInstances(lean_object*); @@ -587,6 +591,7 @@ lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, l static lean_object* l_Lean_Meta_liftMkBindingM___rarg___closed__1; static lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___closed__8; LEAN_EXPORT lean_object* l_Lean_Meta_getLevelMVarDepth(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_LMVarId_isReadOnly(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateLambdaAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_forallMetaTelescopeReducing___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_setEnv___at_Lean_Meta_setInlineAttribute___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -629,6 +634,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_mkFreshLevelMVarsFor(lean_object*, lean_obj LEAN_EXPORT lean_object* l_Lean_Meta_forallMetaTelescopeReducing(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_isLevelDefEq___closed__6; LEAN_EXPORT lean_object* l_Lean_Meta_Context_config___default; +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_approxDefEq(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_mkLevelStuckErrorMessage(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_instInhabitedInfoCacheKey; @@ -685,8 +691,8 @@ lean_object* lean_environment_main_module(lean_object*); uint8_t lean_expr_eqv(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_isReadOnly(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_instInhabitedState___closed__3; +LEAN_EXPORT lean_object* l_Lean_Expr_abstractRangeM(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isMVar(lean_object*); -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withInstImplicitAsImplict___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_processPostponed_loop(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_mkLeveErrorMessageCore___lambda__3___closed__6; @@ -701,6 +707,7 @@ uint8_t lean_nat_dec_le(lean_object*, lean_object*); static lean_object* l_Lean_Meta_instInhabitedSavedState___closed__6; LEAN_EXPORT lean_object* l_Lean_Meta_mkFreshExprMVar(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_getDefInfoTemp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_LMVarId_getLevel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1518____closed__1; static lean_object* l_Lean_Meta_processPostponed_loop___closed__3; uint8_t l_Lean_Expr_hasMVar(lean_object*); @@ -719,7 +726,6 @@ extern lean_object* l_Lean_Core_instMonadCoreM; LEAN_EXPORT lean_object* l_Lean_Meta_withAtLeastTransparency___rarg(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_saveAndResetSynthInstanceCache___rarg(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1___closed__3; -static lean_object* l_Lean_Meta_throwUnknownFVar___rarg___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_isDefEqGuarded(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withNewBinderInfos___at_Lean_Meta_withInstImplicitAsImplict___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_getNumPostponed___boxed(lean_object*); @@ -729,12 +735,14 @@ LEAN_EXPORT lean_object* l_Lean_Meta_isLevelDefEq(lean_object*, lean_object*, le LEAN_EXPORT lean_object* l_Lean_Meta_instOrElseMetaM(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_mkLeveErrorMessageCore___lambda__2___boxed(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Expr_abstractM___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__12___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_MVarId_getDecl___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_FVarId_getDecl___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_getConstInfo___at_Lean_Meta_mkConstWithFreshMVarLevels___spec__1___closed__4; LEAN_EXPORT lean_object* l_Lean_Meta_elimMVarDeps___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Expr_abstractM(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_collectForwardDeps___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Level_normalize(lean_object*); static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_1518____closed__2; @@ -795,14 +803,13 @@ LEAN_EXPORT lean_object* l_Lean_instantiateMVars___at___private_Lean_Meta_Basic_ LEAN_EXPORT lean_object* l_Lean_Meta_mkForallFVars___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_isLevelDefEq___closed__4; lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_savingCacheImpl(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_throwIsDefEqStuck___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_processPostponed_loop___closed__4; uint8_t lean_nat_dec_eq(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_approxDefEqImp(lean_object*); LEAN_EXPORT uint8_t l_Lean_Meta_ParamInfo_dependsOnHigherOrderOutParam___default; -LEAN_EXPORT lean_object* l_Lean_initFn____x40_Lean_Meta_Basic___hyg_14587_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_initFn____x40_Lean_Meta_Basic___hyg_14782_(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_instMonadMCtxMetaM___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_resettingSynthInstanceCacheWhen(lean_object*); @@ -831,6 +838,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_withAssignableSyntheticOpaque(lean_object*) LEAN_EXPORT lean_object* l_Lean_isReducible___at___private_Lean_Meta_Basic_0__Lean_Meta_getDefInfoTemp___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_mkFreshFVarId___at___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAuxAux_process___spec__1___rarg(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_isClassExpensive_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_FVarId_throwUnknown___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_instHashableProd___rarg___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_getMVarDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_saveAndResetSynthInstanceCache___boxed(lean_object*); @@ -854,6 +862,7 @@ uint64_t lean_uint64_mix_hash(uint64_t, uint64_t); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_getLocalDeclFromUserName___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_isLevelDefEq___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withExistingLocalDeclsImp(lean_object*); +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_FVarId_throwUnknown___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_instBEqExpr; static lean_object* l_Lean_Meta_instMonadMetaM___closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_withNewLocalInstance___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -925,6 +934,7 @@ LEAN_EXPORT lean_object* l_Std_PersistentArray_forInAux___at___private_Lean_Meta LEAN_EXPORT lean_object* l_Lean_mkFreshMVarId___at_Lean_Meta_mkFreshExprMVarAt___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_mkFreshFVarId___at___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAuxAux_process___spec__1(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp(lean_object*); +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withAtLeastTransparency___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Context_defEqCtx_x3f___default; @@ -958,6 +968,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_setPostponed(lean_object*, lean_object*, le LEAN_EXPORT lean_object* l_Lean_Meta_ParamInfo_isStrictImplicit___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_saveState___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_FVarId_getType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_FVarId_throwUnknown(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withReducible(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withoutProofIrrelevance___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_orElse(lean_object*); @@ -1016,7 +1027,6 @@ LEAN_EXPORT lean_object* l_Lean_Meta_getFVarLocalDecl___boxed(lean_object*, lean LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp_process___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_getMVarDeclKind___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalDecl_isLet(lean_object*); -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_findLocalDecl_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Util_Trace_0__Lean_getResetTraces___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__7___rarg___boxed(lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); @@ -1030,6 +1040,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withNewLocalIn LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_withInstImplicitAsImplict___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getReducibilityStatus___at___private_Lean_Meta_Basic_0__Lean_Meta_getDefInfoTemp___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withTransparency___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_modifyInferTypeCache___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_5____closed__1() { _start: @@ -8551,7 +8562,7 @@ lean_dec(x_2); return x_7; } } -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___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_EXPORT lean_object* l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; lean_object* x_8; uint8_t x_9; @@ -8589,7 +8600,7 @@ return x_15; } } } -static lean_object* _init_l_Lean_Meta_getLevelMVarDepth___closed__1() { +static lean_object* _init_l_Lean_LMVarId_getLevel___closed__1() { _start: { lean_object* x_1; @@ -8597,16 +8608,16 @@ x_1 = lean_mk_string_from_bytes("unknown universe metavariable '?", 32); return x_1; } } -static lean_object* _init_l_Lean_Meta_getLevelMVarDepth___closed__2() { +static lean_object* _init_l_Lean_LMVarId_getLevel___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_getLevelMVarDepth___closed__1; +x_1 = l_Lean_LMVarId_getLevel___closed__1; x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_Meta_getLevelMVarDepth(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +LEAN_EXPORT lean_object* l_Lean_LMVarId_getLevel(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; @@ -8632,7 +8643,7 @@ lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean lean_free_object(x_9); x_15 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_15, 0, x_1); -x_16 = l_Lean_Meta_getLevelMVarDepth___closed__2; +x_16 = l_Lean_LMVarId_getLevel___closed__2; x_17 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_17, 0, x_16); lean_ctor_set(x_17, 1, x_15); @@ -8640,7 +8651,7 @@ x_18 = l_Lean_getConstInfo___at_Lean_Meta_mkConstWithFreshMVarLevels___spec__1__ x_19 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_19, 0, x_17); lean_ctor_set(x_19, 1, x_18); -x_20 = l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___spec__1(x_19, x_2, x_3, x_4, x_5, x_12); +x_20 = l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1(x_19, x_2, x_3, x_4, x_5, x_12); return x_20; } else @@ -8672,7 +8683,7 @@ if (lean_obj_tag(x_25) == 0) lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; x_26 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_26, 0, x_1); -x_27 = l_Lean_Meta_getLevelMVarDepth___closed__2; +x_27 = l_Lean_LMVarId_getLevel___closed__2; x_28 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_28, 0, x_27); lean_ctor_set(x_28, 1, x_26); @@ -8680,7 +8691,7 @@ x_29 = l_Lean_getConstInfo___at_Lean_Meta_mkConstWithFreshMVarLevels___spec__1__ x_30 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_30, 0, x_28); lean_ctor_set(x_30, 1, x_29); -x_31 = l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___spec__1(x_30, x_2, x_3, x_4, x_5, x_23); +x_31 = l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1(x_30, x_2, x_3, x_4, x_5, x_23); return x_31; } else @@ -8698,11 +8709,11 @@ return x_33; } } } -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___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_EXPORT lean_object* l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); @@ -8710,6 +8721,26 @@ lean_dec(x_2); return x_7; } } +LEAN_EXPORT lean_object* l_Lean_LMVarId_getLevel___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_LMVarId_getLevel(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_EXPORT lean_object* l_Lean_Meta_getLevelMVarDepth(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_LMVarId_getLevel(x_1, x_2, x_3, x_4, x_5, x_6); +return x_7; +} +} LEAN_EXPORT lean_object* l_Lean_Meta_getLevelMVarDepth___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: { @@ -8722,7 +8753,7 @@ lean_dec(x_2); return x_7; } } -LEAN_EXPORT lean_object* l_Lean_Meta_isReadOnlyLevelMVar(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +LEAN_EXPORT lean_object* l_Lean_LMVarId_isReadOnly(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; @@ -8737,7 +8768,7 @@ lean_object* x_10; lean_object* x_11; x_10 = lean_ctor_get(x_7, 1); lean_inc(x_10); lean_dec(x_7); -x_11 = l_Lean_Meta_getLevelMVarDepth(x_1, x_2, x_3, x_4, x_5, x_10); +x_11 = l_Lean_LMVarId_getLevel(x_1, x_2, x_3, x_4, x_5, x_10); if (lean_obj_tag(x_11) == 0) { lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; @@ -8875,6 +8906,26 @@ return x_48; } } } +LEAN_EXPORT lean_object* l_Lean_LMVarId_isReadOnly___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_LMVarId_isReadOnly(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_EXPORT lean_object* l_Lean_Meta_isReadOnlyLevelMVar(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_LMVarId_isReadOnly(x_1, x_2, x_3, x_4, x_5, x_6); +return x_7; +} +} LEAN_EXPORT lean_object* l_Lean_Meta_isReadOnlyLevelMVar___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: { @@ -9005,7 +9056,7 @@ lean_dec(x_3); return x_8; } } -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___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) { +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_FVarId_throwUnknown___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; uint8_t x_9; @@ -9043,15 +9094,15 @@ return x_15; } } } -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___spec__1(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_FVarId_throwUnknown___spec__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___spec__1___rarg___boxed), 6, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_FVarId_throwUnknown___spec__1___rarg___boxed), 6, 0); return x_2; } } -static lean_object* _init_l_Lean_Meta_throwUnknownFVar___rarg___closed__1() { +static lean_object* _init_l_Lean_FVarId_throwUnknown___rarg___closed__1() { _start: { lean_object* x_1; @@ -9059,23 +9110,23 @@ x_1 = lean_mk_string_from_bytes("unknown free variable '", 23); return x_1; } } -static lean_object* _init_l_Lean_Meta_throwUnknownFVar___rarg___closed__2() { +static lean_object* _init_l_Lean_FVarId_throwUnknown___rarg___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_throwUnknownFVar___rarg___closed__1; +x_1 = l_Lean_FVarId_throwUnknown___rarg___closed__1; x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_Meta_throwUnknownFVar___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_EXPORT lean_object* l_Lean_FVarId_throwUnknown___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_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; x_7 = l_Lean_Expr_fvar___override(x_1); x_8 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_8, 0, x_7); -x_9 = l_Lean_Meta_throwUnknownFVar___rarg___closed__2; +x_9 = l_Lean_FVarId_throwUnknown___rarg___closed__2; x_10 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_10, 0, x_9); lean_ctor_set(x_10, 1, x_8); @@ -9083,10 +9134,50 @@ x_11 = l_Lean_getConstInfo___at_Lean_Meta_mkConstWithFreshMVarLevels___spec__1__ x_12 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_12, 0, x_10); lean_ctor_set(x_12, 1, x_11); -x_13 = l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___spec__1___rarg(x_12, x_2, x_3, x_4, x_5, x_6); +x_13 = l_Lean_throwError___at_Lean_FVarId_throwUnknown___spec__1___rarg(x_12, x_2, x_3, x_4, x_5, x_6); return x_13; } } +LEAN_EXPORT lean_object* l_Lean_FVarId_throwUnknown(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_FVarId_throwUnknown___rarg___boxed), 6, 0); +return x_2; +} +} +LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_FVarId_throwUnknown___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_throwError___at_Lean_FVarId_throwUnknown___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; +} +} +LEAN_EXPORT lean_object* l_Lean_FVarId_throwUnknown___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_FVarId_throwUnknown___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; +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_throwUnknownFVar___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 = l_Lean_FVarId_throwUnknown___rarg(x_1, x_2, x_3, x_4, x_5, x_6); +return x_7; +} +} LEAN_EXPORT lean_object* l_Lean_Meta_throwUnknownFVar(lean_object* x_1) { _start: { @@ -9095,18 +9186,6 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_throwUnknownFVar___rarg___boxed), 6 return x_2; } } -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; -x_7 = l_Lean_throwError___at_Lean_Meta_throwUnknownFVar___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; -} -} LEAN_EXPORT lean_object* l_Lean_Meta_throwUnknownFVar___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: { @@ -9174,7 +9253,7 @@ x_8 = lean_local_ctx_find(x_7, x_1); if (lean_obj_tag(x_8) == 0) { lean_object* x_9; -x_9 = l_Lean_Meta_throwUnknownFVar___rarg(x_1, x_2, x_3, x_4, x_5, x_6); +x_9 = l_Lean_FVarId_throwUnknown___rarg(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_2); return x_9; } @@ -10576,7 +10655,7 @@ lean_dec(x_2); return x_7; } } -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___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_EXPORT lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; lean_object* x_8; uint8_t x_9; @@ -10614,7 +10693,7 @@ return x_15; } } } -LEAN_EXPORT lean_object* l_Lean_Meta_abstractRange(lean_object* x_1, lean_object* 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_EXPORT lean_object* l_Lean_Expr_abstractRangeM(lean_object* x_1, lean_object* 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; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; uint8_t x_32; lean_object* x_33; lean_object* x_34; @@ -11355,7 +11434,7 @@ x_150 = lean_ctor_get(x_149, 1); lean_inc(x_150); lean_dec(x_149); x_151 = l_Lean_Meta_liftMkBindingM___rarg___closed__2; -x_152 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_151, x_4, x_5, x_6, x_7, x_150); +x_152 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_151, x_4, x_5, x_6, x_7, x_150); lean_dec(x_6); lean_dec(x_4); return x_152; @@ -11392,7 +11471,7 @@ x_162 = lean_ctor_get(x_161, 1); lean_inc(x_162); lean_dec(x_161); x_163 = l_Lean_Meta_liftMkBindingM___rarg___closed__2; -x_164 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_163, x_4, x_5, x_6, x_7, x_162); +x_164 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_163, x_4, x_5, x_6, x_7, x_162); lean_dec(x_6); lean_dec(x_4); return x_164; @@ -11401,11 +11480,11 @@ return x_164; } } } -LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___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_EXPORT lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); @@ -11413,6 +11492,24 @@ lean_dec(x_2); return x_7; } } +LEAN_EXPORT lean_object* l_Lean_Expr_abstractRangeM___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_Expr_abstractRangeM(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +lean_dec(x_7); +lean_dec(x_5); +return x_9; +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_abstractRange(lean_object* x_1, lean_object* 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_Expr_abstractRangeM(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +return x_9; +} +} LEAN_EXPORT lean_object* l_Lean_Meta_abstractRange___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: { @@ -11423,15 +11520,33 @@ lean_dec(x_5); return x_9; } } -LEAN_EXPORT lean_object* l_Lean_Meta_abstract(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_Expr_abstractM(lean_object* x_1, 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 = lean_array_get_size(x_2); -x_9 = l_Lean_Meta_abstractRange(x_1, x_8, x_2, x_3, x_4, x_5, x_6, x_7); +x_9 = l_Lean_Expr_abstractRangeM(x_1, x_8, x_2, x_3, x_4, x_5, x_6, x_7); return x_9; } } +LEAN_EXPORT lean_object* l_Lean_Expr_abstractM___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_Expr_abstractM(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_4); +return x_8; +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_abstract(lean_object* x_1, 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_Expr_abstractM(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +return x_8; +} +} LEAN_EXPORT lean_object* l_Lean_Meta_abstract___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: { @@ -13032,7 +13147,7 @@ x_152 = lean_ctor_get(x_151, 1); lean_inc(x_152); lean_dec(x_151); x_153 = l_Lean_Meta_liftMkBindingM___rarg___closed__2; -x_154 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_153, x_6, x_7, x_8, x_9, x_152); +x_154 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_153, x_6, x_7, x_8, x_9, x_152); return x_154; } else @@ -13067,7 +13182,7 @@ x_164 = lean_ctor_get(x_163, 1); lean_inc(x_164); lean_dec(x_163); x_165 = l_Lean_Meta_liftMkBindingM___rarg___closed__2; -x_166 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_165, x_6, x_7, x_8, x_9, x_164); +x_166 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_165, x_6, x_7, x_8, x_9, x_164); return x_166; } } @@ -13833,7 +13948,7 @@ x_149 = lean_ctor_get(x_148, 1); lean_inc(x_149); lean_dec(x_148); x_150 = l_Lean_Meta_liftMkBindingM___rarg___closed__2; -x_151 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_150, x_6, x_7, x_8, x_9, x_149); +x_151 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_150, x_6, x_7, x_8, x_9, x_149); return x_151; } else @@ -13868,7 +13983,7 @@ x_161 = lean_ctor_get(x_160, 1); lean_inc(x_161); lean_dec(x_160); x_162 = l_Lean_Meta_liftMkBindingM___rarg___closed__2; -x_163 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_162, x_6, x_7, x_8, x_9, x_161); +x_163 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_162, x_6, x_7, x_8, x_9, x_161); return x_163; } } @@ -14800,7 +14915,7 @@ x_148 = lean_ctor_get(x_147, 1); lean_inc(x_148); lean_dec(x_147); x_149 = l_Lean_Meta_liftMkBindingM___rarg___closed__2; -x_150 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_149, x_4, x_5, x_6, x_7, x_148); +x_150 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_149, x_4, x_5, x_6, x_7, x_148); return x_150; } else @@ -14835,7 +14950,7 @@ x_160 = lean_ctor_get(x_159, 1); lean_inc(x_160); lean_dec(x_159); x_161 = l_Lean_Meta_liftMkBindingM___rarg___closed__2; -x_162 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_161, x_4, x_5, x_6, x_7, x_160); +x_162 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_161, x_4, x_5, x_6, x_7, x_160); return x_162; } } @@ -21141,33 +21256,51 @@ lean_object* x_7; x_7 = l___private_Lean_Meta_Basic_0__Lean_Meta_isClassImp_x3f(x_1, x_2, x_3, x_4, x_5, x_6); if (lean_obj_tag(x_7) == 0) { -return x_7; -} -else -{ uint8_t x_8; x_8 = !lean_is_exclusive(x_7); if (x_8 == 0) { -lean_object* x_9; lean_object* x_10; -x_9 = lean_ctor_get(x_7, 0); -lean_dec(x_9); -x_10 = lean_box(0); -lean_ctor_set_tag(x_7, 0); -lean_ctor_set(x_7, 0, x_10); return x_7; } else { -lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_11 = lean_ctor_get(x_7, 1); -lean_inc(x_11); +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_12 = lean_box(0); -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; +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_9); +lean_ctor_set(x_11, 1, x_10); +return x_11; +} +} +else +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_7); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_7, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set_tag(x_7, 0); +lean_ctor_set(x_7, 0, x_14); +return x_7; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_7, 1); +lean_inc(x_15); +lean_dec(x_7); +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; } } } @@ -22482,15 +22615,12 @@ return x_8; LEAN_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withNewFVar___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; +lean_object* x_9; lean_object* x_10; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); x_9 = l_Lean_Meta_isClass_x3f(x_2, 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_inc(x_10); if (lean_obj_tag(x_10) == 0) @@ -22517,35 +22647,6 @@ x_16 = l_Lean_Meta_withNewLocalInstance___at___private_Lean_Meta_Basic_0__Lean_M return x_16; } } -else -{ -uint8_t x_17; -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_17 = !lean_is_exclusive(x_9); -if (x_17 == 0) -{ -return x_9; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_9, 0); -x_19 = lean_ctor_get(x_9, 1); -lean_inc(x_19); -lean_inc(x_18); -lean_dec(x_9); -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_EXPORT lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withNewFVar(lean_object* x_1) { _start: @@ -23607,7 +23708,7 @@ return x_8; } else { -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_object* x_11; lean_object* x_12; lean_object* x_13; x_9 = lean_ctor_get(x_2, 0); x_10 = lean_ctor_get(x_2, 1); x_11 = l_Lean_LocalDecl_type(x_9); @@ -23616,9 +23717,6 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); x_12 = l_Lean_Meta_isClass_x3f(x_11, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_12) == 0) -{ -lean_object* x_13; x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); if (lean_obj_tag(x_13) == 0) @@ -23651,40 +23749,12 @@ x_7 = x_16; goto _start; } } -else -{ -uint8_t x_22; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_22 = !lean_is_exclusive(x_12); -if (x_22 == 0) -{ -return x_12; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_12, 0); -x_24 = lean_ctor_get(x_12, 1); -lean_inc(x_24); -lean_inc(x_23); -lean_dec(x_12); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -return x_25; -} -} -} } } LEAN_EXPORT lean_object* l_Lean_Meta_withLocalInstancesImp___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; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +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; uint8_t x_19; x_8 = lean_ctor_get(x_3, 0); lean_inc(x_8); x_9 = lean_ctor_get(x_3, 1); @@ -23703,9 +23773,6 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); x_15 = l_List_foldlM___at_Lean_Meta_withLocalInstancesImp___spec__1(x_10, x_1, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; x_16 = lean_ctor_get(x_15, 0); lean_inc(x_16); x_17 = lean_ctor_get(x_15, 1); @@ -23818,40 +23885,6 @@ x_39 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_17); return x_39; } } -else -{ -uint8_t x_40; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_40 = !lean_is_exclusive(x_15); -if (x_40 == 0) -{ -return x_15; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_15, 0); -x_42 = lean_ctor_get(x_15, 1); -lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_15); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -return x_43; -} -} -} } LEAN_EXPORT lean_object* l_Lean_Meta_withLocalInstancesImp(lean_object* x_1) { _start: @@ -30206,7 +30239,7 @@ x_21 = lean_ctor_get(x_13, 1); lean_inc(x_21); lean_dec(x_13); x_22 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux___closed__2; -x_23 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_22, x_4, x_5, x_6, x_7, x_21); +x_23 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_22, x_4, x_5, x_6, x_7, x_21); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -30353,7 +30386,7 @@ x_21 = lean_ctor_get(x_13, 1); lean_inc(x_21); lean_dec(x_13); x_22 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateLambdaAux___closed__2; -x_23 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_22, x_4, x_5, x_6, x_7, x_21); +x_23 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_22, x_4, x_5, x_6, x_7, x_21); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -46693,7 +46726,7 @@ lean_dec(x_3); return x_9; } } -LEAN_EXPORT lean_object* l_Lean_initFn____x40_Lean_Meta_Basic___hyg_14587_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_initFn____x40_Lean_Meta_Basic___hyg_14782_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -47041,14 +47074,14 @@ l_Lean_MVarId_getDecl___closed__1 = _init_l_Lean_MVarId_getDecl___closed__1(); lean_mark_persistent(l_Lean_MVarId_getDecl___closed__1); l_Lean_MVarId_getDecl___closed__2 = _init_l_Lean_MVarId_getDecl___closed__2(); lean_mark_persistent(l_Lean_MVarId_getDecl___closed__2); -l_Lean_Meta_getLevelMVarDepth___closed__1 = _init_l_Lean_Meta_getLevelMVarDepth___closed__1(); -lean_mark_persistent(l_Lean_Meta_getLevelMVarDepth___closed__1); -l_Lean_Meta_getLevelMVarDepth___closed__2 = _init_l_Lean_Meta_getLevelMVarDepth___closed__2(); -lean_mark_persistent(l_Lean_Meta_getLevelMVarDepth___closed__2); -l_Lean_Meta_throwUnknownFVar___rarg___closed__1 = _init_l_Lean_Meta_throwUnknownFVar___rarg___closed__1(); -lean_mark_persistent(l_Lean_Meta_throwUnknownFVar___rarg___closed__1); -l_Lean_Meta_throwUnknownFVar___rarg___closed__2 = _init_l_Lean_Meta_throwUnknownFVar___rarg___closed__2(); -lean_mark_persistent(l_Lean_Meta_throwUnknownFVar___rarg___closed__2); +l_Lean_LMVarId_getLevel___closed__1 = _init_l_Lean_LMVarId_getLevel___closed__1(); +lean_mark_persistent(l_Lean_LMVarId_getLevel___closed__1); +l_Lean_LMVarId_getLevel___closed__2 = _init_l_Lean_LMVarId_getLevel___closed__2(); +lean_mark_persistent(l_Lean_LMVarId_getLevel___closed__2); +l_Lean_FVarId_throwUnknown___rarg___closed__1 = _init_l_Lean_FVarId_throwUnknown___rarg___closed__1(); +lean_mark_persistent(l_Lean_FVarId_throwUnknown___rarg___closed__1); +l_Lean_FVarId_throwUnknown___rarg___closed__2 = _init_l_Lean_FVarId_throwUnknown___rarg___closed__2(); +lean_mark_persistent(l_Lean_FVarId_throwUnknown___rarg___closed__2); l_Lean_Meta_getLocalDeclFromUserName___closed__1 = _init_l_Lean_Meta_getLocalDeclFromUserName___closed__1(); lean_mark_persistent(l_Lean_Meta_getLocalDeclFromUserName___closed__1); l_Lean_Meta_getLocalDeclFromUserName___closed__2 = _init_l_Lean_Meta_getLocalDeclFromUserName___closed__2(); @@ -47183,7 +47216,7 @@ l_Lean_Meta_isExprDefEq___closed__1 = _init_l_Lean_Meta_isExprDefEq___closed__1( lean_mark_persistent(l_Lean_Meta_isExprDefEq___closed__1); l_Lean_Meta_isExprDefEq___closed__2 = _init_l_Lean_Meta_isExprDefEq___closed__2(); lean_mark_persistent(l_Lean_Meta_isExprDefEq___closed__2); -res = l_Lean_initFn____x40_Lean_Meta_Basic___hyg_14587_(lean_io_mk_world()); +res = l_Lean_initFn____x40_Lean_Meta_Basic___hyg_14782_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/DecLevel.c b/stage0/stdlib/Lean/Meta/DecLevel.c index e45f8dd4a6..4b2c31ccb0 100644 --- a/stage0/stdlib/Lean/Meta/DecLevel.c +++ b/stage0/stdlib/Lean/Meta/DecLevel.c @@ -51,6 +51,7 @@ LEAN_EXPORT uint8_t l_Lean_Meta_DecLevelContext_canAssignMVars___default; static lean_object* l___private_Lean_Meta_DecLevel_0__Lean_Meta_decAux_x3f___closed__8; LEAN_EXPORT lean_object* l___private_Lean_Meta_DecLevel_0__Lean_Meta_decAux_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_DecLevel_0__Lean_Meta_decAux_x3f___closed__4; +lean_object* l_Lean_LMVarId_isReadOnly(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_addTrace___at___private_Lean_Meta_DecLevel_0__Lean_Meta_decAux_x3f___spec__2___closed__4; static lean_object* l___private_Lean_Meta_DecLevel_0__Lean_Meta_decAux_x3f___closed__9; lean_object* l___private_Lean_Util_Trace_0__Lean_addTraceOptions(lean_object*); @@ -72,7 +73,6 @@ lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMe static lean_object* l___private_Lean_Meta_DecLevel_0__Lean_Meta_decAux_x3f___closed__6; static lean_object* l_Lean_Meta_decLevel___closed__3; lean_object* l_Lean_Level_mvar___override(lean_object*); -lean_object* l_Lean_Meta_isReadOnlyLevelMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_markUsedAssignment___at___private_Lean_Meta_DecLevel_0__Lean_Meta_decAux_x3f___spec__4___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_decLevel_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static uint8_t _init_l_Lean_Meta_DecLevelContext_canAssignMVars___default() { @@ -1399,7 +1399,7 @@ if (lean_obj_tag(x_98) == 0) { lean_object* x_100; lean_inc(x_97); -x_100 = l_Lean_Meta_isReadOnlyLevelMVar(x_97, x_3, x_4, x_5, x_6, x_99); +x_100 = l_Lean_LMVarId_isReadOnly(x_97, 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; diff --git a/stage0/stdlib/Lean/Meta/ExprDefEq.c b/stage0/stdlib/Lean/Meta/ExprDefEq.c index 6e01166121..9b87caa7e8 100644 --- a/stage0/stdlib/Lean/Meta/ExprDefEq.c +++ b/stage0/stdlib/Lean/Meta/ExprDefEq.c @@ -8928,7 +8928,7 @@ return x_32; } else { -lean_object* x_33; lean_object* x_34; +lean_object* x_33; lean_object* x_34; lean_object* x_35; x_33 = lean_ctor_get(x_22, 1); lean_inc(x_33); lean_dec(x_22); @@ -8937,9 +8937,6 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); x_34 = l_Lean_Meta_isClass_x3f(x_17, x_5, x_6, x_7, x_8, x_33); -if (lean_obj_tag(x_34) == 0) -{ -lean_object* x_35; x_35 = lean_ctor_get(x_34, 0); lean_inc(x_35); if (lean_obj_tag(x_35) == 0) @@ -8977,9 +8974,11 @@ x_45 = l_Lean_Meta_withNewLocalInstance___at___private_Lean_Meta_Basic_0__Lean_M return x_45; } } +} else { uint8_t x_46; +lean_dec(x_17); lean_dec(x_13); lean_dec(x_8); lean_dec(x_7); @@ -8989,19 +8988,19 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_46 = !lean_is_exclusive(x_34); +x_46 = !lean_is_exclusive(x_22); if (x_46 == 0) { -return x_34; +return x_22; } else { lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_47 = lean_ctor_get(x_34, 0); -x_48 = lean_ctor_get(x_34, 1); +x_47 = lean_ctor_get(x_22, 0); +x_48 = lean_ctor_get(x_22, 1); lean_inc(x_48); lean_inc(x_47); -lean_dec(x_34); +lean_dec(x_22); x_49 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_49, 0, x_47); lean_ctor_set(x_49, 1, x_48); @@ -9009,60 +9008,26 @@ return x_49; } } } -} else { -uint8_t x_50; -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_50 = !lean_is_exclusive(x_22); -if (x_50 == 0) -{ -return x_22; -} -else -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_22, 0); -x_52 = lean_ctor_get(x_22, 1); -lean_inc(x_52); -lean_inc(x_51); -lean_dec(x_22); -x_53 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_53, 0, x_51); -lean_ctor_set(x_53, 1, x_52); -return x_53; -} -} -} -else -{ -lean_object* x_54; lean_object* x_55; -x_54 = lean_array_fget(x_2, x_4); +lean_object* x_50; lean_object* x_51; +x_50 = lean_array_fget(x_2, x_4); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_17); -x_55 = lean_is_expr_def_eq(x_17, x_54, x_5, x_6, x_7, x_8, x_16); -if (lean_obj_tag(x_55) == 0) +x_51 = lean_is_expr_def_eq(x_17, x_50, x_5, x_6, x_7, x_8, x_16); +if (lean_obj_tag(x_51) == 0) { -lean_object* x_56; uint8_t x_57; -x_56 = lean_ctor_get(x_55, 0); -lean_inc(x_56); -x_57 = lean_unbox(x_56); -lean_dec(x_56); -if (x_57 == 0) +lean_object* x_52; uint8_t x_53; +x_52 = lean_ctor_get(x_51, 0); +lean_inc(x_52); +x_53 = lean_unbox(x_52); +lean_dec(x_52); +if (x_53 == 0) { -uint8_t x_58; +uint8_t x_54; lean_dec(x_17); lean_dec(x_13); lean_dec(x_8); @@ -9073,82 +9038,114 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_58 = !lean_is_exclusive(x_55); -if (x_58 == 0) +x_54 = !lean_is_exclusive(x_51); +if (x_54 == 0) { -lean_object* x_59; uint8_t x_60; lean_object* x_61; -x_59 = lean_ctor_get(x_55, 0); -lean_dec(x_59); -x_60 = 0; -x_61 = lean_box(x_60); -lean_ctor_set(x_55, 0, x_61); -return x_55; +lean_object* x_55; uint8_t x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_51, 0); +lean_dec(x_55); +x_56 = 0; +x_57 = lean_box(x_56); +lean_ctor_set(x_51, 0, x_57); +return x_51; } else { -lean_object* x_62; uint8_t x_63; lean_object* x_64; lean_object* x_65; -x_62 = lean_ctor_get(x_55, 1); +lean_object* x_58; uint8_t x_59; lean_object* x_60; lean_object* x_61; +x_58 = lean_ctor_get(x_51, 1); +lean_inc(x_58); +lean_dec(x_51); +x_59 = 0; +x_60 = lean_box(x_59); +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_60); +lean_ctor_set(x_61, 1, x_58); +return x_61; +} +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_51, 1); lean_inc(x_62); -lean_dec(x_55); -x_63 = 0; -x_64 = lean_box(x_63); -x_65 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_65, 0, x_64); -lean_ctor_set(x_65, 1, x_62); -return x_65; -} -} -else -{ -lean_object* x_66; lean_object* x_67; -x_66 = lean_ctor_get(x_55, 1); -lean_inc(x_66); -lean_dec(x_55); +lean_dec(x_51); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); -x_67 = l_Lean_Meta_isClass_x3f(x_17, x_5, x_6, x_7, x_8, x_66); -if (lean_obj_tag(x_67) == 0) +x_63 = l_Lean_Meta_isClass_x3f(x_17, x_5, x_6, x_7, x_8, x_62); +x_64 = lean_ctor_get(x_63, 0); +lean_inc(x_64); +if (lean_obj_tag(x_64) == 0) { -lean_object* x_68; -x_68 = lean_ctor_get(x_67, 0); -lean_inc(x_68); -if (lean_obj_tag(x_68) == 0) -{ -lean_object* x_69; lean_object* x_70; lean_object* x_71; +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_dec(x_13); -x_69 = lean_ctor_get(x_67, 1); -lean_inc(x_69); -lean_dec(x_67); -x_70 = lean_unsigned_to_nat(1u); -x_71 = lean_nat_add(x_4, x_70); +x_65 = lean_ctor_get(x_63, 1); +lean_inc(x_65); +lean_dec(x_63); +x_66 = lean_unsigned_to_nat(1u); +x_67 = lean_nat_add(x_4, x_66); lean_dec(x_4); -x_4 = x_71; -x_9 = x_69; +x_4 = x_67; +x_9 = x_65; goto _start; } 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; -x_73 = lean_ctor_get(x_67, 1); -lean_inc(x_73); -lean_dec(x_67); -x_74 = lean_ctor_get(x_68, 0); -lean_inc(x_74); -lean_dec(x_68); -x_75 = lean_unsigned_to_nat(1u); -x_76 = lean_nat_add(x_4, x_75); +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_69 = lean_ctor_get(x_63, 1); +lean_inc(x_69); +lean_dec(x_63); +x_70 = lean_ctor_get(x_64, 0); +lean_inc(x_70); +lean_dec(x_64); +x_71 = lean_unsigned_to_nat(1u); +x_72 = lean_nat_add(x_4, x_71); lean_dec(x_4); -x_77 = lean_alloc_closure((void*)(l_Lean_Meta_isDefEqBindingDomain_loop), 9, 4); -lean_closure_set(x_77, 0, x_1); -lean_closure_set(x_77, 1, x_2); -lean_closure_set(x_77, 2, x_3); -lean_closure_set(x_77, 3, x_76); -x_78 = l_Lean_Meta_withNewLocalInstance___at___private_Lean_Meta_Basic_0__Lean_Meta_withNewLocalInstancesImp___spec__1___rarg(x_74, x_13, x_77, x_5, x_6, x_7, x_8, x_73); +x_73 = lean_alloc_closure((void*)(l_Lean_Meta_isDefEqBindingDomain_loop), 9, 4); +lean_closure_set(x_73, 0, x_1); +lean_closure_set(x_73, 1, x_2); +lean_closure_set(x_73, 2, x_3); +lean_closure_set(x_73, 3, x_72); +x_74 = l_Lean_Meta_withNewLocalInstance___at___private_Lean_Meta_Basic_0__Lean_Meta_withNewLocalInstancesImp___spec__1___rarg(x_70, x_13, x_73, x_5, x_6, x_7, x_8, x_69); +return x_74; +} +} +} +else +{ +uint8_t x_75; +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_75 = !lean_is_exclusive(x_51); +if (x_75 == 0) +{ +return x_51; +} +else +{ +lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_76 = lean_ctor_get(x_51, 0); +x_77 = lean_ctor_get(x_51, 1); +lean_inc(x_77); +lean_inc(x_76); +lean_dec(x_51); +x_78 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_78, 0, x_76); +lean_ctor_set(x_78, 1, x_77); return x_78; } } +} +} else { uint8_t x_79; @@ -9161,90 +9158,23 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_79 = !lean_is_exclusive(x_67); +x_79 = !lean_is_exclusive(x_14); if (x_79 == 0) { -return x_67; -} -else -{ -lean_object* x_80; lean_object* x_81; lean_object* x_82; -x_80 = lean_ctor_get(x_67, 0); -x_81 = lean_ctor_get(x_67, 1); -lean_inc(x_81); -lean_inc(x_80); -lean_dec(x_67); -x_82 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_82, 0, x_80); -lean_ctor_set(x_82, 1, x_81); -return x_82; -} -} -} -} -else -{ -uint8_t x_83; -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_83 = !lean_is_exclusive(x_55); -if (x_83 == 0) -{ -return x_55; -} -else -{ -lean_object* x_84; lean_object* x_85; lean_object* x_86; -x_84 = lean_ctor_get(x_55, 0); -x_85 = lean_ctor_get(x_55, 1); -lean_inc(x_85); -lean_inc(x_84); -lean_dec(x_55); -x_86 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_86, 0, x_84); -lean_ctor_set(x_86, 1, x_85); -return x_86; -} -} -} -} -else -{ -uint8_t x_87; -lean_dec(x_13); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_87 = !lean_is_exclusive(x_14); -if (x_87 == 0) -{ return x_14; } else { -lean_object* x_88; lean_object* x_89; lean_object* x_90; -x_88 = lean_ctor_get(x_14, 0); -x_89 = lean_ctor_get(x_14, 1); -lean_inc(x_89); -lean_inc(x_88); +lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_80 = lean_ctor_get(x_14, 0); +x_81 = lean_ctor_get(x_14, 1); +lean_inc(x_81); +lean_inc(x_80); lean_dec(x_14); -x_90 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_90, 0, x_88); -lean_ctor_set(x_90, 1, x_89); -return x_90; +x_82 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_82, 0, x_80); +lean_ctor_set(x_82, 1, x_81); +return x_82; } } } diff --git a/stage0/stdlib/Lean/Meta/FunInfo.c b/stage0/stdlib/Lean/Meta/FunInfo.c index ca91b08318..e47261277d 100644 --- a/stage0/stdlib/Lean/Meta/FunInfo.c +++ b/stage0/stdlib/Lean/Meta/FunInfo.c @@ -5488,7 +5488,7 @@ x_16 = lean_unsigned_to_nat(0u); x_17 = lean_nat_dec_eq(x_5, 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_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_131; +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_127; x_18 = lean_unsigned_to_nat(1u); x_19 = lean_nat_sub(x_5, x_18); lean_dec(x_5); @@ -5504,21 +5504,21 @@ if (lean_is_exclusive(x_9)) { lean_dec_ref(x_9); x_28 = lean_box(0); } -x_131 = lean_nat_dec_lt(x_6, x_4); -if (x_131 == 0) +x_127 = lean_nat_dec_lt(x_6, x_4); +if (x_127 == 0) { -lean_object* x_132; lean_object* x_133; -x_132 = l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__3___closed__4; -x_133 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_132); -x_29 = x_133; -goto block_130; +lean_object* x_128; lean_object* x_129; +x_128 = l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__3___closed__4; +x_129 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_128); +x_29 = x_129; +goto block_126; } else { -lean_object* x_134; -x_134 = lean_array_fget(x_2, x_6); -x_29 = x_134; -goto block_130; +lean_object* x_130; +x_130 = lean_array_fget(x_2, x_6); +x_29 = x_130; +goto block_126; } block_25: { @@ -5534,14 +5534,14 @@ x_9 = x_22; x_14 = x_21; goto _start; } -block_130: +block_126: { lean_object* x_30; lean_inc(x_10); x_30 = l_Lean_Meta_getFVarLocalDecl(x_29, x_10, x_11, x_12, x_13, x_14); if (lean_obj_tag(x_30) == 0) { -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; uint8_t x_37; lean_object* x_38; lean_object* x_99; +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; uint8_t x_37; lean_object* x_38; lean_object* x_95; x_31 = lean_ctor_get(x_30, 0); lean_inc(x_31); x_32 = lean_ctor_get(x_30, 1); @@ -5558,144 +5558,144 @@ lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_33); -x_99 = l_Lean_Meta_isProp(x_33, x_10, x_11, x_12, x_13, x_32); +x_95 = l_Lean_Meta_isProp(x_33, x_10, x_11, x_12, x_13, x_32); if (lean_obj_tag(x_26) == 0) { -if (lean_obj_tag(x_99) == 0) +if (lean_obj_tag(x_95) == 0) { -lean_object* x_100; lean_object* x_101; uint8_t x_102; uint8_t x_103; -x_100 = lean_ctor_get(x_99, 0); -lean_inc(x_100); -x_101 = lean_ctor_get(x_99, 1); +lean_object* x_96; lean_object* x_97; uint8_t x_98; uint8_t x_99; +x_96 = lean_ctor_get(x_95, 0); +lean_inc(x_96); +x_97 = lean_ctor_get(x_95, 1); +lean_inc(x_97); +lean_dec(x_95); +x_98 = 0; +x_99 = lean_unbox(x_96); +lean_dec(x_96); +x_36 = x_98; +x_37 = x_99; +x_38 = x_97; +goto block_94; +} +else +{ +uint8_t x_100; +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_33); +lean_dec(x_31); +lean_dec(x_28); +lean_dec(x_19); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_6); +lean_dec(x_2); +x_100 = !lean_is_exclusive(x_95); +if (x_100 == 0) +{ +return x_95; +} +else +{ +lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_101 = lean_ctor_get(x_95, 0); +x_102 = lean_ctor_get(x_95, 1); +lean_inc(x_102); lean_inc(x_101); -lean_dec(x_99); -x_102 = 0; -x_103 = lean_unbox(x_100); -lean_dec(x_100); -x_36 = x_102; -x_37 = x_103; -x_38 = x_101; -goto block_98; -} -else -{ -uint8_t x_104; -lean_dec(x_35); -lean_dec(x_34); -lean_dec(x_33); -lean_dec(x_31); -lean_dec(x_28); -lean_dec(x_19); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_6); -lean_dec(x_2); -x_104 = !lean_is_exclusive(x_99); -if (x_104 == 0) -{ -return x_99; -} -else -{ -lean_object* x_105; lean_object* x_106; lean_object* x_107; -x_105 = lean_ctor_get(x_99, 0); -x_106 = lean_ctor_get(x_99, 1); -lean_inc(x_106); -lean_inc(x_105); -lean_dec(x_99); -x_107 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_107, 0, x_105); -lean_ctor_set(x_107, 1, x_106); -return x_107; +lean_dec(x_95); +x_103 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_103, 0, x_101); +lean_ctor_set(x_103, 1, x_102); +return x_103; } } } else { -lean_object* x_108; lean_object* x_109; +lean_object* x_104; lean_object* x_105; lean_inc(x_26); -x_108 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__6___lambda__2___boxed), 2, 1); -lean_closure_set(x_108, 0, x_26); +x_104 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__6___lambda__2___boxed), 2, 1); +lean_closure_set(x_104, 0, x_26); lean_inc(x_33); -x_109 = l_Lean_Expr_FindImpl_findUnsafe_x3f(x_108, x_33); -if (lean_obj_tag(x_109) == 0) +x_105 = l_Lean_Expr_FindImpl_findUnsafe_x3f(x_104, x_33); +if (lean_obj_tag(x_105) == 0) { -if (lean_obj_tag(x_99) == 0) +if (lean_obj_tag(x_95) == 0) { -lean_object* x_110; lean_object* x_111; uint8_t x_112; uint8_t x_113; -x_110 = lean_ctor_get(x_99, 0); -lean_inc(x_110); -x_111 = lean_ctor_get(x_99, 1); +lean_object* x_106; lean_object* x_107; uint8_t x_108; uint8_t x_109; +x_106 = lean_ctor_get(x_95, 0); +lean_inc(x_106); +x_107 = lean_ctor_get(x_95, 1); +lean_inc(x_107); +lean_dec(x_95); +x_108 = 0; +x_109 = lean_unbox(x_106); +lean_dec(x_106); +x_36 = x_108; +x_37 = x_109; +x_38 = x_107; +goto block_94; +} +else +{ +uint8_t x_110; +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_33); +lean_dec(x_31); +lean_dec(x_28); +lean_dec(x_26); +lean_dec(x_19); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_6); +lean_dec(x_2); +x_110 = !lean_is_exclusive(x_95); +if (x_110 == 0) +{ +return x_95; +} +else +{ +lean_object* x_111; lean_object* x_112; lean_object* x_113; +x_111 = lean_ctor_get(x_95, 0); +x_112 = lean_ctor_get(x_95, 1); +lean_inc(x_112); lean_inc(x_111); -lean_dec(x_99); -x_112 = 0; -x_113 = lean_unbox(x_110); -lean_dec(x_110); -x_36 = x_112; -x_37 = x_113; -x_38 = x_111; -goto block_98; +lean_dec(x_95); +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; +} +} } else { -uint8_t x_114; -lean_dec(x_35); -lean_dec(x_34); -lean_dec(x_33); -lean_dec(x_31); -lean_dec(x_28); -lean_dec(x_26); -lean_dec(x_19); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_6); -lean_dec(x_2); -x_114 = !lean_is_exclusive(x_99); -if (x_114 == 0) +lean_dec(x_105); +if (lean_obj_tag(x_95) == 0) { -return x_99; -} -else -{ -lean_object* x_115; lean_object* x_116; lean_object* x_117; -x_115 = lean_ctor_get(x_99, 0); -x_116 = lean_ctor_get(x_99, 1); -lean_inc(x_116); +lean_object* x_114; lean_object* x_115; uint8_t x_116; uint8_t x_117; +x_114 = lean_ctor_get(x_95, 0); +lean_inc(x_114); +x_115 = lean_ctor_get(x_95, 1); lean_inc(x_115); -lean_dec(x_99); -x_117 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_117, 0, x_115); -lean_ctor_set(x_117, 1, x_116); -return x_117; -} -} +lean_dec(x_95); +x_116 = 1; +x_117 = lean_unbox(x_114); +lean_dec(x_114); +x_36 = x_116; +x_37 = x_117; +x_38 = x_115; +goto block_94; } else { -lean_dec(x_109); -if (lean_obj_tag(x_99) == 0) -{ -lean_object* x_118; lean_object* x_119; uint8_t x_120; uint8_t x_121; -x_118 = lean_ctor_get(x_99, 0); -lean_inc(x_118); -x_119 = lean_ctor_get(x_99, 1); -lean_inc(x_119); -lean_dec(x_99); -x_120 = 1; -x_121 = lean_unbox(x_118); -lean_dec(x_118); -x_36 = x_120; -x_37 = x_121; -x_38 = x_119; -goto block_98; -} -else -{ -uint8_t x_122; +uint8_t x_118; lean_dec(x_35); lean_dec(x_34); lean_dec(x_33); @@ -5709,28 +5709,28 @@ lean_dec(x_11); lean_dec(x_10); lean_dec(x_6); lean_dec(x_2); -x_122 = !lean_is_exclusive(x_99); -if (x_122 == 0) +x_118 = !lean_is_exclusive(x_95); +if (x_118 == 0) { -return x_99; +return x_95; } else { -lean_object* x_123; lean_object* x_124; lean_object* x_125; -x_123 = lean_ctor_get(x_99, 0); -x_124 = lean_ctor_get(x_99, 1); -lean_inc(x_124); -lean_inc(x_123); -lean_dec(x_99); -x_125 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_125, 0, x_123); -lean_ctor_set(x_125, 1, x_124); -return x_125; +lean_object* x_119; lean_object* x_120; lean_object* x_121; +x_119 = lean_ctor_get(x_95, 0); +x_120 = lean_ctor_get(x_95, 1); +lean_inc(x_120); +lean_inc(x_119); +lean_dec(x_95); +x_121 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_121, 0, x_119); +lean_ctor_set(x_121, 1, x_120); +return x_121; } } } } -block_98: +block_94: { lean_object* x_39; lean_object* x_40; x_39 = l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__6___closed__1; @@ -5783,16 +5783,13 @@ goto block_25; } else { -lean_object* x_52; +lean_object* x_52; lean_object* x_53; lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_33); x_52 = l_Lean_Meta_isClass_x3f(x_33, x_10, x_11, x_12, x_13, x_42); -if (lean_obj_tag(x_52) == 0) -{ -lean_object* x_53; x_53 = lean_ctor_get(x_52, 0); lean_inc(x_53); if (lean_obj_tag(x_53) == 0) @@ -5972,44 +5969,10 @@ goto block_25; } } } +} else { uint8_t x_90; -lean_dec(x_47); -lean_dec(x_33); -lean_dec(x_28); -lean_dec(x_26); -lean_dec(x_19); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_6); -lean_dec(x_2); -x_90 = !lean_is_exclusive(x_52); -if (x_90 == 0) -{ -return x_52; -} -else -{ -lean_object* x_91; lean_object* x_92; lean_object* x_93; -x_91 = lean_ctor_get(x_52, 0); -x_92 = lean_ctor_get(x_52, 1); -lean_inc(x_92); -lean_inc(x_91); -lean_dec(x_52); -x_93 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_93, 0, x_91); -lean_ctor_set(x_93, 1, x_92); -return x_93; -} -} -} -} -else -{ -uint8_t x_94; lean_dec(x_35); lean_dec(x_34); lean_dec(x_33); @@ -6023,30 +5986,30 @@ lean_dec(x_11); lean_dec(x_10); lean_dec(x_6); lean_dec(x_2); -x_94 = !lean_is_exclusive(x_40); -if (x_94 == 0) +x_90 = !lean_is_exclusive(x_40); +if (x_90 == 0) { return x_40; } else { -lean_object* x_95; lean_object* x_96; lean_object* x_97; -x_95 = lean_ctor_get(x_40, 0); -x_96 = lean_ctor_get(x_40, 1); -lean_inc(x_96); -lean_inc(x_95); +lean_object* x_91; lean_object* x_92; lean_object* x_93; +x_91 = lean_ctor_get(x_40, 0); +x_92 = lean_ctor_get(x_40, 1); +lean_inc(x_92); +lean_inc(x_91); lean_dec(x_40); -x_97 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_97, 0, x_95); -lean_ctor_set(x_97, 1, x_96); -return x_97; +x_93 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_93, 0, x_91); +lean_ctor_set(x_93, 1, x_92); +return x_93; } } } } else { -uint8_t x_126; +uint8_t x_122; lean_dec(x_28); lean_dec(x_27); lean_dec(x_26); @@ -6057,30 +6020,30 @@ lean_dec(x_11); lean_dec(x_10); lean_dec(x_6); lean_dec(x_2); -x_126 = !lean_is_exclusive(x_30); -if (x_126 == 0) +x_122 = !lean_is_exclusive(x_30); +if (x_122 == 0) { return x_30; } else { -lean_object* x_127; lean_object* x_128; lean_object* x_129; -x_127 = lean_ctor_get(x_30, 0); -x_128 = lean_ctor_get(x_30, 1); -lean_inc(x_128); -lean_inc(x_127); +lean_object* x_123; lean_object* x_124; lean_object* x_125; +x_123 = lean_ctor_get(x_30, 0); +x_124 = lean_ctor_get(x_30, 1); +lean_inc(x_124); +lean_inc(x_123); lean_dec(x_30); -x_129 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_129, 0, x_127); -lean_ctor_set(x_129, 1, x_128); -return x_129; +x_125 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_125, 0, x_123); +lean_ctor_set(x_125, 1, x_124); +return x_125; } } } } else { -lean_object* x_135; +lean_object* x_131; lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -6088,15 +6051,15 @@ lean_dec(x_10); lean_dec(x_6); lean_dec(x_5); lean_dec(x_2); -x_135 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_135, 0, x_9); -lean_ctor_set(x_135, 1, x_14); -return x_135; +x_131 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_131, 0, x_9); +lean_ctor_set(x_131, 1, x_14); +return x_131; } } else { -lean_object* x_136; +lean_object* x_132; lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -6104,10 +6067,10 @@ lean_dec(x_10); lean_dec(x_6); lean_dec(x_5); lean_dec(x_2); -x_136 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_136, 0, x_9); -lean_ctor_set(x_136, 1, x_14); -return x_136; +x_132 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_132, 0, x_9); +lean_ctor_set(x_132, 1, x_14); +return x_132; } } } @@ -6123,7 +6086,7 @@ x_15 = lean_unsigned_to_nat(0u); x_16 = lean_nat_dec_eq(x_4, x_15); if (x_16 == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_130; +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_126; x_17 = lean_unsigned_to_nat(1u); x_18 = lean_nat_sub(x_4, x_17); lean_dec(x_4); @@ -6139,21 +6102,21 @@ if (lean_is_exclusive(x_8)) { lean_dec_ref(x_8); x_27 = lean_box(0); } -x_130 = lean_nat_dec_lt(x_5, x_3); -if (x_130 == 0) +x_126 = lean_nat_dec_lt(x_5, x_3); +if (x_126 == 0) { -lean_object* x_131; lean_object* x_132; -x_131 = l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__3___closed__4; -x_132 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_131); -x_28 = x_132; -goto block_129; +lean_object* x_127; lean_object* x_128; +x_127 = l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__3___closed__4; +x_128 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_127); +x_28 = x_128; +goto block_125; } else { -lean_object* x_133; -x_133 = lean_array_fget(x_2, x_5); -x_28 = x_133; -goto block_129; +lean_object* x_129; +x_129 = lean_array_fget(x_2, x_5); +x_28 = x_129; +goto block_125; } block_24: { @@ -6169,14 +6132,14 @@ x_8 = x_21; x_13 = x_20; goto _start; } -block_129: +block_125: { lean_object* x_29; lean_inc(x_9); x_29 = l_Lean_Meta_getFVarLocalDecl(x_28, x_9, x_10, x_11, x_12, x_13); if (lean_obj_tag(x_29) == 0) { -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; uint8_t x_36; lean_object* x_37; lean_object* x_98; +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; uint8_t x_36; lean_object* x_37; lean_object* x_94; x_30 = lean_ctor_get(x_29, 0); lean_inc(x_30); x_31 = lean_ctor_get(x_29, 1); @@ -6193,144 +6156,144 @@ lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_32); -x_98 = l_Lean_Meta_isProp(x_32, x_9, x_10, x_11, x_12, x_31); +x_94 = l_Lean_Meta_isProp(x_32, x_9, x_10, x_11, x_12, x_31); if (lean_obj_tag(x_25) == 0) { -if (lean_obj_tag(x_98) == 0) +if (lean_obj_tag(x_94) == 0) { -lean_object* x_99; lean_object* x_100; uint8_t x_101; uint8_t x_102; -x_99 = lean_ctor_get(x_98, 0); -lean_inc(x_99); -x_100 = lean_ctor_get(x_98, 1); +lean_object* x_95; lean_object* x_96; uint8_t x_97; uint8_t x_98; +x_95 = lean_ctor_get(x_94, 0); +lean_inc(x_95); +x_96 = lean_ctor_get(x_94, 1); +lean_inc(x_96); +lean_dec(x_94); +x_97 = 0; +x_98 = lean_unbox(x_95); +lean_dec(x_95); +x_35 = x_97; +x_36 = x_98; +x_37 = x_96; +goto block_93; +} +else +{ +uint8_t x_99; +lean_dec(x_34); +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_30); +lean_dec(x_27); +lean_dec(x_18); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_2); +x_99 = !lean_is_exclusive(x_94); +if (x_99 == 0) +{ +return x_94; +} +else +{ +lean_object* x_100; lean_object* x_101; lean_object* x_102; +x_100 = lean_ctor_get(x_94, 0); +x_101 = lean_ctor_get(x_94, 1); +lean_inc(x_101); lean_inc(x_100); -lean_dec(x_98); -x_101 = 0; -x_102 = lean_unbox(x_99); -lean_dec(x_99); -x_35 = x_101; -x_36 = x_102; -x_37 = x_100; -goto block_97; -} -else -{ -uint8_t x_103; -lean_dec(x_34); -lean_dec(x_33); -lean_dec(x_32); -lean_dec(x_30); -lean_dec(x_27); -lean_dec(x_18); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -x_103 = !lean_is_exclusive(x_98); -if (x_103 == 0) -{ -return x_98; -} -else -{ -lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_104 = lean_ctor_get(x_98, 0); -x_105 = lean_ctor_get(x_98, 1); -lean_inc(x_105); -lean_inc(x_104); -lean_dec(x_98); -x_106 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_106, 0, x_104); -lean_ctor_set(x_106, 1, x_105); -return x_106; +lean_dec(x_94); +x_102 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_102, 0, x_100); +lean_ctor_set(x_102, 1, x_101); +return x_102; } } } else { -lean_object* x_107; lean_object* x_108; +lean_object* x_103; lean_object* x_104; lean_inc(x_25); -x_107 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__6___lambda__2___boxed), 2, 1); -lean_closure_set(x_107, 0, x_25); +x_103 = lean_alloc_closure((void*)(l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__6___lambda__2___boxed), 2, 1); +lean_closure_set(x_103, 0, x_25); lean_inc(x_32); -x_108 = l_Lean_Expr_FindImpl_findUnsafe_x3f(x_107, x_32); -if (lean_obj_tag(x_108) == 0) +x_104 = l_Lean_Expr_FindImpl_findUnsafe_x3f(x_103, x_32); +if (lean_obj_tag(x_104) == 0) { -if (lean_obj_tag(x_98) == 0) +if (lean_obj_tag(x_94) == 0) { -lean_object* x_109; lean_object* x_110; uint8_t x_111; uint8_t x_112; -x_109 = lean_ctor_get(x_98, 0); -lean_inc(x_109); -x_110 = lean_ctor_get(x_98, 1); +lean_object* x_105; lean_object* x_106; uint8_t x_107; uint8_t x_108; +x_105 = lean_ctor_get(x_94, 0); +lean_inc(x_105); +x_106 = lean_ctor_get(x_94, 1); +lean_inc(x_106); +lean_dec(x_94); +x_107 = 0; +x_108 = lean_unbox(x_105); +lean_dec(x_105); +x_35 = x_107; +x_36 = x_108; +x_37 = x_106; +goto block_93; +} +else +{ +uint8_t x_109; +lean_dec(x_34); +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_30); +lean_dec(x_27); +lean_dec(x_25); +lean_dec(x_18); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_2); +x_109 = !lean_is_exclusive(x_94); +if (x_109 == 0) +{ +return x_94; +} +else +{ +lean_object* x_110; lean_object* x_111; lean_object* x_112; +x_110 = lean_ctor_get(x_94, 0); +x_111 = lean_ctor_get(x_94, 1); +lean_inc(x_111); lean_inc(x_110); -lean_dec(x_98); -x_111 = 0; -x_112 = lean_unbox(x_109); -lean_dec(x_109); -x_35 = x_111; -x_36 = x_112; -x_37 = x_110; -goto block_97; +lean_dec(x_94); +x_112 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_112, 0, x_110); +lean_ctor_set(x_112, 1, x_111); +return x_112; +} +} } else { -uint8_t x_113; -lean_dec(x_34); -lean_dec(x_33); -lean_dec(x_32); -lean_dec(x_30); -lean_dec(x_27); -lean_dec(x_25); -lean_dec(x_18); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -x_113 = !lean_is_exclusive(x_98); -if (x_113 == 0) +lean_dec(x_104); +if (lean_obj_tag(x_94) == 0) { -return x_98; -} -else -{ -lean_object* x_114; lean_object* x_115; lean_object* x_116; -x_114 = lean_ctor_get(x_98, 0); -x_115 = lean_ctor_get(x_98, 1); -lean_inc(x_115); +lean_object* x_113; lean_object* x_114; uint8_t x_115; uint8_t x_116; +x_113 = lean_ctor_get(x_94, 0); +lean_inc(x_113); +x_114 = lean_ctor_get(x_94, 1); lean_inc(x_114); -lean_dec(x_98); -x_116 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_116, 0, x_114); -lean_ctor_set(x_116, 1, x_115); -return x_116; -} -} +lean_dec(x_94); +x_115 = 1; +x_116 = lean_unbox(x_113); +lean_dec(x_113); +x_35 = x_115; +x_36 = x_116; +x_37 = x_114; +goto block_93; } else { -lean_dec(x_108); -if (lean_obj_tag(x_98) == 0) -{ -lean_object* x_117; lean_object* x_118; uint8_t x_119; uint8_t x_120; -x_117 = lean_ctor_get(x_98, 0); -lean_inc(x_117); -x_118 = lean_ctor_get(x_98, 1); -lean_inc(x_118); -lean_dec(x_98); -x_119 = 1; -x_120 = lean_unbox(x_117); -lean_dec(x_117); -x_35 = x_119; -x_36 = x_120; -x_37 = x_118; -goto block_97; -} -else -{ -uint8_t x_121; +uint8_t x_117; lean_dec(x_34); lean_dec(x_33); lean_dec(x_32); @@ -6344,28 +6307,28 @@ lean_dec(x_10); lean_dec(x_9); lean_dec(x_5); lean_dec(x_2); -x_121 = !lean_is_exclusive(x_98); -if (x_121 == 0) +x_117 = !lean_is_exclusive(x_94); +if (x_117 == 0) { -return x_98; +return x_94; } else { -lean_object* x_122; lean_object* x_123; lean_object* x_124; -x_122 = lean_ctor_get(x_98, 0); -x_123 = lean_ctor_get(x_98, 1); -lean_inc(x_123); -lean_inc(x_122); -lean_dec(x_98); -x_124 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_124, 0, x_122); -lean_ctor_set(x_124, 1, x_123); -return x_124; +lean_object* x_118; lean_object* x_119; lean_object* x_120; +x_118 = lean_ctor_get(x_94, 0); +x_119 = lean_ctor_get(x_94, 1); +lean_inc(x_119); +lean_inc(x_118); +lean_dec(x_94); +x_120 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_120, 0, x_118); +lean_ctor_set(x_120, 1, x_119); +return x_120; } } } } -block_97: +block_93: { lean_object* x_38; lean_object* x_39; x_38 = l_Std_Range_forIn_loop___at___private_Lean_Meta_FunInfo_0__Lean_Meta_getFunInfoAux___spec__6___closed__1; @@ -6418,16 +6381,13 @@ goto block_24; } else { -lean_object* x_51; +lean_object* x_51; lean_object* x_52; lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_32); x_51 = l_Lean_Meta_isClass_x3f(x_32, x_9, x_10, x_11, x_12, x_41); -if (lean_obj_tag(x_51) == 0) -{ -lean_object* x_52; x_52 = lean_ctor_get(x_51, 0); lean_inc(x_52); if (lean_obj_tag(x_52) == 0) @@ -6607,44 +6567,10 @@ goto block_24; } } } +} else { uint8_t x_89; -lean_dec(x_46); -lean_dec(x_32); -lean_dec(x_27); -lean_dec(x_25); -lean_dec(x_18); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_2); -x_89 = !lean_is_exclusive(x_51); -if (x_89 == 0) -{ -return x_51; -} -else -{ -lean_object* x_90; lean_object* x_91; lean_object* x_92; -x_90 = lean_ctor_get(x_51, 0); -x_91 = lean_ctor_get(x_51, 1); -lean_inc(x_91); -lean_inc(x_90); -lean_dec(x_51); -x_92 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_92, 0, x_90); -lean_ctor_set(x_92, 1, x_91); -return x_92; -} -} -} -} -else -{ -uint8_t x_93; lean_dec(x_34); lean_dec(x_33); lean_dec(x_32); @@ -6658,30 +6584,30 @@ lean_dec(x_10); lean_dec(x_9); lean_dec(x_5); lean_dec(x_2); -x_93 = !lean_is_exclusive(x_39); -if (x_93 == 0) +x_89 = !lean_is_exclusive(x_39); +if (x_89 == 0) { return x_39; } else { -lean_object* x_94; lean_object* x_95; lean_object* x_96; -x_94 = lean_ctor_get(x_39, 0); -x_95 = lean_ctor_get(x_39, 1); -lean_inc(x_95); -lean_inc(x_94); +lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_90 = lean_ctor_get(x_39, 0); +x_91 = lean_ctor_get(x_39, 1); +lean_inc(x_91); +lean_inc(x_90); lean_dec(x_39); -x_96 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_96, 0, x_94); -lean_ctor_set(x_96, 1, x_95); -return x_96; +x_92 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_92, 0, x_90); +lean_ctor_set(x_92, 1, x_91); +return x_92; } } } } else { -uint8_t x_125; +uint8_t x_121; lean_dec(x_27); lean_dec(x_26); lean_dec(x_25); @@ -6692,30 +6618,30 @@ lean_dec(x_10); lean_dec(x_9); lean_dec(x_5); lean_dec(x_2); -x_125 = !lean_is_exclusive(x_29); -if (x_125 == 0) +x_121 = !lean_is_exclusive(x_29); +if (x_121 == 0) { return x_29; } else { -lean_object* x_126; lean_object* x_127; lean_object* x_128; -x_126 = lean_ctor_get(x_29, 0); -x_127 = lean_ctor_get(x_29, 1); -lean_inc(x_127); -lean_inc(x_126); +lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_122 = lean_ctor_get(x_29, 0); +x_123 = lean_ctor_get(x_29, 1); +lean_inc(x_123); +lean_inc(x_122); lean_dec(x_29); -x_128 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_128, 0, x_126); -lean_ctor_set(x_128, 1, x_127); -return x_128; +x_124 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_124, 0, x_122); +lean_ctor_set(x_124, 1, x_123); +return x_124; } } } } else { -lean_object* x_134; +lean_object* x_130; lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); @@ -6723,15 +6649,15 @@ lean_dec(x_9); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); -x_134 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_134, 0, x_8); -lean_ctor_set(x_134, 1, x_13); -return x_134; +x_130 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_130, 0, x_8); +lean_ctor_set(x_130, 1, x_13); +return x_130; } } else { -lean_object* x_135; +lean_object* x_131; lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); @@ -6739,10 +6665,10 @@ lean_dec(x_9); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); -x_135 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_135, 0, x_8); -lean_ctor_set(x_135, 1, x_13); -return x_135; +x_131 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_131, 0, x_8); +lean_ctor_set(x_131, 1, x_13); +return x_131; } } } diff --git a/stage0/stdlib/Lean/Meta/IndPredBelow.c b/stage0/stdlib/Lean/Meta/IndPredBelow.c index 2a7f9a7f17..966de21b2f 100644 --- a/stage0/stdlib/Lean/Meta/IndPredBelow.c +++ b/stage0/stdlib/Lean/Meta/IndPredBelow.c @@ -396,7 +396,6 @@ LEAN_EXPORT lean_object* l_Lean_Meta_IndPredBelow_mkBelowMatcher_transformFields static lean_object* l_Array_mapIdxM_map___at_Lean_Meta_IndPredBelow_mkBelowMatcher___spec__3___lambda__1___closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_IndPredBelow_proveBrecOn_applyIH(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_IndPredBelow_maxBackwardChainingDepth; -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_IndPredBelow_mkCtorType_checkCount___spec__10(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_IndPredBelow_proveBrecOn_closeGoal___closed__12; static lean_object* l_Lean_Meta_IndPredBelow_instInhabitedVariables___closed__1; @@ -595,6 +594,7 @@ 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*); LEAN_EXPORT lean_object* l_Lean_Meta_IndPredBelow_mkCtorType_checkCount(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_IndPredBelow_mkCtorType_checkCount___spec__7___boxed(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_add_decl(lean_object*, lean_object*); static lean_object* _init_l_Lean_Meta_IndPredBelow_initFn____x40_Lean_Meta_IndPredBelow___hyg_7____closed__1() { _start: @@ -13634,7 +13634,7 @@ x_21 = lean_ctor_get(x_19, 1); lean_inc(x_21); lean_dec(x_19); x_22 = l_Lean_Meta_IndPredBelow_proveBrecOn___closed__2; -x_23 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_22, x_4, x_5, x_6, x_7, x_21); +x_23 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_22, x_4, x_5, x_6, x_7, x_21); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -13801,7 +13801,7 @@ x_51 = lean_ctor_get(x_19, 1); lean_inc(x_51); lean_dec(x_19); x_52 = l_Lean_Meta_IndPredBelow_proveBrecOn___closed__2; -x_53 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_52, x_4, x_5, x_6, x_7, x_51); +x_53 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_52, x_4, x_5, x_6, x_7, x_51); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); diff --git a/stage0/stdlib/Lean/Meta/InferType.c b/stage0/stdlib/Lean/Meta/InferType.c index 74355416c2..6693b3f9d3 100644 --- a/stage0/stdlib/Lean/Meta/InferType.c +++ b/stage0/stdlib/Lean/Meta/InferType.c @@ -54,6 +54,7 @@ LEAN_EXPORT lean_object* l_Std_PersistentHashMap_find_x3f___at___private_Lean_Me LEAN_EXPORT lean_object* l___private_Lean_Meta_InferType_0__Lean_Meta_inferProjType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_throwTypeExcepted___rarg___closed__1; static lean_object* l_Lean_Expr_instantiateBetaRevRange_visit___closed__12; +lean_object* l_Lean_FVarId_throwUnknown___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instantiateLevelMVars___at_Lean_Meta_normalizeLevel___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isBVar(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_throwFunctionExpected___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -179,7 +180,6 @@ size_t lean_ptr_addr(lean_object*); lean_object* l_Lean_Expr_const___override(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Expr_instantiateBetaRevRange_visit___spec__11(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_isTypeQuick(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_expr_equal(lean_object*, lean_object*); extern lean_object* l_Id_instMonadId; LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_InferType_0__Lean_Meta_inferProjType___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -188,7 +188,6 @@ uint8_t lean_usize_dec_le(size_t, size_t); LEAN_EXPORT lean_object* l___private_Lean_Meta_InferType_0__Lean_Meta_inferLambdaType___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_hasMVar(lean_object*); lean_object* l_Lean_Expr_betaRev(lean_object*, lean_object*, uint8_t, uint8_t); -lean_object* l_Lean_Meta_throwUnknownFVar___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkAppRev(lean_object*, lean_object*); static lean_object* l_Lean_Meta_throwIncorrectNumberOfLevels___rarg___closed__2; lean_object* l_Lean_Level_normalize(lean_object*); @@ -282,6 +281,7 @@ LEAN_EXPORT lean_object* l_Std_AssocList_contains___at_Lean_Expr_instantiateBeta lean_object* l_Std_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_InferType_0__Lean_Meta_withLocalDecl_x27___rarg___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_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_AssocList_find_x3f___at_Lean_Expr_instantiateBetaRevRange_visit___spec__2(lean_object* x_1, lean_object* x_2) { _start: { @@ -3332,7 +3332,7 @@ x_27 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_28 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_28, 0, x_26); lean_ctor_set(x_28, 1, x_27); -x_29 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_28, x_4, x_5, x_6, x_7, x_20); +x_29 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_28, x_4, x_5, x_6, x_7, x_20); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3376,7 +3376,7 @@ x_40 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_41 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_41, 0, x_39); lean_ctor_set(x_41, 1, x_40); -x_42 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_41, x_4, x_5, x_6, x_7, x_20); +x_42 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_41, x_4, x_5, x_6, x_7, x_20); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3404,7 +3404,7 @@ x_48 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_49 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_49, 0, x_47); lean_ctor_set(x_49, 1, x_48); -x_50 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_49, x_4, x_5, x_6, x_7, x_20); +x_50 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_49, x_4, x_5, x_6, x_7, x_20); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3468,7 +3468,7 @@ x_70 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_71 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_71, 0, x_69); lean_ctor_set(x_71, 1, x_70); -x_72 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_71, x_4, x_5, x_6, x_7, x_55); +x_72 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_71, x_4, x_5, x_6, x_7, x_55); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3581,7 +3581,7 @@ x_97 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_98 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_98, 0, x_96); lean_ctor_set(x_98, 1, x_97); -x_99 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_98, x_4, x_5, x_6, x_7, x_92); +x_99 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_98, x_4, x_5, x_6, x_7, x_92); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3700,7 +3700,7 @@ x_117 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_118 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_118, 0, x_116); lean_ctor_set(x_118, 1, x_117); -x_119 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_118, x_4, x_5, x_6, x_7, x_112); +x_119 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_118, x_4, x_5, x_6, x_7, x_112); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3759,7 +3759,7 @@ x_128 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_129 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_129, 0, x_127); lean_ctor_set(x_129, 1, x_128); -x_130 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_129, x_4, x_5, x_6, x_7, x_20); +x_130 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_129, x_4, x_5, x_6, x_7, x_20); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3785,7 +3785,7 @@ x_135 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_136 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_136, 0, x_134); lean_ctor_set(x_136, 1, x_135); -x_137 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_136, x_4, x_5, x_6, x_7, x_20); +x_137 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_136, x_4, x_5, x_6, x_7, x_20); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3809,7 +3809,7 @@ x_142 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_143 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_143, 0, x_141); lean_ctor_set(x_143, 1, x_142); -x_144 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_143, x_4, x_5, x_6, x_7, x_20); +x_144 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_143, x_4, x_5, x_6, x_7, x_20); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3833,7 +3833,7 @@ x_149 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_150 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_150, 0, x_148); lean_ctor_set(x_150, 1, x_149); -x_151 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_150, x_4, x_5, x_6, x_7, x_14); +x_151 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_150, x_4, x_5, x_6, x_7, x_14); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -5712,7 +5712,7 @@ x_8 = lean_local_ctx_find(x_7, x_1); if (lean_obj_tag(x_8) == 0) { lean_object* x_9; -x_9 = l_Lean_Meta_throwUnknownFVar___rarg(x_1, x_2, x_3, x_4, x_5, x_6); +x_9 = l_Lean_FVarId_throwUnknown___rarg(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_2); return x_9; } @@ -7199,7 +7199,7 @@ x_12 = l_Lean_Meta_throwFunctionExpected___rarg___closed__4; x_13 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); -x_14 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_13, x_2, x_3, x_4, x_5, x_6); +x_14 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_13, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); diff --git a/stage0/stdlib/Lean/Meta/Injective.c b/stage0/stdlib/Lean/Meta/Injective.c index ce15c7081e..5a3c98ba50 100644 --- a/stage0/stdlib/Lean/Meta/Injective.c +++ b/stage0/stdlib/Lean/Meta/Injective.c @@ -134,7 +134,6 @@ lean_object* l_Lean_Meta_substEqs(lean_object*, lean_object*, lean_object*, lean LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Injective___hyg_1785_(lean_object*); lean_object* l_Lean_Option_register___at_Std_Format_initFn____x40_Lean_Data_Format___hyg_58____spec__1(lean_object*, lean_object*, lean_object*); uint8_t lean_expr_eqv(lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_mkInjectiveTheoremNameFor___boxed(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Injective_0__Lean_Meta_mkInjectiveTheorem(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Injective___hyg_1785____closed__3; @@ -181,6 +180,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Injective_0__Lean_Meta_mkInjectiv LEAN_EXPORT lean_object* l___private_Lean_Meta_Injective_0__Lean_Meta_throwInjectiveTheoremFailure___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instInhabitedMetaM___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* _init_l_Subarray_forInUnsafe_loop___at___private_Lean_Meta_Injective_0__Lean_Meta_mkAnd_x3f___spec__1___closed__1() { _start: { @@ -3105,7 +3105,7 @@ x_22 = l___private_Lean_Meta_Injective_0__Lean_Meta_mkInjectiveTheoremTypeCore_x x_23 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_23, 0, x_21); lean_ctor_set(x_23, 1, x_22); -x_24 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_23, x_4, x_5, x_6, x_7, x_18); +x_24 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_23, x_4, x_5, x_6, x_7, x_18); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3136,7 +3136,7 @@ x_30 = l___private_Lean_Meta_Injective_0__Lean_Meta_mkInjectiveTheoremTypeCore_x x_31 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_31, 0, x_29); lean_ctor_set(x_31, 1, x_30); -x_32 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_31, x_4, x_5, x_6, x_7, x_26); +x_32 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_31, x_4, x_5, x_6, x_7, x_26); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3481,7 +3481,7 @@ x_94 = l___private_Lean_Meta_Injective_0__Lean_Meta_mkInjectiveTheoremTypeCore_x x_95 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_95, 0, x_93); lean_ctor_set(x_95, 1, x_94); -x_96 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_95, x_4, x_5, x_6, x_7, x_90); +x_96 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_95, x_4, x_5, x_6, x_7, x_90); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); diff --git a/stage0/stdlib/Lean/Meta/LevelDefEq.c b/stage0/stdlib/Lean/Meta/LevelDefEq.c index 3f477bdeee..446f96dbc7 100644 --- a/stage0/stdlib/Lean/Meta/LevelDefEq.c +++ b/stage0/stdlib/Lean/Meta/LevelDefEq.c @@ -69,7 +69,7 @@ LEAN_EXPORT uint8_t l___private_Lean_Meta_LevelDefEq_0__Lean_Meta_strictOccursMa static lean_object* l___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___closed__5; lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_instMonadMetaM; -lean_object* l_Lean_Meta_getLevelMVarDepth(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_LMVarId_isReadOnly(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_LevelDefEq_0__Lean_Meta_strictOccursMax_visit___boxed(lean_object*, lean_object*); static lean_object* l_panic___at_Lean_Meta_isLevelDefEqAuxImpl___spec__3___closed__1; static lean_object* l___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___closed__7; @@ -77,6 +77,7 @@ lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___privat lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___closed__3; extern uint8_t l_instInhabitedBool; +lean_object* l_Lean_LMVarId_getLevel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Level_normalize(lean_object*); uint8_t l_Bool_toLBool(uint8_t); static lean_object* l_Lean_isLevelMVarAssignable___at_Lean_Meta_isLevelDefEqAuxImpl___spec__2___closed__3; @@ -95,8 +96,7 @@ static lean_object* l___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLeve uint8_t l_Lean_Level_occurs(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_hasAssignableLevelMVar___at_Lean_Meta_isLevelDefEqAuxImpl___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_level_eq(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_LevelDefEq___hyg_1397_(lean_object*); -lean_object* l_Lean_Meta_isReadOnlyLevelMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_LevelDefEq___hyg_1394_(lean_object*); LEAN_EXPORT lean_object* l_panic___at___private_Lean_Meta_LevelDefEq_0__Lean_Meta_solveSelfMax___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getConfig(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_isLevelDefEqAuxImpl___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -666,7 +666,7 @@ lean_object* x_8; lean_object* x_9; x_8 = lean_ctor_get(x_1, 0); lean_inc(x_8); lean_dec(x_1); -x_9 = l_Lean_Meta_getLevelMVarDepth(x_8, x_3, x_4, x_5, x_6, x_7); +x_9 = l_Lean_LMVarId_getLevel(x_8, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_9) == 0) { lean_object* x_10; lean_object* x_11; lean_object* x_12; @@ -675,7 +675,7 @@ lean_inc(x_10); x_11 = lean_ctor_get(x_9, 1); lean_inc(x_11); lean_dec(x_9); -x_12 = l_Lean_Meta_getLevelMVarDepth(x_2, x_3, x_4, x_5, x_6, x_11); +x_12 = l_Lean_LMVarId_getLevel(x_2, x_3, x_4, x_5, x_6, x_11); if (lean_obj_tag(x_12) == 0) { uint8_t x_13; @@ -1393,7 +1393,7 @@ lean_object* x_146; lean_object* x_147; x_146 = lean_ctor_get(x_1, 0); lean_inc(x_146); lean_inc(x_146); -x_147 = l_Lean_Meta_isReadOnlyLevelMVar(x_146, x_3, x_4, x_5, x_6, x_7); +x_147 = l_Lean_LMVarId_isReadOnly(x_146, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_147) == 0) { lean_object* x_148; uint8_t x_149; @@ -4890,7 +4890,7 @@ lean_dec(x_4); return x_10; } } -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_LevelDefEq___hyg_1397_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_LevelDefEq___hyg_1394_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -5005,7 +5005,7 @@ l_Lean_Meta_isLevelDefEqAuxImpl___closed__1 = _init_l_Lean_Meta_isLevelDefEqAuxI lean_mark_persistent(l_Lean_Meta_isLevelDefEqAuxImpl___closed__1); l_Lean_Meta_isLevelDefEqAuxImpl___closed__2 = _init_l_Lean_Meta_isLevelDefEqAuxImpl___closed__2(); lean_mark_persistent(l_Lean_Meta_isLevelDefEqAuxImpl___closed__2); -res = l_Lean_Meta_initFn____x40_Lean_Meta_LevelDefEq___hyg_1397_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_LevelDefEq___hyg_1394_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/Match/Match.c b/stage0/stdlib/Lean/Meta/Match/Match.c index a5868a89a9..b918448f85 100644 --- a/stage0/stdlib/Lean/Meta/Match/Match.c +++ b/stage0/stdlib/Lean/Meta/Match/Match.c @@ -660,7 +660,6 @@ uint8_t lean_expr_eqv(lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Alt_toMessageData(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isValueTransition(lean_object*); LEAN_EXPORT lean_object* l_panic___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__1(lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__11___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_assignGoalOf___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__24___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -989,6 +988,7 @@ static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___ static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___closed__1; static lean_object* l_Lean_Meta_Match_withMkMatcherInput___rarg___lambda__1___closed__2; LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__4(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNumPatterns___spec__1(lean_object* x_1, uint8_t x_2, lean_object* x_3) { _start: { @@ -35630,7 +35630,7 @@ x_14 = lean_ctor_get(x_10, 1); lean_inc(x_14); lean_dec(x_10); x_15 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___lambda__3___closed__2; -x_16 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_15, x_4, x_5, x_6, x_7, x_14); +x_16 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_15, x_4, x_5, x_6, x_7, x_14); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); diff --git a/stage0/stdlib/Lean/Meta/Match/MatchEqs.c b/stage0/stdlib/Lean/Meta/Match/MatchEqs.c index 3e8f564e1b..3b365fe4d9 100644 --- a/stage0/stdlib/Lean/Meta/Match/MatchEqs.c +++ b/stage0/stdlib/Lean/Meta/Match/MatchEqs.c @@ -528,7 +528,6 @@ LEAN_EXPORT lean_object* l_Lean_Meta_withIncRecDepth___at___private_Lean_Meta_Ma static lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_simpH_x3f___closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_MatchEqs___hyg_12709_(lean_object*); static lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_proveSubgoalLoop___lambda__1___closed__3; -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_convertCastEqRec___spec__6___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_convertTemplate___spec__3(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_convertCastEqRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -761,6 +760,7 @@ 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*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_convertCastEqRec_go___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_substSomeVar___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* _init_l_Lean_Meta_casesOnStuckLHS_findFVar_x3f___lambda__1___closed__1() { _start: { @@ -4386,7 +4386,7 @@ x_381 = l_Lean_Meta_Match_forallAltTelescope_go___rarg___closed__12; x_382 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_382, 0, x_380); lean_ctor_set(x_382, 1, x_381); -x_383 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_382, x_10, x_11, x_12, x_13, x_377); +x_383 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_382, x_10, x_11, x_12, x_13, x_377); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); diff --git a/stage0/stdlib/Lean/Meta/SizeOf.c b/stage0/stdlib/Lean/Meta/SizeOf.c index bc8892aa93..96c5efdb7a 100644 --- a/stage0/stdlib/Lean/Meta/SizeOf.c +++ b/stage0/stdlib/Lean/Meta/SizeOf.c @@ -348,7 +348,6 @@ static lean_object* l_Lean_addDecl___at_Lean_Meta_mkSizeOfFn___spec__3___closed_ uint8_t lean_expr_eqv(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_genSizeOf; static lean_object* l___private_Lean_Meta_SizeOf_0__Lean_Meta_SizeOfSpecNested_mkSizeOfAuxLemmaProof_mkSizeOf___closed__2; -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withInstImplicitAsImplict___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_SizeOf_0__Lean_Meta_SizeOfSpecNested_mkSizeOfAuxLemmaProof___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_SizeOf_0__Lean_Meta_mkSizeOfMinors_loop___spec__1___closed__1; @@ -512,6 +511,7 @@ uint8_t lean_nat_dec_lt(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_addTrace___at___private_Lean_Meta_SizeOf_0__Lean_Meta_SizeOfSpecNested_mkMinorProof___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_SizeOfSpecNested_throwUnexpected___rarg___closed__3; static lean_object* l_Lean_getConstInfoInduct___at_Lean_Meta_mkSizeOfFns___spec__1___closed__1; +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_add_decl(lean_object*, lean_object*); static lean_object* _init_l___private_Lean_Meta_SizeOf_0__Lean_Meta_mkLocalInstances_loop___rarg___lambda__1___closed__1() { _start: @@ -8090,7 +8090,7 @@ x_17 = l___private_Lean_Meta_SizeOf_0__Lean_Meta_mkSizeOfMotives_loop___rarg___c x_18 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_18, 0, x_16); lean_ctor_set(x_18, 1, x_17); -x_19 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_18, x_2, x_3, x_4, x_5, x_11); +x_19 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_18, x_2, x_3, x_4, x_5, x_11); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); @@ -8247,7 +8247,7 @@ x_66 = l___private_Lean_Meta_SizeOf_0__Lean_Meta_mkSizeOfMotives_loop___rarg___c x_67 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_67, 0, x_65); lean_ctor_set(x_67, 1, x_66); -x_68 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_67, x_2, x_3, x_4, x_5, x_11); +x_68 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_67, x_2, x_3, x_4, x_5, x_11); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); @@ -8269,7 +8269,7 @@ x_72 = l___private_Lean_Meta_SizeOf_0__Lean_Meta_mkSizeOfMotives_loop___rarg___c x_73 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_73, 0, x_71); lean_ctor_set(x_73, 1, x_72); -x_74 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_73, x_2, x_3, x_4, x_5, x_6); +x_74 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_73, x_2, x_3, x_4, x_5, x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); diff --git a/stage0/stdlib/Lean/Meta/SynthInstance.c b/stage0/stdlib/Lean/Meta/SynthInstance.c index 5a8eadaa36..4ce5b4a150 100644 --- a/stage0/stdlib/Lean/Meta/SynthInstance.c +++ b/stage0/stdlib/Lean/Meta/SynthInstance.c @@ -429,7 +429,6 @@ LEAN_EXPORT uint8_t l_Lean_Meta_SynthInstance_isNewAnswer(lean_object*, lean_obj LEAN_EXPORT lean_object* l_Lean_Meta_SynthInstance_consume___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_SynthInstance_0__Lean_Meta_SynthInstance_mkAnswer___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_SynthInstance_getInstances___spec__5___closed__4; -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_SynthInstance_resume___closed__6; extern lean_object* l_Id_instMonadId; static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_SynthInstance___hyg_37____closed__2; @@ -614,6 +613,7 @@ static lean_object* l_Lean_Meta_SynthInstance_synth___closed__3; uint8_t lean_nat_dec_lt(lean_object*, lean_object*); static lean_object* l_Lean_Meta_SynthInstance_getInstances___lambda__2___closed__8; LEAN_EXPORT lean_object* l_Lean_Meta_SynthInstance_inferTCGoalsRLAttr; +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_SynthInstance___hyg_6____closed__1() { _start: { @@ -4197,7 +4197,7 @@ return x_2; LEAN_EXPORT lean_object* l_Lean_Meta_SynthInstance_getInstances___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_9; +lean_object* x_9; lean_object* x_10; lean_dec(x_2); lean_inc(x_7); lean_inc(x_6); @@ -4205,9 +4205,6 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); x_9 = l_Lean_Meta_isClass_x3f(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_inc(x_10); if (lean_obj_tag(x_10) == 0) @@ -4439,34 +4436,6 @@ return x_75; } } } -else -{ -uint8_t x_76; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_76 = !lean_is_exclusive(x_9); -if (x_76 == 0) -{ -return x_9; -} -else -{ -lean_object* x_77; lean_object* x_78; lean_object* x_79; -x_77 = lean_ctor_get(x_9, 0); -x_78 = lean_ctor_get(x_9, 1); -lean_inc(x_78); -lean_inc(x_77); -lean_dec(x_9); -x_79 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_79, 0, x_77); -lean_ctor_set(x_79, 1, x_78); -return x_79; -} -} -} } LEAN_EXPORT lean_object* l_Lean_Meta_SynthInstance_getInstances(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: @@ -25928,7 +25897,7 @@ x_28 = l_Lean_Meta_SynthInstance_getInstances___lambda__2___closed__3; x_29 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_29, 0, x_27); lean_ctor_set(x_29, 1, x_28); -x_30 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_29, x_3, x_4, x_5, x_6, x_24); +x_30 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_29, x_3, x_4, x_5, x_6, x_24); x_31 = lean_ctor_get(x_30, 0); lean_inc(x_31); x_32 = lean_ctor_get(x_30, 1); @@ -26035,7 +26004,7 @@ x_18 = l_Lean_Meta_SynthInstance_getInstances___lambda__2___closed__3; x_19 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_19, 0, x_17); lean_ctor_set(x_19, 1, x_18); -x_20 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_19, x_3, x_4, x_5, x_6, x_9); +x_20 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_19, x_3, x_4, x_5, x_6, x_9); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); @@ -26483,7 +26452,7 @@ x_9 = lean_ctor_get_uint8(x_8, sizeof(void*)*7); switch (x_9) { case 0: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; x_10 = lean_ctor_get(x_7, 1); lean_inc(x_10); lean_dec(x_7); @@ -26496,9 +26465,6 @@ lean_inc(x_3); lean_inc(x_2); lean_inc(x_11); x_12 = l_Lean_Meta_isClass_x3f(x_11, x_2, x_3, x_4, x_5, x_10); -if (lean_obj_tag(x_12) == 0) -{ -lean_object* x_13; x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); if (lean_obj_tag(x_13) == 0) @@ -26876,520 +26842,459 @@ return x_130; } } } -else -{ -uint8_t x_131; -lean_dec(x_11); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_131 = !lean_is_exclusive(x_12); -if (x_131 == 0) -{ -return x_12; -} -else -{ -lean_object* x_132; lean_object* x_133; lean_object* x_134; -x_132 = lean_ctor_get(x_12, 0); -x_133 = lean_ctor_get(x_12, 1); -lean_inc(x_133); -lean_inc(x_132); -lean_dec(x_12); -x_134 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_134, 0, x_132); -lean_ctor_set(x_134, 1, x_133); -return x_134; -} -} -} case 1: { -lean_object* x_135; lean_object* x_136; lean_object* x_137; -x_135 = lean_ctor_get(x_7, 1); -lean_inc(x_135); +lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; +x_131 = lean_ctor_get(x_7, 1); +lean_inc(x_131); lean_dec(x_7); -x_136 = lean_ctor_get(x_8, 2); -lean_inc(x_136); +x_132 = lean_ctor_get(x_8, 2); +lean_inc(x_132); lean_dec(x_8); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -lean_inc(x_136); -x_137 = l_Lean_Meta_isClass_x3f(x_136, x_2, x_3, x_4, x_5, x_135); -if (lean_obj_tag(x_137) == 0) +lean_inc(x_132); +x_133 = l_Lean_Meta_isClass_x3f(x_132, x_2, x_3, x_4, x_5, x_131); +x_134 = lean_ctor_get(x_133, 0); +lean_inc(x_134); +if (lean_obj_tag(x_134) == 0) { -lean_object* x_138; -x_138 = lean_ctor_get(x_137, 0); -lean_inc(x_138); -if (lean_obj_tag(x_138) == 0) -{ -uint8_t x_139; -lean_dec(x_136); +uint8_t x_135; +lean_dec(x_132); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_139 = !lean_is_exclusive(x_137); -if (x_139 == 0) +x_135 = !lean_is_exclusive(x_133); +if (x_135 == 0) { -lean_object* x_140; uint8_t x_141; lean_object* x_142; -x_140 = lean_ctor_get(x_137, 0); -lean_dec(x_140); -x_141 = 0; -x_142 = lean_box(x_141); -lean_ctor_set(x_137, 0, x_142); -return x_137; +lean_object* x_136; uint8_t x_137; lean_object* x_138; +x_136 = lean_ctor_get(x_133, 0); +lean_dec(x_136); +x_137 = 0; +x_138 = lean_box(x_137); +lean_ctor_set(x_133, 0, x_138); +return x_133; } else { -lean_object* x_143; uint8_t x_144; lean_object* x_145; lean_object* x_146; -x_143 = lean_ctor_get(x_137, 1); +lean_object* x_139; uint8_t x_140; lean_object* x_141; lean_object* x_142; +x_139 = lean_ctor_get(x_133, 1); +lean_inc(x_139); +lean_dec(x_133); +x_140 = 0; +x_141 = lean_box(x_140); +x_142 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_142, 0, x_141); +lean_ctor_set(x_142, 1, x_139); +return x_142; +} +} +else +{ +lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; uint8_t x_151; +lean_dec(x_134); +x_143 = lean_ctor_get(x_133, 1); lean_inc(x_143); -lean_dec(x_137); -x_144 = 0; -x_145 = lean_box(x_144); -x_146 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_146, 0, x_145); -lean_ctor_set(x_146, 1, x_143); -return x_146; -} -} -else -{ -lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; uint8_t x_155; -lean_dec(x_138); -x_147 = lean_ctor_get(x_137, 1); +lean_dec(x_133); +x_144 = lean_ctor_get(x_2, 0); +lean_inc(x_144); +x_145 = lean_ctor_get(x_2, 1); +lean_inc(x_145); +x_146 = lean_ctor_get(x_2, 2); +lean_inc(x_146); +x_147 = lean_ctor_get(x_2, 3); lean_inc(x_147); -lean_dec(x_137); -x_148 = lean_ctor_get(x_2, 0); +x_148 = lean_ctor_get(x_2, 4); lean_inc(x_148); -x_149 = lean_ctor_get(x_2, 1); +x_149 = lean_ctor_get(x_2, 5); lean_inc(x_149); -x_150 = lean_ctor_get(x_2, 2); -lean_inc(x_150); -x_151 = lean_ctor_get(x_2, 3); -lean_inc(x_151); -x_152 = lean_ctor_get(x_2, 4); -lean_inc(x_152); +x_150 = lean_unsigned_to_nat(1u); +x_151 = lean_nat_dec_lt(x_150, x_148); +if (x_151 == 0) +{ +uint8_t x_152; +x_152 = !lean_is_exclusive(x_2); +if (x_152 == 0) +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; uint8_t x_161; lean_object* x_162; lean_object* x_176; lean_object* x_177; lean_object* x_178; uint8_t x_179; x_153 = lean_ctor_get(x_2, 5); -lean_inc(x_153); -x_154 = lean_unsigned_to_nat(1u); -x_155 = lean_nat_dec_lt(x_154, x_152); -if (x_155 == 0) -{ -uint8_t x_156; -x_156 = !lean_is_exclusive(x_2); -if (x_156 == 0) -{ -lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; uint8_t x_165; lean_object* x_166; lean_object* x_180; lean_object* x_181; lean_object* x_182; uint8_t x_183; -x_157 = lean_ctor_get(x_2, 5); -lean_dec(x_157); -x_158 = lean_ctor_get(x_2, 4); -lean_dec(x_158); -x_159 = lean_ctor_get(x_2, 3); -lean_dec(x_159); -x_160 = lean_ctor_get(x_2, 2); -lean_dec(x_160); -x_161 = lean_ctor_get(x_2, 1); -lean_dec(x_161); -x_162 = lean_ctor_get(x_2, 0); -lean_dec(x_162); -x_163 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__2; -x_164 = lean_nat_add(x_152, x_154); -lean_dec(x_152); -lean_ctor_set(x_2, 4, x_164); -x_180 = lean_st_ref_get(x_5, x_147); -x_181 = lean_ctor_get(x_180, 0); -lean_inc(x_181); -x_182 = lean_ctor_get(x_181, 3); -lean_inc(x_182); -lean_dec(x_181); -x_183 = lean_ctor_get_uint8(x_182, sizeof(void*)*1); -lean_dec(x_182); -if (x_183 == 0) -{ -lean_object* x_184; uint8_t x_185; -x_184 = lean_ctor_get(x_180, 1); -lean_inc(x_184); -lean_dec(x_180); -x_185 = 0; -x_165 = x_185; -x_166 = x_184; -goto block_179; -} -else -{ -lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; uint8_t x_190; -x_186 = lean_ctor_get(x_180, 1); -lean_inc(x_186); -lean_dec(x_180); -x_187 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__14(x_163, x_2, x_3, x_4, x_5, x_186); -x_188 = lean_ctor_get(x_187, 0); -lean_inc(x_188); -x_189 = lean_ctor_get(x_187, 1); -lean_inc(x_189); -lean_dec(x_187); -x_190 = lean_unbox(x_188); -lean_dec(x_188); -x_165 = x_190; -x_166 = x_189; -goto block_179; -} -block_179: -{ -if (x_165 == 0) -{ -lean_object* x_167; lean_object* x_168; -x_167 = lean_box(0); -x_168 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__1(x_1, x_136, x_167, x_2, x_3, x_4, x_5, x_166); -return x_168; -} -else -{ -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_inc(x_1); -x_169 = l_Lean_Expr_mvar___override(x_1); -x_170 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_170, 0, x_169); -x_171 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__4; -x_172 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_172, 0, x_171); -lean_ctor_set(x_172, 1, x_170); -x_173 = l_Lean_Meta_SynthInstance_getInstances___lambda__2___closed__3; -x_174 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_174, 0, x_172); -lean_ctor_set(x_174, 1, x_173); -x_175 = l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1(x_163, x_174, x_2, x_3, x_4, x_5, x_166); -x_176 = lean_ctor_get(x_175, 0); -lean_inc(x_176); -x_177 = lean_ctor_get(x_175, 1); -lean_inc(x_177); -lean_dec(x_175); -x_178 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__1(x_1, x_136, x_176, x_2, x_3, x_4, x_5, x_177); -lean_dec(x_176); -return x_178; -} -} -} -else -{ -lean_object* x_191; lean_object* x_192; lean_object* x_193; uint8_t x_194; lean_object* x_195; lean_object* x_209; lean_object* x_210; lean_object* x_211; uint8_t x_212; -lean_dec(x_2); -x_191 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__2; -x_192 = lean_nat_add(x_152, x_154); -lean_dec(x_152); -x_193 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_193, 0, x_148); -lean_ctor_set(x_193, 1, x_149); -lean_ctor_set(x_193, 2, x_150); -lean_ctor_set(x_193, 3, x_151); -lean_ctor_set(x_193, 4, x_192); -lean_ctor_set(x_193, 5, x_153); -x_209 = lean_st_ref_get(x_5, x_147); -x_210 = lean_ctor_get(x_209, 0); -lean_inc(x_210); -x_211 = lean_ctor_get(x_210, 3); -lean_inc(x_211); -lean_dec(x_210); -x_212 = lean_ctor_get_uint8(x_211, sizeof(void*)*1); -lean_dec(x_211); -if (x_212 == 0) -{ -lean_object* x_213; uint8_t x_214; -x_213 = lean_ctor_get(x_209, 1); -lean_inc(x_213); -lean_dec(x_209); -x_214 = 0; -x_194 = x_214; -x_195 = x_213; -goto block_208; -} -else -{ -lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; uint8_t x_219; -x_215 = lean_ctor_get(x_209, 1); -lean_inc(x_215); -lean_dec(x_209); -x_216 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__14(x_191, x_193, x_3, x_4, x_5, x_215); -x_217 = lean_ctor_get(x_216, 0); -lean_inc(x_217); -x_218 = lean_ctor_get(x_216, 1); -lean_inc(x_218); -lean_dec(x_216); -x_219 = lean_unbox(x_217); -lean_dec(x_217); -x_194 = x_219; -x_195 = x_218; -goto block_208; -} -block_208: -{ -if (x_194 == 0) -{ -lean_object* x_196; lean_object* x_197; -x_196 = lean_box(0); -x_197 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__1(x_1, x_136, x_196, x_193, x_3, x_4, x_5, x_195); -return x_197; -} -else -{ -lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; -lean_inc(x_1); -x_198 = l_Lean_Expr_mvar___override(x_1); -x_199 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_199, 0, x_198); -x_200 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__4; -x_201 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_201, 0, x_200); -lean_ctor_set(x_201, 1, x_199); -x_202 = l_Lean_Meta_SynthInstance_getInstances___lambda__2___closed__3; -x_203 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_203, 0, x_201); -lean_ctor_set(x_203, 1, x_202); -x_204 = l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1(x_191, x_203, x_193, x_3, x_4, x_5, x_195); -x_205 = lean_ctor_get(x_204, 0); -lean_inc(x_205); -x_206 = lean_ctor_get(x_204, 1); -lean_inc(x_206); -lean_dec(x_204); -x_207 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__1(x_1, x_136, x_205, x_193, x_3, x_4, x_5, x_206); -lean_dec(x_205); -return x_207; -} -} -} -} -else -{ -lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; uint8_t x_224; lean_dec(x_153); -lean_dec(x_152); -lean_dec(x_151); -lean_dec(x_150); +x_154 = lean_ctor_get(x_2, 4); +lean_dec(x_154); +x_155 = lean_ctor_get(x_2, 3); +lean_dec(x_155); +x_156 = lean_ctor_get(x_2, 2); +lean_dec(x_156); +x_157 = lean_ctor_get(x_2, 1); +lean_dec(x_157); +x_158 = lean_ctor_get(x_2, 0); +lean_dec(x_158); +x_159 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__2; +x_160 = lean_nat_add(x_148, x_150); +lean_dec(x_148); +lean_ctor_set(x_2, 4, x_160); +x_176 = lean_st_ref_get(x_5, x_143); +x_177 = lean_ctor_get(x_176, 0); +lean_inc(x_177); +x_178 = lean_ctor_get(x_177, 3); +lean_inc(x_178); +lean_dec(x_177); +x_179 = lean_ctor_get_uint8(x_178, sizeof(void*)*1); +lean_dec(x_178); +if (x_179 == 0) +{ +lean_object* x_180; uint8_t x_181; +x_180 = lean_ctor_get(x_176, 1); +lean_inc(x_180); +lean_dec(x_176); +x_181 = 0; +x_161 = x_181; +x_162 = x_180; +goto block_175; +} +else +{ +lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; uint8_t x_186; +x_182 = lean_ctor_get(x_176, 1); +lean_inc(x_182); +lean_dec(x_176); +x_183 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__14(x_159, x_2, x_3, x_4, x_5, x_182); +x_184 = lean_ctor_get(x_183, 0); +lean_inc(x_184); +x_185 = lean_ctor_get(x_183, 1); +lean_inc(x_185); +lean_dec(x_183); +x_186 = lean_unbox(x_184); +lean_dec(x_184); +x_161 = x_186; +x_162 = x_185; +goto block_175; +} +block_175: +{ +if (x_161 == 0) +{ +lean_object* x_163; lean_object* x_164; +x_163 = lean_box(0); +x_164 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__1(x_1, x_132, x_163, x_2, x_3, x_4, x_5, x_162); +return x_164; +} +else +{ +lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; +lean_inc(x_1); +x_165 = l_Lean_Expr_mvar___override(x_1); +x_166 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_166, 0, x_165); +x_167 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__4; +x_168 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_168, 0, x_167); +lean_ctor_set(x_168, 1, x_166); +x_169 = l_Lean_Meta_SynthInstance_getInstances___lambda__2___closed__3; +x_170 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_170, 0, x_168); +lean_ctor_set(x_170, 1, x_169); +x_171 = l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1(x_159, x_170, x_2, x_3, x_4, x_5, x_162); +x_172 = lean_ctor_get(x_171, 0); +lean_inc(x_172); +x_173 = lean_ctor_get(x_171, 1); +lean_inc(x_173); +lean_dec(x_171); +x_174 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__1(x_1, x_132, x_172, x_2, x_3, x_4, x_5, x_173); +lean_dec(x_172); +return x_174; +} +} +} +else +{ +lean_object* x_187; lean_object* x_188; lean_object* x_189; uint8_t x_190; lean_object* x_191; lean_object* x_205; lean_object* x_206; lean_object* x_207; uint8_t x_208; +lean_dec(x_2); +x_187 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__2; +x_188 = lean_nat_add(x_148, x_150); +lean_dec(x_148); +x_189 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_189, 0, x_144); +lean_ctor_set(x_189, 1, x_145); +lean_ctor_set(x_189, 2, x_146); +lean_ctor_set(x_189, 3, x_147); +lean_ctor_set(x_189, 4, x_188); +lean_ctor_set(x_189, 5, x_149); +x_205 = lean_st_ref_get(x_5, x_143); +x_206 = lean_ctor_get(x_205, 0); +lean_inc(x_206); +x_207 = lean_ctor_get(x_206, 3); +lean_inc(x_207); +lean_dec(x_206); +x_208 = lean_ctor_get_uint8(x_207, sizeof(void*)*1); +lean_dec(x_207); +if (x_208 == 0) +{ +lean_object* x_209; uint8_t x_210; +x_209 = lean_ctor_get(x_205, 1); +lean_inc(x_209); +lean_dec(x_205); +x_210 = 0; +x_190 = x_210; +x_191 = x_209; +goto block_204; +} +else +{ +lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; uint8_t x_215; +x_211 = lean_ctor_get(x_205, 1); +lean_inc(x_211); +lean_dec(x_205); +x_212 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__14(x_187, x_189, x_3, x_4, x_5, x_211); +x_213 = lean_ctor_get(x_212, 0); +lean_inc(x_213); +x_214 = lean_ctor_get(x_212, 1); +lean_inc(x_214); +lean_dec(x_212); +x_215 = lean_unbox(x_213); +lean_dec(x_213); +x_190 = x_215; +x_191 = x_214; +goto block_204; +} +block_204: +{ +if (x_190 == 0) +{ +lean_object* x_192; lean_object* x_193; +x_192 = lean_box(0); +x_193 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__1(x_1, x_132, x_192, x_189, x_3, x_4, x_5, x_191); +return x_193; +} +else +{ +lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; +lean_inc(x_1); +x_194 = l_Lean_Expr_mvar___override(x_1); +x_195 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_195, 0, x_194); +x_196 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__4; +x_197 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_197, 0, x_196); +lean_ctor_set(x_197, 1, x_195); +x_198 = l_Lean_Meta_SynthInstance_getInstances___lambda__2___closed__3; +x_199 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_199, 0, x_197); +lean_ctor_set(x_199, 1, x_198); +x_200 = l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1(x_187, x_199, x_189, x_3, x_4, x_5, x_191); +x_201 = lean_ctor_get(x_200, 0); +lean_inc(x_201); +x_202 = lean_ctor_get(x_200, 1); +lean_inc(x_202); +lean_dec(x_200); +x_203 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__1(x_1, x_132, x_201, x_189, x_3, x_4, x_5, x_202); +lean_dec(x_201); +return x_203; +} +} +} +} +else +{ +lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; uint8_t x_220; lean_dec(x_149); lean_dec(x_148); -lean_dec(x_136); +lean_dec(x_147); +lean_dec(x_146); +lean_dec(x_145); +lean_dec(x_144); +lean_dec(x_132); lean_dec(x_1); -x_220 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__2; -x_221 = lean_st_ref_get(x_5, x_147); -x_222 = lean_ctor_get(x_221, 0); -lean_inc(x_222); -x_223 = lean_ctor_get(x_222, 3); -lean_inc(x_223); +x_216 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__2; +x_217 = lean_st_ref_get(x_5, x_143); +x_218 = lean_ctor_get(x_217, 0); +lean_inc(x_218); +x_219 = lean_ctor_get(x_218, 3); +lean_inc(x_219); +lean_dec(x_218); +x_220 = lean_ctor_get_uint8(x_219, sizeof(void*)*1); +lean_dec(x_219); +if (x_220 == 0) +{ +uint8_t x_221; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_221 = !lean_is_exclusive(x_217); +if (x_221 == 0) +{ +lean_object* x_222; uint8_t x_223; lean_object* x_224; +x_222 = lean_ctor_get(x_217, 0); lean_dec(x_222); -x_224 = lean_ctor_get_uint8(x_223, sizeof(void*)*1); -lean_dec(x_223); -if (x_224 == 0) -{ -uint8_t x_225; -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_225 = !lean_is_exclusive(x_221); -if (x_225 == 0) -{ -lean_object* x_226; uint8_t x_227; lean_object* x_228; -x_226 = lean_ctor_get(x_221, 0); -lean_dec(x_226); -x_227 = 0; -x_228 = lean_box(x_227); -lean_ctor_set(x_221, 0, x_228); -return x_221; +x_223 = 0; +x_224 = lean_box(x_223); +lean_ctor_set(x_217, 0, x_224); +return x_217; } else { -lean_object* x_229; uint8_t x_230; lean_object* x_231; lean_object* x_232; -x_229 = lean_ctor_get(x_221, 1); +lean_object* x_225; uint8_t x_226; lean_object* x_227; lean_object* x_228; +x_225 = lean_ctor_get(x_217, 1); +lean_inc(x_225); +lean_dec(x_217); +x_226 = 0; +x_227 = lean_box(x_226); +x_228 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_228, 0, x_227); +lean_ctor_set(x_228, 1, x_225); +return x_228; +} +} +else +{ +lean_object* x_229; lean_object* x_230; lean_object* x_231; uint8_t x_232; +x_229 = lean_ctor_get(x_217, 1); lean_inc(x_229); -lean_dec(x_221); -x_230 = 0; -x_231 = lean_box(x_230); -x_232 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_232, 0, x_231); -lean_ctor_set(x_232, 1, x_229); -return x_232; -} -} -else +lean_dec(x_217); +x_230 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__14(x_216, x_2, x_3, x_4, x_5, x_229); +x_231 = lean_ctor_get(x_230, 0); +lean_inc(x_231); +x_232 = lean_unbox(x_231); +lean_dec(x_231); +if (x_232 == 0) { -lean_object* x_233; lean_object* x_234; lean_object* x_235; uint8_t x_236; -x_233 = lean_ctor_get(x_221, 1); -lean_inc(x_233); -lean_dec(x_221); -x_234 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__14(x_220, x_2, x_3, x_4, x_5, x_233); -x_235 = lean_ctor_get(x_234, 0); -lean_inc(x_235); -x_236 = lean_unbox(x_235); -lean_dec(x_235); -if (x_236 == 0) -{ -uint8_t x_237; +uint8_t x_233; lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_237 = !lean_is_exclusive(x_234); -if (x_237 == 0) +x_233 = !lean_is_exclusive(x_230); +if (x_233 == 0) { -lean_object* x_238; uint8_t x_239; lean_object* x_240; -x_238 = lean_ctor_get(x_234, 0); -lean_dec(x_238); -x_239 = 0; -x_240 = lean_box(x_239); -lean_ctor_set(x_234, 0, x_240); -return x_234; +lean_object* x_234; uint8_t x_235; lean_object* x_236; +x_234 = lean_ctor_get(x_230, 0); +lean_dec(x_234); +x_235 = 0; +x_236 = lean_box(x_235); +lean_ctor_set(x_230, 0, x_236); +return x_230; } else { -lean_object* x_241; uint8_t x_242; lean_object* x_243; lean_object* x_244; -x_241 = lean_ctor_get(x_234, 1); +lean_object* x_237; uint8_t x_238; lean_object* x_239; lean_object* x_240; +x_237 = lean_ctor_get(x_230, 1); +lean_inc(x_237); +lean_dec(x_230); +x_238 = 0; +x_239 = lean_box(x_238); +x_240 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_240, 0, x_239); +lean_ctor_set(x_240, 1, x_237); +return x_240; +} +} +else +{ +lean_object* x_241; lean_object* x_242; lean_object* x_243; uint8_t x_244; +x_241 = lean_ctor_get(x_230, 1); lean_inc(x_241); -lean_dec(x_234); -x_242 = 0; -x_243 = lean_box(x_242); -x_244 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_244, 0, x_243); -lean_ctor_set(x_244, 1, x_241); -return x_244; -} -} -else -{ -lean_object* x_245; lean_object* x_246; lean_object* x_247; uint8_t x_248; -x_245 = lean_ctor_get(x_234, 1); -lean_inc(x_245); -lean_dec(x_234); -x_246 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__6; -x_247 = l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1(x_220, x_246, x_2, x_3, x_4, x_5, x_245); +lean_dec(x_230); +x_242 = l___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___lambda__2___closed__6; +x_243 = l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1(x_216, x_242, x_2, x_3, x_4, x_5, x_241); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_248 = !lean_is_exclusive(x_247); -if (x_248 == 0) +x_244 = !lean_is_exclusive(x_243); +if (x_244 == 0) { -lean_object* x_249; uint8_t x_250; lean_object* x_251; -x_249 = lean_ctor_get(x_247, 0); -lean_dec(x_249); -x_250 = 0; -x_251 = lean_box(x_250); -lean_ctor_set(x_247, 0, x_251); -return x_247; +lean_object* x_245; uint8_t x_246; lean_object* x_247; +x_245 = lean_ctor_get(x_243, 0); +lean_dec(x_245); +x_246 = 0; +x_247 = lean_box(x_246); +lean_ctor_set(x_243, 0, x_247); +return x_243; } else { -lean_object* x_252; uint8_t x_253; lean_object* x_254; lean_object* x_255; -x_252 = lean_ctor_get(x_247, 1); -lean_inc(x_252); -lean_dec(x_247); -x_253 = 0; -x_254 = lean_box(x_253); -x_255 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_255, 0, x_254); -lean_ctor_set(x_255, 1, x_252); -return x_255; +lean_object* x_248; uint8_t x_249; lean_object* x_250; lean_object* x_251; +x_248 = lean_ctor_get(x_243, 1); +lean_inc(x_248); +lean_dec(x_243); +x_249 = 0; +x_250 = lean_box(x_249); +x_251 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_251, 0, x_250); +lean_ctor_set(x_251, 1, x_248); +return x_251; } } } } } } -else -{ -uint8_t x_256; -lean_dec(x_136); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_256 = !lean_is_exclusive(x_137); -if (x_256 == 0) -{ -return x_137; -} -else -{ -lean_object* x_257; lean_object* x_258; lean_object* x_259; -x_257 = lean_ctor_get(x_137, 0); -x_258 = lean_ctor_get(x_137, 1); -lean_inc(x_258); -lean_inc(x_257); -lean_dec(x_137); -x_259 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_259, 0, x_257); -lean_ctor_set(x_259, 1, x_258); -return x_259; -} -} -} default: { -uint8_t x_260; +uint8_t x_252; lean_dec(x_8); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); +x_252 = !lean_is_exclusive(x_7); +if (x_252 == 0) +{ +lean_object* x_253; uint8_t x_254; lean_object* x_255; +x_253 = lean_ctor_get(x_7, 0); +lean_dec(x_253); +x_254 = 0; +x_255 = lean_box(x_254); +lean_ctor_set(x_7, 0, x_255); +return x_7; +} +else +{ +lean_object* x_256; uint8_t x_257; lean_object* x_258; lean_object* x_259; +x_256 = lean_ctor_get(x_7, 1); +lean_inc(x_256); +lean_dec(x_7); +x_257 = 0; +x_258 = lean_box(x_257); +x_259 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_259, 0, x_258); +lean_ctor_set(x_259, 1, x_256); +return x_259; +} +} +} +} +else +{ +uint8_t x_260; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); x_260 = !lean_is_exclusive(x_7); if (x_260 == 0) { -lean_object* x_261; uint8_t x_262; lean_object* x_263; +return x_7; +} +else +{ +lean_object* x_261; lean_object* x_262; lean_object* x_263; x_261 = lean_ctor_get(x_7, 0); -lean_dec(x_261); -x_262 = 0; -x_263 = lean_box(x_262); -lean_ctor_set(x_7, 0, x_263); -return x_7; -} -else -{ -lean_object* x_264; uint8_t x_265; lean_object* x_266; lean_object* x_267; -x_264 = lean_ctor_get(x_7, 1); -lean_inc(x_264); +x_262 = lean_ctor_get(x_7, 1); +lean_inc(x_262); +lean_inc(x_261); lean_dec(x_7); -x_265 = 0; -x_266 = lean_box(x_265); -x_267 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_267, 0, x_266); -lean_ctor_set(x_267, 1, x_264); -return x_267; -} -} -} -} -else -{ -uint8_t x_268; -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_268 = !lean_is_exclusive(x_7); -if (x_268 == 0) -{ -return x_7; -} -else -{ -lean_object* x_269; lean_object* x_270; lean_object* x_271; -x_269 = lean_ctor_get(x_7, 0); -x_270 = lean_ctor_get(x_7, 1); -lean_inc(x_270); -lean_inc(x_269); -lean_dec(x_7); -x_271 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_271, 0, x_269); -lean_ctor_set(x_271, 1, x_270); -return x_271; +x_263 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_263, 0, x_261); +lean_ctor_set(x_263, 1, x_262); +return x_263; } } } diff --git a/stage0/stdlib/Lean/Meta/Tactic/ElimInfo.c b/stage0/stdlib/Lean/Meta/Tactic/ElimInfo.c index a9f5451dab..f7cc8c6bb7 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/ElimInfo.c +++ b/stage0/stdlib/Lean/Meta/Tactic/ElimInfo.c @@ -77,6 +77,7 @@ LEAN_EXPORT uint8_t l_Array_isEqvAux___at_Lean_Meta_getCustomEliminator_x3f___sp lean_object* l_Lean_getConstInfo___at_Lean_Meta_mkConstWithFreshMVarLevels___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Level_hasMVar(lean_object*); lean_object* l_Std_PersistentHashMap_foldlMAux_traverse___at_Lean_MetavarContext_getExprAssignmentDomain___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); extern lean_object* l_Lean_instHashableName; LEAN_EXPORT lean_object* l_Std_AssocList_contains___at_Lean_Meta_addCustomEliminatorEntry___spec__10___boxed(lean_object*, lean_object*); @@ -100,7 +101,6 @@ lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* l_Std_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); lean_object* l_Lean_throwError___at___private_Lean_Meta_InferType_0__Lean_Meta_inferProjType___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_ElimInfo___hyg_2262____closed__2; static lean_object* l_Lean_isLevelMVarAssignable___at_Lean_Meta_addImplicitTargets___spec__5___closed__1; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_getCustomEliminator_x3f___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1406,7 +1406,7 @@ x_20 = l_Array_mapMUnsafe_map___at_Lean_Meta_getElimInfo___spec__3___closed__4; x_21 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_21, 0, x_19); lean_ctor_set(x_21, 1, x_20); -x_22 = l_Lean_throwError___at_Lean_Meta_getLevelMVarDepth___spec__1(x_21, x_6, x_7, x_8, x_9, x_10); +x_22 = l_Lean_throwError___at_Lean_LMVarId_getLevel___spec__1(x_21, x_6, x_7, x_8, x_9, x_10); x_23 = !lean_is_exclusive(x_22); if (x_23 == 0) { diff --git a/stage0/stdlib/Lean/Meta/Tactic/Induction.c b/stage0/stdlib/Lean/Meta/Tactic/Induction.c index 1bd19b9ef6..821470a281 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Induction.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Induction.c @@ -46,7 +46,6 @@ lean_object* lean_array_get_size(lean_object*); LEAN_EXPORT lean_object* l_Lean_Expr_withAppAux___at_Lean_MVarId_induction___spec__8___lambda__2___boxed(lean_object**); lean_object* l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_localDeclDependsOn___at_Lean_MVarId_clear___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_abstract(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Induction_0__Lean_Meta_finalize_loop___boxed(lean_object**); LEAN_EXPORT lean_object* l_Lean_Meta_instInhabitedInductionSubgoal; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_induction___spec__5(lean_object*, lean_object*, size_t, size_t, lean_object*); @@ -54,7 +53,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Induction_0__Lean_Meta_add static lean_object* l___private_Lean_Meta_Tactic_Induction_0__Lean_Meta_addRecParams___closed__8; lean_object* l_Array_mapMUnsafe_map___at_Lean_LocalContext_getFVars___spec__1(size_t, size_t, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Induction_0__Lean_Meta_addRecParams___closed__4; -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Induction___hyg_3485_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Induction___hyg_3484_(lean_object*); uint8_t lean_usize_dec_lt(size_t, size_t); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_MVarId_induction___spec__4___lambda__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*); static lean_object* l___private_Lean_Meta_Tactic_Induction_0__Lean_Meta_finalize_loop___lambda__3___closed__3; @@ -164,6 +163,7 @@ static lean_object* l___private_Lean_Meta_Tactic_Induction_0__Lean_Meta_addRecPa lean_object* l_Lean_Meta_FVarSubst_insert(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Expr_withAppAux___at_Lean_MVarId_induction___spec__7___lambda__2___closed__3; static lean_object* l_Nat_forM_loop___at_Lean_MVarId_induction___spec__3___closed__2; +lean_object* l_Lean_Expr_abstractM(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_InductionSubgoal_fields___default___closed__1; static lean_object* l_Nat_forM_loop___at_Lean_MVarId_induction___spec__3___lambda__1___closed__2; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Induction_0__Lean_Meta_finalize_loop(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -4465,7 +4465,7 @@ lean_inc(x_10); x_32 = lean_array_push(x_31, x_10); lean_inc(x_17); lean_inc(x_15); -x_33 = l_Lean_Meta_abstract(x_13, x_32, x_15, x_16, x_17, x_18, x_30); +x_33 = l_Lean_Expr_abstractM(x_13, x_32, x_15, x_16, x_17, x_18, x_30); if (lean_obj_tag(x_33) == 0) { lean_object* x_34; lean_object* x_35; lean_object* x_36; uint8_t x_37; lean_object* x_38; lean_object* x_39; @@ -9228,7 +9228,7 @@ x_10 = l_Lean_MVarId_induction(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_10; } } -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Induction___hyg_3485_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Induction___hyg_3484_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -9409,7 +9409,7 @@ l_Lean_MVarId_induction___closed__4 = _init_l_Lean_MVarId_induction___closed__4( lean_mark_persistent(l_Lean_MVarId_induction___closed__4); l_Lean_MVarId_induction___closed__5 = _init_l_Lean_MVarId_induction___closed__5(); lean_mark_persistent(l_Lean_MVarId_induction___closed__5); -res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Induction___hyg_3485_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Induction___hyg_3484_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c index bdbfbf046a..6238923dd2 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c @@ -212,7 +212,6 @@ static lean_object* l_Lean_Meta_Simp_removeUnnecessaryCasts_isDummyEqRec___close lean_object* l_Lean_Meta_unfoldDefinition_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_transform_visit_visitForall___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__5(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_withIncRecDepth___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__13(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_abstract(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_mkHashSetImp___rarg(lean_object*); LEAN_EXPORT lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_Simp_simp_processCongrHypothesis___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_Result_getProof(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -612,6 +611,7 @@ static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___ static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__7; static lean_object* l_Lean_Meta_simpTargetCore___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_simpLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_abstractM(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_SynthInstance_removeUnusedArguments_x3f___spec__2___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_Config_updateArith___closed__8; static lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Simp_removeUnnecessaryCasts___spec__1___closed__4; @@ -15013,7 +15013,7 @@ x_20 = lean_array_push(x_19, x_5); lean_inc(x_11); lean_inc(x_9); lean_inc(x_20); -x_21 = l_Lean_Meta_abstract(x_18, x_20, x_9, x_10, x_11, x_12, x_17); +x_21 = l_Lean_Expr_abstractM(x_18, x_20, x_9, x_10, x_11, x_12, x_17); if (lean_obj_tag(x_21) == 0) { uint8_t x_22; @@ -15499,7 +15499,7 @@ lean_inc(x_12); lean_inc(x_10); lean_inc(x_17); lean_inc(x_15); -x_18 = l_Lean_Meta_abstract(x_15, x_17, x_10, x_11, x_12, x_13, x_14); +x_18 = l_Lean_Expr_abstractM(x_15, x_17, x_10, x_11, x_12, x_13, x_14); if (lean_obj_tag(x_18) == 0) { uint8_t x_19; diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c index 4a3d8c7375..54b0167c0e 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c @@ -2107,7 +2107,7 @@ x_54 = lean_unbox(x_53); lean_dec(x_53); if (x_54 == 0) { -lean_object* x_55; lean_object* x_56; +lean_object* x_55; lean_object* x_56; lean_object* x_57; x_55 = lean_ctor_get(x_52, 1); lean_inc(x_55); lean_dec(x_52); @@ -2117,9 +2117,6 @@ lean_inc(x_11); lean_inc(x_10); lean_inc(x_44); x_56 = l_Lean_Meta_isClass_x3f(x_44, x_10, x_11, x_12, x_13, x_55); -if (lean_obj_tag(x_56) == 0) -{ -lean_object* x_57; x_57 = lean_ctor_get(x_56, 0); lean_inc(x_57); if (lean_obj_tag(x_57) == 0) @@ -2226,45 +2223,9 @@ return x_72; } else { -uint8_t x_73; -lean_dec(x_44); -lean_dec(x_28); -lean_free_object(x_7); -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_73 = !lean_is_exclusive(x_56); -if (x_73 == 0) -{ -return x_56; -} -else -{ -lean_object* x_74; lean_object* x_75; lean_object* x_76; -x_74 = lean_ctor_get(x_56, 0); -x_75 = lean_ctor_get(x_56, 1); -lean_inc(x_75); -lean_inc(x_74); -lean_dec(x_56); -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 -{ -lean_object* x_77; lean_object* x_78; -x_77 = lean_ctor_get(x_52, 1); -lean_inc(x_77); +lean_object* x_73; lean_object* x_74; +x_73 = lean_ctor_get(x_52, 1); +lean_inc(x_73); lean_dec(x_52); lean_inc(x_2); lean_inc(x_13); @@ -2274,257 +2235,257 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_44); -x_78 = lean_apply_8(x_2, x_44, x_8, x_9, x_10, x_11, x_12, x_13, x_77); -if (lean_obj_tag(x_78) == 0) +x_74 = lean_apply_8(x_2, x_44, x_8, x_9, x_10, x_11, x_12, x_13, x_73); +if (lean_obj_tag(x_74) == 0) { -lean_object* x_79; -x_79 = lean_ctor_get(x_78, 0); -lean_inc(x_79); -if (lean_obj_tag(x_79) == 0) +lean_object* x_75; +x_75 = lean_ctor_get(x_74, 0); +lean_inc(x_75); +if (lean_obj_tag(x_75) == 0) { -lean_object* x_80; lean_object* x_81; uint8_t x_82; lean_object* x_83; lean_object* x_103; lean_object* x_104; lean_object* x_105; uint8_t x_106; +lean_object* x_76; lean_object* x_77; uint8_t x_78; lean_object* x_79; lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; lean_free_object(x_7); lean_dec(x_17); -x_80 = lean_ctor_get(x_78, 1); -lean_inc(x_80); -lean_dec(x_78); -x_81 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; -x_103 = lean_st_ref_get(x_13, x_80); -x_104 = lean_ctor_get(x_103, 0); -lean_inc(x_104); -x_105 = lean_ctor_get(x_104, 3); -lean_inc(x_105); -lean_dec(x_104); -x_106 = lean_ctor_get_uint8(x_105, sizeof(void*)*1); -lean_dec(x_105); -if (x_106 == 0) -{ -lean_object* x_107; uint8_t x_108; -x_107 = lean_ctor_get(x_103, 1); -lean_inc(x_107); -lean_dec(x_103); -x_108 = 0; -x_82 = x_108; -x_83 = x_107; -goto block_102; -} -else -{ -lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; uint8_t x_113; -x_109 = lean_ctor_get(x_103, 1); -lean_inc(x_109); -lean_dec(x_103); -x_110 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_81, x_8, x_9, x_10, x_11, x_12, x_13, x_109); -x_111 = lean_ctor_get(x_110, 0); -lean_inc(x_111); -x_112 = lean_ctor_get(x_110, 1); -lean_inc(x_112); -lean_dec(x_110); -x_113 = lean_unbox(x_111); -lean_dec(x_111); -x_82 = x_113; -x_83 = x_112; -goto block_102; -} -block_102: -{ -if (x_82 == 0) -{ -lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; -lean_dec(x_44); -x_84 = lean_box(0); -x_85 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_28, x_84, x_8, x_9, x_10, x_11, x_12, x_13, x_83); -x_86 = lean_ctor_get(x_85, 0); -lean_inc(x_86); -x_87 = lean_ctor_get(x_85, 1); -lean_inc(x_87); -lean_dec(x_85); -x_18 = x_86; -x_19 = x_87; -goto block_26; -} -else -{ -lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; -lean_inc(x_1); -x_88 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_88, 0, x_1); -x_89 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; -x_90 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_90, 0, x_89); -lean_ctor_set(x_90, 1, x_88); -x_91 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__2; -x_92 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_92, 0, x_90); -lean_ctor_set(x_92, 1, x_91); -x_93 = l_Lean_indentExpr(x_44); -x_94 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_94, 0, x_92); -lean_ctor_set(x_94, 1, x_93); -x_95 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_95, 0, x_94); -lean_ctor_set(x_95, 1, x_89); -x_96 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_81, x_95, x_8, x_9, x_10, x_11, x_12, x_13, x_83); -x_97 = lean_ctor_get(x_96, 0); -lean_inc(x_97); -x_98 = lean_ctor_get(x_96, 1); -lean_inc(x_98); -lean_dec(x_96); -x_99 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_28, x_97, x_8, x_9, x_10, x_11, x_12, x_13, x_98); -lean_dec(x_97); +x_76 = lean_ctor_get(x_74, 1); +lean_inc(x_76); +lean_dec(x_74); +x_77 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; +x_99 = lean_st_ref_get(x_13, x_76); x_100 = lean_ctor_get(x_99, 0); lean_inc(x_100); -x_101 = lean_ctor_get(x_99, 1); +x_101 = lean_ctor_get(x_100, 3); lean_inc(x_101); +lean_dec(x_100); +x_102 = lean_ctor_get_uint8(x_101, sizeof(void*)*1); +lean_dec(x_101); +if (x_102 == 0) +{ +lean_object* x_103; uint8_t x_104; +x_103 = lean_ctor_get(x_99, 1); +lean_inc(x_103); lean_dec(x_99); -x_18 = x_100; -x_19 = x_101; +x_104 = 0; +x_78 = x_104; +x_79 = x_103; +goto block_98; +} +else +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; uint8_t x_109; +x_105 = lean_ctor_get(x_99, 1); +lean_inc(x_105); +lean_dec(x_99); +x_106 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_77, x_8, x_9, x_10, x_11, x_12, x_13, x_105); +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_unbox(x_107); +lean_dec(x_107); +x_78 = x_109; +x_79 = x_108; +goto block_98; +} +block_98: +{ +if (x_78 == 0) +{ +lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; +lean_dec(x_44); +x_80 = lean_box(0); +x_81 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_28, x_80, x_8, x_9, x_10, x_11, x_12, x_13, x_79); +x_82 = lean_ctor_get(x_81, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_81, 1); +lean_inc(x_83); +lean_dec(x_81); +x_18 = x_82; +x_19 = x_83; +goto block_26; +} +else +{ +lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; +lean_inc(x_1); +x_84 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_84, 0, x_1); +x_85 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; +x_86 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_86, 0, x_85); +lean_ctor_set(x_86, 1, x_84); +x_87 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__2; +x_88 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_88, 0, x_86); +lean_ctor_set(x_88, 1, x_87); +x_89 = l_Lean_indentExpr(x_44); +x_90 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_90, 0, x_88); +lean_ctor_set(x_90, 1, x_89); +x_91 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_91, 0, x_90); +lean_ctor_set(x_91, 1, x_85); +x_92 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_77, x_91, x_8, x_9, x_10, x_11, x_12, x_13, x_79); +x_93 = lean_ctor_get(x_92, 0); +lean_inc(x_93); +x_94 = lean_ctor_get(x_92, 1); +lean_inc(x_94); +lean_dec(x_92); +x_95 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_28, x_93, x_8, x_9, x_10, x_11, x_12, x_13, x_94); +lean_dec(x_93); +x_96 = lean_ctor_get(x_95, 0); +lean_inc(x_96); +x_97 = lean_ctor_get(x_95, 1); +lean_inc(x_97); +lean_dec(x_95); +x_18 = x_96; +x_19 = x_97; goto block_26; } } } else { -lean_object* x_114; lean_object* x_115; lean_object* x_116; -x_114 = lean_ctor_get(x_78, 1); -lean_inc(x_114); -lean_dec(x_78); -x_115 = lean_ctor_get(x_79, 0); -lean_inc(x_115); -lean_dec(x_79); +lean_object* x_110; lean_object* x_111; lean_object* x_112; +x_110 = lean_ctor_get(x_74, 1); +lean_inc(x_110); +lean_dec(x_74); +x_111 = lean_ctor_get(x_75, 0); +lean_inc(x_111); +lean_dec(x_75); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -x_116 = l_Lean_Meta_isExprDefEq(x_17, x_115, x_10, x_11, x_12, x_13, x_114); -if (lean_obj_tag(x_116) == 0) +x_112 = l_Lean_Meta_isExprDefEq(x_17, x_111, x_10, x_11, x_12, x_13, x_110); +if (lean_obj_tag(x_112) == 0) { -lean_object* x_117; uint8_t x_118; -x_117 = lean_ctor_get(x_116, 0); -lean_inc(x_117); -x_118 = lean_unbox(x_117); -lean_dec(x_117); -if (x_118 == 0) +lean_object* x_113; uint8_t x_114; +x_113 = lean_ctor_get(x_112, 0); +lean_inc(x_113); +x_114 = lean_unbox(x_113); +lean_dec(x_113); +if (x_114 == 0) { -lean_object* x_119; lean_object* x_120; uint8_t x_121; lean_object* x_122; lean_object* x_142; lean_object* x_143; lean_object* x_144; uint8_t x_145; +lean_object* x_115; lean_object* x_116; uint8_t x_117; lean_object* x_118; lean_object* x_138; lean_object* x_139; lean_object* x_140; uint8_t x_141; lean_free_object(x_7); -x_119 = lean_ctor_get(x_116, 1); -lean_inc(x_119); -lean_dec(x_116); -x_120 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; -x_142 = lean_st_ref_get(x_13, x_119); -x_143 = lean_ctor_get(x_142, 0); -lean_inc(x_143); -x_144 = lean_ctor_get(x_143, 3); -lean_inc(x_144); -lean_dec(x_143); -x_145 = lean_ctor_get_uint8(x_144, sizeof(void*)*1); -lean_dec(x_144); -if (x_145 == 0) -{ -lean_object* x_146; uint8_t x_147; -x_146 = lean_ctor_get(x_142, 1); -lean_inc(x_146); -lean_dec(x_142); -x_147 = 0; -x_121 = x_147; -x_122 = x_146; -goto block_141; -} -else -{ -lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; uint8_t x_152; -x_148 = lean_ctor_get(x_142, 1); -lean_inc(x_148); -lean_dec(x_142); -x_149 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_120, x_8, x_9, x_10, x_11, x_12, x_13, x_148); -x_150 = lean_ctor_get(x_149, 0); -lean_inc(x_150); -x_151 = lean_ctor_get(x_149, 1); -lean_inc(x_151); -lean_dec(x_149); -x_152 = lean_unbox(x_150); -lean_dec(x_150); -x_121 = x_152; -x_122 = x_151; -goto block_141; -} -block_141: -{ -if (x_121 == 0) -{ -lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; -lean_dec(x_44); -x_123 = lean_box(0); -x_124 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_28, x_123, x_8, x_9, x_10, x_11, x_12, x_13, x_122); -x_125 = lean_ctor_get(x_124, 0); -lean_inc(x_125); -x_126 = lean_ctor_get(x_124, 1); -lean_inc(x_126); -lean_dec(x_124); -x_18 = x_125; -x_19 = x_126; -goto block_26; -} -else -{ -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_inc(x_1); -x_127 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_127, 0, x_1); -x_128 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; -x_129 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_129, 0, x_128); -lean_ctor_set(x_129, 1, x_127); -x_130 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__4; -x_131 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_131, 0, x_129); -lean_ctor_set(x_131, 1, x_130); -x_132 = l_Lean_indentExpr(x_44); -x_133 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_133, 0, x_131); -lean_ctor_set(x_133, 1, x_132); -x_134 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_134, 0, x_133); -lean_ctor_set(x_134, 1, x_128); -x_135 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_120, x_134, x_8, x_9, x_10, x_11, x_12, x_13, x_122); -x_136 = lean_ctor_get(x_135, 0); -lean_inc(x_136); -x_137 = lean_ctor_get(x_135, 1); -lean_inc(x_137); -lean_dec(x_135); -x_138 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_28, x_136, x_8, x_9, x_10, x_11, x_12, x_13, x_137); -lean_dec(x_136); +x_115 = lean_ctor_get(x_112, 1); +lean_inc(x_115); +lean_dec(x_112); +x_116 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; +x_138 = lean_st_ref_get(x_13, x_115); x_139 = lean_ctor_get(x_138, 0); lean_inc(x_139); -x_140 = lean_ctor_get(x_138, 1); +x_140 = lean_ctor_get(x_139, 3); lean_inc(x_140); +lean_dec(x_139); +x_141 = lean_ctor_get_uint8(x_140, sizeof(void*)*1); +lean_dec(x_140); +if (x_141 == 0) +{ +lean_object* x_142; uint8_t x_143; +x_142 = lean_ctor_get(x_138, 1); +lean_inc(x_142); lean_dec(x_138); -x_18 = x_139; -x_19 = x_140; +x_143 = 0; +x_117 = x_143; +x_118 = x_142; +goto block_137; +} +else +{ +lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; uint8_t x_148; +x_144 = lean_ctor_get(x_138, 1); +lean_inc(x_144); +lean_dec(x_138); +x_145 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_116, x_8, x_9, x_10, x_11, x_12, x_13, x_144); +x_146 = lean_ctor_get(x_145, 0); +lean_inc(x_146); +x_147 = lean_ctor_get(x_145, 1); +lean_inc(x_147); +lean_dec(x_145); +x_148 = lean_unbox(x_146); +lean_dec(x_146); +x_117 = x_148; +x_118 = x_147; +goto block_137; +} +block_137: +{ +if (x_117 == 0) +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; +lean_dec(x_44); +x_119 = lean_box(0); +x_120 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_28, x_119, x_8, x_9, x_10, x_11, x_12, x_13, x_118); +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_18 = x_121; +x_19 = x_122; +goto block_26; +} +else +{ +lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; +lean_inc(x_1); +x_123 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_123, 0, x_1); +x_124 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; +x_125 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_125, 0, x_124); +lean_ctor_set(x_125, 1, x_123); +x_126 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__4; +x_127 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_127, 0, x_125); +lean_ctor_set(x_127, 1, x_126); +x_128 = l_Lean_indentExpr(x_44); +x_129 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_129, 0, x_127); +lean_ctor_set(x_129, 1, x_128); +x_130 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_130, 0, x_129); +lean_ctor_set(x_130, 1, x_124); +x_131 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_116, x_130, x_8, x_9, x_10, x_11, x_12, x_13, x_118); +x_132 = lean_ctor_get(x_131, 0); +lean_inc(x_132); +x_133 = lean_ctor_get(x_131, 1); +lean_inc(x_133); +lean_dec(x_131); +x_134 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_28, x_132, x_8, x_9, x_10, x_11, x_12, x_13, x_133); +lean_dec(x_132); +x_135 = lean_ctor_get(x_134, 0); +lean_inc(x_135); +x_136 = lean_ctor_get(x_134, 1); +lean_inc(x_136); +lean_dec(x_134); +x_18 = x_135; +x_19 = x_136; goto block_26; } } } else { -lean_object* x_153; lean_object* x_154; +lean_object* x_149; lean_object* x_150; lean_dec(x_44); -x_153 = lean_ctor_get(x_116, 1); -lean_inc(x_153); -lean_dec(x_116); +x_149 = lean_ctor_get(x_112, 1); +lean_inc(x_149); +lean_dec(x_112); lean_inc(x_3); lean_ctor_set(x_7, 0, x_3); -x_154 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_154, 0, x_7); -x_18 = x_154; -x_19 = x_153; +x_150 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_150, 0, x_7); +x_18 = x_150; +x_19 = x_149; goto block_26; } } else { -uint8_t x_155; +uint8_t x_151; lean_dec(x_44); lean_dec(x_28); lean_free_object(x_7); @@ -2537,19 +2498,56 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_155 = !lean_is_exclusive(x_116); +x_151 = !lean_is_exclusive(x_112); +if (x_151 == 0) +{ +return x_112; +} +else +{ +lean_object* x_152; lean_object* x_153; lean_object* x_154; +x_152 = lean_ctor_get(x_112, 0); +x_153 = lean_ctor_get(x_112, 1); +lean_inc(x_153); +lean_inc(x_152); +lean_dec(x_112); +x_154 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_154, 0, x_152); +lean_ctor_set(x_154, 1, x_153); +return x_154; +} +} +} +} +else +{ +uint8_t x_155; +lean_dec(x_44); +lean_dec(x_28); +lean_free_object(x_7); +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_155 = !lean_is_exclusive(x_74); if (x_155 == 0) { -return x_116; +return x_74; } else { lean_object* x_156; lean_object* x_157; lean_object* x_158; -x_156 = lean_ctor_get(x_116, 0); -x_157 = lean_ctor_get(x_116, 1); +x_156 = lean_ctor_get(x_74, 0); +x_157 = lean_ctor_get(x_74, 1); lean_inc(x_157); lean_inc(x_156); -lean_dec(x_116); +lean_dec(x_74); x_158 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_158, 0, x_156); lean_ctor_set(x_158, 1, x_157); @@ -2574,19 +2572,19 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_159 = !lean_is_exclusive(x_78); +x_159 = !lean_is_exclusive(x_52); if (x_159 == 0) { -return x_78; +return x_52; } else { lean_object* x_160; lean_object* x_161; lean_object* x_162; -x_160 = lean_ctor_get(x_78, 0); -x_161 = lean_ctor_get(x_78, 1); +x_160 = lean_ctor_get(x_52, 0); +x_161 = lean_ctor_get(x_52, 1); lean_inc(x_161); lean_inc(x_160); -lean_dec(x_78); +lean_dec(x_52); x_162 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_162, 0, x_160); lean_ctor_set(x_162, 1, x_161); @@ -2597,11 +2595,56 @@ return x_162; } else { -uint8_t x_163; -lean_dec(x_44); +lean_object* x_163; +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_1); +x_163 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_44, x_8, x_9, x_10, x_11, x_12, x_13, x_45); +if (lean_obj_tag(x_163) == 0) +{ +lean_object* x_164; uint8_t x_165; +x_164 = lean_ctor_get(x_163, 0); +lean_inc(x_164); +x_165 = lean_unbox(x_164); +lean_dec(x_164); +if (x_165 == 0) +{ +lean_object* x_166; lean_object* x_167; lean_object* x_168; +x_166 = lean_ctor_get(x_163, 1); +lean_inc(x_166); +lean_dec(x_163); +x_167 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; +lean_ctor_set(x_7, 0, x_167); +x_168 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_168, 0, x_7); +x_18 = x_168; +x_19 = x_166; +goto block_26; +} +else +{ +lean_object* x_169; lean_object* x_170; +x_169 = lean_ctor_get(x_163, 1); +lean_inc(x_169); +lean_dec(x_163); +lean_inc(x_3); +lean_ctor_set(x_7, 0, x_3); +x_170 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_170, 0, x_7); +x_18 = x_170; +x_19 = x_169; +goto block_26; +} +} +else +{ +uint8_t x_171; lean_dec(x_28); lean_free_object(x_7); -lean_dec(x_17); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -2611,72 +2654,25 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_163 = !lean_is_exclusive(x_52); -if (x_163 == 0) +x_171 = !lean_is_exclusive(x_163); +if (x_171 == 0) { -return x_52; +return x_163; } else { -lean_object* x_164; lean_object* x_165; lean_object* x_166; -x_164 = lean_ctor_get(x_52, 0); -x_165 = lean_ctor_get(x_52, 1); -lean_inc(x_165); -lean_inc(x_164); -lean_dec(x_52); -x_166 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_166, 0, x_164); -lean_ctor_set(x_166, 1, x_165); -return x_166; -} -} -} -} -else -{ -lean_object* x_167; -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_1); -x_167 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_44, x_8, x_9, x_10, x_11, x_12, x_13, x_45); -if (lean_obj_tag(x_167) == 0) -{ -lean_object* x_168; uint8_t x_169; -x_168 = lean_ctor_get(x_167, 0); -lean_inc(x_168); -x_169 = lean_unbox(x_168); -lean_dec(x_168); -if (x_169 == 0) -{ -lean_object* x_170; lean_object* x_171; lean_object* x_172; -x_170 = lean_ctor_get(x_167, 1); -lean_inc(x_170); -lean_dec(x_167); -x_171 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; -lean_ctor_set(x_7, 0, x_171); -x_172 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_172, 0, x_7); -x_18 = x_172; -x_19 = x_170; -goto block_26; -} -else -{ -lean_object* x_173; lean_object* x_174; -x_173 = lean_ctor_get(x_167, 1); +lean_object* x_172; lean_object* x_173; lean_object* x_174; +x_172 = lean_ctor_get(x_163, 0); +x_173 = lean_ctor_get(x_163, 1); lean_inc(x_173); -lean_dec(x_167); -lean_inc(x_3); -lean_ctor_set(x_7, 0, x_3); -x_174 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_174, 0, x_7); -x_18 = x_174; -x_19 = x_173; -goto block_26; +lean_inc(x_172); +lean_dec(x_163); +x_174 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_174, 0, x_172); +lean_ctor_set(x_174, 1, x_173); +return x_174; +} +} } } else @@ -2684,6 +2680,7 @@ else uint8_t x_175; lean_dec(x_28); lean_free_object(x_7); +lean_dec(x_17); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -2693,19 +2690,19 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_175 = !lean_is_exclusive(x_167); +x_175 = !lean_is_exclusive(x_43); if (x_175 == 0) { -return x_167; +return x_43; } else { lean_object* x_176; lean_object* x_177; lean_object* x_178; -x_176 = lean_ctor_get(x_167, 0); -x_177 = lean_ctor_get(x_167, 1); +x_176 = lean_ctor_get(x_43, 0); +x_177 = lean_ctor_get(x_43, 1); lean_inc(x_177); lean_inc(x_176); -lean_dec(x_167); +lean_dec(x_43); x_178 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_178, 0, x_176); lean_ctor_set(x_178, 1, x_177); @@ -2713,154 +2710,115 @@ return x_178; } } } -} else { -uint8_t x_179; +lean_object* x_179; uint8_t x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_dec(x_28); -lean_free_object(x_7); -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_179 = !lean_is_exclusive(x_43); -if (x_179 == 0) -{ -return x_43; -} -else -{ -lean_object* x_180; lean_object* x_181; lean_object* x_182; -x_180 = lean_ctor_get(x_43, 0); -x_181 = lean_ctor_get(x_43, 1); -lean_inc(x_181); -lean_inc(x_180); -lean_dec(x_43); -x_182 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_182, 0, x_180); -lean_ctor_set(x_182, 1, x_181); -return x_182; -} -} -} -else -{ -lean_object* x_183; uint8_t x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; -lean_dec(x_28); -x_183 = lean_array_fget(x_30, x_31); -x_184 = lean_unbox(x_183); -lean_dec(x_183); -x_185 = lean_unsigned_to_nat(1u); -x_186 = lean_nat_add(x_31, x_185); +x_179 = lean_array_fget(x_30, x_31); +x_180 = lean_unbox(x_179); +lean_dec(x_179); +x_181 = lean_unsigned_to_nat(1u); +x_182 = lean_nat_add(x_31, x_181); lean_dec(x_31); -x_187 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_187, 0, x_30); -lean_ctor_set(x_187, 1, x_186); -lean_ctor_set(x_187, 2, x_32); +x_183 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_183, 0, x_30); +lean_ctor_set(x_183, 1, x_182); +lean_ctor_set(x_183, 2, x_32); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_17); -x_188 = lean_infer_type(x_17, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_188) == 0) +x_184 = lean_infer_type(x_17, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_184) == 0) { -lean_object* x_189; lean_object* x_190; uint8_t x_191; +lean_object* x_185; lean_object* x_186; uint8_t x_187; +x_185 = lean_ctor_get(x_184, 0); +lean_inc(x_185); +x_186 = lean_ctor_get(x_184, 1); +lean_inc(x_186); +lean_dec(x_184); +x_187 = l_Lean_BinderInfo_isInstImplicit(x_180); +if (x_187 == 0) +{ +lean_object* x_188; lean_object* x_189; lean_object* x_190; uint8_t x_191; +lean_inc(x_17); +x_188 = l_Lean_instantiateMVars___at_Lean_Meta_Simp_synthesizeArgs___spec__1(x_17, x_8, x_9, x_10, x_11, x_12, x_13, x_186); x_189 = lean_ctor_get(x_188, 0); lean_inc(x_189); x_190 = lean_ctor_get(x_188, 1); lean_inc(x_190); lean_dec(x_188); -x_191 = l_Lean_BinderInfo_isInstImplicit(x_184); +x_191 = l_Lean_Expr_isMVar(x_189); +lean_dec(x_189); if (x_191 == 0) { -lean_object* x_192; lean_object* x_193; lean_object* x_194; uint8_t x_195; -lean_inc(x_17); -x_192 = l_Lean_instantiateMVars___at_Lean_Meta_Simp_synthesizeArgs___spec__1(x_17, x_8, x_9, x_10, x_11, x_12, x_13, x_190); -x_193 = lean_ctor_get(x_192, 0); -lean_inc(x_193); -x_194 = lean_ctor_get(x_192, 1); +lean_object* x_192; +lean_dec(x_185); +lean_dec(x_17); +lean_inc(x_3); +lean_ctor_set(x_7, 1, x_183); +lean_ctor_set(x_7, 0, x_3); +x_192 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_192, 0, x_7); +x_18 = x_192; +x_19 = x_190; +goto block_26; +} +else +{ +lean_object* x_193; +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_185); +x_193 = l_Lean_Meta_isProp(x_185, x_10, x_11, x_12, x_13, x_190); +if (lean_obj_tag(x_193) == 0) +{ +lean_object* x_194; uint8_t x_195; +x_194 = lean_ctor_get(x_193, 0); lean_inc(x_194); -lean_dec(x_192); -x_195 = l_Lean_Expr_isMVar(x_193); -lean_dec(x_193); +x_195 = lean_unbox(x_194); +lean_dec(x_194); if (x_195 == 0) { -lean_object* x_196; -lean_dec(x_189); -lean_dec(x_17); -lean_inc(x_3); -lean_ctor_set(x_7, 1, x_187); -lean_ctor_set(x_7, 0, x_3); -x_196 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_196, 0, x_7); -x_18 = x_196; -x_19 = x_194; -goto block_26; -} -else -{ -lean_object* x_197; +lean_object* x_196; lean_object* x_197; lean_object* x_198; +x_196 = lean_ctor_get(x_193, 1); +lean_inc(x_196); +lean_dec(x_193); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -lean_inc(x_189); -x_197 = l_Lean_Meta_isProp(x_189, x_10, x_11, x_12, x_13, x_194); -if (lean_obj_tag(x_197) == 0) -{ -lean_object* x_198; uint8_t x_199; +lean_inc(x_185); +x_197 = l_Lean_Meta_isClass_x3f(x_185, x_10, x_11, x_12, x_13, x_196); x_198 = lean_ctor_get(x_197, 0); lean_inc(x_198); -x_199 = lean_unbox(x_198); -lean_dec(x_198); -if (x_199 == 0) +if (lean_obj_tag(x_198) == 0) { -lean_object* x_200; lean_object* x_201; -x_200 = lean_ctor_get(x_197, 1); -lean_inc(x_200); -lean_dec(x_197); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_189); -x_201 = l_Lean_Meta_isClass_x3f(x_189, x_10, x_11, x_12, x_13, x_200); -if (lean_obj_tag(x_201) == 0) -{ -lean_object* x_202; -x_202 = lean_ctor_get(x_201, 0); -lean_inc(x_202); -if (lean_obj_tag(x_202) == 0) -{ -lean_object* x_203; lean_object* x_204; -lean_dec(x_189); +lean_object* x_199; lean_object* x_200; +lean_dec(x_185); lean_dec(x_17); -x_203 = lean_ctor_get(x_201, 1); -lean_inc(x_203); -lean_dec(x_201); +x_199 = lean_ctor_get(x_197, 1); +lean_inc(x_199); +lean_dec(x_197); lean_inc(x_3); -lean_ctor_set(x_7, 1, x_187); +lean_ctor_set(x_7, 1, x_183); lean_ctor_set(x_7, 0, x_3); -x_204 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_204, 0, x_7); -x_18 = x_204; -x_19 = x_203; +x_200 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_200, 0, x_7); +x_18 = x_200; +x_19 = x_199; goto block_26; } else { -lean_object* x_205; lean_object* x_206; -lean_dec(x_202); -x_205 = lean_ctor_get(x_201, 1); -lean_inc(x_205); -lean_dec(x_201); +lean_object* x_201; lean_object* x_202; +lean_dec(x_198); +x_201 = lean_ctor_get(x_197, 1); +lean_inc(x_201); +lean_dec(x_197); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); @@ -2868,49 +2826,49 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_206 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_189, x_8, x_9, x_10, x_11, x_12, x_13, x_205); -if (lean_obj_tag(x_206) == 0) +x_202 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_185, x_8, x_9, x_10, x_11, x_12, x_13, x_201); +if (lean_obj_tag(x_202) == 0) { -lean_object* x_207; uint8_t x_208; -x_207 = lean_ctor_get(x_206, 0); -lean_inc(x_207); -x_208 = lean_unbox(x_207); -lean_dec(x_207); -if (x_208 == 0) +lean_object* x_203; uint8_t x_204; +x_203 = lean_ctor_get(x_202, 0); +lean_inc(x_203); +x_204 = lean_unbox(x_203); +lean_dec(x_203); +if (x_204 == 0) { -lean_object* x_209; lean_object* x_210; lean_object* x_211; -x_209 = lean_ctor_get(x_206, 1); -lean_inc(x_209); -lean_dec(x_206); -x_210 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; -lean_ctor_set(x_7, 1, x_187); -lean_ctor_set(x_7, 0, x_210); -x_211 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_211, 0, x_7); -x_18 = x_211; -x_19 = x_209; +lean_object* x_205; lean_object* x_206; lean_object* x_207; +x_205 = lean_ctor_get(x_202, 1); +lean_inc(x_205); +lean_dec(x_202); +x_206 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; +lean_ctor_set(x_7, 1, x_183); +lean_ctor_set(x_7, 0, x_206); +x_207 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_207, 0, x_7); +x_18 = x_207; +x_19 = x_205; goto block_26; } else { -lean_object* x_212; lean_object* x_213; -x_212 = lean_ctor_get(x_206, 1); -lean_inc(x_212); -lean_dec(x_206); +lean_object* x_208; lean_object* x_209; +x_208 = lean_ctor_get(x_202, 1); +lean_inc(x_208); +lean_dec(x_202); lean_inc(x_3); -lean_ctor_set(x_7, 1, x_187); +lean_ctor_set(x_7, 1, x_183); lean_ctor_set(x_7, 0, x_3); -x_213 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_213, 0, x_7); -x_18 = x_213; -x_19 = x_212; +x_209 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_209, 0, x_7); +x_18 = x_209; +x_19 = x_208; goto block_26; } } else { -lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; -lean_dec(x_187); +lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; +lean_dec(x_183); lean_free_object(x_7); lean_dec(x_13); lean_dec(x_12); @@ -2921,73 +2879,35 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_214 = lean_ctor_get(x_206, 0); +x_210 = lean_ctor_get(x_202, 0); +lean_inc(x_210); +x_211 = lean_ctor_get(x_202, 1); +lean_inc(x_211); +if (lean_is_exclusive(x_202)) { + lean_ctor_release(x_202, 0); + lean_ctor_release(x_202, 1); + x_212 = x_202; +} else { + lean_dec_ref(x_202); + x_212 = lean_box(0); +} +if (lean_is_scalar(x_212)) { + x_213 = lean_alloc_ctor(1, 2, 0); +} else { + x_213 = x_212; +} +lean_ctor_set(x_213, 0, x_210); +lean_ctor_set(x_213, 1, x_211); +return x_213; +} +} +} +else +{ +lean_object* x_214; lean_object* x_215; +x_214 = lean_ctor_get(x_193, 1); lean_inc(x_214); -x_215 = lean_ctor_get(x_206, 1); -lean_inc(x_215); -if (lean_is_exclusive(x_206)) { - lean_ctor_release(x_206, 0); - lean_ctor_release(x_206, 1); - x_216 = x_206; -} else { - lean_dec_ref(x_206); - x_216 = lean_box(0); -} -if (lean_is_scalar(x_216)) { - x_217 = lean_alloc_ctor(1, 2, 0); -} else { - x_217 = x_216; -} -lean_ctor_set(x_217, 0, x_214); -lean_ctor_set(x_217, 1, x_215); -return x_217; -} -} -} -else -{ -lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; -lean_dec(x_189); -lean_dec(x_187); -lean_free_object(x_7); -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_218 = lean_ctor_get(x_201, 0); -lean_inc(x_218); -x_219 = lean_ctor_get(x_201, 1); -lean_inc(x_219); -if (lean_is_exclusive(x_201)) { - lean_ctor_release(x_201, 0); - lean_ctor_release(x_201, 1); - x_220 = x_201; -} else { - lean_dec_ref(x_201); - x_220 = lean_box(0); -} -if (lean_is_scalar(x_220)) { - x_221 = lean_alloc_ctor(1, 2, 0); -} else { - x_221 = x_220; -} -lean_ctor_set(x_221, 0, x_218); -lean_ctor_set(x_221, 1, x_219); -return x_221; -} -} -else -{ -lean_object* x_222; lean_object* x_223; -x_222 = lean_ctor_get(x_197, 1); -lean_inc(x_222); -lean_dec(x_197); +lean_dec(x_193); lean_inc(x_2); lean_inc(x_13); lean_inc(x_12); @@ -2995,261 +2915,261 @@ lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); -lean_inc(x_189); -x_223 = lean_apply_8(x_2, x_189, x_8, x_9, x_10, x_11, x_12, x_13, x_222); -if (lean_obj_tag(x_223) == 0) +lean_inc(x_185); +x_215 = lean_apply_8(x_2, x_185, x_8, x_9, x_10, x_11, x_12, x_13, x_214); +if (lean_obj_tag(x_215) == 0) { -lean_object* x_224; -x_224 = lean_ctor_get(x_223, 0); -lean_inc(x_224); -if (lean_obj_tag(x_224) == 0) +lean_object* x_216; +x_216 = lean_ctor_get(x_215, 0); +lean_inc(x_216); +if (lean_obj_tag(x_216) == 0) { -lean_object* x_225; lean_object* x_226; uint8_t x_227; lean_object* x_228; lean_object* x_248; lean_object* x_249; lean_object* x_250; uint8_t x_251; +lean_object* x_217; lean_object* x_218; uint8_t x_219; lean_object* x_220; lean_object* x_240; lean_object* x_241; lean_object* x_242; uint8_t x_243; lean_free_object(x_7); lean_dec(x_17); -x_225 = lean_ctor_get(x_223, 1); -lean_inc(x_225); -lean_dec(x_223); -x_226 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; -x_248 = lean_st_ref_get(x_13, x_225); -x_249 = lean_ctor_get(x_248, 0); -lean_inc(x_249); -x_250 = lean_ctor_get(x_249, 3); -lean_inc(x_250); -lean_dec(x_249); -x_251 = lean_ctor_get_uint8(x_250, sizeof(void*)*1); -lean_dec(x_250); -if (x_251 == 0) -{ -lean_object* x_252; uint8_t x_253; -x_252 = lean_ctor_get(x_248, 1); -lean_inc(x_252); -lean_dec(x_248); -x_253 = 0; -x_227 = x_253; -x_228 = x_252; -goto block_247; -} -else -{ -lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; uint8_t x_258; -x_254 = lean_ctor_get(x_248, 1); -lean_inc(x_254); -lean_dec(x_248); -x_255 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_226, x_8, x_9, x_10, x_11, x_12, x_13, x_254); -x_256 = lean_ctor_get(x_255, 0); -lean_inc(x_256); -x_257 = lean_ctor_get(x_255, 1); -lean_inc(x_257); -lean_dec(x_255); -x_258 = lean_unbox(x_256); -lean_dec(x_256); -x_227 = x_258; -x_228 = x_257; -goto block_247; -} -block_247: -{ -if (x_227 == 0) -{ -lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; -lean_dec(x_189); -x_229 = lean_box(0); -x_230 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_187, x_229, x_8, x_9, x_10, x_11, x_12, x_13, x_228); -x_231 = lean_ctor_get(x_230, 0); -lean_inc(x_231); -x_232 = lean_ctor_get(x_230, 1); -lean_inc(x_232); -lean_dec(x_230); -x_18 = x_231; -x_19 = x_232; -goto block_26; -} -else -{ -lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; -lean_inc(x_1); -x_233 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_233, 0, x_1); -x_234 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; -x_235 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_235, 0, x_234); -lean_ctor_set(x_235, 1, x_233); -x_236 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__2; -x_237 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_237, 0, x_235); -lean_ctor_set(x_237, 1, x_236); -x_238 = l_Lean_indentExpr(x_189); -x_239 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_239, 0, x_237); -lean_ctor_set(x_239, 1, x_238); -x_240 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_240, 0, x_239); -lean_ctor_set(x_240, 1, x_234); -x_241 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_226, x_240, x_8, x_9, x_10, x_11, x_12, x_13, x_228); -x_242 = lean_ctor_get(x_241, 0); +x_217 = lean_ctor_get(x_215, 1); +lean_inc(x_217); +lean_dec(x_215); +x_218 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; +x_240 = lean_st_ref_get(x_13, x_217); +x_241 = lean_ctor_get(x_240, 0); +lean_inc(x_241); +x_242 = lean_ctor_get(x_241, 3); lean_inc(x_242); -x_243 = lean_ctor_get(x_241, 1); -lean_inc(x_243); lean_dec(x_241); -x_244 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_187, x_242, x_8, x_9, x_10, x_11, x_12, x_13, x_243); +x_243 = lean_ctor_get_uint8(x_242, sizeof(void*)*1); lean_dec(x_242); -x_245 = lean_ctor_get(x_244, 0); -lean_inc(x_245); -x_246 = lean_ctor_get(x_244, 1); +if (x_243 == 0) +{ +lean_object* x_244; uint8_t x_245; +x_244 = lean_ctor_get(x_240, 1); +lean_inc(x_244); +lean_dec(x_240); +x_245 = 0; +x_219 = x_245; +x_220 = x_244; +goto block_239; +} +else +{ +lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; uint8_t x_250; +x_246 = lean_ctor_get(x_240, 1); lean_inc(x_246); -lean_dec(x_244); -x_18 = x_245; -x_19 = x_246; +lean_dec(x_240); +x_247 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_218, x_8, x_9, x_10, x_11, x_12, x_13, x_246); +x_248 = lean_ctor_get(x_247, 0); +lean_inc(x_248); +x_249 = lean_ctor_get(x_247, 1); +lean_inc(x_249); +lean_dec(x_247); +x_250 = lean_unbox(x_248); +lean_dec(x_248); +x_219 = x_250; +x_220 = x_249; +goto block_239; +} +block_239: +{ +if (x_219 == 0) +{ +lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; +lean_dec(x_185); +x_221 = lean_box(0); +x_222 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_183, x_221, x_8, x_9, x_10, x_11, x_12, x_13, x_220); +x_223 = lean_ctor_get(x_222, 0); +lean_inc(x_223); +x_224 = lean_ctor_get(x_222, 1); +lean_inc(x_224); +lean_dec(x_222); +x_18 = x_223; +x_19 = x_224; +goto block_26; +} +else +{ +lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; +lean_inc(x_1); +x_225 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_225, 0, x_1); +x_226 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; +x_227 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_227, 0, x_226); +lean_ctor_set(x_227, 1, x_225); +x_228 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__2; +x_229 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_229, 0, x_227); +lean_ctor_set(x_229, 1, x_228); +x_230 = l_Lean_indentExpr(x_185); +x_231 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_231, 0, x_229); +lean_ctor_set(x_231, 1, x_230); +x_232 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_232, 0, x_231); +lean_ctor_set(x_232, 1, x_226); +x_233 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_218, x_232, x_8, x_9, x_10, x_11, x_12, x_13, x_220); +x_234 = lean_ctor_get(x_233, 0); +lean_inc(x_234); +x_235 = lean_ctor_get(x_233, 1); +lean_inc(x_235); +lean_dec(x_233); +x_236 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_183, x_234, x_8, x_9, x_10, x_11, x_12, x_13, x_235); +lean_dec(x_234); +x_237 = lean_ctor_get(x_236, 0); +lean_inc(x_237); +x_238 = lean_ctor_get(x_236, 1); +lean_inc(x_238); +lean_dec(x_236); +x_18 = x_237; +x_19 = x_238; goto block_26; } } } else { -lean_object* x_259; lean_object* x_260; lean_object* x_261; -x_259 = lean_ctor_get(x_223, 1); -lean_inc(x_259); -lean_dec(x_223); -x_260 = lean_ctor_get(x_224, 0); -lean_inc(x_260); -lean_dec(x_224); +lean_object* x_251; lean_object* x_252; lean_object* x_253; +x_251 = lean_ctor_get(x_215, 1); +lean_inc(x_251); +lean_dec(x_215); +x_252 = lean_ctor_get(x_216, 0); +lean_inc(x_252); +lean_dec(x_216); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -x_261 = l_Lean_Meta_isExprDefEq(x_17, x_260, x_10, x_11, x_12, x_13, x_259); -if (lean_obj_tag(x_261) == 0) +x_253 = l_Lean_Meta_isExprDefEq(x_17, x_252, x_10, x_11, x_12, x_13, x_251); +if (lean_obj_tag(x_253) == 0) { -lean_object* x_262; uint8_t x_263; +lean_object* x_254; uint8_t x_255; +x_254 = lean_ctor_get(x_253, 0); +lean_inc(x_254); +x_255 = lean_unbox(x_254); +lean_dec(x_254); +if (x_255 == 0) +{ +lean_object* x_256; lean_object* x_257; uint8_t x_258; lean_object* x_259; lean_object* x_279; lean_object* x_280; lean_object* x_281; uint8_t x_282; +lean_free_object(x_7); +x_256 = lean_ctor_get(x_253, 1); +lean_inc(x_256); +lean_dec(x_253); +x_257 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; +x_279 = lean_st_ref_get(x_13, x_256); +x_280 = lean_ctor_get(x_279, 0); +lean_inc(x_280); +x_281 = lean_ctor_get(x_280, 3); +lean_inc(x_281); +lean_dec(x_280); +x_282 = lean_ctor_get_uint8(x_281, sizeof(void*)*1); +lean_dec(x_281); +if (x_282 == 0) +{ +lean_object* x_283; uint8_t x_284; +x_283 = lean_ctor_get(x_279, 1); +lean_inc(x_283); +lean_dec(x_279); +x_284 = 0; +x_258 = x_284; +x_259 = x_283; +goto block_278; +} +else +{ +lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; uint8_t x_289; +x_285 = lean_ctor_get(x_279, 1); +lean_inc(x_285); +lean_dec(x_279); +x_286 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_257, x_8, x_9, x_10, x_11, x_12, x_13, x_285); +x_287 = lean_ctor_get(x_286, 0); +lean_inc(x_287); +x_288 = lean_ctor_get(x_286, 1); +lean_inc(x_288); +lean_dec(x_286); +x_289 = lean_unbox(x_287); +lean_dec(x_287); +x_258 = x_289; +x_259 = x_288; +goto block_278; +} +block_278: +{ +if (x_258 == 0) +{ +lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; +lean_dec(x_185); +x_260 = lean_box(0); +x_261 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_183, x_260, x_8, x_9, x_10, x_11, x_12, x_13, x_259); x_262 = lean_ctor_get(x_261, 0); lean_inc(x_262); -x_263 = lean_unbox(x_262); -lean_dec(x_262); -if (x_263 == 0) -{ -lean_object* x_264; lean_object* x_265; uint8_t x_266; lean_object* x_267; lean_object* x_287; lean_object* x_288; lean_object* x_289; uint8_t x_290; -lean_free_object(x_7); -x_264 = lean_ctor_get(x_261, 1); -lean_inc(x_264); +x_263 = lean_ctor_get(x_261, 1); +lean_inc(x_263); lean_dec(x_261); -x_265 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; -x_287 = lean_st_ref_get(x_13, x_264); -x_288 = lean_ctor_get(x_287, 0); -lean_inc(x_288); -x_289 = lean_ctor_get(x_288, 3); -lean_inc(x_289); -lean_dec(x_288); -x_290 = lean_ctor_get_uint8(x_289, sizeof(void*)*1); -lean_dec(x_289); -if (x_290 == 0) -{ -lean_object* x_291; uint8_t x_292; -x_291 = lean_ctor_get(x_287, 1); -lean_inc(x_291); -lean_dec(x_287); -x_292 = 0; -x_266 = x_292; -x_267 = x_291; -goto block_286; -} -else -{ -lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; uint8_t x_297; -x_293 = lean_ctor_get(x_287, 1); -lean_inc(x_293); -lean_dec(x_287); -x_294 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_265, x_8, x_9, x_10, x_11, x_12, x_13, x_293); -x_295 = lean_ctor_get(x_294, 0); -lean_inc(x_295); -x_296 = lean_ctor_get(x_294, 1); -lean_inc(x_296); -lean_dec(x_294); -x_297 = lean_unbox(x_295); -lean_dec(x_295); -x_266 = x_297; -x_267 = x_296; -goto block_286; -} -block_286: -{ -if (x_266 == 0) -{ -lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; -lean_dec(x_189); -x_268 = lean_box(0); -x_269 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_187, x_268, x_8, x_9, x_10, x_11, x_12, x_13, x_267); -x_270 = lean_ctor_get(x_269, 0); -lean_inc(x_270); -x_271 = lean_ctor_get(x_269, 1); -lean_inc(x_271); -lean_dec(x_269); -x_18 = x_270; -x_19 = x_271; +x_18 = x_262; +x_19 = x_263; goto block_26; } else { -lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; +lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_inc(x_1); -x_272 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_272, 0, x_1); -x_273 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; -x_274 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_274, 0, x_273); -lean_ctor_set(x_274, 1, x_272); -x_275 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__4; -x_276 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_276, 0, x_274); -lean_ctor_set(x_276, 1, x_275); -x_277 = l_Lean_indentExpr(x_189); -x_278 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_278, 0, x_276); -lean_ctor_set(x_278, 1, x_277); -x_279 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_279, 0, x_278); -lean_ctor_set(x_279, 1, x_273); -x_280 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_265, x_279, x_8, x_9, x_10, x_11, x_12, x_13, x_267); -x_281 = lean_ctor_get(x_280, 0); -lean_inc(x_281); -x_282 = lean_ctor_get(x_280, 1); -lean_inc(x_282); -lean_dec(x_280); -x_283 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_187, x_281, x_8, x_9, x_10, x_11, x_12, x_13, x_282); -lean_dec(x_281); -x_284 = lean_ctor_get(x_283, 0); -lean_inc(x_284); -x_285 = lean_ctor_get(x_283, 1); -lean_inc(x_285); -lean_dec(x_283); -x_18 = x_284; -x_19 = x_285; +x_264 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_264, 0, x_1); +x_265 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; +x_266 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_266, 0, x_265); +lean_ctor_set(x_266, 1, x_264); +x_267 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__4; +x_268 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_268, 0, x_266); +lean_ctor_set(x_268, 1, x_267); +x_269 = l_Lean_indentExpr(x_185); +x_270 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_270, 0, x_268); +lean_ctor_set(x_270, 1, x_269); +x_271 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_271, 0, x_270); +lean_ctor_set(x_271, 1, x_265); +x_272 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_257, x_271, x_8, x_9, x_10, x_11, x_12, x_13, x_259); +x_273 = lean_ctor_get(x_272, 0); +lean_inc(x_273); +x_274 = lean_ctor_get(x_272, 1); +lean_inc(x_274); +lean_dec(x_272); +x_275 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_183, x_273, x_8, x_9, x_10, x_11, x_12, x_13, x_274); +lean_dec(x_273); +x_276 = lean_ctor_get(x_275, 0); +lean_inc(x_276); +x_277 = lean_ctor_get(x_275, 1); +lean_inc(x_277); +lean_dec(x_275); +x_18 = x_276; +x_19 = x_277; goto block_26; } } } else { -lean_object* x_298; lean_object* x_299; -lean_dec(x_189); -x_298 = lean_ctor_get(x_261, 1); -lean_inc(x_298); -lean_dec(x_261); +lean_object* x_290; lean_object* x_291; +lean_dec(x_185); +x_290 = lean_ctor_get(x_253, 1); +lean_inc(x_290); +lean_dec(x_253); lean_inc(x_3); -lean_ctor_set(x_7, 1, x_187); +lean_ctor_set(x_7, 1, x_183); lean_ctor_set(x_7, 0, x_3); -x_299 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_299, 0, x_7); -x_18 = x_299; -x_19 = x_298; +x_291 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_291, 0, x_7); +x_18 = x_291; +x_19 = x_290; goto block_26; } } else { -lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; -lean_dec(x_189); -lean_dec(x_187); +lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; +lean_dec(x_185); +lean_dec(x_183); lean_free_object(x_7); lean_dec(x_13); lean_dec(x_12); @@ -3260,16 +3180,94 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_300 = lean_ctor_get(x_261, 0); -lean_inc(x_300); -x_301 = lean_ctor_get(x_261, 1); -lean_inc(x_301); -if (lean_is_exclusive(x_261)) { - lean_ctor_release(x_261, 0); - lean_ctor_release(x_261, 1); - x_302 = x_261; +x_292 = lean_ctor_get(x_253, 0); +lean_inc(x_292); +x_293 = lean_ctor_get(x_253, 1); +lean_inc(x_293); +if (lean_is_exclusive(x_253)) { + lean_ctor_release(x_253, 0); + lean_ctor_release(x_253, 1); + x_294 = x_253; } else { - lean_dec_ref(x_261); + lean_dec_ref(x_253); + x_294 = lean_box(0); +} +if (lean_is_scalar(x_294)) { + x_295 = lean_alloc_ctor(1, 2, 0); +} else { + x_295 = x_294; +} +lean_ctor_set(x_295, 0, x_292); +lean_ctor_set(x_295, 1, x_293); +return x_295; +} +} +} +else +{ +lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; +lean_dec(x_185); +lean_dec(x_183); +lean_free_object(x_7); +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_296 = lean_ctor_get(x_215, 0); +lean_inc(x_296); +x_297 = lean_ctor_get(x_215, 1); +lean_inc(x_297); +if (lean_is_exclusive(x_215)) { + lean_ctor_release(x_215, 0); + lean_ctor_release(x_215, 1); + x_298 = x_215; +} else { + lean_dec_ref(x_215); + x_298 = lean_box(0); +} +if (lean_is_scalar(x_298)) { + x_299 = lean_alloc_ctor(1, 2, 0); +} else { + x_299 = x_298; +} +lean_ctor_set(x_299, 0, x_296); +lean_ctor_set(x_299, 1, x_297); +return x_299; +} +} +} +else +{ +lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; +lean_dec(x_185); +lean_dec(x_183); +lean_free_object(x_7); +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_300 = lean_ctor_get(x_193, 0); +lean_inc(x_300); +x_301 = lean_ctor_get(x_193, 1); +lean_inc(x_301); +if (lean_is_exclusive(x_193)) { + lean_ctor_release(x_193, 0); + lean_ctor_release(x_193, 1); + x_302 = x_193; +} else { + lean_dec_ref(x_193); x_302 = lean_box(0); } if (lean_is_scalar(x_302)) { @@ -3285,85 +3283,7 @@ return x_303; } else { -lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; -lean_dec(x_189); -lean_dec(x_187); -lean_free_object(x_7); -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_304 = lean_ctor_get(x_223, 0); -lean_inc(x_304); -x_305 = lean_ctor_get(x_223, 1); -lean_inc(x_305); -if (lean_is_exclusive(x_223)) { - lean_ctor_release(x_223, 0); - lean_ctor_release(x_223, 1); - x_306 = x_223; -} else { - lean_dec_ref(x_223); - x_306 = lean_box(0); -} -if (lean_is_scalar(x_306)) { - x_307 = lean_alloc_ctor(1, 2, 0); -} else { - x_307 = x_306; -} -lean_ctor_set(x_307, 0, x_304); -lean_ctor_set(x_307, 1, x_305); -return x_307; -} -} -} -else -{ -lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; -lean_dec(x_189); -lean_dec(x_187); -lean_free_object(x_7); -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_308 = lean_ctor_get(x_197, 0); -lean_inc(x_308); -x_309 = lean_ctor_get(x_197, 1); -lean_inc(x_309); -if (lean_is_exclusive(x_197)) { - lean_ctor_release(x_197, 0); - lean_ctor_release(x_197, 1); - x_310 = x_197; -} else { - lean_dec_ref(x_197); - x_310 = lean_box(0); -} -if (lean_is_scalar(x_310)) { - x_311 = lean_alloc_ctor(1, 2, 0); -} else { - x_311 = x_310; -} -lean_ctor_set(x_311, 0, x_308); -lean_ctor_set(x_311, 1, x_309); -return x_311; -} -} -} -else -{ -lean_object* x_312; +lean_object* x_304; lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); @@ -3371,49 +3291,49 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_312 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_189, x_8, x_9, x_10, x_11, x_12, x_13, x_190); -if (lean_obj_tag(x_312) == 0) +x_304 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_185, x_8, x_9, x_10, x_11, x_12, x_13, x_186); +if (lean_obj_tag(x_304) == 0) { -lean_object* x_313; uint8_t x_314; -x_313 = lean_ctor_get(x_312, 0); -lean_inc(x_313); -x_314 = lean_unbox(x_313); -lean_dec(x_313); -if (x_314 == 0) +lean_object* x_305; uint8_t x_306; +x_305 = lean_ctor_get(x_304, 0); +lean_inc(x_305); +x_306 = lean_unbox(x_305); +lean_dec(x_305); +if (x_306 == 0) { -lean_object* x_315; lean_object* x_316; lean_object* x_317; -x_315 = lean_ctor_get(x_312, 1); -lean_inc(x_315); -lean_dec(x_312); -x_316 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; -lean_ctor_set(x_7, 1, x_187); -lean_ctor_set(x_7, 0, x_316); -x_317 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_317, 0, x_7); -x_18 = x_317; -x_19 = x_315; +lean_object* x_307; lean_object* x_308; lean_object* x_309; +x_307 = lean_ctor_get(x_304, 1); +lean_inc(x_307); +lean_dec(x_304); +x_308 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; +lean_ctor_set(x_7, 1, x_183); +lean_ctor_set(x_7, 0, x_308); +x_309 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_309, 0, x_7); +x_18 = x_309; +x_19 = x_307; goto block_26; } else { -lean_object* x_318; lean_object* x_319; -x_318 = lean_ctor_get(x_312, 1); -lean_inc(x_318); -lean_dec(x_312); +lean_object* x_310; lean_object* x_311; +x_310 = lean_ctor_get(x_304, 1); +lean_inc(x_310); +lean_dec(x_304); lean_inc(x_3); -lean_ctor_set(x_7, 1, x_187); +lean_ctor_set(x_7, 1, x_183); lean_ctor_set(x_7, 0, x_3); -x_319 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_319, 0, x_7); -x_18 = x_319; -x_19 = x_318; +x_311 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_311, 0, x_7); +x_18 = x_311; +x_19 = x_310; goto block_26; } } else { -lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; -lean_dec(x_187); +lean_object* x_312; lean_object* x_313; lean_object* x_314; lean_object* x_315; +lean_dec(x_183); lean_free_object(x_7); lean_dec(x_13); lean_dec(x_12); @@ -3424,33 +3344,33 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_320 = lean_ctor_get(x_312, 0); -lean_inc(x_320); -x_321 = lean_ctor_get(x_312, 1); -lean_inc(x_321); -if (lean_is_exclusive(x_312)) { - lean_ctor_release(x_312, 0); - lean_ctor_release(x_312, 1); - x_322 = x_312; +x_312 = lean_ctor_get(x_304, 0); +lean_inc(x_312); +x_313 = lean_ctor_get(x_304, 1); +lean_inc(x_313); +if (lean_is_exclusive(x_304)) { + lean_ctor_release(x_304, 0); + lean_ctor_release(x_304, 1); + x_314 = x_304; } else { - lean_dec_ref(x_312); - x_322 = lean_box(0); + lean_dec_ref(x_304); + x_314 = lean_box(0); } -if (lean_is_scalar(x_322)) { - x_323 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_314)) { + x_315 = lean_alloc_ctor(1, 2, 0); } else { - x_323 = x_322; + x_315 = x_314; } -lean_ctor_set(x_323, 0, x_320); -lean_ctor_set(x_323, 1, x_321); -return x_323; +lean_ctor_set(x_315, 0, x_312); +lean_ctor_set(x_315, 1, x_313); +return x_315; } } } else { -lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327; -lean_dec(x_187); +lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; +lean_dec(x_183); lean_free_object(x_7); lean_dec(x_17); lean_dec(x_13); @@ -3462,186 +3382,183 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_324 = lean_ctor_get(x_188, 0); -lean_inc(x_324); -x_325 = lean_ctor_get(x_188, 1); -lean_inc(x_325); -if (lean_is_exclusive(x_188)) { - lean_ctor_release(x_188, 0); - lean_ctor_release(x_188, 1); - x_326 = x_188; +x_316 = lean_ctor_get(x_184, 0); +lean_inc(x_316); +x_317 = lean_ctor_get(x_184, 1); +lean_inc(x_317); +if (lean_is_exclusive(x_184)) { + lean_ctor_release(x_184, 0); + lean_ctor_release(x_184, 1); + x_318 = x_184; } else { - lean_dec_ref(x_188); - x_326 = lean_box(0); + lean_dec_ref(x_184); + x_318 = lean_box(0); } -if (lean_is_scalar(x_326)) { - x_327 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_318)) { + x_319 = lean_alloc_ctor(1, 2, 0); } else { - x_327 = x_326; + x_319 = x_318; } -lean_ctor_set(x_327, 0, x_324); -lean_ctor_set(x_327, 1, x_325); -return x_327; +lean_ctor_set(x_319, 0, x_316); +lean_ctor_set(x_319, 1, x_317); +return x_319; } } } } else { -lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; uint8_t x_332; -x_328 = lean_ctor_get(x_7, 1); -lean_inc(x_328); +lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; uint8_t x_324; +x_320 = lean_ctor_get(x_7, 1); +lean_inc(x_320); lean_dec(x_7); -x_329 = lean_ctor_get(x_328, 0); -lean_inc(x_329); -x_330 = lean_ctor_get(x_328, 1); -lean_inc(x_330); -x_331 = lean_ctor_get(x_328, 2); -lean_inc(x_331); -x_332 = lean_nat_dec_lt(x_330, x_331); -if (x_332 == 0) +x_321 = lean_ctor_get(x_320, 0); +lean_inc(x_321); +x_322 = lean_ctor_get(x_320, 1); +lean_inc(x_322); +x_323 = lean_ctor_get(x_320, 2); +lean_inc(x_323); +x_324 = lean_nat_dec_lt(x_322, x_323); +if (x_324 == 0) { -lean_object* x_333; lean_object* x_334; -lean_dec(x_331); -lean_dec(x_330); -lean_dec(x_329); +lean_object* x_325; lean_object* x_326; +lean_dec(x_323); +lean_dec(x_322); +lean_dec(x_321); lean_dec(x_17); lean_inc(x_3); -x_333 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_333, 0, x_3); -lean_ctor_set(x_333, 1, x_328); -x_334 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_334, 0, x_333); -x_18 = x_334; +x_325 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_325, 0, x_3); +lean_ctor_set(x_325, 1, x_320); +x_326 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_326, 0, x_325); +x_18 = x_326; x_19 = x_14; goto block_26; } else { -lean_object* x_335; lean_object* x_336; uint8_t x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; -if (lean_is_exclusive(x_328)) { - lean_ctor_release(x_328, 0); - lean_ctor_release(x_328, 1); - lean_ctor_release(x_328, 2); - x_335 = x_328; +lean_object* x_327; lean_object* x_328; uint8_t x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; +if (lean_is_exclusive(x_320)) { + lean_ctor_release(x_320, 0); + lean_ctor_release(x_320, 1); + lean_ctor_release(x_320, 2); + x_327 = x_320; } else { - lean_dec_ref(x_328); - x_335 = lean_box(0); + lean_dec_ref(x_320); + x_327 = lean_box(0); } -x_336 = lean_array_fget(x_329, x_330); -x_337 = lean_unbox(x_336); -lean_dec(x_336); -x_338 = lean_unsigned_to_nat(1u); -x_339 = lean_nat_add(x_330, x_338); -lean_dec(x_330); -if (lean_is_scalar(x_335)) { - x_340 = lean_alloc_ctor(0, 3, 0); +x_328 = lean_array_fget(x_321, x_322); +x_329 = lean_unbox(x_328); +lean_dec(x_328); +x_330 = lean_unsigned_to_nat(1u); +x_331 = lean_nat_add(x_322, x_330); +lean_dec(x_322); +if (lean_is_scalar(x_327)) { + x_332 = lean_alloc_ctor(0, 3, 0); } else { - x_340 = x_335; + x_332 = x_327; } -lean_ctor_set(x_340, 0, x_329); -lean_ctor_set(x_340, 1, x_339); -lean_ctor_set(x_340, 2, x_331); +lean_ctor_set(x_332, 0, x_321); +lean_ctor_set(x_332, 1, x_331); +lean_ctor_set(x_332, 2, x_323); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_17); -x_341 = lean_infer_type(x_17, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_341) == 0) +x_333 = lean_infer_type(x_17, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_333) == 0) { -lean_object* x_342; lean_object* x_343; uint8_t x_344; -x_342 = lean_ctor_get(x_341, 0); -lean_inc(x_342); -x_343 = lean_ctor_get(x_341, 1); -lean_inc(x_343); -lean_dec(x_341); -x_344 = l_Lean_BinderInfo_isInstImplicit(x_337); -if (x_344 == 0) +lean_object* x_334; lean_object* x_335; uint8_t x_336; +x_334 = lean_ctor_get(x_333, 0); +lean_inc(x_334); +x_335 = lean_ctor_get(x_333, 1); +lean_inc(x_335); +lean_dec(x_333); +x_336 = l_Lean_BinderInfo_isInstImplicit(x_329); +if (x_336 == 0) { -lean_object* x_345; lean_object* x_346; lean_object* x_347; uint8_t x_348; +lean_object* x_337; lean_object* x_338; lean_object* x_339; uint8_t x_340; lean_inc(x_17); -x_345 = l_Lean_instantiateMVars___at_Lean_Meta_Simp_synthesizeArgs___spec__1(x_17, x_8, x_9, x_10, x_11, x_12, x_13, x_343); -x_346 = lean_ctor_get(x_345, 0); +x_337 = l_Lean_instantiateMVars___at_Lean_Meta_Simp_synthesizeArgs___spec__1(x_17, x_8, x_9, x_10, x_11, x_12, x_13, x_335); +x_338 = lean_ctor_get(x_337, 0); +lean_inc(x_338); +x_339 = lean_ctor_get(x_337, 1); +lean_inc(x_339); +lean_dec(x_337); +x_340 = l_Lean_Expr_isMVar(x_338); +lean_dec(x_338); +if (x_340 == 0) +{ +lean_object* x_341; lean_object* x_342; +lean_dec(x_334); +lean_dec(x_17); +lean_inc(x_3); +x_341 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_341, 0, x_3); +lean_ctor_set(x_341, 1, x_332); +x_342 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_342, 0, x_341); +x_18 = x_342; +x_19 = x_339; +goto block_26; +} +else +{ +lean_object* x_343; +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_334); +x_343 = l_Lean_Meta_isProp(x_334, x_10, x_11, x_12, x_13, x_339); +if (lean_obj_tag(x_343) == 0) +{ +lean_object* x_344; uint8_t x_345; +x_344 = lean_ctor_get(x_343, 0); +lean_inc(x_344); +x_345 = lean_unbox(x_344); +lean_dec(x_344); +if (x_345 == 0) +{ +lean_object* x_346; lean_object* x_347; lean_object* x_348; +x_346 = lean_ctor_get(x_343, 1); lean_inc(x_346); -x_347 = lean_ctor_get(x_345, 1); -lean_inc(x_347); -lean_dec(x_345); -x_348 = l_Lean_Expr_isMVar(x_346); -lean_dec(x_346); -if (x_348 == 0) -{ -lean_object* x_349; lean_object* x_350; -lean_dec(x_342); -lean_dec(x_17); -lean_inc(x_3); -x_349 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_349, 0, x_3); -lean_ctor_set(x_349, 1, x_340); -x_350 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_350, 0, x_349); -x_18 = x_350; -x_19 = x_347; -goto block_26; -} -else -{ -lean_object* x_351; +lean_dec(x_343); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -lean_inc(x_342); -x_351 = l_Lean_Meta_isProp(x_342, x_10, x_11, x_12, x_13, x_347); -if (lean_obj_tag(x_351) == 0) +lean_inc(x_334); +x_347 = l_Lean_Meta_isClass_x3f(x_334, x_10, x_11, x_12, x_13, x_346); +x_348 = lean_ctor_get(x_347, 0); +lean_inc(x_348); +if (lean_obj_tag(x_348) == 0) { -lean_object* x_352; uint8_t x_353; -x_352 = lean_ctor_get(x_351, 0); +lean_object* x_349; lean_object* x_350; lean_object* x_351; +lean_dec(x_334); +lean_dec(x_17); +x_349 = lean_ctor_get(x_347, 1); +lean_inc(x_349); +lean_dec(x_347); +lean_inc(x_3); +x_350 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_350, 0, x_3); +lean_ctor_set(x_350, 1, x_332); +x_351 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_351, 0, x_350); +x_18 = x_351; +x_19 = x_349; +goto block_26; +} +else +{ +lean_object* x_352; lean_object* x_353; +lean_dec(x_348); +x_352 = lean_ctor_get(x_347, 1); lean_inc(x_352); -x_353 = lean_unbox(x_352); -lean_dec(x_352); -if (x_353 == 0) -{ -lean_object* x_354; lean_object* x_355; -x_354 = lean_ctor_get(x_351, 1); -lean_inc(x_354); -lean_dec(x_351); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_342); -x_355 = l_Lean_Meta_isClass_x3f(x_342, x_10, x_11, x_12, x_13, x_354); -if (lean_obj_tag(x_355) == 0) -{ -lean_object* x_356; -x_356 = lean_ctor_get(x_355, 0); -lean_inc(x_356); -if (lean_obj_tag(x_356) == 0) -{ -lean_object* x_357; lean_object* x_358; lean_object* x_359; -lean_dec(x_342); -lean_dec(x_17); -x_357 = lean_ctor_get(x_355, 1); -lean_inc(x_357); -lean_dec(x_355); -lean_inc(x_3); -x_358 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_358, 0, x_3); -lean_ctor_set(x_358, 1, x_340); -x_359 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_359, 0, x_358); -x_18 = x_359; -x_19 = x_357; -goto block_26; -} -else -{ -lean_object* x_360; lean_object* x_361; -lean_dec(x_356); -x_360 = lean_ctor_get(x_355, 1); -lean_inc(x_360); -lean_dec(x_355); +lean_dec(x_347); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); @@ -3649,51 +3566,51 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_361 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_342, x_8, x_9, x_10, x_11, x_12, x_13, x_360); -if (lean_obj_tag(x_361) == 0) +x_353 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_334, x_8, x_9, x_10, x_11, x_12, x_13, x_352); +if (lean_obj_tag(x_353) == 0) { -lean_object* x_362; uint8_t x_363; -x_362 = lean_ctor_get(x_361, 0); -lean_inc(x_362); -x_363 = lean_unbox(x_362); -lean_dec(x_362); -if (x_363 == 0) +lean_object* x_354; uint8_t x_355; +x_354 = lean_ctor_get(x_353, 0); +lean_inc(x_354); +x_355 = lean_unbox(x_354); +lean_dec(x_354); +if (x_355 == 0) { -lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; -x_364 = lean_ctor_get(x_361, 1); -lean_inc(x_364); -lean_dec(x_361); -x_365 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; -x_366 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_366, 0, x_365); -lean_ctor_set(x_366, 1, x_340); -x_367 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_367, 0, x_366); -x_18 = x_367; -x_19 = x_364; +lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; +x_356 = lean_ctor_get(x_353, 1); +lean_inc(x_356); +lean_dec(x_353); +x_357 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; +x_358 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_358, 0, x_357); +lean_ctor_set(x_358, 1, x_332); +x_359 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_359, 0, x_358); +x_18 = x_359; +x_19 = x_356; goto block_26; } else { -lean_object* x_368; lean_object* x_369; lean_object* x_370; -x_368 = lean_ctor_get(x_361, 1); -lean_inc(x_368); -lean_dec(x_361); +lean_object* x_360; lean_object* x_361; lean_object* x_362; +x_360 = lean_ctor_get(x_353, 1); +lean_inc(x_360); +lean_dec(x_353); lean_inc(x_3); -x_369 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_369, 0, x_3); -lean_ctor_set(x_369, 1, x_340); -x_370 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_370, 0, x_369); -x_18 = x_370; -x_19 = x_368; +x_361 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_361, 0, x_3); +lean_ctor_set(x_361, 1, x_332); +x_362 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_362, 0, x_361); +x_18 = x_362; +x_19 = x_360; goto block_26; } } else { -lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; -lean_dec(x_340); +lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; +lean_dec(x_332); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -3703,72 +3620,35 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_371 = lean_ctor_get(x_361, 0); -lean_inc(x_371); -x_372 = lean_ctor_get(x_361, 1); -lean_inc(x_372); -if (lean_is_exclusive(x_361)) { - lean_ctor_release(x_361, 0); - lean_ctor_release(x_361, 1); - x_373 = x_361; +x_363 = lean_ctor_get(x_353, 0); +lean_inc(x_363); +x_364 = lean_ctor_get(x_353, 1); +lean_inc(x_364); +if (lean_is_exclusive(x_353)) { + lean_ctor_release(x_353, 0); + lean_ctor_release(x_353, 1); + x_365 = x_353; } else { - lean_dec_ref(x_361); - x_373 = lean_box(0); + lean_dec_ref(x_353); + x_365 = lean_box(0); } -if (lean_is_scalar(x_373)) { - x_374 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_365)) { + x_366 = lean_alloc_ctor(1, 2, 0); } else { - x_374 = x_373; + x_366 = x_365; } -lean_ctor_set(x_374, 0, x_371); -lean_ctor_set(x_374, 1, x_372); -return x_374; +lean_ctor_set(x_366, 0, x_363); +lean_ctor_set(x_366, 1, x_364); +return x_366; } } } else { -lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; -lean_dec(x_342); -lean_dec(x_340); -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_375 = lean_ctor_get(x_355, 0); -lean_inc(x_375); -x_376 = lean_ctor_get(x_355, 1); -lean_inc(x_376); -if (lean_is_exclusive(x_355)) { - lean_ctor_release(x_355, 0); - lean_ctor_release(x_355, 1); - x_377 = x_355; -} else { - lean_dec_ref(x_355); - x_377 = lean_box(0); -} -if (lean_is_scalar(x_377)) { - x_378 = lean_alloc_ctor(1, 2, 0); -} else { - x_378 = x_377; -} -lean_ctor_set(x_378, 0, x_375); -lean_ctor_set(x_378, 1, x_376); -return x_378; -} -} -else -{ -lean_object* x_379; lean_object* x_380; -x_379 = lean_ctor_get(x_351, 1); -lean_inc(x_379); -lean_dec(x_351); +lean_object* x_367; lean_object* x_368; +x_367 = lean_ctor_get(x_343, 1); +lean_inc(x_367); +lean_dec(x_343); lean_inc(x_2); lean_inc(x_13); lean_inc(x_12); @@ -3776,260 +3656,260 @@ lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); -lean_inc(x_342); -x_380 = lean_apply_8(x_2, x_342, x_8, x_9, x_10, x_11, x_12, x_13, x_379); -if (lean_obj_tag(x_380) == 0) +lean_inc(x_334); +x_368 = lean_apply_8(x_2, x_334, x_8, x_9, x_10, x_11, x_12, x_13, x_367); +if (lean_obj_tag(x_368) == 0) { -lean_object* x_381; -x_381 = lean_ctor_get(x_380, 0); -lean_inc(x_381); -if (lean_obj_tag(x_381) == 0) +lean_object* x_369; +x_369 = lean_ctor_get(x_368, 0); +lean_inc(x_369); +if (lean_obj_tag(x_369) == 0) { -lean_object* x_382; lean_object* x_383; uint8_t x_384; lean_object* x_385; lean_object* x_405; lean_object* x_406; lean_object* x_407; uint8_t x_408; +lean_object* x_370; lean_object* x_371; uint8_t x_372; lean_object* x_373; lean_object* x_393; lean_object* x_394; lean_object* x_395; uint8_t x_396; lean_dec(x_17); -x_382 = lean_ctor_get(x_380, 1); -lean_inc(x_382); -lean_dec(x_380); -x_383 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; -x_405 = lean_st_ref_get(x_13, x_382); -x_406 = lean_ctor_get(x_405, 0); -lean_inc(x_406); -x_407 = lean_ctor_get(x_406, 3); -lean_inc(x_407); -lean_dec(x_406); -x_408 = lean_ctor_get_uint8(x_407, sizeof(void*)*1); -lean_dec(x_407); -if (x_408 == 0) +x_370 = lean_ctor_get(x_368, 1); +lean_inc(x_370); +lean_dec(x_368); +x_371 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; +x_393 = lean_st_ref_get(x_13, x_370); +x_394 = lean_ctor_get(x_393, 0); +lean_inc(x_394); +x_395 = lean_ctor_get(x_394, 3); +lean_inc(x_395); +lean_dec(x_394); +x_396 = lean_ctor_get_uint8(x_395, sizeof(void*)*1); +lean_dec(x_395); +if (x_396 == 0) { -lean_object* x_409; uint8_t x_410; -x_409 = lean_ctor_get(x_405, 1); -lean_inc(x_409); -lean_dec(x_405); -x_410 = 0; -x_384 = x_410; -x_385 = x_409; -goto block_404; +lean_object* x_397; uint8_t x_398; +x_397 = lean_ctor_get(x_393, 1); +lean_inc(x_397); +lean_dec(x_393); +x_398 = 0; +x_372 = x_398; +x_373 = x_397; +goto block_392; } else { -lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; uint8_t x_415; -x_411 = lean_ctor_get(x_405, 1); -lean_inc(x_411); -lean_dec(x_405); -x_412 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_383, x_8, x_9, x_10, x_11, x_12, x_13, x_411); -x_413 = lean_ctor_get(x_412, 0); -lean_inc(x_413); -x_414 = lean_ctor_get(x_412, 1); -lean_inc(x_414); -lean_dec(x_412); -x_415 = lean_unbox(x_413); -lean_dec(x_413); -x_384 = x_415; -x_385 = x_414; -goto block_404; -} -block_404: -{ -if (x_384 == 0) -{ -lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; -lean_dec(x_342); -x_386 = lean_box(0); -x_387 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_340, x_386, x_8, x_9, x_10, x_11, x_12, x_13, x_385); -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_18 = x_388; -x_19 = x_389; -goto block_26; -} -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_inc(x_1); -x_390 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_390, 0, x_1); -x_391 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; -x_392 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_392, 0, x_391); -lean_ctor_set(x_392, 1, x_390); -x_393 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__2; -x_394 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_394, 0, x_392); -lean_ctor_set(x_394, 1, x_393); -x_395 = l_Lean_indentExpr(x_342); -x_396 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_396, 0, x_394); -lean_ctor_set(x_396, 1, x_395); -x_397 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_397, 0, x_396); -lean_ctor_set(x_397, 1, x_391); -x_398 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_383, x_397, x_8, x_9, x_10, x_11, x_12, x_13, x_385); -x_399 = lean_ctor_get(x_398, 0); +lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; uint8_t x_403; +x_399 = lean_ctor_get(x_393, 1); lean_inc(x_399); -x_400 = lean_ctor_get(x_398, 1); -lean_inc(x_400); -lean_dec(x_398); -x_401 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_340, x_399, x_8, x_9, x_10, x_11, x_12, x_13, x_400); -lean_dec(x_399); -x_402 = lean_ctor_get(x_401, 0); +lean_dec(x_393); +x_400 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_371, x_8, x_9, x_10, x_11, x_12, x_13, x_399); +x_401 = lean_ctor_get(x_400, 0); +lean_inc(x_401); +x_402 = lean_ctor_get(x_400, 1); lean_inc(x_402); -x_403 = lean_ctor_get(x_401, 1); -lean_inc(x_403); +lean_dec(x_400); +x_403 = lean_unbox(x_401); lean_dec(x_401); -x_18 = x_402; -x_19 = x_403; +x_372 = x_403; +x_373 = x_402; +goto block_392; +} +block_392: +{ +if (x_372 == 0) +{ +lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; +lean_dec(x_334); +x_374 = lean_box(0); +x_375 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_332, x_374, x_8, x_9, x_10, x_11, x_12, x_13, x_373); +x_376 = lean_ctor_get(x_375, 0); +lean_inc(x_376); +x_377 = lean_ctor_get(x_375, 1); +lean_inc(x_377); +lean_dec(x_375); +x_18 = x_376; +x_19 = x_377; +goto block_26; +} +else +{ +lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; +lean_inc(x_1); +x_378 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_378, 0, x_1); +x_379 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; +x_380 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_380, 0, x_379); +lean_ctor_set(x_380, 1, x_378); +x_381 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__2; +x_382 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_382, 0, x_380); +lean_ctor_set(x_382, 1, x_381); +x_383 = l_Lean_indentExpr(x_334); +x_384 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_384, 0, x_382); +lean_ctor_set(x_384, 1, x_383); +x_385 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_385, 0, x_384); +lean_ctor_set(x_385, 1, x_379); +x_386 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_371, x_385, x_8, x_9, x_10, x_11, x_12, x_13, x_373); +x_387 = lean_ctor_get(x_386, 0); +lean_inc(x_387); +x_388 = lean_ctor_get(x_386, 1); +lean_inc(x_388); +lean_dec(x_386); +x_389 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_332, x_387, x_8, x_9, x_10, x_11, x_12, x_13, x_388); +lean_dec(x_387); +x_390 = lean_ctor_get(x_389, 0); +lean_inc(x_390); +x_391 = lean_ctor_get(x_389, 1); +lean_inc(x_391); +lean_dec(x_389); +x_18 = x_390; +x_19 = x_391; goto block_26; } } } else { -lean_object* x_416; lean_object* x_417; lean_object* x_418; -x_416 = lean_ctor_get(x_380, 1); -lean_inc(x_416); -lean_dec(x_380); -x_417 = lean_ctor_get(x_381, 0); -lean_inc(x_417); -lean_dec(x_381); +lean_object* x_404; lean_object* x_405; lean_object* x_406; +x_404 = lean_ctor_get(x_368, 1); +lean_inc(x_404); +lean_dec(x_368); +x_405 = lean_ctor_get(x_369, 0); +lean_inc(x_405); +lean_dec(x_369); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -x_418 = l_Lean_Meta_isExprDefEq(x_17, x_417, x_10, x_11, x_12, x_13, x_416); -if (lean_obj_tag(x_418) == 0) +x_406 = l_Lean_Meta_isExprDefEq(x_17, x_405, x_10, x_11, x_12, x_13, x_404); +if (lean_obj_tag(x_406) == 0) { -lean_object* x_419; uint8_t x_420; -x_419 = lean_ctor_get(x_418, 0); -lean_inc(x_419); -x_420 = lean_unbox(x_419); -lean_dec(x_419); -if (x_420 == 0) +lean_object* x_407; uint8_t x_408; +x_407 = lean_ctor_get(x_406, 0); +lean_inc(x_407); +x_408 = lean_unbox(x_407); +lean_dec(x_407); +if (x_408 == 0) { -lean_object* x_421; lean_object* x_422; uint8_t x_423; lean_object* x_424; lean_object* x_444; lean_object* x_445; lean_object* x_446; uint8_t x_447; -x_421 = lean_ctor_get(x_418, 1); -lean_inc(x_421); -lean_dec(x_418); -x_422 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; -x_444 = lean_st_ref_get(x_13, x_421); -x_445 = lean_ctor_get(x_444, 0); -lean_inc(x_445); -x_446 = lean_ctor_get(x_445, 3); -lean_inc(x_446); -lean_dec(x_445); -x_447 = lean_ctor_get_uint8(x_446, sizeof(void*)*1); -lean_dec(x_446); -if (x_447 == 0) +lean_object* x_409; lean_object* x_410; uint8_t x_411; lean_object* x_412; lean_object* x_432; lean_object* x_433; lean_object* x_434; uint8_t x_435; +x_409 = lean_ctor_get(x_406, 1); +lean_inc(x_409); +lean_dec(x_406); +x_410 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__8; +x_432 = lean_st_ref_get(x_13, x_409); +x_433 = lean_ctor_get(x_432, 0); +lean_inc(x_433); +x_434 = lean_ctor_get(x_433, 3); +lean_inc(x_434); +lean_dec(x_433); +x_435 = lean_ctor_get_uint8(x_434, sizeof(void*)*1); +lean_dec(x_434); +if (x_435 == 0) { -lean_object* x_448; uint8_t x_449; -x_448 = lean_ctor_get(x_444, 1); -lean_inc(x_448); -lean_dec(x_444); -x_449 = 0; -x_423 = x_449; -x_424 = x_448; -goto block_443; +lean_object* x_436; uint8_t x_437; +x_436 = lean_ctor_get(x_432, 1); +lean_inc(x_436); +lean_dec(x_432); +x_437 = 0; +x_411 = x_437; +x_412 = x_436; +goto block_431; } else { -lean_object* x_450; lean_object* x_451; lean_object* x_452; lean_object* x_453; uint8_t x_454; -x_450 = lean_ctor_get(x_444, 1); -lean_inc(x_450); -lean_dec(x_444); -x_451 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_422, x_8, x_9, x_10, x_11, x_12, x_13, x_450); -x_452 = lean_ctor_get(x_451, 0); -lean_inc(x_452); -x_453 = lean_ctor_get(x_451, 1); -lean_inc(x_453); -lean_dec(x_451); -x_454 = lean_unbox(x_452); -lean_dec(x_452); -x_423 = x_454; -x_424 = x_453; -goto block_443; -} -block_443: -{ -if (x_423 == 0) -{ -lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; -lean_dec(x_342); -x_425 = lean_box(0); -x_426 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_340, x_425, x_8, x_9, x_10, x_11, x_12, x_13, x_424); -x_427 = lean_ctor_get(x_426, 0); -lean_inc(x_427); -x_428 = lean_ctor_get(x_426, 1); -lean_inc(x_428); -lean_dec(x_426); -x_18 = x_427; -x_19 = x_428; -goto block_26; -} -else -{ -lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; -lean_inc(x_1); -x_429 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_429, 0, x_1); -x_430 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; -x_431 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_431, 0, x_430); -lean_ctor_set(x_431, 1, x_429); -x_432 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__4; -x_433 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_433, 0, x_431); -lean_ctor_set(x_433, 1, x_432); -x_434 = l_Lean_indentExpr(x_342); -x_435 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_435, 0, x_433); -lean_ctor_set(x_435, 1, x_434); -x_436 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_436, 0, x_435); -lean_ctor_set(x_436, 1, x_430); -x_437 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_422, x_436, x_8, x_9, x_10, x_11, x_12, x_13, x_424); -x_438 = lean_ctor_get(x_437, 0); +lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; uint8_t x_442; +x_438 = lean_ctor_get(x_432, 1); lean_inc(x_438); -x_439 = lean_ctor_get(x_437, 1); -lean_inc(x_439); -lean_dec(x_437); -x_440 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_340, x_438, x_8, x_9, x_10, x_11, x_12, x_13, x_439); -lean_dec(x_438); -x_441 = lean_ctor_get(x_440, 0); +lean_dec(x_432); +x_439 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_410, x_8, x_9, x_10, x_11, x_12, x_13, x_438); +x_440 = lean_ctor_get(x_439, 0); +lean_inc(x_440); +x_441 = lean_ctor_get(x_439, 1); lean_inc(x_441); -x_442 = lean_ctor_get(x_440, 1); -lean_inc(x_442); +lean_dec(x_439); +x_442 = lean_unbox(x_440); lean_dec(x_440); -x_18 = x_441; -x_19 = x_442; +x_411 = x_442; +x_412 = x_441; +goto block_431; +} +block_431: +{ +if (x_411 == 0) +{ +lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; +lean_dec(x_334); +x_413 = lean_box(0); +x_414 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_332, x_413, x_8, x_9, x_10, x_11, x_12, x_13, x_412); +x_415 = lean_ctor_get(x_414, 0); +lean_inc(x_415); +x_416 = lean_ctor_get(x_414, 1); +lean_inc(x_416); +lean_dec(x_414); +x_18 = x_415; +x_19 = x_416; +goto block_26; +} +else +{ +lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; lean_object* x_429; lean_object* x_430; +lean_inc(x_1); +x_417 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_417, 0, x_1); +x_418 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; +x_419 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_419, 0, x_418); +lean_ctor_set(x_419, 1, x_417); +x_420 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___closed__4; +x_421 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_421, 0, x_419); +lean_ctor_set(x_421, 1, x_420); +x_422 = l_Lean_indentExpr(x_334); +x_423 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_423, 0, x_421); +lean_ctor_set(x_423, 1, x_422); +x_424 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_424, 0, x_423); +lean_ctor_set(x_424, 1, x_418); +x_425 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_410, x_424, x_8, x_9, x_10, x_11, x_12, x_13, x_412); +x_426 = lean_ctor_get(x_425, 0); +lean_inc(x_426); +x_427 = lean_ctor_get(x_425, 1); +lean_inc(x_427); +lean_dec(x_425); +x_428 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1(x_332, x_426, x_8, x_9, x_10, x_11, x_12, x_13, x_427); +lean_dec(x_426); +x_429 = lean_ctor_get(x_428, 0); +lean_inc(x_429); +x_430 = lean_ctor_get(x_428, 1); +lean_inc(x_430); +lean_dec(x_428); +x_18 = x_429; +x_19 = x_430; goto block_26; } } } else { -lean_object* x_455; lean_object* x_456; lean_object* x_457; -lean_dec(x_342); -x_455 = lean_ctor_get(x_418, 1); -lean_inc(x_455); -lean_dec(x_418); +lean_object* x_443; lean_object* x_444; lean_object* x_445; +lean_dec(x_334); +x_443 = lean_ctor_get(x_406, 1); +lean_inc(x_443); +lean_dec(x_406); lean_inc(x_3); -x_456 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_456, 0, x_3); -lean_ctor_set(x_456, 1, x_340); -x_457 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_457, 0, x_456); -x_18 = x_457; -x_19 = x_455; +x_444 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_444, 0, x_3); +lean_ctor_set(x_444, 1, x_332); +x_445 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_445, 0, x_444); +x_18 = x_445; +x_19 = x_443; goto block_26; } } else { -lean_object* x_458; lean_object* x_459; lean_object* x_460; lean_object* x_461; -lean_dec(x_342); -lean_dec(x_340); +lean_object* x_446; lean_object* x_447; lean_object* x_448; lean_object* x_449; +lean_dec(x_334); +lean_dec(x_332); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -4039,34 +3919,34 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_458 = lean_ctor_get(x_418, 0); -lean_inc(x_458); -x_459 = lean_ctor_get(x_418, 1); -lean_inc(x_459); -if (lean_is_exclusive(x_418)) { - lean_ctor_release(x_418, 0); - lean_ctor_release(x_418, 1); - x_460 = x_418; +x_446 = lean_ctor_get(x_406, 0); +lean_inc(x_446); +x_447 = lean_ctor_get(x_406, 1); +lean_inc(x_447); +if (lean_is_exclusive(x_406)) { + lean_ctor_release(x_406, 0); + lean_ctor_release(x_406, 1); + x_448 = x_406; } else { - lean_dec_ref(x_418); - x_460 = lean_box(0); + lean_dec_ref(x_406); + x_448 = lean_box(0); } -if (lean_is_scalar(x_460)) { - x_461 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_448)) { + x_449 = lean_alloc_ctor(1, 2, 0); } else { - x_461 = x_460; + x_449 = x_448; } -lean_ctor_set(x_461, 0, x_458); -lean_ctor_set(x_461, 1, x_459); -return x_461; +lean_ctor_set(x_449, 0, x_446); +lean_ctor_set(x_449, 1, x_447); +return x_449; } } } else { -lean_object* x_462; lean_object* x_463; lean_object* x_464; lean_object* x_465; -lean_dec(x_342); -lean_dec(x_340); +lean_object* x_450; lean_object* x_451; lean_object* x_452; lean_object* x_453; +lean_dec(x_334); +lean_dec(x_332); lean_dec(x_17); lean_dec(x_13); lean_dec(x_12); @@ -4077,34 +3957,34 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_462 = lean_ctor_get(x_380, 0); -lean_inc(x_462); -x_463 = lean_ctor_get(x_380, 1); -lean_inc(x_463); -if (lean_is_exclusive(x_380)) { - lean_ctor_release(x_380, 0); - lean_ctor_release(x_380, 1); - x_464 = x_380; +x_450 = lean_ctor_get(x_368, 0); +lean_inc(x_450); +x_451 = lean_ctor_get(x_368, 1); +lean_inc(x_451); +if (lean_is_exclusive(x_368)) { + lean_ctor_release(x_368, 0); + lean_ctor_release(x_368, 1); + x_452 = x_368; } else { - lean_dec_ref(x_380); - x_464 = lean_box(0); + lean_dec_ref(x_368); + x_452 = lean_box(0); } -if (lean_is_scalar(x_464)) { - x_465 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_452)) { + x_453 = lean_alloc_ctor(1, 2, 0); } else { - x_465 = x_464; + x_453 = x_452; } -lean_ctor_set(x_465, 0, x_462); -lean_ctor_set(x_465, 1, x_463); -return x_465; +lean_ctor_set(x_453, 0, x_450); +lean_ctor_set(x_453, 1, x_451); +return x_453; } } } else { -lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; -lean_dec(x_342); -lean_dec(x_340); +lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; +lean_dec(x_334); +lean_dec(x_332); lean_dec(x_17); lean_dec(x_13); lean_dec(x_12); @@ -4115,32 +3995,32 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_466 = lean_ctor_get(x_351, 0); -lean_inc(x_466); -x_467 = lean_ctor_get(x_351, 1); -lean_inc(x_467); -if (lean_is_exclusive(x_351)) { - lean_ctor_release(x_351, 0); - lean_ctor_release(x_351, 1); - x_468 = x_351; +x_454 = lean_ctor_get(x_343, 0); +lean_inc(x_454); +x_455 = lean_ctor_get(x_343, 1); +lean_inc(x_455); +if (lean_is_exclusive(x_343)) { + lean_ctor_release(x_343, 0); + lean_ctor_release(x_343, 1); + x_456 = x_343; } else { - lean_dec_ref(x_351); - x_468 = lean_box(0); + lean_dec_ref(x_343); + x_456 = lean_box(0); } -if (lean_is_scalar(x_468)) { - x_469 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_456)) { + x_457 = lean_alloc_ctor(1, 2, 0); } else { - x_469 = x_468; + x_457 = x_456; } -lean_ctor_set(x_469, 0, x_466); -lean_ctor_set(x_469, 1, x_467); -return x_469; +lean_ctor_set(x_457, 0, x_454); +lean_ctor_set(x_457, 1, x_455); +return x_457; } } } else { -lean_object* x_470; +lean_object* x_458; lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); @@ -4148,51 +4028,51 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_470 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_342, x_8, x_9, x_10, x_11, x_12, x_13, x_343); -if (lean_obj_tag(x_470) == 0) +x_458 = l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(x_1, x_17, x_334, x_8, x_9, x_10, x_11, x_12, x_13, x_335); +if (lean_obj_tag(x_458) == 0) { -lean_object* x_471; uint8_t x_472; -x_471 = lean_ctor_get(x_470, 0); -lean_inc(x_471); -x_472 = lean_unbox(x_471); -lean_dec(x_471); -if (x_472 == 0) +lean_object* x_459; uint8_t x_460; +x_459 = lean_ctor_get(x_458, 0); +lean_inc(x_459); +x_460 = lean_unbox(x_459); +lean_dec(x_459); +if (x_460 == 0) { -lean_object* x_473; lean_object* x_474; lean_object* x_475; lean_object* x_476; -x_473 = lean_ctor_get(x_470, 1); -lean_inc(x_473); -lean_dec(x_470); -x_474 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; -x_475 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_475, 0, x_474); -lean_ctor_set(x_475, 1, x_340); -x_476 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_476, 0, x_475); -x_18 = x_476; -x_19 = x_473; +lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; +x_461 = lean_ctor_get(x_458, 1); +lean_inc(x_461); +lean_dec(x_458); +x_462 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__2___lambda__1___closed__1; +x_463 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_463, 0, x_462); +lean_ctor_set(x_463, 1, x_332); +x_464 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_464, 0, x_463); +x_18 = x_464; +x_19 = x_461; goto block_26; } else { -lean_object* x_477; lean_object* x_478; lean_object* x_479; -x_477 = lean_ctor_get(x_470, 1); -lean_inc(x_477); -lean_dec(x_470); +lean_object* x_465; lean_object* x_466; lean_object* x_467; +x_465 = lean_ctor_get(x_458, 1); +lean_inc(x_465); +lean_dec(x_458); lean_inc(x_3); -x_478 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_478, 0, x_3); -lean_ctor_set(x_478, 1, x_340); -x_479 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_479, 0, x_478); -x_18 = x_479; -x_19 = x_477; +x_466 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_466, 0, x_3); +lean_ctor_set(x_466, 1, x_332); +x_467 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_467, 0, x_466); +x_18 = x_467; +x_19 = x_465; goto block_26; } } else { -lean_object* x_480; lean_object* x_481; lean_object* x_482; lean_object* x_483; -lean_dec(x_340); +lean_object* x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; +lean_dec(x_332); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -4202,33 +4082,33 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_480 = lean_ctor_get(x_470, 0); -lean_inc(x_480); -x_481 = lean_ctor_get(x_470, 1); -lean_inc(x_481); -if (lean_is_exclusive(x_470)) { - lean_ctor_release(x_470, 0); - lean_ctor_release(x_470, 1); - x_482 = x_470; +x_468 = lean_ctor_get(x_458, 0); +lean_inc(x_468); +x_469 = lean_ctor_get(x_458, 1); +lean_inc(x_469); +if (lean_is_exclusive(x_458)) { + lean_ctor_release(x_458, 0); + lean_ctor_release(x_458, 1); + x_470 = x_458; } else { - lean_dec_ref(x_470); - x_482 = lean_box(0); + lean_dec_ref(x_458); + x_470 = lean_box(0); } -if (lean_is_scalar(x_482)) { - x_483 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_470)) { + x_471 = lean_alloc_ctor(1, 2, 0); } else { - x_483 = x_482; + x_471 = x_470; } -lean_ctor_set(x_483, 0, x_480); -lean_ctor_set(x_483, 1, x_481); -return x_483; +lean_ctor_set(x_471, 0, x_468); +lean_ctor_set(x_471, 1, x_469); +return x_471; } } } else { -lean_object* x_484; lean_object* x_485; lean_object* x_486; lean_object* x_487; -lean_dec(x_340); +lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; +lean_dec(x_332); lean_dec(x_17); lean_dec(x_13); lean_dec(x_12); @@ -4239,26 +4119,26 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_484 = lean_ctor_get(x_341, 0); -lean_inc(x_484); -x_485 = lean_ctor_get(x_341, 1); -lean_inc(x_485); -if (lean_is_exclusive(x_341)) { - lean_ctor_release(x_341, 0); - lean_ctor_release(x_341, 1); - x_486 = x_341; +x_472 = lean_ctor_get(x_333, 0); +lean_inc(x_472); +x_473 = lean_ctor_get(x_333, 1); +lean_inc(x_473); +if (lean_is_exclusive(x_333)) { + lean_ctor_release(x_333, 0); + lean_ctor_release(x_333, 1); + x_474 = x_333; } else { - lean_dec_ref(x_341); - x_486 = lean_box(0); + lean_dec_ref(x_333); + x_474 = lean_box(0); } -if (lean_is_scalar(x_486)) { - x_487 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_474)) { + x_475 = lean_alloc_ctor(1, 2, 0); } else { - x_487 = x_486; + x_475 = x_474; } -lean_ctor_set(x_487, 0, x_484); -lean_ctor_set(x_487, 1, x_485); -return x_487; +lean_ctor_set(x_475, 0, x_472); +lean_ctor_set(x_475, 1, x_473); +return x_475; } } } diff --git a/stage0/stdlib/Lean/Meta/Tactic/Split.c b/stage0/stdlib/Lean/Meta/Tactic/Split.c index 84973fe1b6..1a904f7ec5 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Split.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Split.c @@ -249,7 +249,6 @@ uint8_t lean_expr_eqv(lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_mkNewTarget___spec__1___closed__8; static lean_object* l_Lean_Meta_Split_applyMatchSplitter___lambda__9___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_Split_applyMatchSplitter___lambda__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*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_simpMatchCore_pre(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_isDIte(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -362,6 +361,7 @@ 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*); static lean_object* l_Lean_Meta_Split_applyMatchSplitter___closed__3; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_withEqs(lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* _init_l_Lean_Meta_Split_getSimpMatchContext___rarg___closed__1() { _start: { @@ -2470,7 +2470,7 @@ lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_30 = l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go___closed__4; -x_31 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_30, x_7, x_8, x_9, x_10, x_22); +x_31 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_30, x_7, x_8, x_9, x_10, x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -2492,7 +2492,7 @@ lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_32 = l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go___closed__4; -x_33 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_32, x_7, x_8, x_9, x_10, x_22); +x_33 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_32, x_7, x_8, x_9, x_10, x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -2657,7 +2657,7 @@ lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_77 = l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go___closed__4; -x_78 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_77, x_7, x_8, x_9, x_10, x_22); +x_78 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_77, x_7, x_8, x_9, x_10, x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -2679,7 +2679,7 @@ lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_79 = l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go___closed__4; -x_80 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_79, x_7, x_8, x_9, x_10, x_22); +x_80 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_79, x_7, x_8, x_9, x_10, x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -2828,7 +2828,7 @@ lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_113 = l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go___closed__4; -x_114 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_113, x_7, x_8, x_9, x_10, x_22); +x_114 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_113, x_7, x_8, x_9, x_10, x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -2850,7 +2850,7 @@ lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_115 = l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go___closed__4; -x_116 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_115, x_7, x_8, x_9, x_10, x_22); +x_116 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_115, x_7, x_8, x_9, x_10, x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -3101,7 +3101,7 @@ lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_167 = l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go___closed__4; -x_168 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_167, x_7, x_8, x_9, x_10, x_22); +x_168 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_167, x_7, x_8, x_9, x_10, x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -3123,7 +3123,7 @@ lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); x_169 = l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs_go___closed__4; -x_170 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_169, x_7, x_8, x_9, x_10, x_22); +x_170 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_169, x_7, x_8, x_9, x_10, x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); diff --git a/stage0/stdlib/Lean/Meta/WHNF.c b/stage0/stdlib/Lean/Meta/WHNF.c index cffea628c1..e74e782f00 100644 --- a/stage0/stdlib/Lean/Meta/WHNF.c +++ b/stage0/stdlib/Lean/Meta/WHNF.c @@ -367,7 +367,6 @@ lean_object* l_Lean_Option_register___at_Std_Format_initFn____x40_Lean_Data_Form static lean_object* l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___closed__1; uint8_t lean_expr_eqv(lean_object*, lean_object*); uint8_t l_Lean_Expr_isMVar(lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_expr_equal(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getDelayedMVarAssignment_x3f___at___private_Lean_Meta_WHNF_0__Lean_Meta_whnfDelayedAssigned_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_unfoldProjInst_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -554,6 +553,7 @@ static lean_object* l_Lean_Meta_unfoldDefinition___closed__3; LEAN_EXPORT lean_object* l_Std_PersistentHashMap_insertAux_traverse___at___private_Lean_Meta_WHNF_0__Lean_Meta_cache___spec__3(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_WHNF___hyg_33____closed__5; static lean_object* l_Lean_Meta_canUnfoldAtMatcher___closed__31; +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_getStructuralRecArgPos_x3f___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -20247,7 +20247,7 @@ x_13 = l_Lean_Meta_unfoldDefinition___closed__3; x_14 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_14, 0, x_12); lean_ctor_set(x_14, 1, x_13); -x_15 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_14, x_2, x_3, x_4, x_5, x_9); +x_15 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_14, x_2, x_3, x_4, x_5, x_9); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); diff --git a/stage0/stdlib/Lean/ParserCompiler.c b/stage0/stdlib/Lean/ParserCompiler.c index 23c2a27099..ea30288b62 100644 --- a/stage0/stdlib/Lean/ParserCompiler.c +++ b/stage0/stdlib/Lean/ParserCompiler.c @@ -309,7 +309,6 @@ lean_object* l_Lean_Expr_const___override(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__45(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__23(lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__48(lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__10___boxed(lean_object**); LEAN_EXPORT lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__47___boxed(lean_object**); LEAN_EXPORT lean_object* l_Lean_ParserCompiler_compileParserExpr___rarg___lambda__35(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -458,6 +457,7 @@ LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at_Lean_ParserCompiler_compile uint8_t lean_nat_dec_lt(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_ParserCompiler_compileParserExpr___spec__38(lean_object*); LEAN_EXPORT lean_object* l_Lean_ParserCompiler_compileEmbeddedParsers(lean_object*); +lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_ParserCompiler_Context_tyName___rarg(lean_object* x_1) { _start: { @@ -29548,7 +29548,7 @@ x_77 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_78 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_78, 0, x_76); lean_ctor_set(x_78, 1, x_77); -x_79 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_78, x_5, x_6, x_7, x_8, x_69); +x_79 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_78, x_5, x_6, x_7, x_8, x_69); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -29651,7 +29651,7 @@ x_41 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_42 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_42, 0, x_40); lean_ctor_set(x_42, 1, x_41); -x_43 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_42, x_5, x_6, x_7, x_8, x_31); +x_43 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_42, x_5, x_6, x_7, x_8, x_31); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -29886,7 +29886,7 @@ x_114 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_115 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_115, 0, x_113); lean_ctor_set(x_115, 1, x_114); -x_116 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_115, x_5, x_6, x_7, x_8, x_13); +x_116 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_115, x_5, x_6, x_7, x_8, x_13); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -30034,7 +30034,7 @@ x_185 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_186 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_186, 0, x_184); lean_ctor_set(x_186, 1, x_185); -x_187 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_186, x_5, x_6, x_7, x_8, x_177); +x_187 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_186, x_5, x_6, x_7, x_8, x_177); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -30137,7 +30137,7 @@ x_149 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_150 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_150, 0, x_148); lean_ctor_set(x_150, 1, x_149); -x_151 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_150, x_5, x_6, x_7, x_8, x_139); +x_151 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_150, x_5, x_6, x_7, x_8, x_139); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -30372,7 +30372,7 @@ x_222 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_223 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_223, 0, x_221); lean_ctor_set(x_223, 1, x_222); -x_224 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_223, x_5, x_6, x_7, x_8, x_121); +x_224 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_223, x_5, x_6, x_7, x_8, x_121); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -30492,7 +30492,7 @@ x_289 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_290 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_290, 0, x_288); lean_ctor_set(x_290, 1, x_289); -x_291 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_290, x_5, x_6, x_7, x_8, x_281); +x_291 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_290, x_5, x_6, x_7, x_8, x_281); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -30595,7 +30595,7 @@ x_253 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_254 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_254, 0, x_252); lean_ctor_set(x_254, 1, x_253); -x_255 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_254, x_5, x_6, x_7, x_8, x_243); +x_255 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_254, x_5, x_6, x_7, x_8, x_243); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -30830,7 +30830,7 @@ x_326 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_327 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_327, 0, x_325); lean_ctor_set(x_327, 1, x_326); -x_328 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_327, x_5, x_6, x_7, x_8, x_225); +x_328 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_327, x_5, x_6, x_7, x_8, x_225); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -30950,7 +30950,7 @@ x_393 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_394 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_394, 0, x_392); lean_ctor_set(x_394, 1, x_393); -x_395 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_394, x_5, x_6, x_7, x_8, x_385); +x_395 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_394, x_5, x_6, x_7, x_8, x_385); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -31053,7 +31053,7 @@ x_357 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_358 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_358, 0, x_356); lean_ctor_set(x_358, 1, x_357); -x_359 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_358, x_5, x_6, x_7, x_8, x_347); +x_359 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_358, x_5, x_6, x_7, x_8, x_347); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -31288,7 +31288,7 @@ x_430 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_431 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_431, 0, x_429); lean_ctor_set(x_431, 1, x_430); -x_432 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_431, x_5, x_6, x_7, x_8, x_329); +x_432 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_431, x_5, x_6, x_7, x_8, x_329); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -31408,7 +31408,7 @@ x_497 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_498 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_498, 0, x_496); lean_ctor_set(x_498, 1, x_497); -x_499 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_498, x_5, x_6, x_7, x_8, x_489); +x_499 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_498, x_5, x_6, x_7, x_8, x_489); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -31511,7 +31511,7 @@ x_461 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_462 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_462, 0, x_460); lean_ctor_set(x_462, 1, x_461); -x_463 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_462, x_5, x_6, x_7, x_8, x_451); +x_463 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_462, x_5, x_6, x_7, x_8, x_451); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -31746,7 +31746,7 @@ x_534 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_535 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_535, 0, x_533); lean_ctor_set(x_535, 1, x_534); -x_536 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_535, x_5, x_6, x_7, x_8, x_433); +x_536 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_535, x_5, x_6, x_7, x_8, x_433); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -31881,7 +31881,7 @@ x_606 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_607 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_607, 0, x_605); lean_ctor_set(x_607, 1, x_606); -x_608 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_607, x_5, x_6, x_7, x_8, x_598); +x_608 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_607, x_5, x_6, x_7, x_8, x_598); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -31984,7 +31984,7 @@ x_570 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_571 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_571, 0, x_569); lean_ctor_set(x_571, 1, x_570); -x_572 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_571, x_5, x_6, x_7, x_8, x_560); +x_572 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_571, x_5, x_6, x_7, x_8, x_560); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -32219,7 +32219,7 @@ x_643 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_644 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_644, 0, x_642); lean_ctor_set(x_644, 1, x_643); -x_645 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_644, x_5, x_6, x_7, x_8, x_542); +x_645 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_644, x_5, x_6, x_7, x_8, x_542); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -32339,7 +32339,7 @@ x_710 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_711 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_711, 0, x_709); lean_ctor_set(x_711, 1, x_710); -x_712 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_711, x_5, x_6, x_7, x_8, x_702); +x_712 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_711, x_5, x_6, x_7, x_8, x_702); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -32442,7 +32442,7 @@ x_674 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_675 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_675, 0, x_673); lean_ctor_set(x_675, 1, x_674); -x_676 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_675, x_5, x_6, x_7, x_8, x_664); +x_676 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_675, x_5, x_6, x_7, x_8, x_664); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -32677,7 +32677,7 @@ x_747 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_748 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_748, 0, x_746); lean_ctor_set(x_748, 1, x_747); -x_749 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_748, x_5, x_6, x_7, x_8, x_646); +x_749 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_748, x_5, x_6, x_7, x_8, x_646); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -32797,7 +32797,7 @@ x_814 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_815 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_815, 0, x_813); lean_ctor_set(x_815, 1, x_814); -x_816 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_815, x_5, x_6, x_7, x_8, x_806); +x_816 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_815, x_5, x_6, x_7, x_8, x_806); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -32900,7 +32900,7 @@ x_778 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_779 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_779, 0, x_777); lean_ctor_set(x_779, 1, x_778); -x_780 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_779, x_5, x_6, x_7, x_8, x_768); +x_780 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_779, x_5, x_6, x_7, x_8, x_768); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -33135,7 +33135,7 @@ x_851 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_852 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_852, 0, x_850); lean_ctor_set(x_852, 1, x_851); -x_853 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_852, x_5, x_6, x_7, x_8, x_750); +x_853 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_852, x_5, x_6, x_7, x_8, x_750); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -33255,7 +33255,7 @@ x_918 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_919 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_919, 0, x_917); lean_ctor_set(x_919, 1, x_918); -x_920 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_919, x_5, x_6, x_7, x_8, x_910); +x_920 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_919, x_5, x_6, x_7, x_8, x_910); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -33358,7 +33358,7 @@ x_882 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_883 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_883, 0, x_881); lean_ctor_set(x_883, 1, x_882); -x_884 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_883, x_5, x_6, x_7, x_8, x_872); +x_884 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_883, x_5, x_6, x_7, x_8, x_872); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -33593,7 +33593,7 @@ x_955 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_956 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_956, 0, x_954); lean_ctor_set(x_956, 1, x_955); -x_957 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_956, x_5, x_6, x_7, x_8, x_854); +x_957 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_956, x_5, x_6, x_7, x_8, x_854); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -33713,7 +33713,7 @@ x_1022 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_1023 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_1023, 0, x_1021); lean_ctor_set(x_1023, 1, x_1022); -x_1024 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_1023, x_5, x_6, x_7, x_8, x_1014); +x_1024 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_1023, x_5, x_6, x_7, x_8, x_1014); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -33816,7 +33816,7 @@ x_986 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_987 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_987, 0, x_985); lean_ctor_set(x_987, 1, x_986); -x_988 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_987, x_5, x_6, x_7, x_8, x_976); +x_988 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_987, x_5, x_6, x_7, x_8, x_976); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -34051,7 +34051,7 @@ x_1059 = l_Lean_ParserCompiler_compileParserExpr___rarg___closed__4; x_1060 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_1060, 0, x_1058); lean_ctor_set(x_1060, 1, x_1059); -x_1061 = l_Lean_throwError___at_Lean_Meta_abstractRange___spec__1(x_1060, x_5, x_6, x_7, x_8, x_958); +x_1061 = l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(x_1060, x_5, x_6, x_7, x_8, x_958); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); diff --git a/stage0/stdlib/Lean/Widget/InteractiveGoal.c b/stage0/stdlib/Lean/Widget/InteractiveGoal.c index 56a08439e4..2b72b5ef73 100644 --- a/stage0/stdlib/Lean/Widget/InteractiveGoal.c +++ b/stage0/stdlib/Lean/Widget/InteractiveGoal.c @@ -29513,41 +29513,41 @@ lean_inc(x_19); lean_dec(x_17); if (lean_obj_tag(x_4) == 0) { -lean_object* x_49; -x_49 = lean_box(0); -x_20 = x_49; +lean_object* x_45; +x_45 = lean_box(0); +x_20 = x_45; x_21 = x_19; -goto block_48; +goto block_44; } else { -uint8_t x_50; -x_50 = !lean_is_exclusive(x_4); -if (x_50 == 0) +uint8_t x_46; +x_46 = !lean_is_exclusive(x_4); +if (x_46 == 0) { -lean_object* x_51; lean_object* x_52; -x_51 = lean_ctor_get(x_4, 0); +lean_object* x_47; lean_object* x_48; +x_47 = lean_ctor_get(x_4, 0); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -x_52 = l_Lean_Widget_ppExprTagged(x_51, x_16, x_6, x_7, x_8, x_9, x_19); -if (lean_obj_tag(x_52) == 0) +x_48 = l_Lean_Widget_ppExprTagged(x_47, x_16, x_6, x_7, x_8, x_9, x_19); +if (lean_obj_tag(x_48) == 0) { -lean_object* x_53; lean_object* x_54; -x_53 = lean_ctor_get(x_52, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_52, 1); -lean_inc(x_54); -lean_dec(x_52); -lean_ctor_set(x_4, 0, x_53); +lean_object* x_49; lean_object* x_50; +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_48, 1); +lean_inc(x_50); +lean_dec(x_48); +lean_ctor_set(x_4, 0, x_49); x_20 = x_4; -x_21 = x_54; -goto block_48; +x_21 = x_50; +goto block_44; } else { -uint8_t x_55; +uint8_t x_51; lean_free_object(x_4); lean_dec(x_18); lean_dec(x_15); @@ -29558,54 +29558,54 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_55 = !lean_is_exclusive(x_52); -if (x_55 == 0) +x_51 = !lean_is_exclusive(x_48); +if (x_51 == 0) { -return x_52; +return x_48; } else { -lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_56 = lean_ctor_get(x_52, 0); -x_57 = lean_ctor_get(x_52, 1); -lean_inc(x_57); -lean_inc(x_56); -lean_dec(x_52); -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_52; lean_object* x_53; lean_object* x_54; +x_52 = lean_ctor_get(x_48, 0); +x_53 = lean_ctor_get(x_48, 1); +lean_inc(x_53); +lean_inc(x_52); +lean_dec(x_48); +x_54 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_54, 0, x_52); +lean_ctor_set(x_54, 1, x_53); +return x_54; } } } else { -lean_object* x_59; lean_object* x_60; -x_59 = lean_ctor_get(x_4, 0); -lean_inc(x_59); +lean_object* x_55; lean_object* x_56; +x_55 = lean_ctor_get(x_4, 0); +lean_inc(x_55); lean_dec(x_4); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -x_60 = l_Lean_Widget_ppExprTagged(x_59, x_16, x_6, x_7, x_8, x_9, x_19); -if (lean_obj_tag(x_60) == 0) +x_56 = l_Lean_Widget_ppExprTagged(x_55, x_16, x_6, x_7, x_8, x_9, x_19); +if (lean_obj_tag(x_56) == 0) { -lean_object* x_61; lean_object* x_62; lean_object* x_63; -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_60); -x_63 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_63, 0, x_61); -x_20 = x_63; -x_21 = x_62; -goto block_48; +lean_object* x_57; lean_object* x_58; lean_object* x_59; +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_alloc_ctor(1, 1, 0); +lean_ctor_set(x_59, 0, x_57); +x_20 = x_59; +x_21 = x_58; +goto block_44; } else { -lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_dec(x_18); lean_dec(x_15); lean_dec(x_14); @@ -29615,41 +29615,38 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_64 = lean_ctor_get(x_60, 0); -lean_inc(x_64); -x_65 = lean_ctor_get(x_60, 1); -lean_inc(x_65); -if (lean_is_exclusive(x_60)) { - lean_ctor_release(x_60, 0); - lean_ctor_release(x_60, 1); - x_66 = x_60; +x_60 = lean_ctor_get(x_56, 0); +lean_inc(x_60); +x_61 = lean_ctor_get(x_56, 1); +lean_inc(x_61); +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + x_62 = x_56; } else { - lean_dec_ref(x_60); - x_66 = lean_box(0); + lean_dec_ref(x_56); + x_62 = lean_box(0); } -if (lean_is_scalar(x_66)) { - x_67 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_62)) { + x_63 = lean_alloc_ctor(1, 2, 0); } else { - x_67 = x_66; + x_63 = x_62; } -lean_ctor_set(x_67, 0, x_64); -lean_ctor_set(x_67, 1, x_65); -return x_67; +lean_ctor_set(x_63, 0, x_60); +lean_ctor_set(x_63, 1, x_61); +return x_63; } } } -block_48: +block_44: { -lean_object* x_22; +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); lean_inc(x_2); x_22 = l_Lean_Meta_isClass_x3f(x_2, x_6, x_7, x_8, x_9, x_21); -if (lean_obj_tag(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_22, 0); lean_inc(x_23); x_24 = lean_ctor_get(x_22, 1); @@ -29744,43 +29741,10 @@ return x_43; } } } -else -{ -uint8_t x_44; -lean_dec(x_20); -lean_dec(x_18); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -x_44 = !lean_is_exclusive(x_22); -if (x_44 == 0) -{ -return x_22; } else { -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_22, 0); -x_46 = lean_ctor_get(x_22, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_22); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -} -else -{ -uint8_t x_68; +uint8_t x_64; lean_dec(x_15); lean_dec(x_14); lean_dec(x_9); @@ -29790,23 +29754,23 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_68 = !lean_is_exclusive(x_17); -if (x_68 == 0) +x_64 = !lean_is_exclusive(x_17); +if (x_64 == 0) { return x_17; } else { -lean_object* x_69; lean_object* x_70; lean_object* x_71; -x_69 = lean_ctor_get(x_17, 0); -x_70 = lean_ctor_get(x_17, 1); -lean_inc(x_70); -lean_inc(x_69); +lean_object* x_65; lean_object* x_66; lean_object* x_67; +x_65 = lean_ctor_get(x_17, 0); +x_66 = lean_ctor_get(x_17, 1); +lean_inc(x_66); +lean_inc(x_65); lean_dec(x_17); -x_71 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_71, 0, x_69); -lean_ctor_set(x_71, 1, x_70); -return x_71; +x_67 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_67, 0, x_65); +lean_ctor_set(x_67, 1, x_66); +return x_67; } } }