diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-03-02 17:34:58 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-03-02 17:34:58 +0000 |
commit | b283db74e0b63b9b4d51fcfd39cb8b401347f991 (patch) | |
tree | fc26b4ded940c60dcb463deb1fa69b7c257d9ad6 /test-suite | |
parent | 4ac83a8cc2a43a20152454f58d9401d4fa9c87a4 (diff) |
Ajout test bug 1089
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@8113 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite')
-rw-r--r-- | test-suite/success/evars.v | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/test-suite/success/evars.v b/test-suite/success/evars.v index dbace977e..ea1dd803f 100644 --- a/test-suite/success/evars.v +++ b/test-suite/success/evars.v @@ -56,3 +56,7 @@ Check :forall x : nat, (forall y n : nat, {q : nat | y = q * n}) -> forall n : nat, {q : nat | x = q * n}). + +(* Check instantiation of nested evars (bug #1089) *) + +Check (fun f:(forall (v:Set->Set), v (v nat) -> nat) => f _ (Some (Some O))). |