fix 9979

svn: r15721
2009-08-12 21:55:04 +00:00 · 2009-08-12 21:55:04 +00:00 · 1e5cb7d603
commit 1e5cb7d603
parent 6af7d32709
1 changed files with 1 additions and 0 deletions
--- a/collects/typed-scheme/private/base-env.ss
+++ b/collects/typed-scheme/private/base-env.ss
@ -472,6 +472,7 @@
 [round (N . -> . -Integer)]
 [seconds->date (-Integer . -> . (make-Name #'date))]
 [current-seconds (-> -Integer)]
+[current-print (-Param (Univ . -> . Univ) (Univ . -> . Univ))]
 [path->string (-> -Path -String)]

 [link-exists? (-> -Pathlike B)]