在OCaml睡不到一秒钟

Question

Unix.sleep函数可以暂停程序整秒，但是如何暂停它不到一秒钟？

Answer 1

经典的Unix解决方案是使用没有文件描述符的select（）：

let minisleep (sec: float) =
    ignore (Unix.select [] [] [] sec)

Answer 2

Thread.delay函数暂停线程达到给定的秒数，但它需要一个浮点数，允许你暂停线程不到一秒钟。

Answer 3

来自Unix模块

val sleepf : float -> unit

  

停止执行指定的秒数。喜欢睡觉，但是   支持几分之一。