Type for `curry'.

Closes PR 10956

original commit: 81f262c7caf0954f7efebebc6d10bef6c93972bd
This commit is contained in:
Sam Tobin-Hochstadt 2010-06-13 21:39:58 -04:00
parent b4d568a84d
commit 3c594198ce

View File

@ -912,3 +912,8 @@
;;write-special-evt
[port-writes-atomic? (-Output-Port . -> . -Boolean)]
[port-writes-special? (-Output-Port . -> . -Boolean)]
;; probably the most useful cases
[curry (-poly (a b c)
(cl->* ((a b . -> . c) a . -> . (b . -> . c))
((a b . -> . c) . -> . (a . -> . (b . -> . c)))))]