6 lines
158 B
Text
6 lines
158 B
Text
|
#load "unix.cma";;
|
||
|
|
let seconds = read_int ();;
|
||
|
|
print_endline "Sleeping...";;
|
||
|
|
Unix.sleep seconds;; (* number is integer in seconds *)
|
||
|
|
print_endline "Awake!";;
|