diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-07-11 23:26:21 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-07-11 23:26:21 +0000 |
commit | a82dc4411e1f5103b4dc592f885fa8315f965ab8 (patch) | |
tree | aef57c7a55c2a2cb03c9b8325b1c5f729c4f4725 /test-suite | |
parent | ddd8effe9fbee719e3a2d07f8338995d963ff630 (diff) |
Correction d'un autre bug autour de la gestion des niveaux vides de
camlp4 (faire l'initialisation dans l'ordre: les sous-niveaux vides,
eux-mêmes dans l'ordre, avant de créer le niveau de la notation elle-même).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11220 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite')
-rw-r--r-- | test-suite/success/Notations.v | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test-suite/success/Notations.v b/test-suite/success/Notations.v index facd55099..6dce0401d 100644 --- a/test-suite/success/Notations.v +++ b/test-suite/success/Notations.v @@ -21,3 +21,8 @@ Definition marker := O. Notation "x +1" := (S x) (at level 8, left associativity). Reset marker. Notation "x +1" := (S x) (at level 8, right associativity). + +(* Check that empty levels (here 8 and 2 in pattern) are added in the + right order *) + +Notation "' 'C_' G ( A )" := (A,G) (at level 8, G at level 2). |