Add memory fns.

This commit is contained in:
Sam Tobin-Hochstadt 2010-09-08 11:32:04 -04:00
parent 350cef9af8
commit fae02be9f0

View File

@ -640,6 +640,8 @@
[exit (-> (Un))]
[collect-garbage (-> -Void)]
[current-memory-use (-> -Nat)]
[dump-memory-stats (-> Univ)]
[module->namespace (-> (-mu x (-lst (Un -Symbol -String -Nat x (-val #f)))) -Namespace)]
[current-namespace (-Param -Namespace -Namespace)]