This commit is contained in:
swrup 2025-12-07 12:41:50 +01:00
parent ebe8824e9c
commit de477cfe6c

View file

@ -30,6 +30,9 @@ type span = t
module Span = struct module Span = struct
type t = span type t = span
let to_int64_s t = t
let of_int64_s t = t
let to_int_s t = let to_int_s t =
let n = Int64.div t 1_000_000_L in let n = Int64.div t 1_000_000_L in
Int64.to_int n Int64.to_int n