aboutsummaryrefslogtreecommitdiff
path: root/src/Util/Tactics/DoWithHyp.v
diff options
context:
space:
mode:
authorGravatar Jason Gross <jgross@mit.edu>2017-01-26 18:19:54 -0500
committerGravatar Jason Gross <jgross@mit.edu>2017-01-26 18:20:08 -0500
commit39c70ae2abd720ec76e01c85d2aa0e56aeae3414 (patch)
treeb8ca8c8c4e935a078813d1f753f29db7e95f91d4 /src/Util/Tactics/DoWithHyp.v
parent0cf72bdda642db646e25cba8af97f3c63d88764d (diff)
Split off some bits of Reflection.Syntax
Also split off some bits of Util.Tactics
Diffstat (limited to 'src/Util/Tactics/DoWithHyp.v')
-rw-r--r--src/Util/Tactics/DoWithHyp.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/Util/Tactics/DoWithHyp.v b/src/Util/Tactics/DoWithHyp.v
new file mode 100644
index 000000000..b31072a63
--- /dev/null
+++ b/src/Util/Tactics/DoWithHyp.v
@@ -0,0 +1,7 @@
+Require Export Crypto.Util.FixCoqMistakes.
+
+(** Do something with every hypothesis. *)
+Ltac do_with_hyp' tac :=
+ match goal with
+ | [ H : _ |- _ ] => tac H
+ end.