add getenv and pretty-print etc.

svn: r15705

original commit: c27783830a1846857c82478e50c7380faa5f861b
This commit is contained in:
Sam Tobin-Hochstadt 2009-08-11 20:44:45 +00:00
parent 534e5e48aa
commit 2b0465d253

View File

@ -576,6 +576,8 @@
[module->namespace (-> -Sexp -Namespace)]
[current-namespace (-Param -Namespace -Namespace)]
[getenv (-> -String (Un -String (-val #f)))]
;; syntax operations
[expand (-> (-Syntax Univ) (-Syntax Univ))]
@ -716,3 +718,15 @@
[sinh (N . -> . N)]
[cosh (N . -> . N)]
[tanh (N . -> . N)]
;; scheme/pretty
[pretty-print
(cl->* (Univ . -> . -Void)
(Univ -Output-Port . -> . -Void))]
[pretty-display
(cl->* (Univ . -> . -Void)
(Univ -Output-Port . -> . -Void))]
[pretty-format
(cl->* (Univ . -> . -Void)
(Univ -Integer . -> . -Void))]