a8a160b091
This PR ensures that `revertAll` clears auxiliary declarations when invoked directly by users. closes #6263
14 lines
329 B
Text
14 lines
329 B
Text
import Lean
|
|
|
|
open Lean.Elab.Tactic
|
|
|
|
variable (p q : Prop)
|
|
theorem foo (h : p ∧ q) : q ∧ p := by
|
|
run_tac liftMetaTactic1 (·.revertAll)
|
|
guard_target =ₛ ∀ (p q : Prop), p ∧ q → q ∧ p
|
|
sorry
|
|
|
|
theorem bla (h : p ∧ q) : q ∧ p := by
|
|
revert p q
|
|
guard_target =ₛ ∀ (p q : Prop), p ∧ q → q ∧ p
|
|
sorry
|