Added types for thread mailbox operations.

Can't have typed mailboxes, though.
This commit is contained in:
Vincent St-Amour 2010-06-17 11:16:27 -04:00
parent c4e035dd67
commit cc796a9f9a

View File

@ -294,6 +294,10 @@
[thread-running? (-Thread . -> . B)]
[thread-dead? (-Thread . -> . B)]
[thread-wait (-Thread . -> . -Void)]
[thread-send (-poly (a) (-Thread Univ [(-> a)] . ->opt . (Un -Void (-val #f) a)))]
[thread-receive (-> Univ)]
[thread-try-receive (-> Univ)]
[thread-rewind-receive (-> (-lst Univ) -Void)]
[reverse (-poly (a) (-> (-lst a) (-lst a)))]
[append (-poly (a) (->* (list) (-lst a) (-lst a)))]