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

7 lines
226 B
OCaml

#load "unix.cma";;
#directory "+threads";;
#load "threads.cma";;
let seconds = read_float ();;
print_endline "Sleeping...";;
Thread.delay seconds;; (* number is in seconds ... but accepts fractions *)
print_endline "Awake!";;