diff options
| author | Michael Soegtrop | 2020-07-05 07:49:37 +0200 |
|---|---|---|
| committer | Michael Soegtrop | 2020-07-05 07:49:37 +0200 |
| commit | 0545c9402310efe0656793197c996d04d554ecb8 (patch) | |
| tree | a7ee9471b02a4cad3f87a241299decb36bc935f7 /test-suite | |
| parent | 99889823890c9d414335dc25df8f30ae06575f94 (diff) | |
| parent | 810197a6577c7a4a40f406ae64f918f72e7d0012 (diff) | |
Merge PR #12594: Fix ltac2 type parameters
Reviewed-by: MSoegtropIMC
Reviewed-by: gares
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/ltac2/syntax.v | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/test-suite/ltac2/syntax.v b/test-suite/ltac2/syntax.v new file mode 100644 index 0000000000..872b2142d0 --- /dev/null +++ b/test-suite/ltac2/syntax.v @@ -0,0 +1,12 @@ +Require Import Ltac2.Ltac2. + +Ltac2 Type ('a, 'b, 'c) t. +Ltac2 Type ('a) u. +Ltac2 Type 'a v. + +Ltac2 foo + (f : ('a, 'b, 'c) t -> ('a -> 'a, 'b -> 'c, 'c * 'c) t) + (x : ('a, 'b, 'c) t) := + f x. + +Ltac2 bar (x : 'a u) (y : ('b) v) := x. |
