rm timestamp.ml

src/denomination.ml

@@ -1,4 +1,5 @@
 open Crypto
+open Time
 
 type t = {
   pub: rsa_pub;

src/keys.ml

@@ -1,5 +1,6 @@
 open Syntax
 open Crypto
+open Time
 
 type 'a result = ('a, string) Result.t
 

src/mte_info.ml

@@ -1,5 +1,6 @@
 open Syntax
 open Api
+open Time
 module String_map = Stdlib.Map.Make (Stdlib.String)
 
 (* TODO mirage-crypto

src/mte_management.ml

@@ -1,6 +1,7 @@
 open Syntax
 open Api
 open Hash
+open Time
 
 module Keys_get = struct
   let jsont = FutureKeysResponse.jsont

src/pg_type.ml

@@ -14,7 +14,7 @@ let amount : Amount.t t =
 (* we want to use int64 timestamps,
      not postgresql built-in timestamp type *)
 let ptime : unit t = Caqti_type.unit
-let time = Timestamp.caqti
+let time = Time.Timestamp.caqti
 let time_span = Time.TimeRelative.caqti
 let age_mask : int t = Caqti_type.int
 let rsa_pub = RsaPublicKey.caqti
@@ -356,7 +356,7 @@ module Auditor = struct
     auditor_pub: Crypto.EddsaPublicKey.t;
     auditor_url: string;
     auditor_name: string;
-    last_change: Timestamp.t;
+    last_change: Time.Timestamp.t;
     is_active: bool;
   }
 

src/signkey.ml

@@ -1,4 +1,5 @@
 open Crypto
+open Time
 
 type t = {
   pub: eddsa_pub;

src/timestamp.ml

@@ -1 +0,0 @@
-include Time.Timestamp