Add type for processor-count.

This commit is contained in:
Sam Tobin-Hochstadt 2012-08-20 14:49:11 -04:00
parent 1c275ffcc7
commit 5fb4819703

View File

@ -510,6 +510,8 @@
[future (-poly (A) ((-> A) . -> . (-future A)))]
[touch (-poly (A) ((-future A) . -> . A))]
[processor-count (-> -Nat)]
[reverse (-poly (a) (-> (-lst a) (-lst a)))]
[kernel:reverse (-poly (a) (-> (-lst a) (-lst a)))]