max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

perf: inline checkInterrupted

Browse source 
Amazingly, the extra result allocation seems to have triggered a mathlib
heartbeat timeout
This commit is contained in:
Sebastian Ullrich 2023-10-12 14:05:00 +02:00
parent d3bc2ac1a9
commit 9874848f83
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Lean/CoreM.lean
View file

@ -199,7 +199,7 @@ instance [MetaEval α] : MetaEval (CoreM α) where
protected def withIncRecDepth [Monad m] [MonadControlT CoreM m] (x : m α) : m α :=
controlAt CoreM fun runInBase => withIncRecDepth (runInBase x)
def checkInterrupted : CoreM Unit := do
@[inline] def checkInterrupted : CoreM Unit := do
if (← IO.checkCanceled) then
-- should never be visible to users!
throw <| Exception.error .missing "elaboration interrupted"