File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed
Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -1869,7 +1869,7 @@ def mapLetDecl [MonadLiftT MetaM n] (name : Name) (type : Expr) (val : Expr) (k
18691869 withLetDecl name type val (nondep := nondep) (kind := kind) fun x => do
18701870 mkLetFVars (usedLetOnly := usedLetOnly) (generalizeNondepLet := false ) #[x] (← k x)
18711871
1872- def mkLocalInstances (lctx : LocalContext) : MetaM LocalInstances := do
1872+ def toLocalInstances (lctx : LocalContext) : MetaM LocalInstances := do
18731873 let mut localInstances := #[]
18741874 for decl in lctx do
18751875 unless decl.isImplementationDetail do
@@ -1878,7 +1878,7 @@ def mkLocalInstances (lctx : LocalContext) : MetaM LocalInstances := do
18781878 return localInstances
18791879
18801880def withPopulatingLocalInstances {α} (k : MetaM α) : MetaM α := do
1881- let localInstances ← mkLocalInstances (← getLCtx)
1881+ let localInstances ← toLocalInstances (← getLCtx)
18821882 withReader ({ · with localInstances }) k
18831883
18841884def withLocalInstancesImp (decls : List LocalDecl) (k : MetaM α) : MetaM α := do
You can’t perform that action at this time.
0 commit comments