diff options
author | 2014-09-04 14:12:39 +0200 | |
---|---|---|
committer | 2014-09-04 14:12:39 +0200 | |
commit | 1b995f87ea992092acc7990039b343f5afacd296 (patch) | |
tree | ed6ddcfb58febfbf17a0db09a16ac845851c6161 | |
parent | aab836160c3a963dc324f323cb62086d19127320 (diff) |
Test for bug #3459.
-rw-r--r-- | test-suite/bugs/closed/3459.v | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/3459.v b/test-suite/bugs/closed/3459.v new file mode 100644 index 000000000..db42d9605 --- /dev/null +++ b/test-suite/bugs/closed/3459.v @@ -0,0 +1,9 @@ +Goal 1 = 2. +Proof. +match goal with + | [ |- context G[2] ] => let y := constr:(fun x => $(let r := constr:(@eq Set x x) in + clear x; + exact r)$) in + pose y +end. +Abort. |