Skip to content
Draft
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 4 additions & 0 deletions src/Lean/ExtraModUses.lean
Original file line number Diff line number Diff line change
Expand Up @@ -76,6 +76,10 @@ builtin_initialize extraModUses : SimplePersistentEnvExtension ExtraModUse (PHas
public def getExtraModUses (env : Environment) (modIdx : ModuleIdx) : Array ExtraModUse :=
extraModUses.getModuleEntries env modIdx

/-- Returns additional recorded import dependencies of the module currently being elaborated. -/
public def getExtraModUsesInEnv (env : Environment) : Array ExtraModUse :=
(extraModUses.getState (asyncMode := .local) env).fold (init := #[]) fun acc e => acc.push e

/-- Copies additional recorded import dependencies from one environment to another. -/
public def copyExtraModUses (src dest : Environment) : Environment := Id.run do
let mut env := dest
Expand Down
Loading