add lambda internal begin test

This commit is contained in:
Stephen Chang 2014-08-05 15:28:11 -04:00
parent 28cb9b5107
commit a906d121f9

View File

@ -49,4 +49,5 @@
(check-type (λ ([x : Int]) (void) (+ x 1)) : ( Int Int))
(check-type-error (λ ([x : Int]) 1 1))
(check-type (λ ([x : Int] [y : Int]) (+ x y)) : ( Int Int Int))
(check-type-and-result (λ ([a : Int] [b : Int] [c : Int]) (void) (void) (+ a b c))
(check-type-and-result ((λ ([a : Int] [b : Int] [c : Int]) (void) (void) (+ a b c)) 1 2 3)
: Int => 6)