From 92382ea47b28e4355e62aaef0222505f97377157 Mon Sep 17 00:00:00 2001 From: Leonardo de Moura Date: Fri, 1 Apr 2022 05:52:09 -0700 Subject: [PATCH] fix: `checkpoint` --- src/Lean/Elab/Tactic/Cache.lean | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Lean/Elab/Tactic/Cache.lean b/src/Lean/Elab/Tactic/Cache.lean index 3e7cb9da06..862ada51f6 100644 --- a/src/Lean/Elab/Tactic/Cache.lean +++ b/src/Lean/Elab/Tactic/Cache.lean @@ -34,6 +34,7 @@ private def findCache? (cacheRef : IO.Ref Cache) (mvarId : MVarId) (stx : Syntax let mvarId ← getMainGoal match (← findCache? cacheRef mvarId stx[1]) with | some s => + cacheRef.modify fun { pre, post } => { pre, post := post.insert mvarId s } set s.core set s.meta set s.term