test(tests/lean): kernel exception pp method

Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
This commit is contained in:
Leonardo de Moura 2014-01-07 15:19:52 -08:00
parent 0363faeec8
commit 9f4959fb64
2 changed files with 21 additions and 0 deletions

View file

@ -0,0 +1,6 @@
variable N : Type
variable a : N
check fun x : a, x
check a a
variable f : N -> N
check f (fun x : N, x)

View file

@ -0,0 +1,15 @@
Set: pp::colors
Set: pp::unicode
Assumed: N
Assumed: a
Error (line: 3, pos: 14) type expected, got
a
Error (line: 4, pos: 6) function expected at
a a
Assumed: f
Error (line: 6, pos: 6) type mismatch at application
f (λ x : N, x)
Function type:
N → N
Argument type:
(λ x : N, x) : N → N