diff options
| author | Hugo Herbelin | 2019-11-09 21:19:35 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2019-11-21 20:08:04 +0100 |
| commit | 9bd0a6e2f87be55eab19363fa09674f2975b89a9 (patch) | |
| tree | 3178f371933b6f72c09b80a8d701235223161f1c /test-suite | |
| parent | 5d10145531b2920f5e7b9d47bc15b5de06783d97 (diff) | |
A refined version of #8890 which prevents #11033.
We restrict #8890 so that it looks for a notation only for the fully
applied coercion.
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/output/Notations4.out | 2 | ||||
| -rw-r--r-- | test-suite/output/Notations4.v | 14 |
2 files changed, 16 insertions, 0 deletions
diff --git a/test-suite/output/Notations4.out b/test-suite/output/Notations4.out index ba4ac5a8f9..32120a9674 100644 --- a/test-suite/output/Notations4.out +++ b/test-suite/output/Notations4.out @@ -59,3 +59,5 @@ where |- Type] (pat, p0, p cannot be used) fun '{| |} => true : R -> bool +b = a + : Prop diff --git a/test-suite/output/Notations4.v b/test-suite/output/Notations4.v index 4b9d0abd95..d3433949d1 100644 --- a/test-suite/output/Notations4.v +++ b/test-suite/output/Notations4.v @@ -140,3 +140,17 @@ Record R := { n : nat }. Check fun '{|n:=x|} => true. End EmptyRecordSyntax. + +Module L. + +(* Testing regression #11053 *) + +Section Test. +Variables (A B : Type) (a : A) (b : B). +Variable c : A -> B. +Coercion c : A >-> B. +Notation COERCION := (c). +Check b = a. +End Test. + +End L. |
