int64_utils.ml
timere
timere.tzdb
timere.tzlocal
timere_tzdb_full
timere_tzdb_none
timere_tzlocal_none
timere_tzlocal_unix
1 2 3 4 5 6 7 8 9 let ( +^ ) = Int64.add let ( -^ ) = Int64.sub let ( /^ ) = Int64.div let ( *^ ) = Int64.mul let div_round_up a b = (a +^ b -^ 1L) /^ b
1 2 3 4 5 6 7 8 9
let ( +^ ) = Int64.add let ( -^ ) = Int64.sub let ( /^ ) = Int64.div let ( *^ ) = Int64.mul let div_round_up a b = (a +^ b -^ 1L) /^ b