diff options
Diffstat (limited to 'test-suite/success/letproj.v')
| -rw-r--r-- | test-suite/success/letproj.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/test-suite/success/letproj.v b/test-suite/success/letproj.v index de2857b4..2f0d8bf8 100644 --- a/test-suite/success/letproj.v +++ b/test-suite/success/letproj.v @@ -7,3 +7,5 @@ Definition test (A : Type) (f : Foo A) := Scheme foo_case := Case for Foo Sort Type. +Definition test' (A : Type) (f : Foo A) := + let 'Build_Foo _ x y := f in x. |