Anonymous user
Sleep: Difference between revisions
common lisp implementation
(common lisp implementation) |
|||
Line 47:
return 0;
}</cpp>
=={{header|Common Lisp}}==
<pre>
(defun test-sleep ()
(let ((seconds (read)))
(format t "Sleeping...~%")
(sleep seconds)
(format t "Awake!~%")))
(test-sleep)
</pre>
=={{header|E}}==
| |||