suzanne.soy/trivial
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

[function] positive tests for curry

Browse Source
This commit is contained in:
ben 2016-03-04 18:17:00 -05:00
parent 2472e3755a
commit 8e2b458aa7
1 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
test/function-pass.rkt Normal file
View File

@ -0,0 +1,15 @@
#lang typed/racket/base
(module+ test
(require
trivial/function
typed/rackunit)
(check-equal?
(((curry: (lambda (x y) x)) 'x) 'y)
'x)
(check-equal?
((((curry: (lambda (x y z) z)) 0) 1) 2)
2)
)