Commit 6ff1c18a authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Make sure that `iIntros "*"` uses a fresh name.

parent 92024176
...@@ -755,7 +755,7 @@ Local Tactic Notation "iIntroForall" := ...@@ -755,7 +755,7 @@ Local Tactic Notation "iIntroForall" :=
lazymatch goal with lazymatch goal with
| |- _, ?P => fail | |- _, ?P => fail
| |- _, _ => intro | |- _, _ => intro
| |- _ ( x : _, _) => iIntro (x) | |- _ ( x : _, _) => let x' := fresh x in iIntro (x')
end. end.
Local Tactic Notation "iIntro" := Local Tactic Notation "iIntro" :=
try iStartProof; try iStartProof;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment