clean up

src/api.ml

@@ -5,7 +5,8 @@
    option: correct use opt_mem or Jsont.option
    better types:
      - payto_uri
-     - uri *)
+     - uri
+   use of monotonic time for some validity_start/_end fields *)
 
 let protocol_version = "31:0:0"
 
@@ -497,8 +498,6 @@ module AuditorSetupMessage = struct
     auditor_name: string;
     auditor_pub: EddsaPublicKey.t;
     master_sig: MasterAddAuditor.t;
-    (* TODO monotonic time
-       something about using monotonic system time here! *)
     validity_start: Timestamp.t;
   }
 
@@ -523,7 +522,6 @@ end
 module AuditorTeardownMessage = struct
   type t = {
     master_sig: MasterDelAuditor.t;
-    (* TODO monotonic time *)
     validity_end: Timestamp.t;
   }
 
@@ -630,7 +628,6 @@ module WireSetupMessage = struct
     payto_uri: string;
     master_sig_wire: MasterWireDetails.t;
     master_sig_add: MasterAddWire.t;
-    (* TODO monotonic time *)
     validity_start: Timestamp.t;
     bank_label: string option;
     priority: int option;
@@ -668,7 +665,6 @@ module WireTeardownMessage = struct
   type t = {
     payto_uri: string;
     master_sig_del: MasterDelWire.t;
-    (* TODO monotonic time *)
     validity_end: Timestamp.t;
   }