summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/5345.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs/closed/5345.v')
-rw-r--r--test-suite/bugs/closed/5345.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/5345.v b/test-suite/bugs/closed/5345.v
new file mode 100644
index 00000000..d8448f35
--- /dev/null
+++ b/test-suite/bugs/closed/5345.v
@@ -0,0 +1,7 @@
+Ltac break_tuple :=
+ match goal with
+ | [ H: context[match ?a with | pair n m => _ end] |- _ ] =>
+ let n := fresh n in
+ let m := fresh m in
+ destruct a as [n m]
+ end.