RosettaCodeData/Task/Sleep/OCaml/sleep-1.ml
2024-10-16 18:07:41 -07:00

5 lines
158 B
OCaml

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