package tiny_libs

  1. Overview
  2. Docs

Source file Time.ml

1
2
3
4
5
type posix = float
let millis_to_posix n =
  float_of_int n
let posix_to_millis n =
  int_of_float ( n *. 1000.)