;; number -> void
(define thread-sleep plt:sleep)