diff options
author | Paul Steckler <steck@stecksoft.com> | 2017-09-25 13:03:36 -0400 |
---|---|---|
committer | Paul Steckler <steck@stecksoft.com> | 2017-09-25 13:03:36 -0400 |
commit | f1531b5deb0f2bbb5653bb6f02abf6a1896f399a (patch) | |
tree | ecdc1b4744f2a7b04998de952d60985e1c6215ce /test-suite/output | |
parent | 9933871efd122163f7e2dfe8377b9b2dd384b47b (diff) |
BZ#5739, Allow level for leftmost nonterminal for printing-ony Notations
Diffstat (limited to 'test-suite/output')
-rw-r--r-- | test-suite/output/Notations3.out | 4 | ||||
-rw-r--r-- | test-suite/output/Notations3.v | 7 |
2 files changed, 11 insertions, 0 deletions
diff --git a/test-suite/output/Notations3.out b/test-suite/output/Notations3.out index 65efe228a..6ef75dd13 100644 --- a/test-suite/output/Notations3.out +++ b/test-suite/output/Notations3.out @@ -124,3 +124,7 @@ return (1, 2, 3, 4) : nat !!! _ _ : nat, True : (nat -> Prop) * ((nat -> Prop) * Prop) +((*1).2).3 + : nat +*(1.2) + : nat diff --git a/test-suite/output/Notations3.v b/test-suite/output/Notations3.v index ea372ad1a..8c7bbe591 100644 --- a/test-suite/output/Notations3.v +++ b/test-suite/output/Notations3.v @@ -190,3 +190,10 @@ Check 1+1+1. (* Test presence of notation variables in the recursive parts (introduced in dfdaf4de) *) Notation "!!! x .. y , b" := ((fun x => b), .. ((fun y => b), True) ..) (at level 200, x binder). Check !!! (x y:nat), True. + +(* Allow level for leftmost nonterminal when printing-only, BZ#5739 *) + +Notation "* x" := (id x) (only printing, at level 15, format "* x"). +Notation "x . y" := (x + y) (only printing, at level 20, x at level 14, left associativity, format "x . y"). +Check (((id 1) + 2) + 3). +Check (id (1 + 2)). |