diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-03-16 14:52:59 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-03-16 14:52:59 +0000 |
| commit | 96e486509a5d4d7cbee2589af32d18eaa07d8105 (patch) | |
| tree | 4841aad5b37b30a8a2a0ee5635b00ff8f097b348 /test-suite/success/Notations.v | |
| parent | 0e755a35603e269ec814f4ae7f961ea2da98051b (diff) | |
Remove some weird syntax "fun ... ," that used to be accepted (cf r13876)
Probably something related with the unicode lambda syntax...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13911 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success/Notations.v')
| -rw-r--r-- | test-suite/success/Notations.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test-suite/success/Notations.v b/test-suite/success/Notations.v index 18e2479e5..621406289 100644 --- a/test-suite/success/Notations.v +++ b/test-suite/success/Notations.v @@ -63,6 +63,6 @@ Check [ 0 # ; 1 ]. (* Check well-scoping of alpha-renaming of private binders *) (* see bug #2248 (thanks to Marc Lasson) *) -Notation "{ q , r | P }" := (fun (p:nat*nat), let (q, r) := p in P). -Check (fun p, {q,r| q + r = p}). +Notation "{ q , r | P }" := (fun (p:nat*nat) => let (q, r) := p in P). +Check (fun p => {q,r| q + r = p}). |