diff options
author | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-10-30 13:23:10 +0100 |
---|---|---|
committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-10-31 18:49:05 +0100 |
commit | b2e1d4ea930c07ca27168fb43908a32d1101fce0 (patch) | |
tree | ab08a3b0492ef8c3a6050c638540efdd12b86c82 /test-suite/success | |
parent | cfb5201e2ebc2516e3de7c578355db8bd4f08d35 (diff) |
Avoid "destruct H" to apply on H itself when H is a section variable.
Need some contorsion for not using the general scheme of naming based
which uses the hypothesis name as base ident, and for instead keeping
a name generated on the type of the section variable, as it was before
for section variables (example of incompatibility in FMapPositive).
Diffstat (limited to 'test-suite/success')
-rw-r--r-- | test-suite/success/destruct.v | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/test-suite/success/destruct.v b/test-suite/success/destruct.v index c6eff3eeb..66629f7fd 100644 --- a/test-suite/success/destruct.v +++ b/test-suite/success/destruct.v @@ -277,3 +277,15 @@ Abort. Goal forall f : A -> nat -> nat, f a 0 = f a 1. intros. destruct f. + +(* This one was not working in 8.4 *) + +Section S1. +Variables x y : Type. +Variable H : x = y. +Goal True. +destruct H. (* Was not working in 8.4 *) +(* Now check that H statement has not be itself subject of the rewriting *) +change (x=y) in H. +Abort. +End S1. |