aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/success/unification.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/success/unification.v')
-rw-r--r--test-suite/success/unification.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/success/unification.v b/test-suite/success/unification.v
index 4ddaab710..6a4d92851 100644
--- a/test-suite/success/unification.v
+++ b/test-suite/success/unification.v
@@ -89,3 +89,10 @@ Proof.
intros.
apply H.
Qed.
+
+(* Test instanciation of evars by unification *)
+
+Goal (forall x, 0 * x = 0 -> True) -> True.
+intros; eapply H.
+rewrite <- plus_n_Sm. (* should refine ?x with S ?x' *)
+Abort.