add time.ml, similar to libgnunetutil's
This commit is contained in:
parent
5eba5f2265
commit
cec0e6afa9
17 changed files with 336 additions and 321 deletions
|
|
@ -57,31 +57,6 @@ module Bytes_64 = struct
|
|||
let bin = Bin.bytes 64
|
||||
end
|
||||
|
||||
(* -- Time -- *)
|
||||
module TimeAbsolute = struct
|
||||
type t = Timestamp.t
|
||||
|
||||
let bin = Timestamp.bin
|
||||
end
|
||||
|
||||
module TimeAbsoluteNBO = struct
|
||||
type t = Timestamp.t
|
||||
|
||||
let bin = Timestamp.bin_nbo
|
||||
end
|
||||
|
||||
module TimeRelative = struct
|
||||
type t = Timestamp.Span.t
|
||||
|
||||
let bin = Timestamp.Span.bin
|
||||
end
|
||||
|
||||
module TimeRelativeNBO = struct
|
||||
type t = Timestamp.Span.t
|
||||
|
||||
let bin = Timestamp.Span.bin_nbo
|
||||
end
|
||||
|
||||
(* -- Cryptographic primitives -- *)
|
||||
|
||||
(* Hashes *)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue