aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/bugs
diff options
context:
space:
mode:
authorGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2018-03-29 14:39:11 +0200
committerGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2018-03-29 14:46:02 +0200
commit820442433915e4176861e558b95413e4b832b3fa (patch)
treef3120908679ef2231f1b0e200887bd890afbd738 /test-suite/bugs
parentc0eedb5bdcb815132f404e19d6bf59730ae6e2df (diff)
Fix #6631: Derive Plugin gives "Anomaly: more than one statement".
We use a lower level function that accesses the proof without raising an anomaly. This is a direct candidate for backport, so I used a V82 API but eventually this API should be cleaned up.
Diffstat (limited to 'test-suite/bugs')
-rw-r--r--test-suite/bugs/closed/6631.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/6631.v b/test-suite/bugs/closed/6631.v
new file mode 100644
index 000000000..100dc13fc
--- /dev/null
+++ b/test-suite/bugs/closed/6631.v
@@ -0,0 +1,7 @@
+Require Import Coq.derive.Derive.
+
+Derive f SuchThat (f = 1 + 1) As feq.
+Proof.
+ transitivity 2; [refine (eq_refl 2)|].
+ transitivity 2.
+ 2:abstract exact (eq_refl 2).