external clock_linux_get_time
  : unit -> (int64[@unboxed])
  = "clock_linux_get_time_byte" "clock_linux_get_time_native"
[@@noalloc]

let now () = clock_linux_get_time ()