diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2017-03-23 18:55:44 +0100 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2017-03-23 18:55:44 +0100 |
commit | 9dc839ee08d4aef904d95bd358d5486b4964ef4e (patch) | |
tree | 80f34a0f094d2b432e8cc2c465f9c9cc1c67c8ea /test-suite/bugs | |
parent | dccc6c5a0d7bb8b8936a8327ae979138c9f13453 (diff) | |
parent | b1656b1f10501b34ae6a7e147f550710b935e54b (diff) |
Merge PR#507: Intern names bound in match patterns
Diffstat (limited to 'test-suite/bugs')
-rw-r--r-- | test-suite/bugs/closed/5345.v | 7 |
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 000000000..d8448f35d --- /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. |