We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
lean
1 parent 7f34a3f commit 5af9444Copy full SHA for 5af9444
src/Lean/Compiler/IR/CompilerM.lean
@@ -162,7 +162,8 @@ def findEnvDecl (env : Environment) (declName : Name) : Option Decl :=
162
-- it can also see the LCNF)
163
findAtSorted? (declMapExt.getModuleIREntries env modIdx) declName <|>
164
-- (closure of) `meta def`; will report `.extern`s for other `def`s so needs to come second
165
- findAtSorted? (declMapExt.getModuleEntries env modIdx) declName
+ findAtSorted? (declMapExt.getModuleEntries env modIdx) declName <|>
166
+ (declMapExt.getState env |>.find? declName)
167
| none => declMapExt.getState env |>.find? declName
168
169
def findDecl (n : Name) : CompilerM (Option Decl) :=
0 commit comments