aboutsummaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
authorHugo Herbelin2020-02-15 08:49:53 +0100
committerHugo Herbelin2020-02-16 21:44:43 +0100
commit96e78e7e25d666f30a7c00e0288762e127690c67 (patch)
tree8fdf7f66fd76ae87778300697420fa8cd177358a /test-suite
parent29919b725262dca76708192bde65ce82860747be (diff)
Suite picking numeral notation
Ceci est une suite à numeral notation in custom entries, cherchant à raffiner la compatibilité entre entrées. C'est mélangé avec le "pick" précédent, et c'est en chantier.
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/output/Notations4.v14
1 files changed, 14 insertions, 0 deletions
diff --git a/test-suite/output/Notations4.v b/test-suite/output/Notations4.v
index 4ab800c9ba..dbfa939230 100644
--- a/test-suite/output/Notations4.v
+++ b/test-suite/output/Notations4.v
@@ -25,6 +25,20 @@ Check [ << # 0 >> ].
Notation "n" := n%nat (in custom myconstr at level 0, n bigint).
Check [ 2 + 3 ].
+Module A1.
+ (* This is compatible with bigint *)
+ Notation "x" := x (in custom myconstr at level 0, x ident).
+ (* This is incompatible with ident *)
+ Fail Notation "x" := x (in custom myconstr at level 0, x global).
+End A1.
+
+Module A2.
+ (* This is compatible with bigint *)
+ Notation "x" := x (in custom myconstr at level 0, x global).
+ (* This is compatible with bigint and global *)
+ Notation "x" := x (in custom myconstr at level 0, x string).
+End A2.
+
End A.
Module B.