diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-09-27 00:09:59 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-09-27 00:27:14 +0200 |
| commit | 775fefc7ca57cee1b3b8a368ac26492dbe5a8910 (patch) | |
| tree | db480494456d8a072fa75c7ad6196986a70c4640 /test-suite/success | |
| parent | b9740771e8113cb9e607793887be7a12587d0326 (diff) | |
Fixing an old bug in collecting evars with cleared context.
The function Proofview.undefined was collecting twice the evars that
had advanced. Consequently, the functions Proofview.unshelve and
Proofview.with_shelf were possibly doing the same.
Diffstat (limited to 'test-suite/success')
| -rw-r--r-- | test-suite/success/unshelve.v | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/success/unshelve.v b/test-suite/success/unshelve.v index 672222bdd..a4fa544cd 100644 --- a/test-suite/success/unshelve.v +++ b/test-suite/success/unshelve.v @@ -9,3 +9,11 @@ unshelve (refine (F _ _ _ _)). + exact (@eq_refl bool true). + exact (@eq_refl unit tt). Qed. + +(* This was failing in 8.6, because of ?a:nat being wrongly duplicated *) + +Goal (forall a : nat, a = 0 -> True) -> True. +intros F. +unshelve (eapply (F _);clear F). +2:reflexivity. +Qed. |