diff options
author | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-04-06 11:15:41 +0200 |
---|---|---|
committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-04-06 11:28:08 +0200 |
commit | 33f40197e6b7bef02c8df2dc0a0066f8144b66d6 (patch) | |
tree | 1ed61e9efe45f04b9f03229eec2ad986dde02059 /test-suite/success/Notations.v | |
parent | c6f24b1cbfb485dbf14b3934208c113140de2eca (diff) | |
parent | ed25677029e2cc1e34eba76aade1a00980ca11de (diff) |
Merge branch 'origin/v8.5' into v8.6.
Was needed to be done for a while.
Diffstat (limited to 'test-suite/success/Notations.v')
-rw-r--r-- | test-suite/success/Notations.v | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/success/Notations.v b/test-suite/success/Notations.v index 52acad746..837f2efd0 100644 --- a/test-suite/success/Notations.v +++ b/test-suite/success/Notations.v @@ -121,6 +121,7 @@ Notation " |- {{ a }} b" := (a=b) (no associativity, at level 10). Goal True. {{ exact I. }} Qed. + Check |- {{ 0 }} 0. (* Check parsing of { and } is not affected by notations #3479 *) @@ -135,3 +136,9 @@ Notation "" := (@nil) (only printing). (* Check that a notation cannot be neither parsing nor printing. *) Fail Notation "'foobarkeyword'" := (@nil) (only parsing, only printing). + +(* Check "where" clause for inductive types with parameters *) + +Reserved Notation "x === y" (at level 50). +Inductive EQ {A} (x:A) : A -> Prop := REFL : x === x + where "x === y" := (EQ x y). |