summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/7462.v
diff options
context:
space:
mode:
authorGravatar Benjamin Barenblat <bbaren@debian.org>2018-12-29 14:31:32 -0500
committerGravatar Benjamin Barenblat <bbaren@debian.org>2018-12-29 14:31:32 -0500
commit2708a015fcf65f72328be4296a00dd32b1f1c17a (patch)
tree696f9b5fb84817e1a5c8d9271976a92e25aef18a /test-suite/bugs/closed/7462.v
parentd7d80c5bea564b7cb0eadc33e9ee38c9d9de1cd8 (diff)
parent9043add656177eeac1491a73d2f3ab92bec0013c (diff)
Updated version 8.8.2 from 'upstream/8.8.2'
Diffstat (limited to 'test-suite/bugs/closed/7462.v')
-rw-r--r--test-suite/bugs/closed/7462.v13
1 files changed, 13 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/7462.v b/test-suite/bugs/closed/7462.v
new file mode 100644
index 00000000..40ca39e3
--- /dev/null
+++ b/test-suite/bugs/closed/7462.v
@@ -0,0 +1,13 @@
+(* Adding an only-printing notation should not override existing
+ interpretations for the same notation. *)
+
+Notation "$ x" := (@id nat x) (only parsing, at level 0).
+Notation "$ x" := (@id bool x) (only printing, at level 0).
+Check $1. (* Was: Error: Unknown interpretation for notation "$ _". *)
+
+(* Adding an only-printing notation should not let believe
+ that a parsing rule has been given *)
+
+Notation "$ x" := (@id bool x) (only printing, at level 0).
+Notation "$ x" := (@id nat x) (only parsing, at level 0).
+Check $1. (* Was: Error: Syntax Error: Lexer: Undefined token *)