Время работы в Окамле

Question

Как определить количество времени, которое мой код занял в ocaml? Есть ли функции для измерения этого?

Answer 1

Если вы хотите измерить время выполнения отдельных функций, эта вспомогательная функция полезна во многих случаях:

let time f x =
    let t = Sys.time() in
    let fx = f x in
    Printf.printf "Execution time: %fs\n" (Sys.time() -. t);
    fx

, где f - любая функция, которая принимает x в качестве аргумента и возвращает что-то.

Answer 2

В моем собственном кодировании я использую Unix.gettimeofday (), который возвращает значение с плавающей запятой с разрешением, значительно меньшим одной секунды. Это описано в документации для модуля OCaml Unix . Несмотря на название модуля, эта функция также работает в Windows (и, вероятно, почти во всех средах, с которыми вы можете столкнуться).

Если я переписываю ответ планшета, я получаю следующий код:

let time f x =
    let start = Unix.gettimeofday ()
    in let res = f x
    in let stop = Unix.gettimeofday ()
    in let () = Printf.printf "Execution time: %fs\n%!" (stop -. start)
    in
       res

Answer 3

Вы можете использовать Sys.time ().Возвращает время процессора в секундах, использованное программой с начала выполнения.

Источник: http://caml.inria.fr/pub/docs/manual-ocaml/libref/Sys.html