diff options
| -rw-r--r-- | test-suite/output/Coercions.out | 2 | ||||
| -rw-r--r-- | test-suite/output/Coercions.v | 6 |
2 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/output/Coercions.out b/test-suite/output/Coercions.out index 63e042d8b2..9f0979b74d 100644 --- a/test-suite/output/Coercions.out +++ b/test-suite/output/Coercions.out @@ -2,3 +2,5 @@ : Prop (R x x) : Prop +[x:foo; n:nat](x n) + : foo ->nat ->nat diff --git a/test-suite/output/Coercions.v b/test-suite/output/Coercions.v index 61b69038f3..2ad8b924eb 100644 --- a/test-suite/output/Coercions.v +++ b/test-suite/output/Coercions.v @@ -7,3 +7,9 @@ Section testSection. Variables S: Set; P: (pred S); R: (rel S); x:S. Check (P x). Check (R x x). +End testSection. + +(* Check the removal of coercions with target Funclass *) + +Record foo : Type := { D :> nat -> nat }. +Check [x:foo;n:nat](x n). |