4 lines
122 B
Common Lisp
4 lines
122 B
Common Lisp
(let ((seconds (read-number "Time in seconds: ")))
|
|
(message "Sleeping ...")
|
|
(sleep-for seconds)
|
|
(message "Awake!"))
|