在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

停止执行给定的秒数.像睡眠一样,但支持几分之一秒.