This commit is contained in:
parent
ebe8824e9c
commit
de477cfe6c
1 changed files with 3 additions and 0 deletions
|
|
@ -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
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue