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.
1 parent 4ca1c1f commit 6dd3af9Copy full SHA for 6dd3af9
src/Lean/Elab/PreDefinition/Main.lean
@@ -169,7 +169,7 @@ def addPreDefinitions (preDefs : Array PreDefinition) (postponeCheck := false) :
169
let preDefs ← preDefs.mapM ensureNoUnassignedMVarsAtPreDef
170
let preDefs ← betaReduceLetRecApps preDefs
171
let cliques := partitionPreDefs preDefs
172
- let postponeCheck := postponeCheck && cliques.size == 1
+ let postponeCheck := postponeCheck && cliques.size == 1 && preDefs[0]!.kind == .theorem
173
for preDefs in cliques do
174
trace[Elab.definition.scc] "{preDefs.map (·.declName)}"
175
if preDefs.size == 1 && isNonRecursive preDefs[0]! then
0 commit comments