diff options
| author | herbelin | 2009-07-15 10:52:40 +0000 |
|---|---|---|
| committer | herbelin | 2009-07-15 10:52:40 +0000 |
| commit | 013fd8526b66aedff2a7ef4919bb9b2203ea89f1 (patch) | |
| tree | fd4f4bd35926820a3c5c48bc320ee13c4e13624a /test-suite/success | |
| parent | 1cb6d3b235b03ccba046dee70b22d9f2e8dd8192 (diff) | |
- Granted wish #2138 (support for local binders in syntax of Record fields).
- Add tests related to commits 12229 (bug #2117) and 12241 (bug #2139).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12242 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success')
| -rw-r--r-- | test-suite/success/Record.v | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/success/Record.v b/test-suite/success/Record.v index 885fff4836..c0065809db 100644 --- a/test-suite/success/Record.v +++ b/test-suite/success/Record.v @@ -80,3 +80,10 @@ Record DecidableOrder : Type := ; le_trans : transitive _ le ; le_total : forall x y, {x <= y}+{y <= x} }. + +(* Test syntactic sugar suggested by wish report #2138 *) + +Record R : Type := { + P (A : Type) : Prop := exists x : A -> A, x = x; + Q A : P A -> P A +}. |